diff options
65 files changed, 30726 insertions, 14795 deletions
diff --git a/gcc/ChangeLog.MELT b/gcc/ChangeLog.MELT index a6e0ba8d025..0be8f9c1bef 100644 --- a/gcc/ChangeLog.MELT +++ b/gcc/ChangeLog.MELT @@ -1,7 +1,76 @@ 2012-07-02 Basile Starynkevitch <basile@starynkevitch.net> - * melt-runtime.h (melt_warn_for_no_expected_secondary_results): Becomes a macro. - (melt_warn_for_no_expected_secondary_results_at): New function declaration. + {{Regenerate all}} + * melt/generated/meltrunsup-inc.c: Regenerate. + * melt/generated/meltrunsup.h: Regenerate. + * melt/generated/warmelt-base+01.c: Regenerate. + * melt/generated/warmelt-base+02.c: Regenerate. + * melt/generated/warmelt-base+03.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+03.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+meltdesc.c: Regenerate. + * melt/generated/warmelt-genobj+melttime.h: Regenerate. + * melt/generated/warmelt-genobj.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+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+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+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+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+meltdesc.c: Regenerate. + * melt/generated/warmelt-outobj+melttime.h: Regenerate. + * melt/generated/warmelt-outobj.c: Regenerate. + +2012-07-02 Basile Starynkevitch <basile@starynkevitch.net> + * melt-runtime.h (melt_warn_for_no_expected_secondary_results): + Becomes a macro. + (melt_warn_for_no_expected_secondary_results_at): New function + declaration. * melt-runtime.c (melt_warn_for_no_expected_secondary_results_at): New function. * melt/warmelt-base.melt (compare_named_alpha): return two values. diff --git a/gcc/melt/generated/meltrunsup-inc.c b/gcc/melt/generated/meltrunsup-inc.c index 92e16668f04..777ad592f6b 100644 --- a/gcc/melt/generated/meltrunsup-inc.c +++ b/gcc/melt/generated/meltrunsup-inc.c @@ -3189,5 +3189,5 @@ end: #undef compv -/*** End of code file meltrunsup-inc.c generated on 2012 Jun 22 - * by GCC MELT 4.8.0 20120620 (experimental) [melt-branch revision 188875] MELT_0.9.6-pre . ***/ +/*** End of code file meltrunsup-inc.c generated on 2012 Jul 02 + * by GCC MELT 4.8.0 20120702 (experimental) [melt-branch revision 189162] MELT_0.9.6-pre . ***/ diff --git a/gcc/melt/generated/meltrunsup.h b/gcc/melt/generated/meltrunsup.h index 92db20a59aa..90150fe45d9 100644 --- a/gcc/melt/generated/meltrunsup.h +++ b/gcc/melt/generated/meltrunsup.h @@ -442,8 +442,7 @@ struct GTY ((variable_size)) meltclosure_st /* when MELTOBMAG_CLOSURE */ meltobject_ptr_t discr; \ meltroutine_ptr_t rout; \ unsigned nbval; \ - melt_ptr_t tabval[N]; \ - long _gap; } + melt_ptr_t tabval[N+1]; } @@ -2551,5 +2550,5 @@ melt_auxput_maptrees (melt_ptr_t map_p, melt_ptr_t val_p) /** end of code generated by generate_runtypesupport_predef_fields **/ -/*** End of declaration file meltrunsup.h generated on 2012 Jun 22 - * by GCC MELT 4.8.0 20120620 (experimental) [melt-branch revision 188875] MELT_0.9.6-pre . ***/ +/*** End of declaration file meltrunsup.h generated on 2012 Jul 02 + * by GCC MELT 4.8.0 20120702 (experimental) [melt-branch revision 189162] MELT_0.9.6-pre . ***/ diff --git a/gcc/melt/generated/warmelt-base+01.c b/gcc/melt/generated/warmelt-base+01.c index 9b85b7c5eab..c25c8eb9eec 100644 --- a/gcc/melt/generated/warmelt-base+01.c +++ b/gcc/melt/generated/warmelt-base+01.c @@ -1328,7 +1328,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:218:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:218:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -1394,8 +1406,8 @@ meltrout_6_warmelt_base_COMPARE_NAMED_ALPHA (meltclosure_ptr_t meltclosp_, struct meltclosure_st *mcfr_clos; struct excepth_melt_st *mcfr_exh; struct melt_callframe_st *mcfr_prev; -#define MELTFRAM_NBVARPTR 13 - melt_ptr_t mcfr_varptr[13]; +#define MELTFRAM_NBVARPTR 19 + melt_ptr_t mcfr_varptr[19]; #define MELTFRAM_NBVARNUM 5 long mcfr_varnum[5]; /*others*/ @@ -1410,13 +1422,13 @@ meltrout_6_warmelt_base_COMPARE_NAMED_ALPHA (meltclosure_ptr_t meltclosp_, (struct frame_meltrout_6_warmelt_base_COMPARE_NAMED_ALPHA_st *) meltfirstargp_; gt_ggc_mx_melt_un (meltframptr_->mcfr_clos); - for (ix = 0; ix < 13; ix++) + for (ix = 0; ix < 19; ix++) if (meltframptr_->mcfr_varptr[ix]) gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]); return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); - meltfram__.mcfr_nbvar = 13; + meltfram__.mcfr_nbvar = 19; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; melt_topframe = (struct melt_callframe_st *) &meltfram__; @@ -1452,40 +1464,96 @@ lab_endgetargs:; /*cond */ if ( /*_#__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ - /*_.IFELSE___V4*/ meltfptr[3] = - ( /*!konst_0 */ meltfrout->tabval[0]);; + /*^block */ + /*anyblock */ + { + + MELT_LOCATION ("warmelt-base.melt:995:/ checksignal"); + MELT_CHECK_SIGNAL (); + ; + /*^quasiblock */ + + + /*_.RETVAL___V1*/ meltfptr[0] = + ( /*!konst_0 */ meltfrout->tabval[0]);; + MELT_LOCATION ("warmelt-base.melt:995:/ putxtraresult"); + if (!meltxrestab_ || !meltxresdescr_) + goto labend_rout; + if (meltxresdescr_[0] != MELTBPAR_PTR) + goto labend_rout; + if (meltxrestab_[0].meltbp_aptr) + *(meltxrestab_[0].meltbp_aptr) = (melt_ptr_t) (( /*nil */ NULL)); + ; + /*^finalreturn */ + ; + /*finalret */ goto labend_rout; + /*_.IFELSE___V4*/ meltfptr[3] = /*_.RETURN___V5*/ meltfptr[4];; + /*epilog */ + + MELT_LOCATION ("warmelt-base.melt:994:/ clear"); + /*clear *//*_.RETURN___V5*/ meltfptr[4] = 0; + } + ; } else - { - MELT_LOCATION ("warmelt-base.melt:994:/ cond.else"); + { /*^cond.else */ /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:995:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:996:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_NOT_A__L2*/ meltfnum[1] = !melt_is_instance_of ((melt_ptr_t) ( /*_.N1__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-base.melt:995:/ cond"); + MELT_LOCATION ("warmelt-base.melt:996:/ cond"); /*cond */ if ( /*_#IS_NOT_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ - /*_.IFELSE___V5*/ meltfptr[4] = - ( /*!konst_2 */ meltfrout->tabval[2]);; + /*^block */ + /*anyblock */ + { + + MELT_LOCATION ("warmelt-base.melt:997:/ checksignal"); + MELT_CHECK_SIGNAL (); + ; + /*^quasiblock */ + + + /*_.RETVAL___V1*/ meltfptr[0] = + ( /*!konst_2 */ meltfrout->tabval[2]);; + MELT_LOCATION ("warmelt-base.melt:997:/ putxtraresult"); + if (!meltxrestab_ || !meltxresdescr_) + goto labend_rout; + if (meltxresdescr_[0] != MELTBPAR_PTR) + goto labend_rout; + if (meltxrestab_[0].meltbp_aptr) + *(meltxrestab_[0].meltbp_aptr) = + (melt_ptr_t) (( /*nil */ NULL)); + ; + /*^finalreturn */ + ; + /*finalret */ goto labend_rout; + /*_.IFELSE___V6*/ meltfptr[4] = + /*_.RETURN___V7*/ meltfptr[6];; + /*epilog */ + + MELT_LOCATION ("warmelt-base.melt:996:/ clear"); + /*clear *//*_.RETURN___V7*/ meltfptr[6] = 0; + } + ; } else - { - MELT_LOCATION ("warmelt-base.melt:995:/ cond.else"); + { /*^cond.else */ /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:997:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:998:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_NOT_A__L3*/ meltfnum[2] = @@ -1494,170 +1562,287 @@ lab_endgetargs:; (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout-> tabval[1])));; - MELT_LOCATION ("warmelt-base.melt:997:/ cond"); + MELT_LOCATION ("warmelt-base.melt:998:/ cond"); /*cond */ if ( /*_#IS_NOT_A__L3*/ meltfnum[2]) /*then */ { /*^cond.then */ - /*_.IFELSE___V6*/ meltfptr[5] = - ( /*!konst_3 */ meltfrout->tabval[3]);; + /*^block */ + /*anyblock */ + { + + MELT_LOCATION ("warmelt-base.melt:999:/ checksignal"); + MELT_CHECK_SIGNAL (); + ; + /*^quasiblock */ + + + /*_.RETVAL___V1*/ meltfptr[0] = + ( /*!konst_3 */ meltfrout->tabval[3]);; + MELT_LOCATION ("warmelt-base.melt:999:/ putxtraresult"); + if (!meltxrestab_ || !meltxresdescr_) + goto labend_rout; + if (meltxresdescr_[0] != MELTBPAR_PTR) + goto labend_rout; + if (meltxrestab_[0].meltbp_aptr) + *(meltxrestab_[0].meltbp_aptr) = + (melt_ptr_t) (( /*nil */ NULL)); + ; + /*^finalreturn */ + ; + /*finalret */ goto labend_rout; + /*_.IFELSE___V8*/ meltfptr[6] = + /*_.RETURN___V9*/ meltfptr[8];; + /*epilog */ + + MELT_LOCATION ("warmelt-base.melt:998:/ clear"); + /*clear *//*_.RETURN___V9*/ meltfptr[8] = 0; + } + ; } else - { - MELT_LOCATION ("warmelt-base.melt:997:/ cond.else"); + { /*^cond.else */ /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1000:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1001:/ quasiblock"); /*^getslot */ { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.N1__V2*/ meltfptr[1]), 1, "NAMED_NAME"); - /*_.SN1__V8*/ - meltfptr[7] = slot; + /*_.SN1__V11*/ + meltfptr[10] = slot; }; ; - MELT_LOCATION ("warmelt-base.melt:1001:/ getslot"); + MELT_LOCATION ("warmelt-base.melt:1002:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.N2__V3*/ meltfptr[2]), 1, "NAMED_NAME"); - /*_.SN2__V9*/ - meltfptr[8] = slot; + /*_.SN2__V12*/ + meltfptr[11] = slot; }; ; - MELT_LOCATION ("warmelt-base.melt:1003:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1004:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#STRING___L4*/ meltfnum[3] = melt_string_less ((melt_ptr_t) - ( /*_.SN1__V8*/ meltfptr[7]), - (melt_ptr_t) ( /*_.SN2__V9*/ - meltfptr[8]));; - MELT_LOCATION ("warmelt-base.melt:1003:/ cond"); + ( /*_.SN1__V11*/ meltfptr[10]), + (melt_ptr_t) ( /*_.SN2__V12*/ + meltfptr[11]));; + MELT_LOCATION ("warmelt-base.melt:1004:/ cond"); /*cond */ if ( /*_#STRING___L4*/ meltfnum[3]) /*then */ { /*^cond.then */ - /*_.IFELSE___V10*/ meltfptr[9] = - ( /*!konst_4 */ meltfrout->tabval[4]);; + /*^block */ + /*anyblock */ + { + + MELT_LOCATION + ("warmelt-base.melt:1005:/ checksignal"); + MELT_CHECK_SIGNAL (); + ; + /*^quasiblock */ + + + /*_.RETVAL___V1*/ meltfptr[0] = + ( /*!konst_4 */ meltfrout->tabval[4]);; + MELT_LOCATION + ("warmelt-base.melt:1005:/ putxtraresult"); + if (!meltxrestab_ || !meltxresdescr_) + goto labend_rout; + if (meltxresdescr_[0] != MELTBPAR_PTR) + goto labend_rout; + if (meltxrestab_[0].meltbp_aptr) + *(meltxrestab_[0].meltbp_aptr) = + (melt_ptr_t) (( /*nil */ NULL)); + ; + /*^finalreturn */ + ; + /*finalret */ goto labend_rout; + /*_.IFELSE___V13*/ meltfptr[12] = + /*_.RETURN___V14*/ meltfptr[13];; + /*epilog */ + + MELT_LOCATION ("warmelt-base.melt:1004:/ clear"); + /*clear *//*_.RETURN___V14*/ meltfptr[13] = 0; + } + ; } else - { - MELT_LOCATION - ("warmelt-base.melt:1003:/ cond.else"); + { /*^cond.else */ /*^block */ /*anyblock */ { MELT_LOCATION - ("warmelt-base.melt:1005:/ checksignal"); + ("warmelt-base.melt:1006:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#STRING___L5*/ meltfnum[4] = melt_string_less ((melt_ptr_t) - ( /*_.SN2__V9*/ meltfptr[8]), - (melt_ptr_t) ( /*_.SN1__V8*/ - meltfptr[7]));; - MELT_LOCATION ("warmelt-base.melt:1005:/ cond"); + ( /*_.SN2__V12*/ + meltfptr[11]), + (melt_ptr_t) ( /*_.SN1__V11*/ + meltfptr[10]));; + MELT_LOCATION ("warmelt-base.melt:1006:/ cond"); /*cond */ if ( /*_#STRING___L5*/ meltfnum[4]) /*then */ { /*^cond.then */ - /*_.IFELSE___V11*/ meltfptr[10] = - ( /*!konst_5 */ meltfrout->tabval[5]);; + /*^block */ + /*anyblock */ + { + + MELT_LOCATION + ("warmelt-base.melt:1007:/ checksignal"); + MELT_CHECK_SIGNAL (); + ; + /*^quasiblock */ + + + /*_.RETVAL___V1*/ meltfptr[0] = + ( /*!konst_5 */ meltfrout->tabval[5]);; + MELT_LOCATION + ("warmelt-base.melt:1007:/ putxtraresult"); + if (!meltxrestab_ || !meltxresdescr_) + goto labend_rout; + if (meltxresdescr_[0] != MELTBPAR_PTR) + goto labend_rout; + if (meltxrestab_[0].meltbp_aptr) + *(meltxrestab_[0].meltbp_aptr) = + (melt_ptr_t) (( /*nil */ NULL)); + ; + /*^finalreturn */ + ; + /*finalret */ goto labend_rout; + /*_.IFELSE___V15*/ meltfptr[13] = + /*_.RETURN___V16*/ meltfptr[15];; + /*epilog */ + + MELT_LOCATION + ("warmelt-base.melt:1006:/ clear"); + /*clear *//*_.RETURN___V16*/ meltfptr[15] = + 0; + } + ; } else - { - MELT_LOCATION - ("warmelt-base.melt:1005:/ cond.else"); + { /*^cond.else */ /*^block */ /*anyblock */ { MELT_LOCATION - ("warmelt-base.melt:1007:/ quasiblock"); + ("warmelt-base.melt:1009:/ checksignal"); + MELT_CHECK_SIGNAL (); + ; + /*^quasiblock */ - /*_.PROGN___V12*/ meltfptr[11] = + /*_.RETVAL___V1*/ meltfptr[0] = ( /*!konst_6 */ meltfrout->tabval[6]);; + MELT_LOCATION + ("warmelt-base.melt:1009:/ putxtraresult"); + if (!meltxrestab_ || !meltxresdescr_) + goto labend_rout; + if (meltxresdescr_[0] != MELTBPAR_PTR) + goto labend_rout; + if (meltxrestab_[0].meltbp_aptr) + *(meltxrestab_[0].meltbp_aptr) = + (melt_ptr_t) (( /*nil */ NULL)); + ; + /*^finalreturn */ + ; + /*finalret */ goto labend_rout; + MELT_LOCATION + ("warmelt-base.melt:1008:/ quasiblock"); + + + /*_.PROGN___V18*/ meltfptr[17] = + /*_.RETURN___V17*/ meltfptr[15];; /*^compute */ - /*_.IFELSE___V11*/ meltfptr[10] = - /*_.PROGN___V12*/ meltfptr[11];; + /*_.IFELSE___V15*/ meltfptr[13] = + /*_.PROGN___V18*/ meltfptr[17];; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1005:/ clear"); - /*clear *//*_.PROGN___V12*/ meltfptr[11] = + ("warmelt-base.melt:1006:/ clear"); + /*clear *//*_.RETURN___V17*/ meltfptr[15] = + 0; + /*^clear */ + /*clear *//*_.PROGN___V18*/ meltfptr[17] = 0; } ; } ; - /*_.IFELSE___V10*/ meltfptr[9] = - /*_.IFELSE___V11*/ meltfptr[10];; + /*_.IFELSE___V13*/ meltfptr[12] = + /*_.IFELSE___V15*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1003:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1004:/ clear"); /*clear *//*_#STRING___L5*/ meltfnum[4] = 0; /*^clear */ - /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0; + /*clear *//*_.IFELSE___V15*/ meltfptr[13] = 0; } ; } ; - /*_.LET___V7*/ meltfptr[6] = - /*_.IFELSE___V10*/ meltfptr[9];; + /*_.LET___V10*/ meltfptr[8] = + /*_.IFELSE___V13*/ meltfptr[12];; - MELT_LOCATION ("warmelt-base.melt:1000:/ clear"); - /*clear *//*_.SN1__V8*/ meltfptr[7] = 0; + MELT_LOCATION ("warmelt-base.melt:1001:/ clear"); + /*clear *//*_.SN1__V11*/ meltfptr[10] = 0; /*^clear */ - /*clear *//*_.SN2__V9*/ meltfptr[8] = 0; + /*clear *//*_.SN2__V12*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_#STRING___L4*/ meltfnum[3] = 0; /*^clear */ - /*clear *//*_.IFELSE___V10*/ meltfptr[9] = 0; - MELT_LOCATION ("warmelt-base.melt:999:/ quasiblock"); + /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; + MELT_LOCATION ("warmelt-base.melt:1000:/ quasiblock"); - /*_.PROGN___V13*/ meltfptr[11] = - /*_.LET___V7*/ meltfptr[6];; + /*_.PROGN___V19*/ meltfptr[15] = + /*_.LET___V10*/ meltfptr[8];; /*^compute */ - /*_.IFELSE___V6*/ meltfptr[5] = - /*_.PROGN___V13*/ meltfptr[11];; + /*_.IFELSE___V8*/ meltfptr[6] = + /*_.PROGN___V19*/ meltfptr[15];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:997:/ clear"); - /*clear *//*_.LET___V7*/ meltfptr[6] = 0; + MELT_LOCATION ("warmelt-base.melt:998:/ clear"); + /*clear *//*_.LET___V10*/ meltfptr[8] = 0; /*^clear */ - /*clear *//*_.PROGN___V13*/ meltfptr[11] = 0; + /*clear *//*_.PROGN___V19*/ meltfptr[15] = 0; } ; } ; - /*_.IFELSE___V5*/ meltfptr[4] = - /*_.IFELSE___V6*/ meltfptr[5];; + /*_.IFELSE___V6*/ meltfptr[4] = + /*_.IFELSE___V8*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:995:/ clear"); + MELT_LOCATION ("warmelt-base.melt:996:/ clear"); /*clear *//*_#IS_NOT_A__L3*/ meltfnum[2] = 0; /*^clear */ - /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; + /*clear *//*_.IFELSE___V8*/ meltfptr[6] = 0; } ; } ; - /*_.IFELSE___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; + /*_.IFELSE___V4*/ meltfptr[3] = /*_.IFELSE___V6*/ meltfptr[4];; /*epilog */ MELT_LOCATION ("warmelt-base.melt:994:/ clear"); /*clear *//*_#IS_NOT_A__L2*/ meltfnum[1] = 0; /*^clear */ - /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; + /*clear *//*_.IFELSE___V6*/ meltfptr[4] = 0; } ; } @@ -1666,7 +1851,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:990:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:990:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -1778,7 +1975,7 @@ meltrout_7_warmelt_base_ADD2OUT (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1304:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1305:/ getarg"); /*_.OUT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -1788,7 +1985,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1308:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1309:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_OUT__L1*/ meltfnum[0] = @@ -1797,7 +1994,7 @@ lab_endgetargs:; /*_#NOT__L2*/ meltfnum[1] = (!( /*_#IS_OUT__L1*/ meltfnum[0]));; - MELT_LOCATION ("warmelt-base.melt:1308:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1309:/ cond"); /*cond */ if ( /*_#NOT__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -1805,17 +2002,29 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1309:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1310:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-base.melt:1309:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:1310:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V3*/ meltfptr[2] = /*_.RETURN___V4*/ meltfptr[3];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1308:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1309:/ clear"); /*clear *//*_.RETURN___V4*/ meltfptr[3] = 0; } ; @@ -1826,7 +2035,7 @@ lab_endgetargs:; /*_.IF___V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:1310:/ loop"); + MELT_LOCATION ("warmelt-base.melt:1311:/ loop"); /*loop */ { labloop_ARGLOOP_1:; /*^loopbody */ @@ -1838,7 +2047,7 @@ lab_endgetargs:; /*^checksignal */ MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-base.melt:1312:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1313:/ cond"); /*cond */ if ( /*ifvariadic nomore */ variad_ADD2OUT_ix == variad_ADD2OUT_len) /*then */ { /*^cond.then */ @@ -1849,19 +2058,31 @@ lab_endgetargs:; /*^compute */ /*consume variadic ! */ variad_ADD2OUT_ix += 0;; - MELT_LOCATION ("warmelt-base.melt:1314:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1315:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OUT__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-base.melt:1314:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:1315:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1312:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1313:/ clear"); /*clear *//*_.RETURN___V7*/ meltfptr[6] = 0; } ; @@ -1890,14 +2111,14 @@ lab_endgetargs:; /*^compute */ /*consume variadic Value ! */ variad_ADD2OUT_ix += 1;; - MELT_LOCATION ("warmelt-base.melt:1316:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1317:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L3*/ meltfnum[2] = (melt_magic_discr ((melt_ptr_t) ( /*_.V__V8*/ meltfptr[6])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1316:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1317:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L3*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -1905,7 +2126,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1317:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1318:/ cond"); /*cond */ if ( /*ifvariadic arg#1 */ variad_ADD2OUT_ix >= 0 && variad_ADD2OUT_ix + 1 <= variad_ADD2OUT_len && meltxargdescr_[variad_ADD2OUT_ix] == MELTBPAR_PTR) /*then */ { /*^cond.then */ @@ -1926,7 +2147,7 @@ lab_endgetargs:; /*consume variadic Value ! */ variad_ADD2OUT_ix += 1;; MELT_LOCATION - ("warmelt-base.melt:1319:/ checksignal"); + ("warmelt-base.melt:1320:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -1952,7 +2173,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1317:/ clear"); + ("warmelt-base.melt:1318:/ clear"); /*clear *//*_.VV__V10*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.V__V11*/ meltfptr[10] = 0; @@ -1984,7 +2205,7 @@ lab_endgetargs:; /*consume variadic LONG ! */ variad_ADD2OUT_ix += 1;; MELT_LOCATION - ("warmelt-base.melt:1321:/ checksignal"); + ("warmelt-base.melt:1322:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -2007,7 +2228,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1317:/ clear"); + ("warmelt-base.melt:1318:/ clear"); /*clear *//*_#LL__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.V__V12*/ meltfptr[9] = 0; @@ -2040,7 +2261,7 @@ lab_endgetargs:; /*consume variadic CSTRING ! */ variad_ADD2OUT_ix += 1;; MELT_LOCATION - ("warmelt-base.melt:1323:/ checksignal"); + ("warmelt-base.melt:1324:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -2062,7 +2283,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1317:/ clear"); + ("warmelt-base.melt:1318:/ clear"); /*clear *//*_?*/ meltfram__. loc_CSTRING__o0 = 0; /*^clear */ @@ -2098,7 +2319,7 @@ lab_endgetargs:; /*consume variadic TREE ! */ variad_ADD2OUT_ix += 1;; MELT_LOCATION - ("warmelt-base.melt:1325:/ checksignal"); + ("warmelt-base.melt:1326:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -2122,7 +2343,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1317:/ clear"); + ("warmelt-base.melt:1318:/ clear"); /*clear *//*_?*/ meltfram__. loc_TREE__o1 = 0; /*^clear */ @@ -2159,7 +2380,7 @@ lab_endgetargs:; variad_ADD2OUT_ix += 1;; MELT_LOCATION - ("warmelt-base.melt:1327:/ checksignal"); + ("warmelt-base.melt:1328:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -2188,7 +2409,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1317:/ clear"); + ("warmelt-base.melt:1318:/ clear"); /*clear *//*_?*/ meltfram__. loc_GIMPLE__o2 = 0; @@ -2230,7 +2451,7 @@ lab_endgetargs:; variad_ADD2OUT_ix += 1;; MELT_LOCATION - ("warmelt-base.melt:1329:/ checksignal"); + ("warmelt-base.melt:1330:/ checksignal"); MELT_CHECK_SIGNAL (); ; @@ -2264,7 +2485,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1317:/ clear"); + ("warmelt-base.melt:1318:/ clear"); /*clear *//*_?*/ meltfram__. loc_GIMPLE_SEQ__o3 @@ -2308,7 +2529,7 @@ lab_endgetargs:; variad_ADD2OUT_ix += 1;; MELT_LOCATION - ("warmelt-base.melt:1331:/ checksignal"); + ("warmelt-base.melt:1332:/ checksignal"); MELT_CHECK_SIGNAL (); ; @@ -2348,7 +2569,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1317:/ clear"); + ("warmelt-base.melt:1318:/ clear"); /*clear *//*_?*/ meltfram__. loc_EDGE__o4 @@ -2394,7 +2615,7 @@ lab_endgetargs:; += 1;; MELT_LOCATION - ("warmelt-base.melt:1333:/ checksignal"); + ("warmelt-base.melt:1334:/ checksignal"); MELT_CHECK_SIGNAL (); ; @@ -2436,7 +2657,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1317:/ clear"); + ("warmelt-base.melt:1318:/ clear"); /*clear *//*_?*/ meltfram__. loc_LOOP__o5 @@ -2459,7 +2680,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-base.melt:1335:/ quasiblock"); + ("warmelt-base.melt:1336:/ quasiblock"); /*_.VCTY__V20*/ @@ -2474,7 +2695,7 @@ lab_endgetargs:; #endif /*melt_variadic_index */ ;; MELT_LOCATION - ("warmelt-base.melt:1338:/ cond"); + ("warmelt-base.melt:1339:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of @@ -2511,7 +2732,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-base.melt:1337:/ locexp"); + ("warmelt-base.melt:1338:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s - %s", melt_dbgcounter, @@ -2523,7 +2744,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG MELT_LOCATION - ("warmelt-base.melt:1339:/ cppif.then"); + ("warmelt-base.melt:1340:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2545,7 +2766,7 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-base.melt:1339:/ cond.else"); + ("warmelt-base.melt:1340:/ cond.else"); /*^block */ /*anyblock */ @@ -2557,7 +2778,7 @@ lab_endgetargs:; { /*^locexp */ melt_assert_failed - (("invalid variadic argument after closure to ADD2OUT"), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, (1339) ? (1339) : __LINE__, __FUNCTION__); + (("invalid variadic argument after closure to ADD2OUT"), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, (1340) ? (1340) : __LINE__, __FUNCTION__); ; } ; @@ -2583,7 +2804,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1339:/ clear"); + ("warmelt-base.melt:1340:/ clear"); /*clear *//*_.IFELSE___V23*/ meltfptr [22] @@ -2601,7 +2822,7 @@ lab_endgetargs:; #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION - ("warmelt-base.melt:1340:/ quasiblock"); + ("warmelt-base.melt:1341:/ quasiblock"); /*_.RETVAL___V1*/ @@ -2609,8 +2830,21 @@ lab_endgetargs:; [0] = NULL;; - MELT_LOCATION - ("warmelt-base.melt:1340:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-base.melt:1341:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto @@ -2624,7 +2858,7 @@ lab_endgetargs:; [22];; MELT_LOCATION - ("warmelt-base.melt:1335:/ clear"); + ("warmelt-base.melt:1336:/ clear"); /*clear *//*_.VCTY__V20*/ meltfptr [9] @@ -2658,7 +2892,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1317:/ clear"); + ("warmelt-base.melt:1318:/ clear"); /*clear *//*_.LET___V19*/ meltfptr [10] @@ -2709,14 +2943,14 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1316:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1317:/ cond.else"); /*^block */ /*anyblock */ { MELT_LOCATION - ("warmelt-base.melt:1342:/ checksignal"); + ("warmelt-base.melt:1343:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -2741,7 +2975,7 @@ lab_endgetargs:; /*_.ADD_TO_OUT__V25*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1316:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1317:/ clear"); /*clear *//*_.ADD_TO_OUT__V25*/ meltfptr[9] = 0; } ; @@ -2749,7 +2983,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1312:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1313:/ clear"); /*clear *//*_.V__V8*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_#IS_CLOSURE__L3*/ meltfnum[2] = 0; @@ -2783,7 +3017,7 @@ lab_endgetargs:; 1;; { - MELT_LOCATION ("warmelt-base.melt:1344:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1345:/ locexp"); meltgc_add_out_dec ((melt_ptr_t) ( /*_.OUT__V2*/ meltfptr[1]), ( /*_#N__L5*/ meltfnum[3])); @@ -2791,7 +3025,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1312:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1313:/ clear"); /*clear *//*_#N__L5*/ meltfnum[3] = 0; } ; @@ -2823,7 +3057,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-base.melt:1346:/ locexp"); + ("warmelt-base.melt:1347:/ locexp"); meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V2*/ meltfptr[1]), @@ -2834,7 +3068,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1312:/ clear"); + ("warmelt-base.melt:1313:/ clear"); /*clear *//*_?*/ meltfram__.loc_CSTRING__o6 = 0; } @@ -2848,7 +3082,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-base.melt:1348:/ quasiblock"); + ("warmelt-base.melt:1349:/ quasiblock"); /*_.VCTY__V26*/ meltfptr[20] = @@ -2867,7 +3101,7 @@ lab_endgetargs:; #endif /*melt_variadic_index */ ;; MELT_LOCATION - ("warmelt-base.melt:1351:/ cond"); + ("warmelt-base.melt:1352:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.VCTY__V26*/ meltfptr[20]), @@ -2894,7 +3128,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-base.melt:1350:/ locexp"); + ("warmelt-base.melt:1351:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s - %s", melt_dbgcounter, ("ADD2OUT for unsupported ctype; use a manipulator like OUTPUT_TREE "), @@ -2904,7 +3138,7 @@ lab_endgetargs:; ; MELT_LOCATION - ("warmelt-base.melt:1348:/ clear"); + ("warmelt-base.melt:1349:/ clear"); /*clear *//*_.VCTY__V26*/ meltfptr[20] = 0; /*^clear */ /*clear *//*_.NAMED_NAME__V27*/ meltfptr[21] = @@ -2912,7 +3146,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG MELT_LOCATION - ("warmelt-base.melt:1353:/ cppif.then"); + ("warmelt-base.melt:1354:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2930,7 +3164,7 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-base.melt:1353:/ cond.else"); + ("warmelt-base.melt:1354:/ cond.else"); /*^block */ /*anyblock */ @@ -2941,7 +3175,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("invalid variadic argument to ADD2OUT"), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, (1353) ? (1353) : __LINE__, __FUNCTION__); + melt_assert_failed (("invalid variadic argument to ADD2OUT"), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, (1354) ? (1354) : __LINE__, __FUNCTION__); ; } ; @@ -2959,7 +3193,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1353:/ clear"); + ("warmelt-base.melt:1354:/ clear"); /*clear *//*_.IFELSE___V29*/ meltfptr[10] = 0; } @@ -2971,7 +3205,7 @@ lab_endgetargs:; #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION - ("warmelt-base.melt:1312:/ checksignal"); + ("warmelt-base.melt:1313:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -3003,19 +3237,31 @@ lab_endgetargs:; ; goto labloop_ARGLOOP_1; labexit_ARGLOOP_1:; - MELT_LOCATION ("warmelt-base.melt:1310:/ loopepilog"); + MELT_LOCATION ("warmelt-base.melt:1311:/ loopepilog"); /*loopepilog */ /*_.FOREVER___V5*/ meltfptr[3] = /*_.ARGLOOP__V6*/ meltfptr[5];; } ; - MELT_LOCATION ("warmelt-base.melt:1304:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1305:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.FOREVER___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:1304:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:1305:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3136,7 +3382,7 @@ meltrout_8_warmelt_base_STRING4OUT (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1357:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1358:/ getarg"); /*_.DIS__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -3146,7 +3392,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1360:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1361:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -3157,7 +3403,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1360:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1361:/ cond.else"); /*^block */ /*anyblock */ @@ -3175,7 +3421,7 @@ lab_endgetargs:; /*_.IFELSE___V3*/ meltfptr[2] = /*_.PROGN___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1360:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1361:/ clear"); /*clear *//*_.SETQ___V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.PROGN___V5*/ meltfptr[4] = 0; @@ -3183,14 +3429,14 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-base.melt:1361:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1362:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L1*/ meltfnum[0] = melt_is_instance_of ((melt_ptr_t) ( /*_.DIS__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_DISCRIMINANT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-base.melt:1361:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1362:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -3198,20 +3444,32 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1361:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1362:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1362:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1363:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-base.melt:1362:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:1363:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-base.melt:1361:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1362:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[7] = /*_.RETURN___V7*/ meltfptr[4];; @@ -3220,7 +3478,7 @@ lab_endgetargs:; /*_.IFELSE___V6*/ meltfptr[3] = /*_.PROGN___V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1361:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1362:/ clear"); /*clear *//*_.RETURN___V7*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.PROGN___V8*/ meltfptr[7] = 0; @@ -3228,19 +3486,19 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-base.melt:1363:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1364:/ quasiblock"); /*_#GOODMAG__L2*/ meltfnum[1] = 0;; { - MELT_LOCATION ("warmelt-base.melt:1365:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1366:/ locexp"); /* string4out GETMAGIDISCHK__1 *//*_#GOODMAG__L2*/ meltfnum[1] = ((meltobject_ptr_t) /*_.DIS__V2*/ meltfptr[1])->meltobj_magic == MELTOBMAG_STRING;; } ; - MELT_LOCATION ("warmelt-base.melt:1368:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1369:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -3251,7 +3509,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1368:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1369:/ cond.else"); /*^block */ /*anyblock */ @@ -3261,7 +3519,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-base.melt:1368:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:1369:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*^quasiblock */ @@ -3273,7 +3543,7 @@ lab_endgetargs:; /*_.IFELSE___V10*/ meltfptr[7] = /*_.PROGN___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1368:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1369:/ clear"); /*clear *//*_.RETURN___V11*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_.PROGN___V12*/ meltfptr[11] = 0; @@ -3283,11 +3553,11 @@ lab_endgetargs:; ; /*_.LET___V9*/ meltfptr[4] = /*_.IFELSE___V10*/ meltfptr[7];; - MELT_LOCATION ("warmelt-base.melt:1363:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1364:/ clear"); /*clear *//*_#GOODMAG__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[7] = 0; - MELT_LOCATION ("warmelt-base.melt:1369:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1370:/ quasiblock"); /*_.OUT__V14*/ meltfptr[11] = @@ -3295,7 +3565,7 @@ lab_endgetargs:; meltgc_new_strbuf ((meltobject_ptr_t) (( /*!DISCR_STRBUF */ meltfrout->tabval[2])), (const char *) 0);; - MELT_LOCATION ("warmelt-base.melt:1371:/ loop"); + MELT_LOCATION ("warmelt-base.melt:1372:/ loop"); /*loop */ { labloop_ARGLOOP_2:; /*^loopbody */ @@ -3307,7 +3577,7 @@ lab_endgetargs:; /*^checksignal */ MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-base.melt:1373:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1374:/ cond"); /*cond */ if ( /*ifvariadic nomore */ variad_STRING4OUT_ix == variad_STRING4OUT_len) /*then */ { /*^cond.then */ @@ -3318,7 +3588,7 @@ lab_endgetargs:; /*^compute */ /*consume variadic ! */ variad_STRING4OUT_ix += 0;; - MELT_LOCATION ("warmelt-base.melt:1375:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1376:/ quasiblock"); /*^compute */ @@ -3336,7 +3606,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1373:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1374:/ cond.else"); /*^block */ /*anyblock */ @@ -3361,14 +3631,14 @@ lab_endgetargs:; /*^compute */ /*consume variadic Value ! */ variad_STRING4OUT_ix += 1;; - MELT_LOCATION ("warmelt-base.melt:1377:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1378:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L3*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.V__V17*/ meltfptr[16])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1377:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1378:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -3376,7 +3646,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1378:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1379:/ cond"); /*cond */ if ( /*ifvariadic arg#1 */ variad_STRING4OUT_ix >= 0 && variad_STRING4OUT_ix + 1 <= variad_STRING4OUT_len && meltxargdescr_[variad_STRING4OUT_ix] == MELTBPAR_PTR) /*then */ { /*^cond.then */ @@ -3397,7 +3667,7 @@ lab_endgetargs:; /*consume variadic Value ! */ variad_STRING4OUT_ix += 1;; MELT_LOCATION - ("warmelt-base.melt:1380:/ checksignal"); + ("warmelt-base.melt:1381:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3423,7 +3693,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1378:/ clear"); + ("warmelt-base.melt:1379:/ clear"); /*clear *//*_.VV__V19*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_.V__V20*/ meltfptr[19] = 0; @@ -3455,7 +3725,7 @@ lab_endgetargs:; /*consume variadic LONG ! */ variad_STRING4OUT_ix += 1;; MELT_LOCATION - ("warmelt-base.melt:1382:/ checksignal"); + ("warmelt-base.melt:1383:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3478,7 +3748,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1378:/ clear"); + ("warmelt-base.melt:1379:/ clear"); /*clear *//*_#LL__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.V__V21*/ meltfptr[18] = 0; @@ -3512,7 +3782,7 @@ lab_endgetargs:; /*consume variadic CSTRING ! */ variad_STRING4OUT_ix += 1;; MELT_LOCATION - ("warmelt-base.melt:1384:/ checksignal"); + ("warmelt-base.melt:1385:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3534,7 +3804,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1378:/ clear"); + ("warmelt-base.melt:1379:/ clear"); /*clear *//*_?*/ meltfram__. loc_CSTRING__o0 = 0; /*^clear */ @@ -3571,7 +3841,7 @@ lab_endgetargs:; variad_STRING4OUT_ix += 1;; MELT_LOCATION - ("warmelt-base.melt:1386:/ checksignal"); + ("warmelt-base.melt:1387:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3597,7 +3867,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1378:/ clear"); + ("warmelt-base.melt:1379:/ clear"); /*clear *//*_?*/ meltfram__. loc_TREE__o1 = 0; /*^clear */ @@ -3635,7 +3905,7 @@ lab_endgetargs:; variad_STRING4OUT_ix += 1;; MELT_LOCATION - ("warmelt-base.melt:1388:/ checksignal"); + ("warmelt-base.melt:1389:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3664,7 +3934,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1378:/ clear"); + ("warmelt-base.melt:1379:/ clear"); /*clear *//*_?*/ meltfram__. loc_GIMPLE__o2 = 0; @@ -3706,7 +3976,7 @@ lab_endgetargs:; variad_STRING4OUT_ix += 1;; MELT_LOCATION - ("warmelt-base.melt:1390:/ checksignal"); + ("warmelt-base.melt:1391:/ checksignal"); MELT_CHECK_SIGNAL (); ; @@ -3740,7 +4010,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1378:/ clear"); + ("warmelt-base.melt:1379:/ clear"); /*clear *//*_?*/ meltfram__. loc_GIMPLE_SEQ__o3 @@ -3784,7 +4054,7 @@ lab_endgetargs:; variad_STRING4OUT_ix += 1;; MELT_LOCATION - ("warmelt-base.melt:1392:/ checksignal"); + ("warmelt-base.melt:1393:/ checksignal"); MELT_CHECK_SIGNAL (); ; @@ -3824,7 +4094,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1378:/ clear"); + ("warmelt-base.melt:1379:/ clear"); /*clear *//*_?*/ meltfram__. loc_EDGE__o4 @@ -3870,7 +4140,7 @@ lab_endgetargs:; += 1;; MELT_LOCATION - ("warmelt-base.melt:1394:/ checksignal"); + ("warmelt-base.melt:1395:/ checksignal"); MELT_CHECK_SIGNAL (); ; @@ -3912,7 +4182,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1378:/ clear"); + ("warmelt-base.melt:1379:/ clear"); /*clear *//*_?*/ meltfram__. loc_LOOP__o5 @@ -3935,7 +4205,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-base.melt:1396:/ quasiblock"); + ("warmelt-base.melt:1397:/ quasiblock"); /*_.VCTY__V29*/ @@ -3950,7 +4220,7 @@ lab_endgetargs:; #endif /*melt_variadic_index */ ;; MELT_LOCATION - ("warmelt-base.melt:1399:/ cond"); + ("warmelt-base.melt:1400:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of @@ -3987,7 +4257,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-base.melt:1398:/ locexp"); + ("warmelt-base.melt:1399:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s - %s", melt_dbgcounter, @@ -3999,7 +4269,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG MELT_LOCATION - ("warmelt-base.melt:1400:/ cppif.then"); + ("warmelt-base.melt:1401:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4021,7 +4291,7 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-base.melt:1400:/ cond.else"); + ("warmelt-base.melt:1401:/ cond.else"); /*^block */ /*anyblock */ @@ -4033,7 +4303,7 @@ lab_endgetargs:; { /*^locexp */ melt_assert_failed - (("invalid variadic argument after closure to STRING4OUT"), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, (1400) ? (1400) : __LINE__, __FUNCTION__); + (("invalid variadic argument after closure to STRING4OUT"), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, (1401) ? (1401) : __LINE__, __FUNCTION__); ; } ; @@ -4059,7 +4329,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1400:/ clear"); + ("warmelt-base.melt:1401:/ clear"); /*clear *//*_.IFELSE___V32*/ meltfptr [31] @@ -4077,7 +4347,7 @@ lab_endgetargs:; #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION - ("warmelt-base.melt:1401:/ quasiblock"); + ("warmelt-base.melt:1402:/ quasiblock"); /*_.RETVAL___V1*/ @@ -4085,8 +4355,21 @@ lab_endgetargs:; [0] = NULL;; - MELT_LOCATION - ("warmelt-base.melt:1401:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-base.melt:1402:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto @@ -4100,7 +4383,7 @@ lab_endgetargs:; [31];; MELT_LOCATION - ("warmelt-base.melt:1396:/ clear"); + ("warmelt-base.melt:1397:/ clear"); /*clear *//*_.VCTY__V29*/ meltfptr [18] @@ -4134,7 +4417,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1378:/ clear"); + ("warmelt-base.melt:1379:/ clear"); /*clear *//*_.LET___V28*/ meltfptr [19] @@ -4185,14 +4468,14 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1377:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1378:/ cond.else"); /*^block */ /*anyblock */ { MELT_LOCATION - ("warmelt-base.melt:1403:/ checksignal"); + ("warmelt-base.melt:1404:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -4217,7 +4500,7 @@ lab_endgetargs:; /*_.ADD_TO_OUT__V34*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1377:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1378:/ clear"); /*clear *//*_.ADD_TO_OUT__V34*/ meltfptr[18] = 0; } ; @@ -4225,7 +4508,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1373:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1374:/ clear"); /*clear *//*_.V__V17*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_#IS_CLOSURE__L3*/ meltfnum[1] = 0; @@ -4260,7 +4543,7 @@ lab_endgetargs:; 1;; { - MELT_LOCATION ("warmelt-base.melt:1405:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1406:/ locexp"); meltgc_add_out_dec ((melt_ptr_t) ( /*_.OUT__V14*/ meltfptr[11]), @@ -4269,7 +4552,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1373:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1374:/ clear"); /*clear *//*_#N__L5*/ meltfnum[3] = 0; } ; @@ -4301,7 +4584,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-base.melt:1407:/ locexp"); + ("warmelt-base.melt:1408:/ locexp"); meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V14*/ meltfptr[11]), @@ -4312,7 +4595,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1373:/ clear"); + ("warmelt-base.melt:1374:/ clear"); /*clear *//*_?*/ meltfram__.loc_CSTRING__o6 = 0; } @@ -4326,7 +4609,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-base.melt:1409:/ quasiblock"); + ("warmelt-base.melt:1410:/ quasiblock"); /*_.VCTY__V35*/ meltfptr[29] = @@ -4345,7 +4628,7 @@ lab_endgetargs:; #endif /*melt_variadic_index */ ;; MELT_LOCATION - ("warmelt-base.melt:1412:/ cond"); + ("warmelt-base.melt:1413:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) ( /*_.VCTY__V35*/ meltfptr[29]), @@ -4372,7 +4655,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-base.melt:1411:/ locexp"); + ("warmelt-base.melt:1412:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s - %s", melt_dbgcounter, ("STRING4OUT for unsupported ctype; use a manipulator like OUTPUT_TREE "), @@ -4382,7 +4665,7 @@ lab_endgetargs:; ; MELT_LOCATION - ("warmelt-base.melt:1409:/ clear"); + ("warmelt-base.melt:1410:/ clear"); /*clear *//*_.VCTY__V35*/ meltfptr[29] = 0; /*^clear */ /*clear *//*_.NAMED_NAME__V36*/ meltfptr[30] = @@ -4390,7 +4673,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG MELT_LOCATION - ("warmelt-base.melt:1414:/ cppif.then"); + ("warmelt-base.melt:1415:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4408,7 +4691,7 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-base.melt:1414:/ cond.else"); + ("warmelt-base.melt:1415:/ cond.else"); /*^block */ /*anyblock */ @@ -4419,7 +4702,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("invalid variadic argument to STRING4OUT"), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, (1414) ? (1414) : __LINE__, __FUNCTION__); + melt_assert_failed (("invalid variadic argument to STRING4OUT"), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, (1415) ? (1415) : __LINE__, __FUNCTION__); ; } ; @@ -4437,7 +4720,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-base.melt:1414:/ clear"); + ("warmelt-base.melt:1415:/ clear"); /*clear *//*_.IFELSE___V38*/ meltfptr[19] = 0; } @@ -4449,7 +4732,7 @@ lab_endgetargs:; #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION - ("warmelt-base.melt:1373:/ checksignal"); + ("warmelt-base.melt:1374:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -4481,50 +4764,74 @@ lab_endgetargs:; ; goto labloop_ARGLOOP_2; labexit_ARGLOOP_2:; - MELT_LOCATION ("warmelt-base.melt:1371:/ loopepilog"); + MELT_LOCATION ("warmelt-base.melt:1372:/ loopepilog"); /*loopepilog */ /*_.FOREVER___V15*/ meltfptr[7] = /*_.ARGLOOP__V16*/ meltfptr[15];; } ; - MELT_LOCATION ("warmelt-base.melt:1416:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1417:/ quasiblock"); /*_.STR__V40*/ meltfptr[16] = (meltgc_new_stringdup ((meltobject_ptr_t) ( /*_.DIS__V2*/ meltfptr[1]), melt_strbuf_str ((melt_ptr_t) ( /*_.OUT__V14*/ meltfptr[11]))));; - MELT_LOCATION ("warmelt-base.melt:1418:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1419:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.STR__V40*/ meltfptr[16];; - MELT_LOCATION ("warmelt-base.melt:1418:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:1419:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V39*/ meltfptr[18] = /*_.RETURN___V41*/ meltfptr[17];; - MELT_LOCATION ("warmelt-base.melt:1416:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1417:/ clear"); /*clear *//*_.STR__V40*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.RETURN___V41*/ meltfptr[17] = 0; /*_.LET___V13*/ meltfptr[10] = /*_.LET___V39*/ meltfptr[18];; - MELT_LOCATION ("warmelt-base.melt:1369:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1370:/ clear"); /*clear *//*_.OUT__V14*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_.FOREVER___V15*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.LET___V39*/ meltfptr[18] = 0; - MELT_LOCATION ("warmelt-base.melt:1357:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1358:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[10];; - MELT_LOCATION ("warmelt-base.melt:1357:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:1358:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4626,7 +4933,7 @@ meltrout_9_warmelt_base_ADD2OUT4NULL (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1424:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1425:/ getarg"); /*_.V__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -4647,7 +4954,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-base.melt:1425:/ cppif.then"); + MELT_LOCATION ("warmelt-base.melt:1426:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4657,7 +4964,7 @@ lab_endgetargs:; ; /*_#NULL__L1*/ meltfnum[0] = (( /*_.V__V2*/ meltfptr[1]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:1425:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1426:/ cond"); /*cond */ if ( /*_#NULL__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -4665,7 +4972,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1425:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1426:/ cond.else"); /*^block */ /*anyblock */ @@ -4679,7 +4986,7 @@ lab_endgetargs:; melt_assert_failed (("check null v"), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, - (1425) ? (1425) : __LINE__, __FUNCTION__); + (1426) ? (1426) : __LINE__, __FUNCTION__); ; } ; @@ -4694,7 +5001,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1425:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1426:/ clear"); /*clear *//*_#NULL__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -4707,11 +5014,11 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1426:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1427:/ locexp"); meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V3*/ meltfptr[2]), ("*nil*")); } ; - MELT_LOCATION ("warmelt-base.melt:1424:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1425:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -4803,7 +5110,7 @@ meltrout_10_warmelt_base_ADD2OUT4INTEGER (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1429:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1430:/ getarg"); /*_.VN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -4824,7 +5131,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-base.melt:1430:/ cppif.then"); + MELT_LOCATION ("warmelt-base.melt:1431:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4835,7 +5142,7 @@ lab_endgetargs:; /*_#IS_INTEGERBOX__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.VN__V2*/ meltfptr[1])) == MELTOBMAG_INT);; - MELT_LOCATION ("warmelt-base.melt:1430:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1431:/ cond"); /*cond */ if ( /*_#IS_INTEGERBOX__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -4843,7 +5150,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1430:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1431:/ cond.else"); /*^block */ /*anyblock */ @@ -4857,7 +5164,7 @@ lab_endgetargs:; melt_assert_failed (("check boxed number vn"), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, - (1430) ? (1430) : __LINE__, __FUNCTION__); + (1431) ? (1431) : __LINE__, __FUNCTION__); ; } ; @@ -4872,7 +5179,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1430:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1431:/ clear"); /*clear *//*_#IS_INTEGERBOX__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -4889,12 +5196,12 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.VN__V2*/ meltfptr[1])));; { - MELT_LOCATION ("warmelt-base.melt:1431:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1432:/ locexp"); meltgc_add_out_dec ((melt_ptr_t) ( /*_.OUT__V3*/ meltfptr[2]), ( /*_#GET_INT__L2*/ meltfnum[0])); } ; - MELT_LOCATION ("warmelt-base.melt:1429:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1430:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -4987,7 +5294,7 @@ meltrout_11_warmelt_base_ADD2OUT4STRING (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1434:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1435:/ getarg"); /*_.VS__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -5008,7 +5315,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-base.melt:1435:/ cppif.then"); + MELT_LOCATION ("warmelt-base.melt:1436:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5019,7 +5326,7 @@ lab_endgetargs:; /*_#IS_STRING__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.VS__V2*/ meltfptr[1])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-base.melt:1435:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1436:/ cond"); /*cond */ if ( /*_#IS_STRING__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -5027,7 +5334,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1435:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1436:/ cond.else"); /*^block */ /*anyblock */ @@ -5041,7 +5348,7 @@ lab_endgetargs:; melt_assert_failed (("check boxed string vs"), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, - (1435) ? (1435) : __LINE__, __FUNCTION__); + (1436) ? (1436) : __LINE__, __FUNCTION__); ; } ; @@ -5056,7 +5363,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1435:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1436:/ clear"); /*clear *//*_#IS_STRING__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -5069,13 +5376,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1436:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1437:/ locexp"); meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V3*/ meltfptr[2]), melt_string_str ((melt_ptr_t) ( /*_.VS__V2*/ meltfptr[1]))); } ; - MELT_LOCATION ("warmelt-base.melt:1434:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1435:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -5166,7 +5473,7 @@ meltrout_12_warmelt_base_ADD2OUT4STRBUF (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1439:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1440:/ getarg"); /*_.VSBUF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -5187,7 +5494,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-base.melt:1440:/ cppif.then"); + MELT_LOCATION ("warmelt-base.melt:1441:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5198,7 +5505,7 @@ lab_endgetargs:; /*_#IS_STRBUF__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.VSBUF__V2*/ meltfptr[1])) == MELTOBMAG_STRBUF);; - MELT_LOCATION ("warmelt-base.melt:1440:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1441:/ cond"); /*cond */ if ( /*_#IS_STRBUF__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -5206,7 +5513,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1440:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1441:/ cond.else"); /*^block */ /*anyblock */ @@ -5220,7 +5527,7 @@ lab_endgetargs:; melt_assert_failed (("check strbuf vsbuf"), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, - (1440) ? (1440) : __LINE__, __FUNCTION__); + (1441) ? (1441) : __LINE__, __FUNCTION__); ; } ; @@ -5235,7 +5542,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1440:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1441:/ clear"); /*clear *//*_#IS_STRBUF__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -5248,13 +5555,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1441:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1442:/ locexp"); meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V3*/ meltfptr[2]), melt_strbuf_str ((melt_ptr_t) /*_.VSBUF__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:1439:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1440:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -5348,7 +5655,7 @@ meltrout_13_warmelt_base_ADD2OUT4CLONEDSYMB (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1444:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1445:/ getarg"); /*_.VC__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -5367,7 +5674,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1445:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1446:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^block */ @@ -5379,7 +5686,7 @@ lab_endgetargs:; ; /*objlabel */ mtch1_0:; - MELT_LOCATION ("warmelt-base.melt:1446:/ objlabel"); + MELT_LOCATION ("warmelt-base.melt:1447:/ objlabel"); ; /*^clear */ /*clear *//*_.NAMED_NAME__V4*/ meltfptr[3] = 0; @@ -5412,7 +5719,7 @@ lab_endgetargs:; meltfptr[4] = slot; }; ; - MELT_LOCATION ("warmelt-base.melt:1448:/ objgoto"); + MELT_LOCATION ("warmelt-base.melt:1449:/ objgoto"); /*objgoto */ goto mtch1_1; ; } @@ -5420,13 +5727,13 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1446:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1447:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1453:/ objgoto"); + MELT_LOCATION ("warmelt-base.melt:1454:/ objgoto"); /*objgoto */ goto mtch1_3; ; } @@ -5435,7 +5742,7 @@ lab_endgetargs:; ; /*objlabel */ mtch1_1:; - MELT_LOCATION ("warmelt-base.melt:1448:/ objlabel"); + MELT_LOCATION ("warmelt-base.melt:1449:/ objlabel"); ; /*^clear */ /*clear *//*_#ICT__L1*/ meltfnum[0] = 0; @@ -5460,7 +5767,7 @@ lab_endgetargs:; val;; } ; - MELT_LOCATION ("warmelt-base.melt:1446:/ objgoto"); + MELT_LOCATION ("warmelt-base.melt:1447:/ objgoto"); /*objgoto */ goto mtch1_2; ; } @@ -5468,13 +5775,13 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1448:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1449:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1453:/ objgoto"); + MELT_LOCATION ("warmelt-base.melt:1454:/ objgoto"); /*objgoto */ goto mtch1_3; ; } @@ -5483,7 +5790,7 @@ lab_endgetargs:; ; /*objlabel */ mtch1_2:; - MELT_LOCATION ("warmelt-base.melt:1446:/ objlabel"); + MELT_LOCATION ("warmelt-base.melt:1447:/ objlabel"); ; /*^quasiblock */ @@ -5494,7 +5801,7 @@ lab_endgetargs:; /*_#NVARURANK__L2*/ meltfnum[1] = /*_#ICT__L1*/ meltfnum[0];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-base.melt:1449:/ cppif.then"); + MELT_LOCATION ("warmelt-base.melt:1450:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5505,7 +5812,7 @@ lab_endgetargs:; /*_#IS_STRING__L3*/ meltfnum[2] = (melt_magic_discr ((melt_ptr_t) ( /*_.NVARNAM__V6*/ meltfptr[4])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-base.melt:1449:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1450:/ cond"); /*cond */ if ( /*_#IS_STRING__L3*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -5513,7 +5820,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1449:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1450:/ cond.else"); /*^block */ /*anyblock */ @@ -5527,7 +5834,7 @@ lab_endgetargs:; melt_assert_failed (("check nvarnam"), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, - (1449) ? (1449) : __LINE__, __FUNCTION__); + (1450) ? (1450) : __LINE__, __FUNCTION__); ; } ; @@ -5542,7 +5849,7 @@ lab_endgetargs:; /*_.IFCPP___V7*/ meltfptr[6] = /*_.IFELSE___V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1449:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1450:/ clear"); /*clear *//*_#IS_STRING__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0; @@ -5555,7 +5862,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1450:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1451:/ locexp"); meltgc_add_out_cident ((melt_ptr_t) ( /*_.OUT__V3*/ meltfptr[2]), melt_string_str ((melt_ptr_t) ( /*_.NVARNAM__V6*/ @@ -5564,18 +5871,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1451:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1452:/ locexp"); meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V3*/ meltfptr[2]), ("__")); } ; { - MELT_LOCATION ("warmelt-base.melt:1452:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1453:/ locexp"); meltgc_add_out_dec ((melt_ptr_t) ( /*_.OUT__V3*/ meltfptr[2]), ( /*_#NVARURANK__L2*/ meltfnum[1])); } ; - MELT_LOCATION ("warmelt-base.melt:1446:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1447:/ checksignal"); MELT_CHECK_SIGNAL (); ; @@ -5590,14 +5897,14 @@ lab_endgetargs:; ; /*objlabel */ mtch1_3:; - MELT_LOCATION ("warmelt-base.melt:1453:/ objlabel"); + MELT_LOCATION ("warmelt-base.melt:1454:/ objlabel"); ; /*^quasiblock */ #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-base.melt:1454:/ cppif.then"); + MELT_LOCATION ("warmelt-base.melt:1455:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5613,7 +5920,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1454:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1455:/ cond.else"); /*^block */ /*anyblock */ @@ -5627,7 +5934,7 @@ lab_endgetargs:; melt_assert_failed (("bad cloned symbol"), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, - (1454) ? (1454) : __LINE__, __FUNCTION__); + (1455) ? (1455) : __LINE__, __FUNCTION__); ; } ; @@ -5642,7 +5949,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[7] = /*_.IFELSE___V10*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1454:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1455:/ clear"); /*clear *//*_.IFELSE___V10*/ meltfptr[4] = 0; } @@ -5652,14 +5959,14 @@ lab_endgetargs:; #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-base.melt:1453:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1454:/ clear"); /*clear *//*_.IFCPP___V9*/ meltfptr[7] = 0; /*^objgoto */ /*objgoto */ goto mtch1__end /*endmatch */ ; ; /*objlabel */ mtch1__end:; - MELT_LOCATION ("warmelt-base.melt:1445:/ objlabel"); + MELT_LOCATION ("warmelt-base.melt:1446:/ objlabel"); ; } ; @@ -5748,7 +6055,7 @@ meltrout_14_warmelt_base_ADD2OUT4NAMED (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1457:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1458:/ getarg"); /*_.VN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -5767,7 +6074,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1458:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1459:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -5794,7 +6101,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1458:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1459:/ locexp"); meltgc_add_out_cident ((melt_ptr_t) ( /*_.OUT__V3*/ meltfptr[2]), melt_string_str ((melt_ptr_t) ( /*_.NAMED_NAME__V4*/ @@ -5803,7 +6110,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1457:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1458:/ clear"); /*clear *//*_.NAMED_NAME__V4*/ meltfptr[3] = 0; } @@ -5892,7 +6199,7 @@ meltrout_15_warmelt_base_ADD2OUT4ROOTOBJECT (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1461:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1462:/ getarg"); /*_.VO__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -5913,13 +6220,13 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:1462:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1463:/ locexp"); meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V3*/ meltfptr[2]), ("*")); } ; /*_.DISCRIM__V4*/ meltfptr[3] = ((melt_ptr_t) (melt_discr ((melt_ptr_t) ( /*_.VO__V2*/ meltfptr[1]))));; - MELT_LOCATION ("warmelt-base.melt:1463:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1464:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -5946,7 +6253,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1463:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1464:/ locexp"); meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V3*/ meltfptr[2]), melt_string_str ((melt_ptr_t) ( /*_.NAMED_NAME__V5*/ meltfptr[4]))); @@ -5954,7 +6261,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1464:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1465:/ locexp"); meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V3*/ meltfptr[2]), ("/")); } ; @@ -5962,18 +6269,18 @@ lab_endgetargs:; (melt_obj_hash ((melt_ptr_t) ( /*_.VO__V2*/ meltfptr[1])));; { - MELT_LOCATION ("warmelt-base.melt:1465:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1466:/ locexp"); meltgc_add_out_hex ((melt_ptr_t) ( /*_.OUT__V3*/ meltfptr[2]), ( /*_#OBJ_HASH__L1*/ meltfnum[0])); } ; { - MELT_LOCATION ("warmelt-base.melt:1466:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1467:/ locexp"); meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V3*/ meltfptr[2]), (".")); } ; - MELT_LOCATION ("warmelt-base.melt:1461:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1462:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -6068,7 +6375,7 @@ meltrout_16_warmelt_base_ADD2OUT4ANY (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1469:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1470:/ getarg"); /*_.VA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -6089,13 +6396,13 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:1470:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1471:/ locexp"); meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V3*/ meltfptr[2]), ("*")); } ; /*_.DISCRIM__V4*/ meltfptr[3] = ((melt_ptr_t) (melt_discr ((melt_ptr_t) ( /*_.VA__V2*/ meltfptr[1]))));; - MELT_LOCATION ("warmelt-base.melt:1471:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1472:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -6122,13 +6429,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1471:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1472:/ locexp"); meltgc_add_out ((melt_ptr_t) ( /*_.OUT__V3*/ meltfptr[2]), melt_string_str ((melt_ptr_t) ( /*_.NAMED_NAME__V5*/ meltfptr[4]))); } ; - MELT_LOCATION ("warmelt-base.melt:1469:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1470:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -6222,7 +6529,7 @@ meltrout_17_warmelt_base_MAPSTRING_EVERY (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1513:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1514:/ getarg"); /*_.MAP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -6241,13 +6548,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1517:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1518:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_MAPSTRING__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.MAP__V2*/ meltfptr[1])) == MELTOBMAG_MAPSTRINGS);; - MELT_LOCATION ("warmelt-base.melt:1517:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1518:/ cond"); /*cond */ if ( /*_#IS_MAPSTRING__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -6255,13 +6562,13 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1518:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1519:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L2*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.F__V3*/ meltfptr[2])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1518:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1519:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -6327,7 +6634,7 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-base.melt:1522:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1523:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -6354,7 +6661,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1519:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1520:/ clear"); /*clear *//*_.CURAT__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.CURVAL__V5*/ meltfptr[4] = 0; @@ -6369,7 +6676,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1517:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1518:/ clear"); /*clear *//*_#IS_CLOSURE__L2*/ meltfnum[1] = 0; } ; @@ -6377,7 +6684,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1513:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1514:/ clear"); /*clear *//*_#IS_MAPSTRING__L1*/ meltfnum[0] = 0; } @@ -6466,7 +6773,7 @@ meltrout_18_warmelt_base_MAPSTRING_ITERATE_TEST (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1526:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1527:/ getarg"); /*_.MAP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -6485,13 +6792,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1531:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1532:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_MAPSTRING__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.MAP__V2*/ meltfptr[1])) == MELTOBMAG_MAPSTRINGS);; - MELT_LOCATION ("warmelt-base.melt:1531:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1532:/ cond"); /*cond */ if ( /*_#IS_MAPSTRING__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -6499,13 +6806,13 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1532:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1533:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L2*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.F__V3*/ meltfptr[2])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1532:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1533:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -6571,10 +6878,10 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-base.melt:1538:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1539:/ checksignal"); MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-base.melt:1536:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1537:/ quasiblock"); /*^multiapply */ @@ -6604,12 +6911,12 @@ lab_endgetargs:; /*^quasiblock */ - MELT_LOCATION ("warmelt-base.melt:1539:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1540:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L3*/ meltfnum[2] = (( /*_.TEST__V7*/ meltfptr[6]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:1539:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1540:/ cond"); /*cond */ if ( /*_#NULL__L3*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -6618,7 +6925,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-base.melt:1540:/ checksignal"); + ("warmelt-base.melt:1541:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -6627,7 +6934,7 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.CURAT__V4*/ meltfptr[3];; MELT_LOCATION - ("warmelt-base.melt:1540:/ putxtraresult"); + ("warmelt-base.melt:1541:/ putxtraresult"); if (!meltxrestab_ || !meltxresdescr_) goto labend_rout; if (meltxresdescr_[0] != MELTBPAR_PTR) @@ -6652,7 +6959,7 @@ lab_endgetargs:; /*_.RETURN___V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1539:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1540:/ clear"); /*clear *//*_.RETURN___V10*/ meltfptr[9] = 0; } ; @@ -6668,7 +6975,7 @@ lab_endgetargs:; /*_.MULTI___V6*/ meltfptr[5] = /*_.IF___V9*/ meltfptr[8];; - MELT_LOCATION ("warmelt-base.melt:1536:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1537:/ clear"); /*clear *//*_#NULL__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.IF___V9*/ meltfptr[8] = 0; @@ -6682,7 +6989,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1533:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1534:/ clear"); /*clear *//*_.CURAT__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.CURVAL__V5*/ meltfptr[4] = 0; @@ -6697,7 +7004,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1531:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1532:/ clear"); /*clear *//*_#IS_CLOSURE__L2*/ meltfnum[1] = 0; } ; @@ -6705,7 +7012,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1526:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1527:/ clear"); /*clear *//*_#IS_MAPSTRING__L1*/ meltfnum[0] = 0; } @@ -6791,7 +7098,7 @@ meltrout_19_warmelt_base_MULTIPLE_EVERY (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1575:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1576:/ getarg"); /*_.TUP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -6810,13 +7117,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1578:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1579:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_MULTIPLE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.TUP__V2*/ meltfptr[1])) == MELTOBMAG_MULTIPLE);; - MELT_LOCATION ("warmelt-base.melt:1578:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1579:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -6824,13 +7131,13 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1579:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1580:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L2*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.F__V3*/ meltfptr[2])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1579:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1580:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -6856,7 +7163,7 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-base.melt:1583:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1584:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -6881,7 +7188,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1580:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1581:/ clear"); /*clear *//*_.COMP__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_#IX__L3*/ meltfnum[2] = 0; @@ -6896,7 +7203,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1578:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1579:/ clear"); /*clear *//*_#IS_CLOSURE__L2*/ meltfnum[1] = 0; } ; @@ -6904,7 +7211,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1575:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1576:/ clear"); /*clear *//*_#IS_MULTIPLE__L1*/ meltfnum[0] = 0; } @@ -6994,7 +7301,7 @@ meltrout_20_warmelt_base_MULTIPLE_BACKWARD_EVERY (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1586:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1587:/ getarg"); /*_.TUP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -7013,13 +7320,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1589:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1590:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_MULTIPLE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.TUP__V2*/ meltfptr[1])) == MELTOBMAG_MULTIPLE);; - MELT_LOCATION ("warmelt-base.melt:1589:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1590:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -7027,13 +7334,13 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1590:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1591:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L2*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.F__V3*/ meltfptr[2])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1590:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1591:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -7060,7 +7367,7 @@ lab_endgetargs:; /*_#IX__L3*/ meltfnum[2] = meltcit1__EACHTUPBACK_ix; - MELT_LOCATION ("warmelt-base.melt:1594:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1595:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7083,7 +7390,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1591:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1592:/ clear"); /*clear *//*_.COMP__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_#IX__L3*/ meltfnum[2] = 0; @@ -7098,7 +7405,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1589:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1590:/ clear"); /*clear *//*_#IS_CLOSURE__L2*/ meltfnum[1] = 0; } ; @@ -7106,7 +7413,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1586:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1587:/ clear"); /*clear *//*_#IS_MULTIPLE__L1*/ meltfnum[0] = 0; } @@ -7195,7 +7502,7 @@ meltrout_21_warmelt_base_MULTIPLE_EVERY_BOTH (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1598:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1599:/ getarg"); /*_.TUP1__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -7224,13 +7531,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1601:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1602:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_MULTIPLE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.TUP1__V2*/ meltfptr[1])) == MELTOBMAG_MULTIPLE);; - MELT_LOCATION ("warmelt-base.melt:1601:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1602:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -7238,13 +7545,13 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1602:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1603:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_MULTIPLE__L2*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.TUP2__V3*/ meltfptr[2])) == MELTOBMAG_MULTIPLE);; - MELT_LOCATION ("warmelt-base.melt:1602:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1603:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -7252,13 +7559,13 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1603:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1604:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L3*/ meltfnum[2] = (melt_magic_discr ((melt_ptr_t) ( /*_.F__V4*/ meltfptr[3])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1603:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1604:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L3*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -7266,7 +7573,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1604:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1605:/ quasiblock"); /*_#LN1__L4*/ meltfnum[3] = @@ -7280,7 +7587,7 @@ lab_endgetargs:; /*^compute */ /*_#IX__L6*/ meltfnum[5] = 0;; - MELT_LOCATION ("warmelt-base.melt:1607:/ loop"); + MELT_LOCATION ("warmelt-base.melt:1608:/ loop"); /*loop */ { labloop_TUPLOOP_1:; @@ -7294,13 +7601,13 @@ lab_endgetargs:; MELT_CHECK_SIGNAL (); ; MELT_LOCATION - ("warmelt-base.melt:1608:/ checksignal"); + ("warmelt-base.melt:1609:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L7*/ meltfnum[6] = (( /*_#IX__L6*/ meltfnum[5]) >= ( /*_#LN1__L4*/ meltfnum[3]));; - MELT_LOCATION ("warmelt-base.melt:1608:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1609:/ cond"); /*cond */ if ( /*_#I__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -7326,13 +7633,13 @@ lab_endgetargs:; } /*noelse */ ; MELT_LOCATION - ("warmelt-base.melt:1609:/ checksignal"); + ("warmelt-base.melt:1610:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L8*/ meltfnum[7] = (( /*_#IX__L6*/ meltfnum[5]) >= ( /*_#LN2__L5*/ meltfnum[4]));; - MELT_LOCATION ("warmelt-base.melt:1609:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1610:/ cond"); /*cond */ if ( /*_#I__L8*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -7368,7 +7675,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.TUP2__V3*/ meltfptr[2]), ( /*_#IX__L6*/ meltfnum[5])));; MELT_LOCATION - ("warmelt-base.melt:1610:/ checksignal"); + ("warmelt-base.melt:1611:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7390,12 +7697,12 @@ lab_endgetargs:; ; /*_#I__L9*/ meltfnum[8] = (( /*_#IX__L6*/ meltfnum[5]) + (1));; - MELT_LOCATION ("warmelt-base.melt:1611:/ compute"); + MELT_LOCATION ("warmelt-base.melt:1612:/ compute"); /*_#IX__L6*/ meltfnum[5] = /*_#SETQ___L10*/ meltfnum[9] = /*_#I__L9*/ meltfnum[8];; MELT_LOCATION - ("warmelt-base.melt:1607:/ checksignal"); + ("warmelt-base.melt:1608:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -7430,7 +7737,7 @@ lab_endgetargs:; /*_.LET___V8*/ meltfptr[7] = /*_.FOREVER___V9*/ meltfptr[8];; - MELT_LOCATION ("warmelt-base.melt:1604:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1605:/ clear"); /*clear *//*_#LN1__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_#LN2__L5*/ meltfnum[4] = 0; @@ -7441,7 +7748,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = /*_.LET___V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1603:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1604:/ clear"); /*clear *//*_.LET___V8*/ meltfptr[7] = 0; } ; @@ -7457,7 +7764,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.IF___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1602:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1603:/ clear"); /*clear *//*_#IS_CLOSURE__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.IF___V7*/ meltfptr[6] = 0; @@ -7475,7 +7782,7 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = /*_.IF___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1601:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1602:/ clear"); /*clear *//*_#IS_MULTIPLE__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -7488,11 +7795,23 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:1598:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1599:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-base.melt:1598:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:1599:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7592,7 +7911,7 @@ meltrout_22_warmelt_base_RUN_ALL_PASS_EXECUTION_HOOKS (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1637:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1638:/ getarg"); /*_.HOOKLIST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -7632,7 +7951,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.CURPAIR__V4*/ meltfptr[3]); - MELT_LOCATION ("warmelt-base.melt:1642:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1643:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7657,7 +7976,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1639:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1640:/ clear"); /*clear *//*_.CURPAIR__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.CURHOOK__V5*/ meltfptr[4] = 0; @@ -7665,21 +7984,45 @@ lab_endgetargs:; /*clear *//*_.CURHOOK__V6*/ meltfptr[5] = 0; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-base.melt:1644:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1645:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-base.melt:1644:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:1645:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-base.melt:1637:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1638:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V7*/ meltfptr[6];; - MELT_LOCATION ("warmelt-base.melt:1637:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:1638:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7777,7 +8120,7 @@ meltrout_23_warmelt_base_REGISTER_PASS_EXECUTION_HOOK (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1648:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1649:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -7787,13 +8130,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1654:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1655:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1654:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1655:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -7801,7 +8144,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1655:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1656:/ quasiblock"); /*^getslot */ @@ -7812,12 +8155,12 @@ lab_endgetargs:; meltfptr[4] = slot; }; ; - MELT_LOCATION ("warmelt-base.melt:1658:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1659:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.HOOKLIST__V5*/ meltfptr[4]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:1658:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1659:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -7825,7 +8168,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1660:/ blockmultialloc"); + MELT_LOCATION ("warmelt-base.melt:1661:/ blockmultialloc"); /*multiallocblock */ { struct meltletrec_1_st @@ -7849,7 +8192,7 @@ lab_endgetargs:; /*_.LIST___V6*/ meltfptr[5] = /*_.LIST___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1660:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1661:/ clear"); /*clear *//*_.LIST___V7*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_.LIST___V7*/ meltfptr[6] = 0; @@ -7858,7 +8201,7 @@ lab_endgetargs:; /*^compute */ /*_.HOOKLIST__V5*/ meltfptr[4] = /*_.SETQ___V8*/ meltfptr[6] = /*_.LIST___V6*/ meltfptr[5];; - MELT_LOCATION ("warmelt-base.melt:1661:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1662:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -7893,12 +8236,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:1659:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1660:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1658:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1659:/ clear"); /*clear *//*_.LIST___V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.SETQ___V8*/ meltfptr[6] = 0; @@ -7908,7 +8251,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-base.melt:1662:/ cppif.then"); + MELT_LOCATION ("warmelt-base.melt:1663:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7920,7 +8263,7 @@ lab_endgetargs:; (melt_magic_discr ((melt_ptr_t) ( /*_.HOOKLIST__V5*/ meltfptr[4])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-base.melt:1662:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1663:/ cond"); /*cond */ if ( /*_#IS_LIST__L3*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -7928,7 +8271,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1662:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1663:/ cond.else"); /*^block */ /*anyblock */ @@ -7942,7 +8285,7 @@ lab_endgetargs:; melt_assert_failed (("check hooklist"), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, - (1662) ? (1662) : __LINE__, + (1663) ? (1663) : __LINE__, __FUNCTION__); ; } @@ -7958,7 +8301,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1662:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1663:/ clear"); /*clear *//*_#IS_LIST__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; @@ -7985,13 +8328,13 @@ lab_endgetargs:; meltfptr[6]); - MELT_LOCATION ("warmelt-base.melt:1667:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1668:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L4*/ meltfnum[2] = (( /*_.CURHOOK__V12*/ meltfptr[11]) == ( /*_.FUN__V2*/ meltfptr[1]));; - MELT_LOCATION ("warmelt-base.melt:1667:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1668:/ cond"); /*cond */ if ( /*_#__L4*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -7999,18 +8342,31 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1668:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1669:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-base.melt:1668:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:1669:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V13*/ meltfptr[12] = /*_.RETURN___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1667:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1668:/ clear"); /*clear *//*_.RETURN___V14*/ meltfptr[13] = 0; } ; @@ -8028,7 +8384,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1664:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1665:/ clear"); /*clear *//*_.CURPAIR__V11*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_.CURHOOK__V12*/ meltfptr[11] = 0; @@ -8040,16 +8396,16 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1670:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1671:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.HOOKLIST__V5*/ meltfptr[4]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:1671:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1672:/ checksignal"); MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-base.melt:1673:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1674:/ quasiblock"); /*^newclosure */ @@ -8078,7 +8434,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.HOOKLIST__V5*/ meltfptr[4]); ; /*_.LAMBDA___V15*/ meltfptr[13] = /*_.LAMBDA___V16*/ meltfptr[15];; - MELT_LOCATION ("warmelt-base.melt:1671:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1672:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -8113,16 +8469,28 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:1675:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1676:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-base.melt:1675:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:1676:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V4*/ meltfptr[3] = /*_.RETURN___V17*/ meltfptr[16];; - MELT_LOCATION ("warmelt-base.melt:1655:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1656:/ clear"); /*clear *//*_.HOOKLIST__V5*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; @@ -8135,7 +8503,7 @@ lab_endgetargs:; /*_.IF___V3*/ meltfptr[2] = /*_.LET___V4*/ meltfptr[3];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1654:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1655:/ clear"); /*clear *//*_.LET___V4*/ meltfptr[3] = 0; } ; @@ -8146,11 +8514,23 @@ lab_endgetargs:; /*_.IF___V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:1648:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1649:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-base.melt:1648:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:1649:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8243,7 +8623,7 @@ meltrout_24_warmelt_base_LAMBDA___1__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1673:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1674:/ getarg"); /*_.PASSNAME__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -8259,7 +8639,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1674:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1675:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -8280,12 +8660,24 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-base.melt:1673:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1674:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.RUN_ALL_PASS_EXECUTION_HOOKS__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-base.melt:1673:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:1674:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8384,7 +8776,7 @@ meltrout_25_warmelt_base_UNREGISTER_PASS_EXECUTION_HOOK (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1679:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1680:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -8394,13 +8786,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1682:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1683:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1682:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1683:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -8408,7 +8800,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1683:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1684:/ quasiblock"); /*^getslot */ @@ -8419,7 +8811,7 @@ lab_endgetargs:; meltfptr[2] = slot; }; ; - MELT_LOCATION ("warmelt-base.melt:1685:/ blockmultialloc"); + MELT_LOCATION ("warmelt-base.melt:1686:/ blockmultialloc"); /*multiallocblock */ { struct meltletrec_1_st @@ -8442,7 +8834,7 @@ lab_endgetargs:; /*_.NEWHOOKLIST__V4*/ meltfptr[3] = /*_.LIST___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1685:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1686:/ clear"); /*clear *//*_.LIST___V5*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.LIST___V5*/ meltfptr[4] = 0; @@ -8463,13 +8855,13 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.CURPAIR__V6*/ meltfptr[4]); - MELT_LOCATION ("warmelt-base.melt:1690:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1691:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L2*/ meltfnum[1] = (( /*_.CURHOOK__V7*/ meltfptr[6]) != ( /*_.FUN__V2*/ meltfptr[1]));; - MELT_LOCATION ("warmelt-base.melt:1690:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1691:/ cond"); /*cond */ if ( /*_#__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -8479,7 +8871,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:1691:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1692:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.NEWHOOKLIST__V4*/ meltfptr[3]), @@ -8499,7 +8891,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1687:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1688:/ clear"); /*clear *//*_.CURPAIR__V6*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.CURHOOK__V7*/ meltfptr[6] = 0; @@ -8507,7 +8899,7 @@ lab_endgetargs:; /*clear *//*_#__L2*/ meltfnum[1] = 0; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-base.melt:1693:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1694:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_NON_EMPTY_LIST__L3*/ meltfnum[2] = @@ -8517,7 +8909,7 @@ lab_endgetargs:; && NULL != melt_list_first ((melt_ptr_t) ( /*_.NEWHOOKLIST__V4*/ meltfptr[3])));; - MELT_LOCATION ("warmelt-base.melt:1693:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1694:/ cond"); /*cond */ if ( /*_#IS_NON_EMPTY_LIST__L3*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -8525,7 +8917,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1694:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1695:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -8569,16 +8961,16 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1693:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1694:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1696:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1697:/ checksignal"); MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-base.melt:1698:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1699:/ quasiblock"); /*^newclosure */ @@ -8609,7 +9001,7 @@ lab_endgetargs:; ; /*_.LAMBDA___V8*/ meltfptr[7] = /*_.LAMBDA___V9*/ meltfptr[8];; - MELT_LOCATION ("warmelt-base.melt:1696:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1697:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -8646,14 +9038,14 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1693:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1694:/ clear"); /*clear *//*_.LAMBDA___V8*/ meltfptr[7] = 0; } ; } ; - MELT_LOCATION ("warmelt-base.melt:1683:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1684:/ clear"); /*clear *//*_.OLDHOOKLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_.NEWHOOKLIST__V4*/ meltfptr[3] = 0; @@ -8666,7 +9058,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1679:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1680:/ clear"); /*clear *//*_#IS_CLOSURE__L1*/ meltfnum[0] = 0; } @@ -8752,7 +9144,7 @@ meltrout_26_warmelt_base_LAMBDA___2__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1698:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1699:/ getarg"); /*_.PASSNAME__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -8768,7 +9160,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1699:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1700:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -8789,12 +9181,24 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-base.melt:1698:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1699:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.RUN_ALL_PASS_EXECUTION_HOOKS__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-base.melt:1698:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:1699:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8889,7 +9293,7 @@ meltrout_27_warmelt_base_REGISTER_PRAGMA_HANDLER (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1703:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1704:/ getarg"); /*_.LSTHANDLER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -8901,7 +9305,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-base.melt:1708:/ cppif.then"); + MELT_LOCATION ("warmelt-base.melt:1709:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8912,7 +9316,7 @@ lab_endgetargs:; /*_#IS_LIST__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.LSTHANDLER__V2*/ meltfptr[1])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-base.melt:1708:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1709:/ cond"); /*cond */ if ( /*_#IS_LIST__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -8920,7 +9324,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1708:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1709:/ cond.else"); /*^block */ /*anyblock */ @@ -8931,7 +9335,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("register_pragma_handler takes a list as argument."), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, (1708) ? (1708) : __LINE__, __FUNCTION__); + melt_assert_failed (("register_pragma_handler takes a list as argument."), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, (1709) ? (1709) : __LINE__, __FUNCTION__); ; } ; @@ -8946,7 +9350,7 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = /*_.IFELSE___V4*/ meltfptr[3];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1708:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1709:/ clear"); /*clear *//*_#IS_LIST__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V4*/ meltfptr[3] = 0; @@ -8957,7 +9361,7 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-base.melt:1710:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1711:/ quasiblock"); /*^cond */ @@ -8988,7 +9392,7 @@ lab_endgetargs:; /*^compute */ /*_#OLDSIZE__L2*/ meltfnum[0] = 0;; - MELT_LOCATION ("warmelt-base.melt:1712:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1713:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -8999,7 +9403,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1712:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1713:/ cond.else"); /*_.IF___V6*/ meltfptr[5] = NULL;; } @@ -9009,10 +9413,10 @@ lab_endgetargs:; /*_#MULTIPLE_LENGTH__L3*/ meltfnum[2] = (melt_multiple_length ((melt_ptr_t) ( /*_.OLDTUPLE__V5*/ meltfptr[3])));; - MELT_LOCATION ("warmelt-base.melt:1713:/ compute"); + MELT_LOCATION ("warmelt-base.melt:1714:/ compute"); /*_#OLDSIZE__L2*/ meltfnum[0] = /*_#SETQ___L4*/ meltfnum[3] = /*_#MULTIPLE_LENGTH__L3*/ meltfnum[2];; - MELT_LOCATION ("warmelt-base.melt:1714:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1715:/ quasiblock"); /*_#MULTIPLE_LENGTH__L5*/ meltfnum[4] = @@ -9054,7 +9458,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:1722:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1723:/ locexp"); meltgc_multiple_put_nth ((melt_ptr_t) ( /*_.NEWTUPLE__V7*/ meltfptr[6]), ( /*_#I__L8*/ meltfnum[7]), @@ -9064,7 +9468,7 @@ lab_endgetargs:; ; /*_#I__L10*/ meltfnum[9] = (( /*_#I__L8*/ meltfnum[7]) + (1));; - MELT_LOCATION ("warmelt-base.melt:1723:/ compute"); + MELT_LOCATION ("warmelt-base.melt:1724:/ compute"); /*_#I__L8*/ meltfnum[7] = /*_#SETQ___L11*/ meltfnum[10] = /*_#I__L10*/ meltfnum[9];; if ( /*_#IUNUSED__L9*/ meltfnum[8] < 0) @@ -9073,7 +9477,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1719:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1720:/ clear"); /*clear *//*_.CURHANDER__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_#IUNUSED__L9*/ meltfnum[8] = 0; @@ -9099,7 +9503,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-base.melt:1729:/ cppif.then"); + MELT_LOCATION ("warmelt-base.melt:1730:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9112,7 +9516,7 @@ lab_endgetargs:; ( /*_.CURHANDLER__V10*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_GCC_PRAGMA */ meltfrout->tabval[4])));; - MELT_LOCATION ("warmelt-base.melt:1729:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1730:/ cond"); /*cond */ if ( /*_#IS_A__L12*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -9120,7 +9524,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1729:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1730:/ cond.else"); /*^block */ /*anyblock */ @@ -9131,7 +9535,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("register_pragma_handler must be a list of class_gcc_pragma."), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, (1729) ? (1729) : __LINE__, __FUNCTION__); + melt_assert_failed (("register_pragma_handler must be a list of class_gcc_pragma."), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, (1730) ? (1730) : __LINE__, __FUNCTION__); ; } ; @@ -9146,7 +9550,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[10] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1729:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1730:/ clear"); /*clear *//*_#IS_A__L12*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -9159,7 +9563,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1731:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1732:/ locexp"); meltgc_multiple_put_nth ((melt_ptr_t) ( /*_.NEWTUPLE__V7*/ meltfptr[6]), ( /*_#I__L8*/ meltfnum[7]), @@ -9169,7 +9573,7 @@ lab_endgetargs:; ; /*_#I__L13*/ meltfnum[11] = (( /*_#I__L8*/ meltfnum[7]) + (1));; - MELT_LOCATION ("warmelt-base.melt:1732:/ compute"); + MELT_LOCATION ("warmelt-base.melt:1733:/ compute"); /*_#I__L8*/ meltfnum[7] = /*_#SETQ___L14*/ meltfnum[13] = /*_#I__L13*/ meltfnum[11];; } /* end foreach_in_list meltcit2__EACHLIST */ @@ -9179,7 +9583,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1726:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1727:/ clear"); /*clear *//*_.CURPAIR__V9*/ meltfptr[8] = 0; /*^clear */ /*clear *//*_.CURHANDLER__V10*/ meltfptr[9] = 0; @@ -9191,7 +9595,7 @@ lab_endgetargs:; /*clear *//*_#SETQ___L14*/ meltfnum[13] = 0; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-base.melt:1734:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1735:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -9229,7 +9633,7 @@ lab_endgetargs:; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:1714:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1715:/ clear"); /*clear *//*_#MULTIPLE_LENGTH__L5*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_#LIST_LENGTH__L6*/ meltfnum[5] = 0; @@ -9240,7 +9644,7 @@ lab_endgetargs:; /*^clear */ /*clear *//*_#I__L8*/ meltfnum[7] = 0; - MELT_LOCATION ("warmelt-base.melt:1710:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1711:/ clear"); /*clear *//*_.OLDTUPLE__V5*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_#OLDSIZE__L2*/ meltfnum[0] = 0; @@ -9250,7 +9654,7 @@ lab_endgetargs:; /*clear *//*_#MULTIPLE_LENGTH__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_#SETQ___L4*/ meltfnum[3] = 0; - MELT_LOCATION ("warmelt-base.melt:1703:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1704:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -9351,7 +9755,7 @@ meltrout_28_warmelt_base_REGISTER_PRE_GENERICIZE_HOOK_FIRST (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1745:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1746:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -9361,7 +9765,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1749:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1750:/ quasiblock"); /*^cond */ @@ -9389,12 +9793,12 @@ lab_endgetargs:; /*_.FIRSTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:1751:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1752:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L1*/ meltfnum[0] = (( /*_.FIRSTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:1751:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1752:/ cond"); /*cond */ if ( /*_#NULL__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -9406,17 +9810,17 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:1753:/ compute"); + MELT_LOCATION ("warmelt-base.melt:1754:/ compute"); /*_.FIRSTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:1754:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1755:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:1754:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1755:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -9458,7 +9862,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:1758:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1759:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -9497,12 +9901,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:1752:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1753:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1751:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1752:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -9512,13 +9916,13 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:1761:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1762:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L2*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1761:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1762:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -9528,7 +9932,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:1762:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1763:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.FIRSTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); @@ -9540,7 +9944,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1761:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1762:/ cond.else"); /*^block */ /*anyblock */ @@ -9548,7 +9952,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:1763:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1764:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad hook passed to register_pre_genericize_hook")); } @@ -9559,7 +9963,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-base.melt:1749:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1750:/ clear"); /*clear *//*_.FIRSTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L1*/ meltfnum[0] = 0; @@ -9658,7 +10062,7 @@ meltrout_29_warmelt_base_REGISTER_PRE_GENERICIZE_HOOK_LAST (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1768:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1769:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -9668,7 +10072,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1772:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1773:/ quasiblock"); /*^cond */ @@ -9696,12 +10100,12 @@ lab_endgetargs:; /*_.LASTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:1774:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1775:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L1*/ meltfnum[0] = (( /*_.LASTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:1774:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1775:/ cond"); /*cond */ if ( /*_#NULL__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -9713,17 +10117,17 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:1776:/ compute"); + MELT_LOCATION ("warmelt-base.melt:1777:/ compute"); /*_.LASTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:1777:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1778:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:1777:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1778:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -9765,7 +10169,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:1781:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1782:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -9804,12 +10208,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:1775:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1776:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1774:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1775:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -9819,13 +10223,13 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:1784:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1785:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L2*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1784:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1785:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -9835,7 +10239,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:1785:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1786:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.LASTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); @@ -9847,7 +10251,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1784:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1785:/ cond.else"); /*^block */ /*anyblock */ @@ -9855,7 +10259,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:1786:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1787:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad hook passed to register_pre_genericize_hook")); } @@ -9866,7 +10270,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-base.melt:1772:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1773:/ clear"); /*clear *//*_.LASTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L1*/ meltfnum[0] = 0; @@ -9964,7 +10368,7 @@ meltrout_30_warmelt_base_PRE_GENERICIZE_HOOK_RUNNER (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1792:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1793:/ getarg"); /*_.FNDECLV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -9974,7 +10378,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1797:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1798:/ quasiblock"); /*^cond */ @@ -10002,7 +10406,7 @@ lab_endgetargs:; /*_.FIRSTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:1798:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1799:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -10049,7 +10453,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.FIRSTPAIR__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-base.melt:1806:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1807:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10078,7 +10482,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1803:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1804:/ clear"); /*clear *//*_.FIRSTPAIR__V7*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_.FIRSTPROC__V8*/ meltfptr[7] = 0; @@ -10102,14 +10506,14 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.LASTPAIR__V11*/ meltfptr[10]); - MELT_LOCATION ("warmelt-base.melt:1812:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1813:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.LASTPROC__V12*/ meltfptr[11])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1812:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1813:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -10138,7 +10542,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1809:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1810:/ clear"); /*clear *//*_.LASTPAIR__V11*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_.LASTPROC__V12*/ meltfptr[11] = 0; @@ -10160,7 +10564,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.REVLASTPAIR__V13*/ meltfptr[12]); - MELT_LOCATION ("warmelt-base.melt:1817:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1818:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10189,7 +10593,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1814:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1815:/ clear"); /*clear *//*_.REVLASTPAIR__V13*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.REVLASTPROC__V14*/ meltfptr[13] = 0; @@ -10200,7 +10604,7 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-base.melt:1797:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1798:/ clear"); /*clear *//*_.FIRSTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_.LASTLIST__V4*/ meltfptr[3] = 0; @@ -10297,7 +10701,7 @@ meltrout_31_warmelt_base_MELT_FINISH_TYPE_RUNNER (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1837:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1838:/ getarg"); /*_.BOXTREEV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -10307,7 +10711,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1838:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1839:/ quasiblock"); /*^cond */ @@ -10335,7 +10739,7 @@ lab_endgetargs:; /*_.FIRSTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:1839:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1840:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -10382,7 +10786,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.FIRSTPAIR__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-base.melt:1847:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1848:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10411,7 +10815,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1844:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1845:/ clear"); /*clear *//*_.FIRSTPAIR__V7*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_.FIRSTPROC__V8*/ meltfptr[7] = 0; @@ -10435,14 +10839,14 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.LASTPAIR__V11*/ meltfptr[10]); - MELT_LOCATION ("warmelt-base.melt:1853:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1854:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.LASTPROC__V12*/ meltfptr[11])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1853:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1854:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -10471,7 +10875,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1850:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1851:/ clear"); /*clear *//*_.LASTPAIR__V11*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_.LASTPROC__V12*/ meltfptr[11] = 0; @@ -10493,7 +10897,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.REVLASTPAIR__V13*/ meltfptr[12]); - MELT_LOCATION ("warmelt-base.melt:1858:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1859:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10522,7 +10926,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1855:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1856:/ clear"); /*clear *//*_.REVLASTPAIR__V13*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.REVLASTPROC__V14*/ meltfptr[13] = 0; @@ -10533,7 +10937,7 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-base.melt:1838:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1839:/ clear"); /*clear *//*_.FIRSTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_.LASTLIST__V4*/ meltfptr[3] = 0; diff --git a/gcc/melt/generated/warmelt-base+02.c b/gcc/melt/generated/warmelt-base+02.c index d6b0c36e3b7..21eccda77a0 100644 --- a/gcc/melt/generated/warmelt-base+02.c +++ b/gcc/melt/generated/warmelt-base+02.c @@ -1195,7 +1195,7 @@ meltrout_32_warmelt_base_REGISTER_FINISH_TYPE_HOOK_FIRST (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1861:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1862:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -1205,13 +1205,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1865:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1866:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1865:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1866:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -1219,7 +1219,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1866:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1867:/ quasiblock"); /*^cond */ @@ -1246,12 +1246,12 @@ lab_endgetargs:; /*_.FIRSTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:1868:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1869:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.FIRSTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:1868:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1869:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -1263,18 +1263,18 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:1870:/ compute"); + MELT_LOCATION ("warmelt-base.melt:1871:/ compute"); /*_.FIRSTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:1871:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1872:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:1871:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1872:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -1316,7 +1316,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:1875:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1876:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -1357,17 +1357,17 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1878:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1879:/ locexp"); /* melt_notify_finish_type */ meltgc_notify_finish_type_hook ();; } ; - MELT_LOCATION ("warmelt-base.melt:1869:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1870:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1868:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1869:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -1379,14 +1379,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1880:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1881:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.FIRSTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:1866:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1867:/ clear"); /*clear *//*_.FIRSTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; @@ -1396,7 +1396,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1865:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1866:/ cond.else"); /*^block */ /*anyblock */ @@ -1404,7 +1404,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:1883:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1884:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad function (non closure) passed to register_finish_type_hook_first")); } @@ -1416,7 +1416,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1861:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1862:/ clear"); /*clear *//*_#IS_CLOSURE__L1*/ meltfnum[0] = 0; } @@ -1510,7 +1510,7 @@ meltrout_33_warmelt_base_REGISTER_FINISH_TYPE_HOOK_LAST (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1887:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1888:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -1520,13 +1520,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1891:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1892:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1891:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1892:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -1534,7 +1534,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1892:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1893:/ quasiblock"); /*^cond */ @@ -1561,12 +1561,12 @@ lab_endgetargs:; /*_.LASTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:1894:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1895:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.LASTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:1894:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1895:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -1578,17 +1578,17 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:1896:/ compute"); + MELT_LOCATION ("warmelt-base.melt:1897:/ compute"); /*_.LASTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:1897:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1898:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:1897:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1898:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -1630,7 +1630,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:1901:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1902:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -1671,17 +1671,17 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1904:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1905:/ locexp"); /* melt_notify_finish_type */ meltgc_notify_finish_type_hook ();; } ; - MELT_LOCATION ("warmelt-base.melt:1895:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1896:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1894:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1895:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -1693,14 +1693,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1906:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1907:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.LASTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:1892:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1893:/ clear"); /*clear *//*_.LASTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; @@ -1710,7 +1710,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1891:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1892:/ cond.else"); /*^block */ /*anyblock */ @@ -1718,7 +1718,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:1909:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1910:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad function (non closure) passed to register_finish_type_hook_last")); } @@ -1730,7 +1730,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1887:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1888:/ clear"); /*clear *//*_#IS_CLOSURE__L1*/ meltfnum[0] = 0; } @@ -1820,7 +1820,7 @@ meltrout_34_warmelt_base_MELT_FINISH_DECL_RUNNER (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1928:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1929:/ getarg"); /*_.BOXTREEV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -1830,7 +1830,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1929:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1930:/ quasiblock"); /*^cond */ @@ -1858,7 +1858,7 @@ lab_endgetargs:; /*_.FIRSTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:1930:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1931:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -1905,7 +1905,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.FIRSTPAIR__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-base.melt:1938:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1939:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -1934,7 +1934,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1935:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1936:/ clear"); /*clear *//*_.FIRSTPAIR__V7*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_.FIRSTPROC__V8*/ meltfptr[7] = 0; @@ -1958,14 +1958,14 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.LASTPAIR__V11*/ meltfptr[10]); - MELT_LOCATION ("warmelt-base.melt:1944:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1945:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.LASTPROC__V12*/ meltfptr[11])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1944:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1945:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -1994,7 +1994,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1941:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1942:/ clear"); /*clear *//*_.LASTPAIR__V11*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_.LASTPROC__V12*/ meltfptr[11] = 0; @@ -2016,7 +2016,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.REVLASTPAIR__V13*/ meltfptr[12]); - MELT_LOCATION ("warmelt-base.melt:1949:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1950:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -2045,7 +2045,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:1946:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1947:/ clear"); /*clear *//*_.REVLASTPAIR__V13*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.REVLASTPROC__V14*/ meltfptr[13] = 0; @@ -2056,7 +2056,7 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-base.melt:1929:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1930:/ clear"); /*clear *//*_.FIRSTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_.LASTLIST__V4*/ meltfptr[3] = 0; @@ -2157,7 +2157,7 @@ meltrout_35_warmelt_base_REGISTER_FINISH_DECL_HOOK_FIRST (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1952:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1953:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -2167,13 +2167,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1957:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1958:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1957:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1958:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -2181,7 +2181,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1958:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1959:/ quasiblock"); /*^cond */ @@ -2208,12 +2208,12 @@ lab_endgetargs:; /*_.FIRSTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:1960:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1961:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.FIRSTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:1960:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1961:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -2225,18 +2225,18 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:1962:/ compute"); + MELT_LOCATION ("warmelt-base.melt:1963:/ compute"); /*_.FIRSTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:1963:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1964:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:1963:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1964:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -2278,7 +2278,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:1967:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1968:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -2319,17 +2319,17 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1970:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1971:/ locexp"); /* melt_notify_finish_decl */ meltgc_notify_finish_decl_hook ();; } ; - MELT_LOCATION ("warmelt-base.melt:1961:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1962:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1960:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1961:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -2341,14 +2341,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1972:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1973:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.FIRSTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:1958:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1959:/ clear"); /*clear *//*_.FIRSTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; @@ -2358,7 +2358,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1957:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1958:/ cond.else"); /*^block */ /*anyblock */ @@ -2366,7 +2366,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:1975:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1976:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad function (non closure) passed to register_finish_decl_hook_first")); } @@ -2378,7 +2378,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1952:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1953:/ clear"); /*clear *//*_#IS_CLOSURE__L1*/ meltfnum[0] = 0; } @@ -2472,7 +2472,7 @@ meltrout_36_warmelt_base_REGISTER_FINISH_DECL_HOOK_LAST (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:1979:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:1980:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -2482,13 +2482,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:1984:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1985:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:1984:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1985:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -2496,7 +2496,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:1985:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1986:/ quasiblock"); /*^cond */ @@ -2523,12 +2523,12 @@ lab_endgetargs:; /*_.LASTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:1987:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1988:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.LASTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:1987:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1988:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -2540,17 +2540,17 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:1989:/ compute"); + MELT_LOCATION ("warmelt-base.melt:1990:/ compute"); /*_.LASTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:1990:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1991:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:1990:/ cond"); + MELT_LOCATION ("warmelt-base.melt:1991:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -2592,7 +2592,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:1994:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:1995:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -2633,17 +2633,17 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1997:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:1998:/ locexp"); /* melt_notify_finish_decl */ meltgc_notify_finish_decl_hook ();; } ; - MELT_LOCATION ("warmelt-base.melt:1988:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:1989:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1987:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1988:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -2655,14 +2655,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:1999:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2000:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.LASTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:1985:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1986:/ clear"); /*clear *//*_.LASTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; @@ -2672,7 +2672,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:1984:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:1985:/ cond.else"); /*^block */ /*anyblock */ @@ -2680,7 +2680,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:2002:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2003:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad function (non closure) passed to register_finish_decl_hook_last")); } @@ -2692,7 +2692,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:1979:/ clear"); + MELT_LOCATION ("warmelt-base.melt:1980:/ clear"); /*clear *//*_#IS_CLOSURE__L1*/ meltfnum[0] = 0; } @@ -2787,11 +2787,11 @@ meltrout_37_warmelt_base_MELT_ALL_PASSES_START_RUNNER (meltclosure_ptr_t goto lab_endgetargs; lab_endgetargs:; /*body*/ - MELT_LOCATION ("warmelt-base.melt:2020:/ block"); + MELT_LOCATION ("warmelt-base.melt:2021:/ block"); /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2021:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2022:/ quasiblock"); /*^cond */ @@ -2819,7 +2819,7 @@ lab_endgetargs:; /*_.FIRSTLIST__V2*/ meltfptr[1] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2022:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2023:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -2866,7 +2866,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.FIRSTPAIR__V6*/ meltfptr[5]); - MELT_LOCATION ("warmelt-base.melt:2030:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2031:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -2890,7 +2890,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2027:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2028:/ clear"); /*clear *//*_.FIRSTPAIR__V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.FIRSTPROC__V7*/ meltfptr[6] = 0; @@ -2914,14 +2914,14 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.LASTPAIR__V10*/ meltfptr[9]); - MELT_LOCATION ("warmelt-base.melt:2036:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2037:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.LASTPROC__V11*/ meltfptr[10])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2036:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2037:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -2950,7 +2950,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2033:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2034:/ clear"); /*clear *//*_.LASTPAIR__V10*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.LASTPROC__V11*/ meltfptr[10] = 0; @@ -2972,7 +2972,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.REVLASTPAIR__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-base.melt:2041:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2042:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -2996,7 +2996,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2038:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2039:/ clear"); /*clear *//*_.REVLASTPAIR__V12*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_.REVLASTPROC__V13*/ meltfptr[12] = 0; @@ -3007,7 +3007,7 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-base.melt:2021:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2022:/ clear"); /*clear *//*_.FIRSTLIST__V2*/ meltfptr[1] = 0; /*^clear */ /*clear *//*_.LASTLIST__V3*/ meltfptr[2] = 0; @@ -3100,7 +3100,7 @@ meltrout_38_warmelt_base_REGISTER_ALL_PASSES_START_HOOK_FIRST /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:2044:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:2045:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -3110,13 +3110,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2048:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2049:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2048:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2049:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -3124,7 +3124,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:2049:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2050:/ quasiblock"); /*^cond */ @@ -3151,12 +3151,12 @@ lab_endgetargs:; /*_.FIRSTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2051:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2052:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.FIRSTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:2051:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2052:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -3168,18 +3168,18 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2053:/ compute"); + MELT_LOCATION ("warmelt-base.melt:2054:/ compute"); /*_.FIRSTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:2054:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2055:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2054:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2055:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -3221,7 +3221,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2058:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2059:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -3258,12 +3258,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2052:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2053:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2051:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2052:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -3275,14 +3275,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:2062:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2063:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.FIRSTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:2049:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2050:/ clear"); /*clear *//*_.FIRSTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; @@ -3292,7 +3292,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:2048:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:2049:/ cond.else"); /*^block */ /*anyblock */ @@ -3300,7 +3300,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:2065:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2066:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad function (non closure) passed to register_all_passes_start_hook_first")); } @@ -3312,7 +3312,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2044:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2045:/ clear"); /*clear *//*_#IS_CLOSURE__L1*/ meltfnum[0] = 0; } @@ -3398,7 +3398,7 @@ meltrout_39_warmelt_base_REGISTER_ALL_PASSES_START_HOOK_LAST /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:2069:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:2070:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -3408,13 +3408,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2073:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2074:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2073:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2074:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -3422,7 +3422,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:2074:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2075:/ quasiblock"); /*^cond */ @@ -3449,12 +3449,12 @@ lab_endgetargs:; /*_.LASTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2076:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2077:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.LASTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:2076:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2077:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -3466,17 +3466,17 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2078:/ compute"); + MELT_LOCATION ("warmelt-base.melt:2079:/ compute"); /*_.LASTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:2079:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2080:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2079:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2080:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -3518,7 +3518,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2083:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2084:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -3555,12 +3555,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2077:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2078:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2076:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2077:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -3572,14 +3572,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:2087:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2088:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.LASTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:2074:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2075:/ clear"); /*clear *//*_.LASTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; @@ -3589,7 +3589,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:2073:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:2074:/ cond.else"); /*^block */ /*anyblock */ @@ -3597,7 +3597,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:2090:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2091:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad function (non closure) passed to register_all_passes_start_hook_last")); } @@ -3609,7 +3609,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2069:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2070:/ clear"); /*clear *//*_#IS_CLOSURE__L1*/ meltfnum[0] = 0; } @@ -3704,11 +3704,11 @@ meltrout_40_warmelt_base_MELT_ALL_PASSES_END_RUNNER (meltclosure_ptr_t goto lab_endgetargs; lab_endgetargs:; /*body*/ - MELT_LOCATION ("warmelt-base.melt:2106:/ block"); + MELT_LOCATION ("warmelt-base.melt:2107:/ block"); /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2107:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2108:/ quasiblock"); /*^cond */ @@ -3736,7 +3736,7 @@ lab_endgetargs:; /*_.FIRSTLIST__V2*/ meltfptr[1] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2108:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2109:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -3783,7 +3783,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.FIRSTPAIR__V6*/ meltfptr[5]); - MELT_LOCATION ("warmelt-base.melt:2116:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2117:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3807,7 +3807,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2113:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2114:/ clear"); /*clear *//*_.FIRSTPAIR__V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.FIRSTPROC__V7*/ meltfptr[6] = 0; @@ -3831,14 +3831,14 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.LASTPAIR__V10*/ meltfptr[9]); - MELT_LOCATION ("warmelt-base.melt:2122:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2123:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.LASTPROC__V11*/ meltfptr[10])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2122:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2123:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -3867,7 +3867,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2119:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2120:/ clear"); /*clear *//*_.LASTPAIR__V10*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.LASTPROC__V11*/ meltfptr[10] = 0; @@ -3889,7 +3889,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.REVLASTPAIR__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-base.melt:2127:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2128:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3913,7 +3913,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2124:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2125:/ clear"); /*clear *//*_.REVLASTPAIR__V12*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_.REVLASTPROC__V13*/ meltfptr[12] = 0; @@ -3924,7 +3924,7 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-base.melt:2107:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2108:/ clear"); /*clear *//*_.FIRSTLIST__V2*/ meltfptr[1] = 0; /*^clear */ /*clear *//*_.LASTLIST__V3*/ meltfptr[2] = 0; @@ -4027,7 +4027,7 @@ meltrout_41_warmelt_base_REGISTER_ALL_PASSES_END_HOOK_FIRST (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:2130:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:2131:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -4037,13 +4037,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2134:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2135:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2134:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2135:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -4051,7 +4051,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:2135:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2136:/ quasiblock"); /*^cond */ @@ -4078,12 +4078,12 @@ lab_endgetargs:; /*_.FIRSTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2137:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2138:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.FIRSTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:2137:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2138:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -4095,18 +4095,18 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2139:/ compute"); + MELT_LOCATION ("warmelt-base.melt:2140:/ compute"); /*_.FIRSTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:2140:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2141:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2140:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2141:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -4148,7 +4148,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2144:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2145:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -4185,12 +4185,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2138:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2139:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2137:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2138:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -4202,14 +4202,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:2148:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2149:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.FIRSTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:2135:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2136:/ clear"); /*clear *//*_.FIRSTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; @@ -4219,7 +4219,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:2134:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:2135:/ cond.else"); /*^block */ /*anyblock */ @@ -4227,7 +4227,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:2151:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2152:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad function (non closure) passed to register_all_passes_end_hook_first")); } @@ -4239,7 +4239,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2130:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2131:/ clear"); /*clear *//*_#IS_CLOSURE__L1*/ meltfnum[0] = 0; } @@ -4333,7 +4333,7 @@ meltrout_42_warmelt_base_REGISTER_ALL_PASSES_END_HOOK_LAST (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:2155:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:2156:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -4343,13 +4343,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2159:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2160:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2159:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2160:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -4357,7 +4357,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:2160:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2161:/ quasiblock"); /*^cond */ @@ -4384,12 +4384,12 @@ lab_endgetargs:; /*_.LASTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2162:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2163:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.LASTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:2162:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2163:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -4401,17 +4401,17 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2164:/ compute"); + MELT_LOCATION ("warmelt-base.melt:2165:/ compute"); /*_.LASTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:2165:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2166:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2165:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2166:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -4453,7 +4453,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2169:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2170:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -4490,12 +4490,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2163:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2164:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2162:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2163:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -4507,14 +4507,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:2173:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2174:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.LASTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:2160:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2161:/ clear"); /*clear *//*_.LASTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; @@ -4524,7 +4524,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:2159:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:2160:/ cond.else"); /*^block */ /*anyblock */ @@ -4532,7 +4532,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:2176:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2177:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad function (non closure) passed to register_all_passes_end_hook_last")); } @@ -4544,7 +4544,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2155:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2156:/ clear"); /*clear *//*_#IS_CLOSURE__L1*/ meltfnum[0] = 0; } @@ -4640,11 +4640,11 @@ meltrout_43_warmelt_base_MELT_ALL_IPA_PASSES_START_RUNNER (meltclosure_ptr_t goto lab_endgetargs; lab_endgetargs:; /*body*/ - MELT_LOCATION ("warmelt-base.melt:2192:/ block"); + MELT_LOCATION ("warmelt-base.melt:2193:/ block"); /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2193:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2194:/ quasiblock"); /*^cond */ @@ -4672,7 +4672,7 @@ lab_endgetargs:; /*_.FIRSTLIST__V2*/ meltfptr[1] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2194:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2195:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -4719,7 +4719,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.FIRSTPAIR__V6*/ meltfptr[5]); - MELT_LOCATION ("warmelt-base.melt:2202:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2203:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -4743,7 +4743,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2199:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2200:/ clear"); /*clear *//*_.FIRSTPAIR__V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.FIRSTPROC__V7*/ meltfptr[6] = 0; @@ -4767,14 +4767,14 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.LASTPAIR__V10*/ meltfptr[9]); - MELT_LOCATION ("warmelt-base.melt:2208:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2209:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.LASTPROC__V11*/ meltfptr[10])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2208:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2209:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -4803,7 +4803,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2205:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2206:/ clear"); /*clear *//*_.LASTPAIR__V10*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.LASTPROC__V11*/ meltfptr[10] = 0; @@ -4825,7 +4825,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.REVLASTPAIR__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-base.melt:2213:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2214:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -4849,7 +4849,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2210:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2211:/ clear"); /*clear *//*_.REVLASTPAIR__V12*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_.REVLASTPROC__V13*/ meltfptr[12] = 0; @@ -4860,7 +4860,7 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-base.melt:2193:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2194:/ clear"); /*clear *//*_.FIRSTLIST__V2*/ meltfptr[1] = 0; /*^clear */ /*clear *//*_.LASTLIST__V3*/ meltfptr[2] = 0; @@ -4954,7 +4954,7 @@ meltrout_44_warmelt_base_REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:2216:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:2217:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -4964,13 +4964,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2220:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2221:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2220:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2221:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -4978,7 +4978,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:2221:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2222:/ quasiblock"); /*^cond */ @@ -5005,12 +5005,12 @@ lab_endgetargs:; /*_.FIRSTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2223:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2224:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.FIRSTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:2223:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2224:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -5022,18 +5022,18 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2225:/ compute"); + MELT_LOCATION ("warmelt-base.melt:2226:/ compute"); /*_.FIRSTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:2226:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2227:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2226:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2227:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -5075,7 +5075,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2230:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2231:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -5112,12 +5112,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2224:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2225:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2223:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2224:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -5129,14 +5129,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:2234:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2235:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.FIRSTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:2221:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2222:/ clear"); /*clear *//*_.FIRSTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; @@ -5146,7 +5146,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:2220:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:2221:/ cond.else"); /*^block */ /*anyblock */ @@ -5154,7 +5154,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:2237:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2238:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad function (non closure) passed to register_all_ipa_passes_start_hook_first")); } @@ -5166,7 +5166,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2216:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2217:/ clear"); /*clear *//*_#IS_CLOSURE__L1*/ meltfnum[0] = 0; } @@ -5252,7 +5252,7 @@ meltrout_45_warmelt_base_REGISTER_ALL_IPA_PASSES_START_HOOK_LAST /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:2241:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:2242:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -5262,13 +5262,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2245:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2246:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2245:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2246:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -5276,7 +5276,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:2246:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2247:/ quasiblock"); /*^cond */ @@ -5303,12 +5303,12 @@ lab_endgetargs:; /*_.LASTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2248:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2249:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.LASTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:2248:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2249:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -5320,17 +5320,17 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2250:/ compute"); + MELT_LOCATION ("warmelt-base.melt:2251:/ compute"); /*_.LASTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:2251:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2252:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2251:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2252:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -5372,7 +5372,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2255:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2256:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -5409,12 +5409,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2249:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2250:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2248:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2249:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -5426,14 +5426,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:2259:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2260:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.LASTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:2246:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2247:/ clear"); /*clear *//*_.LASTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; @@ -5443,7 +5443,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:2245:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:2246:/ cond.else"); /*^block */ /*anyblock */ @@ -5451,7 +5451,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:2262:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2263:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad function (non closure) passed to register_all_ipa_passes_start_hook_last")); } @@ -5463,7 +5463,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2241:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2242:/ clear"); /*clear *//*_#IS_CLOSURE__L1*/ meltfnum[0] = 0; } @@ -5559,11 +5559,11 @@ meltrout_46_warmelt_base_MELT_ALL_IPA_PASSES_END_RUNNER (meltclosure_ptr_t goto lab_endgetargs; lab_endgetargs:; /*body*/ - MELT_LOCATION ("warmelt-base.melt:2278:/ block"); + MELT_LOCATION ("warmelt-base.melt:2279:/ block"); /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2279:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2280:/ quasiblock"); /*^cond */ @@ -5591,7 +5591,7 @@ lab_endgetargs:; /*_.FIRSTLIST__V2*/ meltfptr[1] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2280:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2281:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -5638,7 +5638,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.FIRSTPAIR__V6*/ meltfptr[5]); - MELT_LOCATION ("warmelt-base.melt:2288:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2289:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -5662,7 +5662,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2285:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2286:/ clear"); /*clear *//*_.FIRSTPAIR__V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.FIRSTPROC__V7*/ meltfptr[6] = 0; @@ -5686,14 +5686,14 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.LASTPAIR__V10*/ meltfptr[9]); - MELT_LOCATION ("warmelt-base.melt:2294:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2295:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.LASTPROC__V11*/ meltfptr[10])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2294:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2295:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -5722,7 +5722,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2291:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2292:/ clear"); /*clear *//*_.LASTPAIR__V10*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.LASTPROC__V11*/ meltfptr[10] = 0; @@ -5744,7 +5744,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.REVLASTPAIR__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-base.melt:2299:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2300:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -5768,7 +5768,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2296:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2297:/ clear"); /*clear *//*_.REVLASTPAIR__V12*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_.REVLASTPROC__V13*/ meltfptr[12] = 0; @@ -5779,7 +5779,7 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-base.melt:2279:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2280:/ clear"); /*clear *//*_.FIRSTLIST__V2*/ meltfptr[1] = 0; /*^clear */ /*clear *//*_.LASTLIST__V3*/ meltfptr[2] = 0; @@ -5872,7 +5872,7 @@ meltrout_47_warmelt_base_REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:2302:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:2303:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -5882,13 +5882,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2306:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2307:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2306:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2307:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -5896,7 +5896,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:2307:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2308:/ quasiblock"); /*^cond */ @@ -5923,12 +5923,12 @@ lab_endgetargs:; /*_.FIRSTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2309:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2310:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.FIRSTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:2309:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2310:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -5940,18 +5940,18 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2311:/ compute"); + MELT_LOCATION ("warmelt-base.melt:2312:/ compute"); /*_.FIRSTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:2312:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2313:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2312:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2313:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -5993,7 +5993,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2316:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2317:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -6030,12 +6030,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2310:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2311:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2309:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2310:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -6047,14 +6047,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:2320:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2321:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.FIRSTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:2307:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2308:/ clear"); /*clear *//*_.FIRSTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; @@ -6064,7 +6064,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:2306:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:2307:/ cond.else"); /*^block */ /*anyblock */ @@ -6072,7 +6072,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:2323:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2324:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad function (non closure) passed to register_all_ipa_passes_end_hook_first")); } @@ -6084,7 +6084,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2302:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2303:/ clear"); /*clear *//*_#IS_CLOSURE__L1*/ meltfnum[0] = 0; } @@ -6170,7 +6170,7 @@ meltrout_48_warmelt_base_REGISTER_ALL_IPA_PASSES_END_HOOK_LAST /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:2327:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:2328:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -6180,13 +6180,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2331:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2332:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2331:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2332:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -6194,7 +6194,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:2332:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2333:/ quasiblock"); /*^cond */ @@ -6221,12 +6221,12 @@ lab_endgetargs:; /*_.LASTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2334:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2335:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.LASTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:2334:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2335:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -6238,17 +6238,17 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2336:/ compute"); + MELT_LOCATION ("warmelt-base.melt:2337:/ compute"); /*_.LASTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:2337:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2338:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2337:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2338:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -6290,7 +6290,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2341:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2342:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -6327,12 +6327,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2335:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2336:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2334:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2335:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -6344,14 +6344,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:2345:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2346:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.LASTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:2332:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2333:/ clear"); /*clear *//*_.LASTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; @@ -6361,7 +6361,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:2331:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:2332:/ cond.else"); /*^block */ /*anyblock */ @@ -6369,7 +6369,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:2348:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2349:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad function (non closure) passed to register_all_ipa_passes_end_hook_last")); } @@ -6381,7 +6381,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2327:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2328:/ clear"); /*clear *//*_#IS_CLOSURE__L1*/ meltfnum[0] = 0; } @@ -6469,11 +6469,11 @@ meltrout_49_warmelt_base_MELT_EARLY_GIMPLE_PASSES_START_RUNNER goto lab_endgetargs; lab_endgetargs:; /*body*/ - MELT_LOCATION ("warmelt-base.melt:2367:/ block"); + MELT_LOCATION ("warmelt-base.melt:2368:/ block"); /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2368:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2369:/ quasiblock"); /*^cond */ @@ -6501,7 +6501,7 @@ lab_endgetargs:; /*_.FIRSTLIST__V2*/ meltfptr[1] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2369:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2370:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -6548,7 +6548,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.FIRSTPAIR__V6*/ meltfptr[5]); - MELT_LOCATION ("warmelt-base.melt:2377:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2378:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -6572,7 +6572,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2374:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2375:/ clear"); /*clear *//*_.FIRSTPAIR__V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.FIRSTPROC__V7*/ meltfptr[6] = 0; @@ -6596,14 +6596,14 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.LASTPAIR__V10*/ meltfptr[9]); - MELT_LOCATION ("warmelt-base.melt:2383:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2384:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.LASTPROC__V11*/ meltfptr[10])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2383:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2384:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -6632,7 +6632,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2380:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2381:/ clear"); /*clear *//*_.LASTPAIR__V10*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.LASTPROC__V11*/ meltfptr[10] = 0; @@ -6654,7 +6654,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.REVLASTPAIR__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-base.melt:2388:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2389:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -6678,7 +6678,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2385:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2386:/ clear"); /*clear *//*_.REVLASTPAIR__V12*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_.REVLASTPROC__V13*/ meltfptr[12] = 0; @@ -6689,7 +6689,7 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-base.melt:2368:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2369:/ clear"); /*clear *//*_.FIRSTLIST__V2*/ meltfptr[1] = 0; /*^clear */ /*clear *//*_.LASTLIST__V3*/ meltfptr[2] = 0; @@ -6783,7 +6783,7 @@ meltrout_50_warmelt_base_REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:2391:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:2392:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -6793,13 +6793,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2395:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2396:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2395:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2396:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -6807,7 +6807,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:2396:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2397:/ quasiblock"); /*^cond */ @@ -6834,12 +6834,12 @@ lab_endgetargs:; /*_.FIRSTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2398:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2399:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.FIRSTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:2398:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2399:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -6851,18 +6851,18 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2400:/ compute"); + MELT_LOCATION ("warmelt-base.melt:2401:/ compute"); /*_.FIRSTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:2401:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2402:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2401:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2402:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -6904,7 +6904,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2405:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2406:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -6941,12 +6941,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2399:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2400:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2398:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2399:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -6958,14 +6958,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:2409:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2410:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.FIRSTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:2396:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2397:/ clear"); /*clear *//*_.FIRSTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; @@ -6975,7 +6975,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:2395:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:2396:/ cond.else"); /*^block */ /*anyblock */ @@ -6983,7 +6983,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:2412:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2413:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad function (non closure) passed to register_early_gimple_passes_start_hook_first")); } @@ -6995,7 +6995,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2391:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2392:/ clear"); /*clear *//*_#IS_CLOSURE__L1*/ meltfnum[0] = 0; } @@ -7083,7 +7083,7 @@ meltrout_51_warmelt_base_REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:2416:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:2417:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -7093,13 +7093,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2420:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2421:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2420:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2421:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -7107,7 +7107,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:2421:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2422:/ quasiblock"); /*^cond */ @@ -7134,12 +7134,12 @@ lab_endgetargs:; /*_.LASTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2423:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2424:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.LASTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:2423:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2424:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -7151,17 +7151,17 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2425:/ compute"); + MELT_LOCATION ("warmelt-base.melt:2426:/ compute"); /*_.LASTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:2426:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2427:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2426:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2427:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -7203,7 +7203,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2430:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2431:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -7240,12 +7240,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2424:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2425:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2423:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2424:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -7257,14 +7257,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:2434:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2435:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.LASTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:2421:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2422:/ clear"); /*clear *//*_.LASTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; @@ -7274,7 +7274,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:2420:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:2421:/ cond.else"); /*^block */ /*anyblock */ @@ -7282,7 +7282,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:2437:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2438:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad function (non closure) passed to register_early_gimple_passes_start_hook_last")); } @@ -7294,7 +7294,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2416:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2417:/ clear"); /*clear *//*_#IS_CLOSURE__L1*/ meltfnum[0] = 0; } @@ -7383,11 +7383,11 @@ meltrout_52_warmelt_base_MELT_EARLY_GIMPLE_PASSES_END_RUNNER goto lab_endgetargs; lab_endgetargs:; /*body*/ - MELT_LOCATION ("warmelt-base.melt:2453:/ block"); + MELT_LOCATION ("warmelt-base.melt:2454:/ block"); /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2454:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2455:/ quasiblock"); /*^cond */ @@ -7415,7 +7415,7 @@ lab_endgetargs:; /*_.FIRSTLIST__V2*/ meltfptr[1] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2455:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2456:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -7462,7 +7462,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.FIRSTPAIR__V6*/ meltfptr[5]); - MELT_LOCATION ("warmelt-base.melt:2463:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2464:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7486,7 +7486,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2460:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2461:/ clear"); /*clear *//*_.FIRSTPAIR__V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.FIRSTPROC__V7*/ meltfptr[6] = 0; @@ -7510,14 +7510,14 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.LASTPAIR__V10*/ meltfptr[9]); - MELT_LOCATION ("warmelt-base.melt:2469:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2470:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.LASTPROC__V11*/ meltfptr[10])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2469:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2470:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -7546,7 +7546,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2466:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2467:/ clear"); /*clear *//*_.LASTPAIR__V10*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.LASTPROC__V11*/ meltfptr[10] = 0; @@ -7568,7 +7568,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.REVLASTPAIR__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-base.melt:2474:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2475:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7592,7 +7592,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-base.melt:2471:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2472:/ clear"); /*clear *//*_.REVLASTPAIR__V12*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_.REVLASTPROC__V13*/ meltfptr[12] = 0; @@ -7603,7 +7603,7 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-base.melt:2454:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2455:/ clear"); /*clear *//*_.FIRSTLIST__V2*/ meltfptr[1] = 0; /*^clear */ /*clear *//*_.LASTLIST__V3*/ meltfptr[2] = 0; @@ -7697,7 +7697,7 @@ meltrout_53_warmelt_base_REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:2477:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:2478:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -7707,13 +7707,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2481:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2482:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2481:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2482:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -7721,7 +7721,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:2482:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2483:/ quasiblock"); /*^cond */ @@ -7748,12 +7748,12 @@ lab_endgetargs:; /*_.FIRSTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2484:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2485:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.FIRSTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:2484:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2485:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -7765,18 +7765,18 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2486:/ compute"); + MELT_LOCATION ("warmelt-base.melt:2487:/ compute"); /*_.FIRSTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:2487:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2488:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2487:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2488:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -7818,7 +7818,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2491:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2492:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -7855,12 +7855,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2485:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2486:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2484:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2485:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -7872,14 +7872,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:2495:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2496:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.FIRSTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:2482:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2483:/ clear"); /*clear *//*_.FIRSTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; @@ -7889,7 +7889,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:2481:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:2482:/ cond.else"); /*^block */ /*anyblock */ @@ -7897,7 +7897,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:2498:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2499:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad function (non closure) passed to register_early_gimple_passes_end_hook_first")); } @@ -7909,7 +7909,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2477:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2478:/ clear"); /*clear *//*_#IS_CLOSURE__L1*/ meltfnum[0] = 0; } @@ -7997,7 +7997,7 @@ meltrout_54_warmelt_base_REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:2502:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:2503:/ getarg"); /*_.FUN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -8007,13 +8007,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2506:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2507:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_CLOSURE__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; - MELT_LOCATION ("warmelt-base.melt:2506:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2507:/ cond"); /*cond */ if ( /*_#IS_CLOSURE__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -8021,7 +8021,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-base.melt:2507:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2508:/ quasiblock"); /*^cond */ @@ -8048,12 +8048,12 @@ lab_endgetargs:; /*_.LASTLIST__V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2509:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2510:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.LASTLIST__V3*/ meltfptr[2]) == NULL);; - MELT_LOCATION ("warmelt-base.melt:2509:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2510:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -8065,17 +8065,17 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2511:/ compute"); + MELT_LOCATION ("warmelt-base.melt:2512:/ compute"); /*_.LASTLIST__V3*/ meltfptr[2] = /*_.SETQ___V5*/ meltfptr[4] = /*_.MAKE_LIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:2512:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2513:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V6*/ meltfptr[5] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; - MELT_LOCATION ("warmelt-base.melt:2512:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2513:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -8117,7 +8117,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2516:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2517:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -8154,12 +8154,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-base.melt:2510:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2511:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2509:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2510:/ clear"); /*clear *//*_.MAKE_LIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.SETQ___V5*/ meltfptr[4] = 0; @@ -8171,14 +8171,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:2520:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2521:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.LASTLIST__V3*/ meltfptr[2]), (melt_ptr_t) ( /*_.FUN__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:2507:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2508:/ clear"); /*clear *//*_.LASTLIST__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; @@ -8188,7 +8188,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:2506:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:2507:/ cond.else"); /*^block */ /*anyblock */ @@ -8196,7 +8196,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-base.melt:2523:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2524:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s", melt_dbgcounter, ("Bad function (non closure) passed to register_early_gimple_passes_end_hook_last")); } @@ -8208,7 +8208,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2502:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2503:/ clear"); /*clear *//*_#IS_CLOSURE__L1*/ meltfnum[0] = 0; } @@ -8295,7 +8295,7 @@ meltrout_55_warmelt_base_SET_REFERENCE (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:2571:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:2572:/ getarg"); /*_.R__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -8314,7 +8314,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2574:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2575:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -8438,7 +8438,7 @@ meltrout_56_warmelt_base_INSTALL_VALUE_DESCRIPTOR (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-base.melt:2583:/ getarg"); + MELT_LOCATION ("warmelt-base.melt:2584:/ getarg"); /*_.VD__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -8450,7 +8450,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-base.melt:2584:/ cppif.then"); + MELT_LOCATION ("warmelt-base.melt:2585:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8462,7 +8462,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.VD__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_VALUE_DESCRIPTOR */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-base.melt:2584:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2585:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -8470,7 +8470,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-base.melt:2584:/ cond.else"); + MELT_LOCATION ("warmelt-base.melt:2585:/ cond.else"); /*^block */ /*anyblock */ @@ -8484,7 +8484,7 @@ lab_endgetargs:; melt_assert_failed (("check vd"), ("warmelt-base.melt") ? ("warmelt-base.melt") : __FILE__, - (2584) ? (2584) : __LINE__, __FUNCTION__); + (2585) ? (2585) : __LINE__, __FUNCTION__); ; } ; @@ -8499,7 +8499,7 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = /*_.IFELSE___V4*/ meltfptr[3];; /*epilog */ - MELT_LOCATION ("warmelt-base.melt:2584:/ clear"); + MELT_LOCATION ("warmelt-base.melt:2585:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V4*/ meltfptr[3] = 0; @@ -8510,7 +8510,7 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-base.melt:2585:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2586:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -8537,13 +8537,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-base.melt:2585:/ locexp"); + MELT_LOCATION ("warmelt-base.melt:2586:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.REFERENCED_VALUE__V5*/ meltfptr[3]), (melt_ptr_t) ( /*_.VD__V2*/ meltfptr[1])); } ; - MELT_LOCATION ("warmelt-base.melt:2583:/ checksignal"); + MELT_LOCATION ("warmelt-base.melt:2584:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ diff --git a/gcc/melt/generated/warmelt-base+03.c b/gcc/melt/generated/warmelt-base+03.c index 81cbfa47407..5e5076d004f 100644 --- a/gcc/melt/generated/warmelt-base+03.c +++ b/gcc/melt/generated/warmelt-base+03.c @@ -1197,11 +1197,11 @@ meltrout_57_warmelt_base_RETRIEVE_VALUE_DESCRIPTOR_LIST (meltclosure_ptr_t goto lab_endgetargs; lab_endgetargs:; /*body*/ - MELT_LOCATION ("warmelt-base.melt:2588:/ block"); + MELT_LOCATION ("warmelt-base.melt:2589:/ block"); /*anyblock*/ { - MELT_LOCATION ("warmelt-base.melt:2589:/ cond"); + MELT_LOCATION ("warmelt-base.melt:2590:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -1226,11 +1226,23 @@ lab_endgetargs:; /*_.REFERENCED_VALUE__V2*/ meltfptr[1] = NULL;; } ; - MELT_LOCATION ("warmelt-base.melt:2588:/ quasiblock"); + MELT_LOCATION ("warmelt-base.melt:2589:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.REFERENCED_VALUE__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-base.melt:2588:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:2589:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-base+meltdesc.c b/gcc/melt/generated/warmelt-base+meltdesc.c index df12a6c1803..a2cbcf5b6d4 100644 --- a/gcc/melt/generated/warmelt-base+meltdesc.c +++ b/gcc/melt/generated/warmelt-base+meltdesc.c @@ -19,7 +19,7 @@ #endif /*__cplusplus */ /* version of the GCC compiler & MELT runtime generating this */ -const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revision 188875] MELT_0.9.6-pre" +const char melt_genversionstr[]="4.8.0 20120702 (experimental) [melt-branch revision 189162] MELT_0.9.6-pre" #ifdef __cplusplus " (in C++)" @@ -28,7 +28,7 @@ const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revi #endif ; -const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_188875]"; +const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_189162]"; /* source name & real path of the module */ /*MELTMODULENAME MELT-STAGE-ZERO/warmelt-base */ @@ -36,26 +36,26 @@ const char melt_modulename[]="warmelt-base"; const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.8.0/melt-modules/0.9.6-pre/warmelt-base"; /* hash of preprocessed melt-run.h generating this */ -const char melt_prepromd5meltrun[]="40fea0fe808f877cf6541857ec8d6c2d"; +const char melt_prepromd5meltrun[]="b3a18a5fcc8e78e7c3ea5bf55f88e347"; /* hexmd5checksum of primary C file */ -const char melt_primaryhexmd5[]="6cf557454f286c84c42d7b9646f45af3"; +const char melt_primaryhexmd5[]="1fa67f54a8411a78a9ea48b1987779c4"; /* hexmd5checksum of secondary C files */ const char* const melt_secondaryhexmd5tab[]={ /*nosecfile*/ (const char*)0, - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-base+01.c #1 */ "2f56f952a7bf45f96b071e10568f3989", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-base+02.c #2 */ "ec02db082a2e38004ea2b0b9cae24e44", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-base+03.c #3 */ "20d90edd00fba0d10ec4eb5778ca0c12", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-base+01.c #1 */ "1ec6ad013c173ffe4b675991b2f79995", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-base+02.c #2 */ "459b77ffb4bc68a5ddf5c22c2edd980f", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-base+03.c #3 */ "ad2e84d193a6ff7cbf44eb0ef2d2e159", (const char*)0 }; /* last index of secondary files */ const int melt_lastsecfileindex=3; /* cumulated checksum of primary & secondary files */ -const char melt_cumulated_hexmd5[]="6948c2ec6460142de3a7e3ac207ac74a" ; +const char melt_cumulated_hexmd5[]="145f48b58fb1d8d3938ddf62e1f0bb85" ; /* include the timestamp file */ -#define meltmod_warmelt_base_mds__6948c2ec6460142de3a7e3ac207ac74a 1 +#define meltmod_warmelt_base_mds__145f48b58fb1d8d3938ddf62e1f0bb85 1 #include "warmelt-base+melttime.h" diff --git a/gcc/melt/generated/warmelt-base+melttime.h b/gcc/melt/generated/warmelt-base+melttime.h index 59eb079d1e1..75bace0bd22 100644 --- a/gcc/melt/generated/warmelt-base+melttime.h +++ b/gcc/melt/generated/warmelt-base+melttime.h @@ -5,7 +5,7 @@ /* This warmelt-base+melttime.h is included from warmelt-base+meltdesc.c only. */ -#if meltmod_warmelt_base_mds__6948c2ec6460142de3a7e3ac207ac74a +#if meltmod_warmelt_base_mds__145f48b58fb1d8d3938ddf62e1f0bb85 /* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-base */ #ifdef __cplusplus @@ -18,8 +18,8 @@ extern "C" { /*MELT BOOTSTRAP*/ -const char melt_gen_timestamp[]="Fri Jun 22 15:20:01 2012 CEST"; -const long long melt_gen_timenum=1340371201; +const char melt_gen_timestamp[]="Mon Jul 2 17:04:54 2012 MEST"; +const long long melt_gen_timenum=1341241494; const char melt_build_timestamp[]= __DATE__ "@" __TIME__ #ifdef __cplusplus @@ -34,7 +34,7 @@ const long long melt_gen_timenum=1340371201; } ; /* end extern C */ #endif /*__cplusplus */ - #else /* ! meltmod_warmelt_base_mds__6948c2ec6460142de3a7e3ac207ac74a */ + #else /* ! meltmod_warmelt_base_mds__145f48b58fb1d8d3938ddf62e1f0bb85 */ #error invalid timestamp file for MELT-STAGE-ZERO/warmelt-base - #endif /* meltmod_warmelt_base_mds__6948c2ec6460142de3a7e3ac207ac74a */ + #endif /* meltmod_warmelt_base_mds__145f48b58fb1d8d3938ddf62e1f0bb85 */ diff --git a/gcc/melt/generated/warmelt-base.c b/gcc/melt/generated/warmelt-base.c index 231488ddfe7..62022c9adf5 100644 --- a/gcc/melt/generated/warmelt-base.c +++ b/gcc/melt/generated/warmelt-base.c @@ -1294,7 +1294,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:183:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:183:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -1494,7 +1506,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:191:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:191:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -1694,7 +1718,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:200:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:200:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -1928,7 +1964,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-base.melt:208:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-base.melt:208:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4894,7 +4942,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, dbgprintf ("start initialize_module_meltdata_warmelt_base iniframp__=%p", (void *) iniframp__); melt_assertmsg ("check module initial frame", - iniframp__->mcfr_nbvar == /*minihash */ -4087); + iniframp__->mcfr_nbvar == /*minihash */ -615); struct cdata_st { @@ -7673,7 +7721,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, struct MELT_STRING_STRUCT (14) dstr_2708__meltclosure_st; struct MELT_STRING_STRUCT (9) dstr_2709__u_closure; struct MELT_STRING_STRUCT (169) dstr_2710__from_VALDESC; - struct MELT_STRING_STRUCT (301) dstr_2711__decl_VALDESC; + struct MELT_STRING_STRUCT (264) dstr_2711__decl_VALDESC; struct MELT_STRING_STRUCT (663) dstr_2712__copy_VALDESC; struct MELT_STRING_STRUCT (203) dstr_2713__forwarding_f; struct MELT_STRING_STRUCT (463) dstr_2714__cloning_from; @@ -8171,7 +8219,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_3__IGNORE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_3__IGNORE.obj_hash = 955675297; + cdat->dobj_3__IGNORE.obj_hash = 573587063; cdat->dobj_3__IGNORE.obj_len = 5; /*inimult dtup_4__IGNORE */ @@ -8230,7 +8278,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_8.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_8.obj_num = 0; - cdat->dobj_8.obj_hash = 980879501; + cdat->dobj_8.obj_hash = 141722516; cdat->dobj_8.obj_len = 2; @@ -8299,7 +8347,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_14__VOID.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_14__VOID.obj_hash = 76504901; + cdat->dobj_14__VOID.obj_hash = 1064012892; cdat->dobj_14__VOID.obj_len = 5; /*inimult dtup_15__VOID */ @@ -8376,7 +8424,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_21__IS_NOT_OBJECT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_21__IS_NOT_OBJECT.obj_hash = 796049452; + cdat->dobj_21__IS_NOT_OBJECT.obj_hash = 760177346; cdat->dobj_21__IS_NOT_OBJECT.obj_len = 5; /*inimult dtup_22__IS_NOT_OBJECT */ @@ -8437,7 +8485,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_26.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_26.obj_num = 0; - cdat->dobj_26.obj_hash = 615113301; + cdat->dobj_26.obj_hash = 122893853; cdat->dobj_26.obj_len = 2; @@ -8517,7 +8565,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_32__GET_GLOBPREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_32__GET_GLOBPREDEF.obj_hash = 839506352; + cdat->dobj_32__GET_GLOBPREDEF.obj_hash = 717051518; cdat->dobj_32__GET_GLOBPREDEF.obj_len = 5; /*inimult dtup_33__GET_GLOBPREDEF */ @@ -8578,7 +8626,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_37.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_37.obj_num = 0; - cdat->dobj_37.obj_hash = 651399929; + cdat->dobj_37.obj_hash = 920919396; cdat->dobj_37.obj_len = 2; @@ -8652,7 +8700,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_43__OBJ_HASH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_43__OBJ_HASH.obj_hash = 651800497; + cdat->dobj_43__OBJ_HASH.obj_hash = 98841612; cdat->dobj_43__OBJ_HASH.obj_len = 5; /*inimult dtup_44__OBJ_HASH */ @@ -8684,7 +8732,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_46.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_46.obj_num = 0; - cdat->dobj_46.obj_hash = 339436889; + cdat->dobj_46.obj_hash = 927214586; cdat->dobj_46.obj_len = 2; @@ -8760,7 +8808,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_52__CLONE_WITH_DISCRIMINANT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_52__CLONE_WITH_DISCRIMINANT.obj_hash = 711022593; + cdat->dobj_52__CLONE_WITH_DISCRIMINANT.obj_hash = 1010427326; cdat->dobj_52__CLONE_WITH_DISCRIMINANT.obj_len = 5; /*inimult dtup_53__CLONE_WITH_DISCRIMINANT */ @@ -8821,7 +8869,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_57.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_57.obj_num = 0; - cdat->dobj_57.obj_hash = 353858692; + cdat->dobj_57.obj_hash = 440791613; cdat->dobj_57.obj_len = 2; @@ -8870,7 +8918,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_60.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_60.obj_num = 1; - cdat->dobj_60.obj_hash = 1064065079; + cdat->dobj_60.obj_hash = 609432084; cdat->dobj_60.obj_len = 2; @@ -8952,7 +9000,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_67__OBJ_LEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_67__OBJ_LEN.obj_hash = 209360671; + cdat->dobj_67__OBJ_LEN.obj_hash = 805748667; cdat->dobj_67__OBJ_LEN.obj_len = 5; /*inimult dtup_68__OBJ_LEN */ @@ -8984,7 +9032,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_70.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_70.obj_num = 0; - cdat->dobj_70.obj_hash = 427766575; + cdat->dobj_70.obj_hash = 514105895; cdat->dobj_70.obj_len = 2; @@ -9055,7 +9103,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_76__OBJ_NUM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_76__OBJ_NUM.obj_hash = 421730638; + cdat->dobj_76__OBJ_NUM.obj_hash = 431693401; cdat->dobj_76__OBJ_NUM.obj_len = 5; /*inimult dtup_77__OBJ_NUM */ @@ -9087,7 +9135,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_79.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_79.obj_num = 0; - cdat->dobj_79.obj_hash = 875351292; + cdat->dobj_79.obj_hash = 977619551; cdat->dobj_79.obj_len = 2; @@ -9162,7 +9210,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_85__NONZERO_HASH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_85__NONZERO_HASH.obj_hash = 716126147; + cdat->dobj_85__NONZERO_HASH.obj_hash = 879248875; cdat->dobj_85__NONZERO_HASH.obj_len = 5; /*inimult dtup_86__NONZERO_HASH */ @@ -9245,7 +9293,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_92__MINOR_GARBCOLL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_92__MINOR_GARBCOLL.obj_hash = 282916016; + cdat->dobj_92__MINOR_GARBCOLL.obj_hash = 749486842; cdat->dobj_92__MINOR_GARBCOLL.obj_len = 5; /*inimult dtup_93__MINOR_GARBCOLL */ @@ -9306,7 +9354,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_97.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_97.obj_num = 0; - cdat->dobj_97.obj_hash = 267013507; + cdat->dobj_97.obj_hash = 414972719; cdat->dobj_97.obj_len = 2; @@ -9388,7 +9436,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_103__FULL_GARBCOLL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_103__FULL_GARBCOLL.obj_hash = 198082753; + cdat->dobj_103__FULL_GARBCOLL.obj_hash = 511273023; cdat->dobj_103__FULL_GARBCOLL.obj_len = 5; /*inimult dtup_104__FULL_GARBCOLL */ @@ -9422,7 +9470,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_106.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_106.obj_num = 0; - cdat->dobj_106.obj_hash = 207444703; + cdat->dobj_106.obj_hash = 26061215; cdat->dobj_106.obj_len = 2; @@ -9504,7 +9552,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_112__CHECKCALLSTACK_MSG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_112__CHECKCALLSTACK_MSG.obj_hash = 470079060; + cdat->dobj_112__CHECKCALLSTACK_MSG.obj_hash = 663495054; cdat->dobj_112__CHECKCALLSTACK_MSG.obj_len = 5; /*inimult dtup_113__CHECKCALLSTACK_MSG */ @@ -9565,7 +9613,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_117.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_117.obj_num = 0; - cdat->dobj_117.obj_hash = 768307802; + cdat->dobj_117.obj_hash = 521359163; cdat->dobj_117.obj_len = 2; @@ -9644,7 +9692,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_123__MELT_INCREMENT_DBGCOUNTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_123__MELT_INCREMENT_DBGCOUNTER.obj_hash = 494207099; + cdat->dobj_123__MELT_INCREMENT_DBGCOUNTER.obj_hash = 327098362; cdat->dobj_123__MELT_INCREMENT_DBGCOUNTER.obj_len = 5; /*inimult dtup_124__MELT_INCREMENT_DBGCOUNTER */ @@ -9726,7 +9774,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_130__CBREAK_MSG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_130__CBREAK_MSG.obj_hash = 475520160; + cdat->dobj_130__CBREAK_MSG.obj_hash = 739163376; cdat->dobj_130__CBREAK_MSG.obj_len = 5; /*inimult dtup_131__CBREAK_MSG */ @@ -9760,7 +9808,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_133.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_133.obj_num = 0; - cdat->dobj_133.obj_hash = 420739010; + cdat->dobj_133.obj_hash = 427635124; cdat->dobj_133.obj_len = 2; @@ -9833,7 +9881,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_139__C_TIME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_139__C_TIME.obj_hash = 1069596693; + cdat->dobj_139__C_TIME.obj_hash = 986059598; cdat->dobj_139__C_TIME.obj_len = 5; /*inimult dtup_140__C_TIME */ @@ -9908,7 +9956,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_146__C_CLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_146__C_CLOCK.obj_hash = 399799715; + cdat->dobj_146__C_CLOCK.obj_hash = 586653782; cdat->dobj_146__C_CLOCK.obj_len = 5; /*inimult dtup_147__C_CLOCK */ @@ -9986,7 +10034,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_153__RELATIVE_TIME_MILLISEC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_153__RELATIVE_TIME_MILLISEC.obj_hash = 961533849; + cdat->dobj_153__RELATIVE_TIME_MILLISEC.obj_hash = 90697803; cdat->dobj_153__RELATIVE_TIME_MILLISEC.obj_len = 5; /*inimult dtup_154__RELATIVE_TIME_MILLISEC */ @@ -10070,7 +10118,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_160__SET_REAL_TIMER_MILLISEC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_160__SET_REAL_TIMER_MILLISEC.obj_hash = 773461705; + cdat->dobj_160__SET_REAL_TIMER_MILLISEC.obj_hash = 420373370; cdat->dobj_160__SET_REAL_TIMER_MILLISEC.obj_len = 5; /*inimult dtup_161__SET_REAL_TIMER_MILLISEC */ @@ -10132,7 +10180,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_165.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_165.obj_num = 0; - cdat->dobj_165.obj_hash = 796060678; + cdat->dobj_165.obj_hash = 775031215; cdat->dobj_165.obj_len = 2; @@ -10206,7 +10254,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_171__I.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_171__I.obj_hash = 551344713; + cdat->dobj_171__I.obj_hash = 701621348; cdat->dobj_171__I.obj_len = 5; /*inimult dtup_172__I */ @@ -10265,7 +10313,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_176.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_176.obj_num = 0; - cdat->dobj_176.obj_hash = 740485370; + cdat->dobj_176.obj_hash = 531646793; cdat->dobj_176.obj_len = 2; @@ -10314,7 +10362,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_179.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_179.obj_num = 1; - cdat->dobj_179.obj_hash = 839729192; + cdat->dobj_179.obj_hash = 404661713; cdat->dobj_179.obj_len = 2; @@ -10389,7 +10437,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_186__I.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_186__I.obj_hash = 938749865; + cdat->dobj_186__I.obj_hash = 720465746; cdat->dobj_186__I.obj_len = 5; /*inimult dtup_187__I */ @@ -10421,7 +10469,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_189.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_189.obj_num = 0; - cdat->dobj_189.obj_hash = 1000807026; + cdat->dobj_189.obj_hash = 207854942; cdat->dobj_189.obj_len = 2; /*^iniobj */ @@ -10443,7 +10491,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_190.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_190.obj_num = 1; - cdat->dobj_190.obj_hash = 831943600; + cdat->dobj_190.obj_hash = 365063438; cdat->dobj_190.obj_len = 2; @@ -10518,7 +10566,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_197__I.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_197__I.obj_hash = 416434899; + cdat->dobj_197__I.obj_hash = 552211179; cdat->dobj_197__I.obj_len = 5; /*inimult dtup_198__I */ @@ -10550,7 +10598,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_200.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_200.obj_num = 0; - cdat->dobj_200.obj_hash = 206935910; + cdat->dobj_200.obj_hash = 1011131838; cdat->dobj_200.obj_len = 2; /*^iniobj */ @@ -10572,7 +10620,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_201.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_201.obj_num = 1; - cdat->dobj_201.obj_hash = 292043406; + cdat->dobj_201.obj_hash = 492432797; cdat->dobj_201.obj_len = 2; @@ -10647,7 +10695,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_208__MAXI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_208__MAXI.obj_hash = 269291648; + cdat->dobj_208__MAXI.obj_hash = 236637561; cdat->dobj_208__MAXI.obj_len = 5; /*inimult dtup_209__MAXI */ @@ -10679,7 +10727,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_211.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_211.obj_num = 0; - cdat->dobj_211.obj_hash = 703501389; + cdat->dobj_211.obj_hash = 102319710; cdat->dobj_211.obj_len = 2; /*^iniobj */ @@ -10701,7 +10749,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_212.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_212.obj_num = 1; - cdat->dobj_212.obj_hash = 751153572; + cdat->dobj_212.obj_hash = 820905009; cdat->dobj_212.obj_len = 2; @@ -10776,7 +10824,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_219__MINI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_219__MINI.obj_hash = 256482639; + cdat->dobj_219__MINI.obj_hash = 937632936; cdat->dobj_219__MINI.obj_len = 5; /*inimult dtup_220__MINI */ @@ -10808,7 +10856,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_222.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_222.obj_num = 0; - cdat->dobj_222.obj_hash = 796221775; + cdat->dobj_222.obj_hash = 43953402; cdat->dobj_222.obj_len = 2; /*^iniobj */ @@ -10830,7 +10878,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_223.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_223.obj_num = 1; - cdat->dobj_223.obj_hash = 517282882; + cdat->dobj_223.obj_hash = 799502220; cdat->dobj_223.obj_len = 2; @@ -10905,7 +10953,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_230__I.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_230__I.obj_hash = 319222266; + cdat->dobj_230__I.obj_hash = 151931099; cdat->dobj_230__I.obj_len = 5; /*inimult dtup_231__I */ @@ -10937,7 +10985,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_233.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_233.obj_num = 0; - cdat->dobj_233.obj_hash = 548646891; + cdat->dobj_233.obj_hash = 43234243; cdat->dobj_233.obj_len = 2; /*^iniobj */ @@ -10959,7 +11007,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_234.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_234.obj_num = 1; - cdat->dobj_234.obj_hash = 227771815; + cdat->dobj_234.obj_hash = 689626323; cdat->dobj_234.obj_len = 2; @@ -11034,7 +11082,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_241__I.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_241__I.obj_hash = 103830746; + cdat->dobj_241__I.obj_hash = 895786962; cdat->dobj_241__I.obj_len = 5; /*inimult dtup_242__I */ @@ -11066,7 +11114,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_244.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_244.obj_num = 0; - cdat->dobj_244.obj_hash = 209411230; + cdat->dobj_244.obj_hash = 1001445526; cdat->dobj_244.obj_len = 2; /*^iniobj */ @@ -11088,7 +11136,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_245.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_245.obj_num = 1; - cdat->dobj_245.obj_hash = 858572410; + cdat->dobj_245.obj_hash = 791172268; cdat->dobj_245.obj_len = 2; @@ -11163,7 +11211,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_252__ANDI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_252__ANDI.obj_hash = 6214154; + cdat->dobj_252__ANDI.obj_hash = 883174381; cdat->dobj_252__ANDI.obj_len = 5; /*inimult dtup_253__ANDI */ @@ -11195,7 +11243,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_255.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_255.obj_num = 0; - cdat->dobj_255.obj_hash = 799191449; + cdat->dobj_255.obj_hash = 448488287; cdat->dobj_255.obj_len = 2; /*^iniobj */ @@ -11217,7 +11265,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_256.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_256.obj_num = 1; - cdat->dobj_256.obj_hash = 405304685; + cdat->dobj_256.obj_hash = 782608765; cdat->dobj_256.obj_len = 2; @@ -11292,7 +11340,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_263__ORI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_263__ORI.obj_hash = 997326899; + cdat->dobj_263__ORI.obj_hash = 1072633368; cdat->dobj_263__ORI.obj_len = 5; /*inimult dtup_264__ORI */ @@ -11324,7 +11372,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_266.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_266.obj_num = 0; - cdat->dobj_266.obj_hash = 348512419; + cdat->dobj_266.obj_hash = 52566421; cdat->dobj_266.obj_len = 2; /*^iniobj */ @@ -11346,7 +11394,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_267.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_267.obj_num = 1; - cdat->dobj_267.obj_hash = 530866425; + cdat->dobj_267.obj_hash = 990520520; cdat->dobj_267.obj_len = 2; @@ -11421,7 +11469,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_274__XORI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_274__XORI.obj_hash = 99405804; + cdat->dobj_274__XORI.obj_hash = 207765579; cdat->dobj_274__XORI.obj_len = 5; /*inimult dtup_275__XORI */ @@ -11453,7 +11501,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_277.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_277.obj_num = 0; - cdat->dobj_277.obj_hash = 160403991; + cdat->dobj_277.obj_hash = 228523223; cdat->dobj_277.obj_len = 2; /*^iniobj */ @@ -11475,7 +11523,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_278.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_278.obj_num = 1; - cdat->dobj_278.obj_hash = 601772093; + cdat->dobj_278.obj_hash = 839963050; cdat->dobj_278.obj_len = 2; @@ -11550,7 +11598,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_285__NEGI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_285__NEGI.obj_hash = 890096581; + cdat->dobj_285__NEGI.obj_hash = 655255221; cdat->dobj_285__NEGI.obj_len = 5; /*inimult dtup_286__NEGI */ @@ -11609,7 +11657,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_290.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_290.obj_num = 0; - cdat->dobj_290.obj_hash = 685737726; + cdat->dobj_290.obj_hash = 602190509; cdat->dobj_290.obj_len = 2; @@ -11677,7 +11725,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_296__NOTI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_296__NOTI.obj_hash = 548083588; + cdat->dobj_296__NOTI.obj_hash = 469922740; cdat->dobj_296__NOTI.obj_len = 5; /*inimult dtup_297__NOTI */ @@ -11709,7 +11757,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_299.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_299.obj_num = 0; - cdat->dobj_299.obj_hash = 586104862; + cdat->dobj_299.obj_hash = 450779218; cdat->dobj_299.obj_len = 2; @@ -11888,7 +11936,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_317__IVI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_317__IVI.obj_hash = 618915774; + cdat->dobj_317__IVI.obj_hash = 195131709; cdat->dobj_317__IVI.obj_len = 5; /*inimult dtup_318__IVI */ @@ -11920,7 +11968,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_320.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_320.obj_num = 0; - cdat->dobj_320.obj_hash = 561324222; + cdat->dobj_320.obj_hash = 507033864; cdat->dobj_320.obj_len = 2; @@ -11969,7 +12017,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_323.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_323.obj_num = 1; - cdat->dobj_323.obj_hash = 332807302; + cdat->dobj_323.obj_hash = 75621980; cdat->dobj_323.obj_len = 2; @@ -12057,7 +12105,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_331__IVI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_331__IVI.obj_hash = 72266634; + cdat->dobj_331__IVI.obj_hash = 815641278; cdat->dobj_331__IVI.obj_len = 5; /*inimult dtup_332__IVI */ @@ -12089,7 +12137,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_334.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_334.obj_num = 0; - cdat->dobj_334.obj_hash = 1025224481; + cdat->dobj_334.obj_hash = 623387985; cdat->dobj_334.obj_len = 2; /*^iniobj */ @@ -12111,7 +12159,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_335.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_335.obj_num = 1; - cdat->dobj_335.obj_hash = 385009107; + cdat->dobj_335.obj_hash = 558490642; cdat->dobj_335.obj_len = 2; @@ -12198,7 +12246,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_343__IVI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_343__IVI.obj_hash = 348745351; + cdat->dobj_343__IVI.obj_hash = 90078639; cdat->dobj_343__IVI.obj_len = 5; /*inimult dtup_344__IVI */ @@ -12230,7 +12278,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_346.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_346.obj_num = 0; - cdat->dobj_346.obj_hash = 285808417; + cdat->dobj_346.obj_hash = 184205265; cdat->dobj_346.obj_len = 2; /*^iniobj */ @@ -12252,7 +12300,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_347.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_347.obj_num = 1; - cdat->dobj_347.obj_hash = 713198045; + cdat->dobj_347.obj_hash = 422212424; cdat->dobj_347.obj_len = 2; @@ -12339,7 +12387,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_355__IVI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_355__IVI.obj_hash = 479780875; + cdat->dobj_355__IVI.obj_hash = 653913923; cdat->dobj_355__IVI.obj_len = 5; /*inimult dtup_356__IVI */ @@ -12371,7 +12419,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_358.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_358.obj_num = 0; - cdat->dobj_358.obj_hash = 720331080; + cdat->dobj_358.obj_hash = 694164376; cdat->dobj_358.obj_len = 2; /*^iniobj */ @@ -12393,7 +12441,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_359.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_359.obj_num = 1; - cdat->dobj_359.obj_hash = 666503188; + cdat->dobj_359.obj_hash = 577017; cdat->dobj_359.obj_len = 2; @@ -12488,7 +12536,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_368__IVI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_368__IVI.obj_hash = 988345933; + cdat->dobj_368__IVI.obj_hash = 900856931; cdat->dobj_368__IVI.obj_len = 5; /*inimult dtup_369__IVI */ @@ -12520,7 +12568,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_371.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_371.obj_num = 0; - cdat->dobj_371.obj_hash = 571820264; + cdat->dobj_371.obj_hash = 312938449; cdat->dobj_371.obj_len = 2; /*^iniobj */ @@ -12542,7 +12590,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_372.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_372.obj_num = 1; - cdat->dobj_372.obj_hash = 75952472; + cdat->dobj_372.obj_hash = 689325827; cdat->dobj_372.obj_len = 2; @@ -12637,7 +12685,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_381__IV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_381__IV.obj_hash = 437795745; + cdat->dobj_381__IV.obj_hash = 601000000; cdat->dobj_381__IV.obj_len = 5; /*inimult dtup_382__IV */ @@ -12669,7 +12717,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_384.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_384.obj_num = 0; - cdat->dobj_384.obj_hash = 461263189; + cdat->dobj_384.obj_hash = 1072380335; cdat->dobj_384.obj_len = 2; /*^iniobj */ @@ -12691,7 +12739,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_385.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_385.obj_num = 1; - cdat->dobj_385.obj_hash = 1062489770; + cdat->dobj_385.obj_hash = 186535179; cdat->dobj_385.obj_len = 2; @@ -12786,7 +12834,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_394__IV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_394__IV.obj_hash = 857887386; + cdat->dobj_394__IV.obj_hash = 1040052526; cdat->dobj_394__IV.obj_len = 5; /*inimult dtup_395__IV */ @@ -12818,7 +12866,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_397.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_397.obj_num = 0; - cdat->dobj_397.obj_hash = 670352242; + cdat->dobj_397.obj_hash = 352177368; cdat->dobj_397.obj_len = 2; /*^iniobj */ @@ -12840,7 +12888,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_398.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_398.obj_num = 1; - cdat->dobj_398.obj_hash = 164467501; + cdat->dobj_398.obj_hash = 90122742; cdat->dobj_398.obj_len = 2; @@ -12935,7 +12983,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_407__IV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_407__IV.obj_hash = 814462924; + cdat->dobj_407__IV.obj_hash = 757616511; cdat->dobj_407__IV.obj_len = 5; /*inimult dtup_408__IV */ @@ -12967,7 +13015,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_410.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_410.obj_num = 0; - cdat->dobj_410.obj_hash = 774711844; + cdat->dobj_410.obj_hash = 757505775; cdat->dobj_410.obj_len = 2; /*^iniobj */ @@ -12989,7 +13037,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_411.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_411.obj_num = 1; - cdat->dobj_411.obj_hash = 279614468; + cdat->dobj_411.obj_hash = 68544936; cdat->dobj_411.obj_len = 2; @@ -13084,7 +13132,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_420__IV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_420__IV.obj_hash = 903266762; + cdat->dobj_420__IV.obj_hash = 872183177; cdat->dobj_420__IV.obj_len = 5; /*inimult dtup_421__IV */ @@ -13116,7 +13164,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_423.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_423.obj_num = 0; - cdat->dobj_423.obj_hash = 118444622; + cdat->dobj_423.obj_hash = 354232215; cdat->dobj_423.obj_len = 2; /*^iniobj */ @@ -13138,7 +13186,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_424.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_424.obj_num = 1; - cdat->dobj_424.obj_hash = 864585813; + cdat->dobj_424.obj_hash = 17259011; cdat->dobj_424.obj_len = 2; @@ -13233,7 +13281,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_433__IV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_433__IV.obj_hash = 91791658; + cdat->dobj_433__IV.obj_hash = 46198688; cdat->dobj_433__IV.obj_len = 5; /*inimult dtup_434__IV */ @@ -13265,7 +13313,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_436.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_436.obj_num = 0; - cdat->dobj_436.obj_hash = 847203029; + cdat->dobj_436.obj_hash = 897679478; cdat->dobj_436.obj_len = 2; /*^iniobj */ @@ -13287,7 +13335,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_437.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_437.obj_num = 1; - cdat->dobj_437.obj_hash = 490932547; + cdat->dobj_437.obj_hash = 1015614190; cdat->dobj_437.obj_len = 2; @@ -13382,7 +13430,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_446__IV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_446__IV.obj_hash = 89022590; + cdat->dobj_446__IV.obj_hash = 566035479; cdat->dobj_446__IV.obj_len = 5; /*inimult dtup_447__IV */ @@ -13414,7 +13462,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_449.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_449.obj_num = 0; - cdat->dobj_449.obj_hash = 614884508; + cdat->dobj_449.obj_hash = 768959791; cdat->dobj_449.obj_len = 2; /*^iniobj */ @@ -13436,7 +13484,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_450.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_450.obj_num = 1; - cdat->dobj_450.obj_hash = 1020072434; + cdat->dobj_450.obj_hash = 789204555; cdat->dobj_450.obj_len = 2; @@ -13531,7 +13579,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_459__IVI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_459__IVI.obj_hash = 563209307; + cdat->dobj_459__IVI.obj_hash = 840807234; cdat->dobj_459__IVI.obj_len = 5; /*inimult dtup_460__IVI */ @@ -13563,7 +13611,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_462.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_462.obj_num = 0; - cdat->dobj_462.obj_hash = 733753992; + cdat->dobj_462.obj_hash = 536163174; cdat->dobj_462.obj_len = 2; /*^iniobj */ @@ -13585,7 +13633,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_463.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_463.obj_num = 1; - cdat->dobj_463.obj_hash = 512360326; + cdat->dobj_463.obj_hash = 857552895; cdat->dobj_463.obj_len = 2; @@ -13671,7 +13719,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_471__IVI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_471__IVI.obj_hash = 932969126; + cdat->dobj_471__IVI.obj_hash = 77443544; cdat->dobj_471__IVI.obj_len = 5; /*inimult dtup_472__IVI */ @@ -13703,7 +13751,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_474.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_474.obj_num = 0; - cdat->dobj_474.obj_hash = 615505488; + cdat->dobj_474.obj_hash = 547641254; cdat->dobj_474.obj_len = 2; /*^iniobj */ @@ -13725,7 +13773,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_475.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_475.obj_num = 1; - cdat->dobj_475.obj_hash = 286212566; + cdat->dobj_475.obj_hash = 146249483; cdat->dobj_475.obj_len = 2; @@ -13811,7 +13859,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_483__IVI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_483__IVI.obj_hash = 1057156489; + cdat->dobj_483__IVI.obj_hash = 467251834; cdat->dobj_483__IVI.obj_len = 5; /*inimult dtup_484__IVI */ @@ -13843,7 +13891,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_486.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_486.obj_num = 0; - cdat->dobj_486.obj_hash = 638731015; + cdat->dobj_486.obj_hash = 396548866; cdat->dobj_486.obj_len = 2; /*^iniobj */ @@ -13865,7 +13913,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_487.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_487.obj_num = 1; - cdat->dobj_487.obj_hash = 34570333; + cdat->dobj_487.obj_hash = 488975581; cdat->dobj_487.obj_len = 2; @@ -13951,7 +13999,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_495__IVI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_495__IVI.obj_hash = 152311264; + cdat->dobj_495__IVI.obj_hash = 134947277; cdat->dobj_495__IVI.obj_len = 5; /*inimult dtup_496__IVI */ @@ -13983,7 +14031,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_498.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_498.obj_num = 0; - cdat->dobj_498.obj_hash = 588537223; + cdat->dobj_498.obj_hash = 1041751260; cdat->dobj_498.obj_len = 2; /*^iniobj */ @@ -14005,7 +14053,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_499.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_499.obj_num = 1; - cdat->dobj_499.obj_hash = 897398236; + cdat->dobj_499.obj_hash = 161147761; cdat->dobj_499.obj_len = 2; @@ -14091,7 +14139,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_507__IVI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_507__IVI.obj_hash = 324716745; + cdat->dobj_507__IVI.obj_hash = 1064921166; cdat->dobj_507__IVI.obj_len = 5; /*inimult dtup_508__IVI */ @@ -14123,7 +14171,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_510.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_510.obj_num = 0; - cdat->dobj_510.obj_hash = 869563926; + cdat->dobj_510.obj_hash = 789795736; cdat->dobj_510.obj_len = 2; /*^iniobj */ @@ -14145,7 +14193,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_511.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_511.obj_num = 1; - cdat->dobj_511.obj_hash = 886618497; + cdat->dobj_511.obj_hash = 388706185; cdat->dobj_511.obj_len = 2; @@ -14231,7 +14279,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_519__IVI.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_519__IVI.obj_hash = 78818137; + cdat->dobj_519__IVI.obj_hash = 256656168; cdat->dobj_519__IVI.obj_len = 5; /*inimult dtup_520__IVI */ @@ -14263,7 +14311,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_522.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_522.obj_num = 0; - cdat->dobj_522.obj_hash = 929282371; + cdat->dobj_522.obj_hash = 88819202; cdat->dobj_522.obj_len = 2; /*^iniobj */ @@ -14285,7 +14333,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_523.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_523.obj_num = 1; - cdat->dobj_523.obj_hash = 425279988; + cdat->dobj_523.obj_hash = 326952027; cdat->dobj_523.obj_len = 2; @@ -14372,7 +14420,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_531__NOTNULL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_531__NOTNULL.obj_hash = 266723457; + cdat->dobj_531__NOTNULL.obj_hash = 582051622; cdat->dobj_531__NOTNULL.obj_len = 5; /*inimult dtup_532__NOTNULL */ @@ -14404,7 +14452,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_534.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_534.obj_num = 0; - cdat->dobj_534.obj_hash = 246114070; + cdat->dobj_534.obj_hash = 635202286; cdat->dobj_534.obj_len = 2; @@ -14472,7 +14520,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_540__ZEROP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_540__ZEROP.obj_hash = 748776757; + cdat->dobj_540__ZEROP.obj_hash = 412402033; cdat->dobj_540__ZEROP.obj_len = 5; /*inimult dtup_541__ZEROP */ @@ -14504,7 +14552,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_543.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_543.obj_num = 0; - cdat->dobj_543.obj_hash = 401282570; + cdat->dobj_543.obj_hash = 835465719; cdat->dobj_543.obj_len = 2; @@ -14577,7 +14625,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_549__OUTCSTRING_DBG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_549__OUTCSTRING_DBG.obj_hash = 716952306; + cdat->dobj_549__OUTCSTRING_DBG.obj_hash = 775952572; cdat->dobj_549__OUTCSTRING_DBG.obj_len = 5; /*inimult dtup_550__OUTCSTRING_DBG */ @@ -14638,7 +14686,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_554.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_554.obj_num = 0; - cdat->dobj_554.obj_hash = 270327497; + cdat->dobj_554.obj_hash = 505871998; cdat->dobj_554.obj_len = 2; @@ -14715,7 +14763,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_560__OUTNUM_DBG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_560__OUTNUM_DBG.obj_hash = 1016329316; + cdat->dobj_560__OUTNUM_DBG.obj_hash = 178471189; cdat->dobj_560__OUTNUM_DBG.obj_len = 5; /*inimult dtup_561__OUTNUM_DBG */ @@ -14776,7 +14824,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_565.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_565.obj_num = 0; - cdat->dobj_565.obj_hash = 507694416; + cdat->dobj_565.obj_hash = 846543192; cdat->dobj_565.obj_len = 2; @@ -14825,7 +14873,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_568.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_568.obj_num = 1; - cdat->dobj_568.obj_hash = 1037887468; + cdat->dobj_568.obj_hash = 279412507; cdat->dobj_568.obj_len = 2; @@ -14874,7 +14922,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_571.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_571.obj_num = 2; - cdat->dobj_571.obj_hash = 585240721; + cdat->dobj_571.obj_hash = 1054184869; cdat->dobj_571.obj_len = 2; @@ -14963,7 +15011,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_579__OUTSTR_DBG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_579__OUTSTR_DBG.obj_hash = 853632553; + cdat->dobj_579__OUTSTR_DBG.obj_hash = 133988329; cdat->dobj_579__OUTSTR_DBG.obj_len = 5; /*inimult dtup_580__OUTSTR_DBG */ @@ -15024,7 +15072,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_584.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_584.obj_num = 0; - cdat->dobj_584.obj_hash = 373824894; + cdat->dobj_584.obj_hash = 815324192; cdat->dobj_584.obj_len = 2; @@ -15101,7 +15149,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_590__OUTSTRBUF_DBG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_590__OUTSTRBUF_DBG.obj_hash = 551242283; + cdat->dobj_590__OUTSTRBUF_DBG.obj_hash = 455300966; cdat->dobj_590__OUTSTRBUF_DBG.obj_len = 5; /*inimult dtup_591__OUTSTRBUF_DBG */ @@ -15162,7 +15210,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_595.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_595.obj_num = 0; - cdat->dobj_595.obj_hash = 946610779; + cdat->dobj_595.obj_hash = 802786080; cdat->dobj_595.obj_len = 2; @@ -15241,7 +15289,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_601__OUTNEWLINE_DBG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_601__OUTNEWLINE_DBG.obj_hash = 722638011; + cdat->dobj_601__OUTNEWLINE_DBG.obj_hash = 300202870; cdat->dobj_601__OUTNEWLINE_DBG.obj_len = 5; /*inimult dtup_602__OUTNEWLINE_DBG */ @@ -15323,7 +15371,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_608__OUTNUM_ERR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_608__OUTNUM_ERR.obj_hash = 520537209; + cdat->dobj_608__OUTNUM_ERR.obj_hash = 832422524; cdat->dobj_608__OUTNUM_ERR.obj_len = 5; /*inimult dtup_609__OUTNUM_ERR */ @@ -15357,7 +15405,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_611.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_611.obj_num = 0; - cdat->dobj_611.obj_hash = 786190710; + cdat->dobj_611.obj_hash = 483138384; cdat->dobj_611.obj_len = 2; /*^iniobj */ @@ -15379,7 +15427,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_612.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_612.obj_num = 1; - cdat->dobj_612.obj_hash = 203943869; + cdat->dobj_612.obj_hash = 1021549486; cdat->dobj_612.obj_len = 2; /*^iniobj */ @@ -15401,7 +15449,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_613.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_613.obj_num = 2; - cdat->dobj_613.obj_hash = 589134544; + cdat->dobj_613.obj_hash = 672629479; cdat->dobj_613.obj_len = 2; @@ -15492,7 +15540,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_621__OUTCSTRING_ERR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_621__OUTCSTRING_ERR.obj_hash = 626289868; + cdat->dobj_621__OUTCSTRING_ERR.obj_hash = 485691946; cdat->dobj_621__OUTCSTRING_ERR.obj_len = 5; /*inimult dtup_622__OUTCSTRING_ERR */ @@ -15526,7 +15574,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_624.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_624.obj_num = 0; - cdat->dobj_624.obj_hash = 930359515; + cdat->dobj_624.obj_hash = 564263387; cdat->dobj_624.obj_len = 2; @@ -15605,7 +15653,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_630__OUTSTRBUF_ERR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_630__OUTSTRBUF_ERR.obj_hash = 477292807; + cdat->dobj_630__OUTSTRBUF_ERR.obj_hash = 336637428; cdat->dobj_630__OUTSTRBUF_ERR.obj_len = 5; /*inimult dtup_631__OUTSTRBUF_ERR */ @@ -15639,7 +15687,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_633.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_633.obj_num = 0; - cdat->dobj_633.obj_hash = 572043374; + cdat->dobj_633.obj_hash = 52545819; cdat->dobj_633.obj_len = 2; @@ -15718,7 +15766,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_639__PAIR_SET_HEAD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_639__PAIR_SET_HEAD.obj_hash = 367424600; + cdat->dobj_639__PAIR_SET_HEAD.obj_hash = 776421; cdat->dobj_639__PAIR_SET_HEAD.obj_len = 5; /*inimult dtup_640__PAIR_SET_HEAD */ @@ -15779,7 +15827,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_644.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_644.obj_num = 0; - cdat->dobj_644.obj_hash = 173024242; + cdat->dobj_644.obj_hash = 438854355; cdat->dobj_644.obj_len = 2; @@ -15828,7 +15876,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_647.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_647.obj_num = 1; - cdat->dobj_647.obj_hash = 119006455; + cdat->dobj_647.obj_hash = 266363499; cdat->dobj_647.obj_len = 2; @@ -15914,7 +15962,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_654__PAIR_LISTLENGTH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_654__PAIR_LISTLENGTH.obj_hash = 931441608; + cdat->dobj_654__PAIR_LISTLENGTH.obj_hash = 182280497; cdat->dobj_654__PAIR_LISTLENGTH.obj_len = 5; /*inimult dtup_655__PAIR_LISTLENGTH */ @@ -15948,7 +15996,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_657.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_657.obj_num = 0; - cdat->dobj_657.obj_hash = 713510148; + cdat->dobj_657.obj_hash = 928135361; cdat->dobj_657.obj_len = 2; @@ -16025,7 +16073,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_663__MAKE_PAIR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_663__MAKE_PAIR.obj_hash = 757103232; + cdat->dobj_663__MAKE_PAIR.obj_hash = 810011307; cdat->dobj_663__MAKE_PAIR.obj_len = 5; /*inimult dtup_664__MAKE_PAIR */ @@ -16059,7 +16107,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_666.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_666.obj_num = 0; - cdat->dobj_666.obj_hash = 520605219; + cdat->dobj_666.obj_hash = 637289325; cdat->dobj_666.obj_len = 2; /*^iniobj */ @@ -16081,7 +16129,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_667.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_667.obj_num = 1; - cdat->dobj_667.obj_hash = 750305506; + cdat->dobj_667.obj_hash = 901193008; cdat->dobj_667.obj_len = 2; @@ -16130,7 +16178,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_670.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_670.obj_num = 2; - cdat->dobj_670.obj_hash = 175973956; + cdat->dobj_670.obj_hash = 876940569; cdat->dobj_670.obj_len = 2; @@ -16223,7 +16271,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_678__IS_MIXINT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_678__IS_MIXINT.obj_hash = 926879383; + cdat->dobj_678__IS_MIXINT.obj_hash = 384217799; cdat->dobj_678__IS_MIXINT.obj_len = 5; /*inimult dtup_679__IS_MIXINT */ @@ -16284,7 +16332,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_683.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_683.obj_num = 0; - cdat->dobj_683.obj_hash = 839546897; + cdat->dobj_683.obj_hash = 1042475177; cdat->dobj_683.obj_len = 2; @@ -16361,7 +16409,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_689__MIXINT_VAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_689__MIXINT_VAL.obj_hash = 756371965; + cdat->dobj_689__MIXINT_VAL.obj_hash = 539749997; cdat->dobj_689__MIXINT_VAL.obj_len = 5; /*inimult dtup_690__MIXINT_VAL */ @@ -16395,7 +16443,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_692.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_692.obj_num = 0; - cdat->dobj_692.obj_hash = 240989447; + cdat->dobj_692.obj_hash = 693379795; cdat->dobj_692.obj_len = 2; @@ -16471,7 +16519,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_698__MAKE_MIXINT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_698__MAKE_MIXINT.obj_hash = 763985290; + cdat->dobj_698__MAKE_MIXINT.obj_hash = 551681765; cdat->dobj_698__MAKE_MIXINT.obj_len = 5; /*inimult dtup_699__MAKE_MIXINT */ @@ -16532,7 +16580,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_703.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_703.obj_num = 0; - cdat->dobj_703.obj_hash = 868272479; + cdat->dobj_703.obj_hash = 66009857; cdat->dobj_703.obj_len = 2; /*^iniobj */ @@ -16554,7 +16602,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_704.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_704.obj_num = 1; - cdat->dobj_704.obj_hash = 371926204; + cdat->dobj_704.obj_hash = 1010319184; cdat->dobj_704.obj_len = 2; @@ -16603,7 +16651,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_707.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_707.obj_num = 2; - cdat->dobj_707.obj_hash = 66009857; + cdat->dobj_707.obj_hash = 1056558919; cdat->dobj_707.obj_len = 2; @@ -16695,7 +16743,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_715__IS_MIXLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_715__IS_MIXLOC.obj_hash = 1038851712; + cdat->dobj_715__IS_MIXLOC.obj_hash = 243731011; cdat->dobj_715__IS_MIXLOC.obj_len = 5; /*inimult dtup_716__IS_MIXLOC */ @@ -16729,7 +16777,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_718.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_718.obj_num = 0; - cdat->dobj_718.obj_hash = 191852775; + cdat->dobj_718.obj_hash = 956604539; cdat->dobj_718.obj_len = 2; @@ -16806,7 +16854,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_724__MIXLOC_VAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_724__MIXLOC_VAL.obj_hash = 436917205; + cdat->dobj_724__MIXLOC_VAL.obj_hash = 190129267; cdat->dobj_724__MIXLOC_VAL.obj_len = 5; /*inimult dtup_725__MIXLOC_VAL */ @@ -16840,7 +16888,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_727.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_727.obj_num = 0; - cdat->dobj_727.obj_hash = 301450456; + cdat->dobj_727.obj_hash = 270010661; cdat->dobj_727.obj_len = 2; @@ -16917,7 +16965,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_733__MIXLOC_LOCATION.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_733__MIXLOC_LOCATION.obj_hash = 449514727; + cdat->dobj_733__MIXLOC_LOCATION.obj_hash = 50946996; cdat->dobj_733__MIXLOC_LOCATION.obj_len = 5; /*inimult dtup_734__MIXLOC_LOCATION */ @@ -16951,7 +16999,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_736.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_736.obj_num = 0; - cdat->dobj_736.obj_hash = 579426082; + cdat->dobj_736.obj_hash = 708763689; cdat->dobj_736.obj_len = 2; @@ -17030,7 +17078,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_742__MIXLOC_LOCLINE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_742__MIXLOC_LOCLINE.obj_hash = 495257376; + cdat->dobj_742__MIXLOC_LOCLINE.obj_hash = 842580691; cdat->dobj_742__MIXLOC_LOCLINE.obj_len = 5; /*inimult dtup_743__MIXLOC_LOCLINE */ @@ -17064,7 +17112,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_745.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_745.obj_num = 0; - cdat->dobj_745.obj_hash = 414030662; + cdat->dobj_745.obj_hash = 138114213; cdat->dobj_745.obj_len = 2; @@ -17143,7 +17191,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_751__MIXLOC_LOCFILE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_751__MIXLOC_LOCFILE.obj_hash = 429998436; + cdat->dobj_751__MIXLOC_LOCFILE.obj_hash = 355104814; cdat->dobj_751__MIXLOC_LOCFILE.obj_len = 5; /*inimult dtup_752__MIXLOC_LOCFILE */ @@ -17177,7 +17225,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_754.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_754.obj_num = 0; - cdat->dobj_754.obj_hash = 173546056; + cdat->dobj_754.obj_hash = 1015911242; cdat->dobj_754.obj_len = 2; @@ -17256,7 +17304,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_760__MIXLOC_LOCBASEFILE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_760__MIXLOC_LOCBASEFILE.obj_hash = 280067406; + cdat->dobj_760__MIXLOC_LOCBASEFILE.obj_hash = 823124209; cdat->dobj_760__MIXLOC_LOCBASEFILE.obj_len = 5; /*inimult dtup_761__MIXLOC_LOCBASEFILE */ @@ -17290,7 +17338,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_763.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_763.obj_num = 0; - cdat->dobj_763.obj_hash = 1039327075; + cdat->dobj_763.obj_hash = 341262362; cdat->dobj_763.obj_len = 2; @@ -17369,7 +17417,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_769__MAKE_STRING_MIXLOC_FILE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_769__MAKE_STRING_MIXLOC_FILE.obj_hash = 1012084157; + cdat->dobj_769__MAKE_STRING_MIXLOC_FILE.obj_hash = 141828576; cdat->dobj_769__MAKE_STRING_MIXLOC_FILE.obj_len = 5; /*inimult dtup_770__MAKE_STRING_MIXLOC_FILE */ @@ -17403,7 +17451,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_772.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_772.obj_num = 0; - cdat->dobj_772.obj_hash = 671053552; + cdat->dobj_772.obj_hash = 18142056; cdat->dobj_772.obj_len = 2; /*^iniobj */ @@ -17425,7 +17473,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_773.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_773.obj_num = 1; - cdat->dobj_773.obj_hash = 1027799924; + cdat->dobj_773.obj_hash = 996600648; cdat->dobj_773.obj_len = 2; @@ -17511,7 +17559,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_780__MAKE_MIXLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_780__MAKE_MIXLOC.obj_hash = 242438522; + cdat->dobj_780__MAKE_MIXLOC.obj_hash = 84653002; cdat->dobj_780__MAKE_MIXLOC.obj_len = 5; /*inimult dtup_781__MAKE_MIXLOC */ @@ -17545,7 +17593,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_783.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_783.obj_num = 0; - cdat->dobj_783.obj_hash = 314764040; + cdat->dobj_783.obj_hash = 989138435; cdat->dobj_783.obj_len = 2; /*^iniobj */ @@ -17567,7 +17615,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_784.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_784.obj_num = 1; - cdat->dobj_784.obj_hash = 889435029; + cdat->dobj_784.obj_hash = 331486222; cdat->dobj_784.obj_len = 2; /*^iniobj */ @@ -17589,7 +17637,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_785.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_785.obj_num = 2; - cdat->dobj_785.obj_hash = 602160088; + cdat->dobj_785.obj_hash = 5184947; cdat->dobj_785.obj_len = 2; @@ -17638,7 +17686,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_788.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_788.obj_num = 3; - cdat->dobj_788.obj_hash = 989138435; + cdat->dobj_788.obj_hash = 426738835; cdat->dobj_788.obj_len = 2; @@ -17741,7 +17789,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_797__IS_MIXBIGINT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_797__IS_MIXBIGINT.obj_hash = 226380922; + cdat->dobj_797__IS_MIXBIGINT.obj_hash = 817718257; cdat->dobj_797__IS_MIXBIGINT.obj_len = 5; /*inimult dtup_798__IS_MIXBIGINT */ @@ -17802,7 +17850,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_802.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_802.obj_num = 0; - cdat->dobj_802.obj_hash = 791619137; + cdat->dobj_802.obj_hash = 323585395; cdat->dobj_802.obj_len = 2; @@ -17883,7 +17931,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_808__MIXBIGINT_VAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_808__MIXBIGINT_VAL.obj_hash = 884376111; + cdat->dobj_808__MIXBIGINT_VAL.obj_hash = 814314844; cdat->dobj_808__MIXBIGINT_VAL.obj_len = 5; /*inimult dtup_809__MIXBIGINT_VAL */ @@ -17917,7 +17965,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_811.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_811.obj_num = 0; - cdat->dobj_811.obj_hash = 372448139; + cdat->dobj_811.obj_hash = 927759700; cdat->dobj_811.obj_len = 2; @@ -17996,7 +18044,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_817__PPSTRBUF_MIXBIGINT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_817__PPSTRBUF_MIXBIGINT.obj_hash = 372908211; + cdat->dobj_817__PPSTRBUF_MIXBIGINT.obj_hash = 332167797; cdat->dobj_817__PPSTRBUF_MIXBIGINT.obj_len = 5; /*inimult dtup_818__PPSTRBUF_MIXBIGINT */ @@ -18030,7 +18078,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_820.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_820.obj_num = 0; - cdat->dobj_820.obj_hash = 427572235; + cdat->dobj_820.obj_hash = 707991564; cdat->dobj_820.obj_len = 2; @@ -18080,7 +18128,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_823.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_823.obj_num = 1; - cdat->dobj_823.obj_hash = 521914560; + cdat->dobj_823.obj_hash = 404493362; cdat->dobj_823.obj_len = 2; /*^iniobj */ @@ -18102,7 +18150,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_824.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_824.obj_num = 2; - cdat->dobj_824.obj_hash = 707991564; + cdat->dobj_824.obj_hash = 264833157; cdat->dobj_824.obj_len = 2; @@ -18195,7 +18243,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_832__READ_FILE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_832__READ_FILE.obj_hash = 952693984; + cdat->dobj_832__READ_FILE.obj_hash = 963653811; cdat->dobj_832__READ_FILE.obj_len = 5; /*inimult dtup_833__READ_FILE */ @@ -18257,7 +18305,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_837.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_837.obj_num = 0; - cdat->dobj_837.obj_hash = 371292529; + cdat->dobj_837.obj_hash = 228334847; cdat->dobj_837.obj_len = 2; @@ -18332,7 +18380,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_843__READ_STRV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_843__READ_STRV.obj_hash = 429150863; + cdat->dobj_843__READ_STRV.obj_hash = 671854136; cdat->dobj_843__READ_STRV.obj_len = 5; /*inimult dtup_844__READ_STRV */ @@ -18393,7 +18441,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_848.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_848.obj_num = 0; - cdat->dobj_848.obj_hash = 484804283; + cdat->dobj_848.obj_hash = 302384328; cdat->dobj_848.obj_len = 2; @@ -18468,7 +18516,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_854__ERROR_STRV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_854__ERROR_STRV.obj_hash = 98888438; + cdat->dobj_854__ERROR_STRV.obj_hash = 718427559; cdat->dobj_854__ERROR_STRV.obj_len = 5; /*inimult dtup_855__ERROR_STRV */ @@ -18502,7 +18550,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_857.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_857.obj_num = 0; - cdat->dobj_857.obj_hash = 180387236; + cdat->dobj_857.obj_hash = 444324371; cdat->dobj_857.obj_len = 2; @@ -18551,7 +18599,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_860.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_860.obj_num = 1; - cdat->dobj_860.obj_hash = 229119971; + cdat->dobj_860.obj_hash = 972354236; cdat->dobj_860.obj_len = 2; /*^iniobj */ @@ -18573,7 +18621,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_861.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_861.obj_num = 2; - cdat->dobj_861.obj_hash = 444324371; + cdat->dobj_861.obj_hash = 485996753; cdat->dobj_861.obj_len = 2; @@ -18665,7 +18713,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_869__ERROR_PLAIN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_869__ERROR_PLAIN.obj_hash = 705062423; + cdat->dobj_869__ERROR_PLAIN.obj_hash = 230917589; cdat->dobj_869__ERROR_PLAIN.obj_len = 5; /*inimult dtup_870__ERROR_PLAIN */ @@ -18699,7 +18747,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_872.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_872.obj_num = 0; - cdat->dobj_872.obj_hash = 978454436; + cdat->dobj_872.obj_hash = 607947941; cdat->dobj_872.obj_len = 2; /*^iniobj */ @@ -18721,7 +18769,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_873.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_873.obj_num = 1; - cdat->dobj_873.obj_hash = 1070075861; + cdat->dobj_873.obj_hash = 933108954; cdat->dobj_873.obj_len = 2; @@ -18809,7 +18857,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_880__WARNING_STRV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_880__WARNING_STRV.obj_hash = 721233985; + cdat->dobj_880__WARNING_STRV.obj_hash = 280586215; cdat->dobj_880__WARNING_STRV.obj_len = 5; /*inimult dtup_881__WARNING_STRV */ @@ -18843,7 +18891,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_883.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_883.obj_num = 0; - cdat->dobj_883.obj_hash = 342587311; + cdat->dobj_883.obj_hash = 460455825; cdat->dobj_883.obj_len = 2; /*^iniobj */ @@ -18865,7 +18913,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_884.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_884.obj_num = 1; - cdat->dobj_884.obj_hash = 992051817; + cdat->dobj_884.obj_hash = 698445721; cdat->dobj_884.obj_len = 2; /*^iniobj */ @@ -18887,7 +18935,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_885.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_885.obj_num = 2; - cdat->dobj_885.obj_hash = 39557258; + cdat->dobj_885.obj_hash = 988310303; cdat->dobj_885.obj_len = 2; @@ -18982,7 +19030,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_893__WARNING_PLAIN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_893__WARNING_PLAIN.obj_hash = 105279212; + cdat->dobj_893__WARNING_PLAIN.obj_hash = 152720230; cdat->dobj_893__WARNING_PLAIN.obj_len = 5; /*inimult dtup_894__WARNING_PLAIN */ @@ -19016,7 +19064,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_896.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_896.obj_num = 0; - cdat->dobj_896.obj_hash = 657918446; + cdat->dobj_896.obj_hash = 149617405; cdat->dobj_896.obj_len = 2; /*^iniobj */ @@ -19038,7 +19086,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_897.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_897.obj_num = 1; - cdat->dobj_897.obj_hash = 94784617; + cdat->dobj_897.obj_hash = 937739367; cdat->dobj_897.obj_len = 2; @@ -19127,7 +19175,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_904__WARNINGMSG_PLAIN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_904__WARNINGMSG_PLAIN.obj_hash = 720767860; + cdat->dobj_904__WARNINGMSG_PLAIN.obj_hash = 779119154; cdat->dobj_904__WARNINGMSG_PLAIN.obj_len = 5; /*inimult dtup_905__WARNINGMSG_PLAIN */ @@ -19161,7 +19209,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_907.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_907.obj_num = 0; - cdat->dobj_907.obj_hash = 743929727; + cdat->dobj_907.obj_hash = 669452002; cdat->dobj_907.obj_len = 2; @@ -19240,7 +19288,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_913__ERRORMSG_PLAIN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_913__ERRORMSG_PLAIN.obj_hash = 173104783; + cdat->dobj_913__ERRORMSG_PLAIN.obj_hash = 179931564; cdat->dobj_913__ERRORMSG_PLAIN.obj_len = 5; /*inimult dtup_914__ERRORMSG_PLAIN */ @@ -19274,7 +19322,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_916.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_916.obj_num = 0; - cdat->dobj_916.obj_hash = 20215251; + cdat->dobj_916.obj_hash = 532886194; cdat->dobj_916.obj_len = 2; @@ -19353,7 +19401,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_922__WARNINGMSG_STRV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_922__WARNINGMSG_STRV.obj_hash = 305632878; + cdat->dobj_922__WARNINGMSG_STRV.obj_hash = 519903674; cdat->dobj_922__WARNINGMSG_STRV.obj_len = 5; /*inimult dtup_923__WARNINGMSG_STRV */ @@ -19387,7 +19435,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_925.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_925.obj_num = 0; - cdat->dobj_925.obj_hash = 930769119; + cdat->dobj_925.obj_hash = 175105490; cdat->dobj_925.obj_len = 2; /*^iniobj */ @@ -19409,7 +19457,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_926.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_926.obj_num = 1; - cdat->dobj_926.obj_hash = 634896259; + cdat->dobj_926.obj_hash = 271338440; cdat->dobj_926.obj_len = 2; @@ -19497,7 +19545,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_933__ERRORMSG_STRV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_933__ERRORMSG_STRV.obj_hash = 1060750881; + cdat->dobj_933__ERRORMSG_STRV.obj_hash = 817149262; cdat->dobj_933__ERRORMSG_STRV.obj_len = 5; /*inimult dtup_934__ERRORMSG_STRV */ @@ -19531,7 +19579,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_936.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_936.obj_num = 0; - cdat->dobj_936.obj_hash = 925239938; + cdat->dobj_936.obj_hash = 76586278; cdat->dobj_936.obj_len = 2; /*^iniobj */ @@ -19553,7 +19601,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_937.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_937.obj_num = 1; - cdat->dobj_937.obj_hash = 543805263; + cdat->dobj_937.obj_hash = 778140642; cdat->dobj_937.obj_len = 2; @@ -19640,7 +19688,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_944__INFORM_STRV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_944__INFORM_STRV.obj_hash = 750252574; + cdat->dobj_944__INFORM_STRV.obj_hash = 805672081; cdat->dobj_944__INFORM_STRV.obj_len = 5; /*inimult dtup_945__INFORM_STRV */ @@ -19674,7 +19722,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_947.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_947.obj_num = 0; - cdat->dobj_947.obj_hash = 278314086; + cdat->dobj_947.obj_hash = 103524164; cdat->dobj_947.obj_len = 2; /*^iniobj */ @@ -19696,7 +19744,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_948.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_948.obj_num = 1; - cdat->dobj_948.obj_hash = 717385459; + cdat->dobj_948.obj_hash = 500130597; cdat->dobj_948.obj_len = 2; /*^iniobj */ @@ -19718,7 +19766,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_949.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_949.obj_num = 2; - cdat->dobj_949.obj_hash = 1001195765; + cdat->dobj_949.obj_hash = 60447189; cdat->dobj_949.obj_len = 2; @@ -19812,7 +19860,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_957__INFORM_PLAIN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_957__INFORM_PLAIN.obj_hash = 388214304; + cdat->dobj_957__INFORM_PLAIN.obj_hash = 663309937; cdat->dobj_957__INFORM_PLAIN.obj_len = 5; /*inimult dtup_958__INFORM_PLAIN */ @@ -19846,7 +19894,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_960.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_960.obj_num = 0; - cdat->dobj_960.obj_hash = 1026667645; + cdat->dobj_960.obj_hash = 642025987; cdat->dobj_960.obj_len = 2; /*^iniobj */ @@ -19868,7 +19916,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_961.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_961.obj_num = 1; - cdat->dobj_961.obj_hash = 937429931; + cdat->dobj_961.obj_hash = 691471058; cdat->dobj_961.obj_len = 2; @@ -19957,7 +20005,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_968__INFORMSG_PLAIN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_968__INFORMSG_PLAIN.obj_hash = 1070435926; + cdat->dobj_968__INFORMSG_PLAIN.obj_hash = 789466879; cdat->dobj_968__INFORMSG_PLAIN.obj_len = 5; /*inimult dtup_969__INFORMSG_PLAIN */ @@ -19991,7 +20039,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_971.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_971.obj_num = 0; - cdat->dobj_971.obj_hash = 827129550; + cdat->dobj_971.obj_hash = 822233777; cdat->dobj_971.obj_len = 2; @@ -20070,7 +20118,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_977__INFORMSG_STRV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_977__INFORMSG_STRV.obj_hash = 64839954; + cdat->dobj_977__INFORMSG_STRV.obj_hash = 379252179; cdat->dobj_977__INFORMSG_STRV.obj_len = 5; /*inimult dtup_978__INFORMSG_STRV */ @@ -20104,7 +20152,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_980.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_980.obj_num = 0; - cdat->dobj_980.obj_hash = 1069454711; + cdat->dobj_980.obj_hash = 666514012; cdat->dobj_980.obj_len = 2; /*^iniobj */ @@ -20126,7 +20174,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_981.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_981.obj_num = 1; - cdat->dobj_981.obj_hash = 143669556; + cdat->dobj_981.obj_hash = 443308728; cdat->dobj_981.obj_len = 2; @@ -20182,7 +20230,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_986__FOREACH_LONG_UPTO.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CITERATOR)))); - cdat->dobj_986__FOREACH_LONG_UPTO.obj_hash = 232103389; + cdat->dobj_986__FOREACH_LONG_UPTO.obj_hash = 266030864; cdat->dobj_986__FOREACH_LONG_UPTO.obj_len = 7; @@ -20242,7 +20290,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_990.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_990.obj_num = 0; - cdat->dobj_990.obj_hash = 370117743; + cdat->dobj_990.obj_hash = 985078005; cdat->dobj_990.obj_len = 2; @@ -20292,7 +20340,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_993.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_993.obj_num = 1; - cdat->dobj_993.obj_hash = 753501021; + cdat->dobj_993.obj_hash = 1058641920; cdat->dobj_993.obj_len = 2; /*inimult dtup_994__FOREACH_LONG_UPTO */ @@ -20349,7 +20397,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_997.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_997.obj_num = 0; - cdat->dobj_997.obj_hash = 816097395; + cdat->dobj_997.obj_hash = 503972089; cdat->dobj_997.obj_len = 2; /*inimult dtup_998__FOREACH_LONG_UPTO */ @@ -20499,7 +20547,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1016__SOME_INTEGER_MULTIPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CMATCHER)))); - cdat->dobj_1016__SOME_INTEGER_MULTIPLE.obj_hash = 304219869; + cdat->dobj_1016__SOME_INTEGER_MULTIPLE.obj_hash = 881225326; cdat->dobj_1016__SOME_INTEGER_MULTIPLE.obj_len = 9; @@ -20558,7 +20606,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1020.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1020.obj_num = 0; - cdat->dobj_1020.obj_hash = 488940125; + cdat->dobj_1020.obj_hash = 263624531; cdat->dobj_1020.obj_len = 2; /*inimult dtup_1021__SOME_INTEGER_MULTIPLE */ @@ -20585,7 +20633,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1022.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - cdat->dobj_1022.obj_hash = 570212653; + cdat->dobj_1022.obj_hash = 992628450; cdat->dobj_1022.obj_len = 2; @@ -20634,7 +20682,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1025.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1025.obj_num = 0; - cdat->dobj_1025.obj_hash = 829663964; + cdat->dobj_1025.obj_hash = 488422840; cdat->dobj_1025.obj_len = 2; /*inimult dtup_1026__SOME_INTEGER_MULTIPLE */ @@ -20772,7 +20820,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1041__SOME_INTEGER_DIFFERENT_FROM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CMATCHER)))); - cdat->dobj_1041__SOME_INTEGER_DIFFERENT_FROM.obj_hash = 881225326; + cdat->dobj_1041__SOME_INTEGER_DIFFERENT_FROM.obj_hash = 537985165; cdat->dobj_1041__SOME_INTEGER_DIFFERENT_FROM.obj_len = 9; @@ -20804,7 +20852,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1043.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1043.obj_num = 0; - cdat->dobj_1043.obj_hash = 988721676; + cdat->dobj_1043.obj_hash = 85956468; cdat->dobj_1043.obj_len = 2; /*inimult dtup_1044__SOME_INTEGER_DIFFERENT_FROM */ @@ -20831,7 +20879,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1045.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - cdat->dobj_1045.obj_hash = 612460978; + cdat->dobj_1045.obj_hash = 269440952; cdat->dobj_1045.obj_len = 2; /*inimult dtup_1046__SOME_INTEGER_DIFFERENT_FROM */ @@ -20921,7 +20969,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1054__SOME_INTEGER_EQUAL_TO.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CMATCHER)))); - cdat->dobj_1054__SOME_INTEGER_EQUAL_TO.obj_hash = 537985165; + cdat->dobj_1054__SOME_INTEGER_EQUAL_TO.obj_hash = 1023761369; cdat->dobj_1054__SOME_INTEGER_EQUAL_TO.obj_len = 9; @@ -20953,7 +21001,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1056.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1056.obj_num = 0; - cdat->dobj_1056.obj_hash = 878760674; + cdat->dobj_1056.obj_hash = 270846384; cdat->dobj_1056.obj_len = 2; /*inimult dtup_1057__SOME_INTEGER_EQUAL_TO */ @@ -20980,7 +21028,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1058.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - cdat->dobj_1058.obj_hash = 914418087; + cdat->dobj_1058.obj_hash = 474988376; cdat->dobj_1058.obj_len = 2; /*inimult dtup_1059__SOME_INTEGER_EQUAL_TO */ @@ -21070,7 +21118,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1067__SOME_INTEGER_GREATER_OR_EQUAL_TO.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CMATCHER)))); - cdat->dobj_1067__SOME_INTEGER_GREATER_OR_EQUAL_TO.obj_hash = 1023761369; + cdat->dobj_1067__SOME_INTEGER_GREATER_OR_EQUAL_TO.obj_hash = 509031321; cdat->dobj_1067__SOME_INTEGER_GREATER_OR_EQUAL_TO.obj_len = 9; @@ -21102,7 +21150,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1069.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1069.obj_num = 0; - cdat->dobj_1069.obj_hash = 1034914466; + cdat->dobj_1069.obj_hash = 549973568; cdat->dobj_1069.obj_len = 2; /*inimult dtup_1070__SOME_INTEGER_GREATER_OR_EQUAL_TO */ @@ -21129,7 +21177,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1071.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - cdat->dobj_1071.obj_hash = 360755265; + cdat->dobj_1071.obj_hash = 28607145; cdat->dobj_1071.obj_len = 2; /*inimult dtup_1072__SOME_INTEGER_GREATER_OR_EQUAL_TO */ @@ -21221,7 +21269,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1080__SOME_INTEGER_GREATER_THAN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CMATCHER)))); - cdat->dobj_1080__SOME_INTEGER_GREATER_THAN.obj_hash = 509031321; + cdat->dobj_1080__SOME_INTEGER_GREATER_THAN.obj_hash = 1047285070; cdat->dobj_1080__SOME_INTEGER_GREATER_THAN.obj_len = 9; @@ -21253,7 +21301,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1082.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1082.obj_num = 0; - cdat->dobj_1082.obj_hash = 566283687; + cdat->dobj_1082.obj_hash = 661911652; cdat->dobj_1082.obj_len = 2; /*inimult dtup_1083__SOME_INTEGER_GREATER_THAN */ @@ -21280,7 +21328,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1084.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - cdat->dobj_1084.obj_hash = 172513359; + cdat->dobj_1084.obj_hash = 440361699; cdat->dobj_1084.obj_len = 2; /*inimult dtup_1085__SOME_INTEGER_GREATER_THAN */ @@ -21372,7 +21420,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1093__SOME_INTEGER_LOWER_OR_EQUAL_TO.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CMATCHER)))); - cdat->dobj_1093__SOME_INTEGER_LOWER_OR_EQUAL_TO.obj_hash = 1047285070; + cdat->dobj_1093__SOME_INTEGER_LOWER_OR_EQUAL_TO.obj_hash = 467794758; cdat->dobj_1093__SOME_INTEGER_LOWER_OR_EQUAL_TO.obj_len = 9; @@ -21404,7 +21452,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1095.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1095.obj_num = 0; - cdat->dobj_1095.obj_hash = 1060139230; + cdat->dobj_1095.obj_hash = 266467341; cdat->dobj_1095.obj_len = 2; /*inimult dtup_1096__SOME_INTEGER_LOWER_OR_EQUAL_TO */ @@ -21431,7 +21479,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1097.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - cdat->dobj_1097.obj_hash = 991518570; + cdat->dobj_1097.obj_hash = 551331362; cdat->dobj_1097.obj_len = 2; /*inimult dtup_1098__SOME_INTEGER_LOWER_OR_EQUAL_TO */ @@ -21523,7 +21571,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1106__SOME_INTEGER_LOWER_THAN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CMATCHER)))); - cdat->dobj_1106__SOME_INTEGER_LOWER_THAN.obj_hash = 467794758; + cdat->dobj_1106__SOME_INTEGER_LOWER_THAN.obj_hash = 408608743; cdat->dobj_1106__SOME_INTEGER_LOWER_THAN.obj_len = 9; @@ -21555,7 +21603,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1108.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1108.obj_num = 0; - cdat->dobj_1108.obj_hash = 464192099; + cdat->dobj_1108.obj_hash = 695961141; cdat->dobj_1108.obj_len = 2; /*inimult dtup_1109__SOME_INTEGER_LOWER_THAN */ @@ -21582,7 +21630,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1110.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - cdat->dobj_1110.obj_hash = 1062629707; + cdat->dobj_1110.obj_hash = 159891622; cdat->dobj_1110.obj_len = 2; /*inimult dtup_1111__SOME_INTEGER_LOWER_THAN */ @@ -21672,7 +21720,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1119__SOME_STRING_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CMATCHER)))); - cdat->dobj_1119__SOME_STRING_VALUE.obj_hash = 408608743; + cdat->dobj_1119__SOME_STRING_VALUE.obj_hash = 609077331; cdat->dobj_1119__SOME_STRING_VALUE.obj_len = 9; @@ -21709,7 +21757,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1122.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - cdat->dobj_1122.obj_hash = 249492824; + cdat->dobj_1122.obj_hash = 661777877; cdat->dobj_1122.obj_len = 2; @@ -21758,7 +21806,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1125.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1125.obj_num = 0; - cdat->dobj_1125.obj_hash = 742556826; + cdat->dobj_1125.obj_hash = 842449010; cdat->dobj_1125.obj_len = 2; /*inimult dtup_1126__SOME_STRING_VALUE */ @@ -21918,7 +21966,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1141__OUTNEWLINE_ERR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1141__OUTNEWLINE_ERR.obj_hash = 404227452; + cdat->dobj_1141__OUTNEWLINE_ERR.obj_hash = 285120248; cdat->dobj_1141__OUTNEWLINE_ERR.obj_len = 5; /*inimult dtup_1142__OUTNEWLINE_ERR */ @@ -22000,7 +22048,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1148__OUTSTR_ERR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1148__OUTSTR_ERR.obj_hash = 99942994; + cdat->dobj_1148__OUTSTR_ERR.obj_hash = 757615239; cdat->dobj_1148__OUTSTR_ERR.obj_len = 5; /*inimult dtup_1149__OUTSTR_ERR */ @@ -22034,7 +22082,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1151.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1151.obj_num = 0; - cdat->dobj_1151.obj_hash = 415047996; + cdat->dobj_1151.obj_hash = 996913744; cdat->dobj_1151.obj_len = 2; @@ -22111,7 +22159,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1157__MESSAGE_DBG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1157__MESSAGE_DBG.obj_hash = 656379619; + cdat->dobj_1157__MESSAGE_DBG.obj_hash = 321648560; cdat->dobj_1157__MESSAGE_DBG.obj_len = 5; /*inimult dtup_1158__MESSAGE_DBG */ @@ -22145,7 +22193,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1160.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1160.obj_num = 0; - cdat->dobj_1160.obj_hash = 165420197; + cdat->dobj_1160.obj_hash = 1044481633; cdat->dobj_1160.obj_len = 2; @@ -22224,7 +22272,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1166__MESSAGENUM_DBG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1166__MESSAGENUM_DBG.obj_hash = 601681941; + cdat->dobj_1166__MESSAGENUM_DBG.obj_hash = 19409056; cdat->dobj_1166__MESSAGENUM_DBG.obj_len = 5; /*inimult dtup_1167__MESSAGENUM_DBG */ @@ -22258,7 +22306,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1169.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1169.obj_num = 0; - cdat->dobj_1169.obj_hash = 615831148; + cdat->dobj_1169.obj_hash = 904598068; cdat->dobj_1169.obj_len = 2; /*^iniobj */ @@ -22280,7 +22328,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1170.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1170.obj_num = 1; - cdat->dobj_1170.obj_hash = 19345618; + cdat->dobj_1170.obj_hash = 1018759809; cdat->dobj_1170.obj_len = 2; @@ -22364,7 +22412,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1177__MESSAGEVAL_DBG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1177__MESSAGEVAL_DBG.obj_hash = 194335999; + cdat->dobj_1177__MESSAGEVAL_DBG.obj_hash = 508397136; cdat->dobj_1177__MESSAGEVAL_DBG.obj_len = 5; /*inimult dtup_1178__MESSAGEVAL_DBG */ @@ -22398,7 +22446,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1180.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1180.obj_num = 0; - cdat->dobj_1180.obj_hash = 279559901; + cdat->dobj_1180.obj_hash = 619060847; cdat->dobj_1180.obj_len = 2; /*^iniobj */ @@ -22420,7 +22468,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1181.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1181.obj_num = 1; - cdat->dobj_1181.obj_hash = 853814495; + cdat->dobj_1181.obj_hash = 267144307; cdat->dobj_1181.obj_len = 2; @@ -22506,7 +22554,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1188__LONGBACKTRACE_DBG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1188__LONGBACKTRACE_DBG.obj_hash = 574384385; + cdat->dobj_1188__LONGBACKTRACE_DBG.obj_hash = 99136645; cdat->dobj_1188__LONGBACKTRACE_DBG.obj_len = 5; /*inimult dtup_1189__LONGBACKTRACE_DBG */ @@ -22540,7 +22588,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1191.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1191.obj_num = 0; - cdat->dobj_1191.obj_hash = 391015160; + cdat->dobj_1191.obj_hash = 823332073; cdat->dobj_1191.obj_len = 2; @@ -22591,7 +22639,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1194.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1194.obj_num = 1; - cdat->dobj_1194.obj_hash = 428742697; + cdat->dobj_1194.obj_hash = 972938920; cdat->dobj_1194.obj_len = 2; @@ -22677,7 +22725,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1201__CHECKVAL_DBG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1201__CHECKVAL_DBG.obj_hash = 516575117; + cdat->dobj_1201__CHECKVAL_DBG.obj_hash = 679914672; cdat->dobj_1201__CHECKVAL_DBG.obj_len = 5; /*inimult dtup_1202__CHECKVAL_DBG */ @@ -22711,7 +22759,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1204.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1204.obj_num = 0; - cdat->dobj_1204.obj_hash = 2971592; + cdat->dobj_1204.obj_hash = 135705830; cdat->dobj_1204.obj_len = 2; /*^iniobj */ @@ -22733,7 +22781,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1205.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1205.obj_num = 1; - cdat->dobj_1205.obj_hash = 510590685; + cdat->dobj_1205.obj_hash = 114023492; cdat->dobj_1205.obj_len = 2; @@ -22835,7 +22883,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1214__DEBUGCSTRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1214__DEBUGCSTRING.obj_hash = 363762429; + cdat->dobj_1214__DEBUGCSTRING.obj_hash = 47556365; cdat->dobj_1214__DEBUGCSTRING.obj_len = 5; /*inimult dtup_1215__DEBUGCSTRING */ @@ -22869,7 +22917,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1217.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1217.obj_num = 0; - cdat->dobj_1217.obj_hash = 584565158; + cdat->dobj_1217.obj_hash = 777449716; cdat->dobj_1217.obj_len = 2; /*^iniobj */ @@ -22891,7 +22939,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1218.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1218.obj_num = 1; - cdat->dobj_1218.obj_hash = 786500876; + cdat->dobj_1218.obj_hash = 408016152; cdat->dobj_1218.obj_len = 2; @@ -22975,7 +23023,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1225__DEBUGLONG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1225__DEBUGLONG.obj_hash = 993832387; + cdat->dobj_1225__DEBUGLONG.obj_hash = 752853866; cdat->dobj_1225__DEBUGLONG.obj_len = 5; /*inimult dtup_1226__DEBUGLONG */ @@ -23009,7 +23057,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1228.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1228.obj_num = 0; - cdat->dobj_1228.obj_hash = 697292747; + cdat->dobj_1228.obj_hash = 853337755; cdat->dobj_1228.obj_len = 2; /*^iniobj */ @@ -23031,7 +23079,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1229.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1229.obj_num = 1; - cdat->dobj_1229.obj_hash = 340427621; + cdat->dobj_1229.obj_hash = 409330598; cdat->dobj_1229.obj_len = 2; @@ -23115,7 +23163,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1236__MAKE_STRBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1236__MAKE_STRBUF.obj_hash = 633031117; + cdat->dobj_1236__MAKE_STRBUF.obj_hash = 757945194; cdat->dobj_1236__MAKE_STRBUF.obj_len = 5; /*inimult dtup_1237__MAKE_STRBUF */ @@ -23149,7 +23197,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1239.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1239.obj_num = 0; - cdat->dobj_1239.obj_hash = 584653002; + cdat->dobj_1239.obj_hash = 577047087; cdat->dobj_1239.obj_len = 2; @@ -23231,7 +23279,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1245__STRBUF_RESERVE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1245__STRBUF_RESERVE.obj_hash = 865245625; + cdat->dobj_1245__STRBUF_RESERVE.obj_hash = 334291039; cdat->dobj_1245__STRBUF_RESERVE.obj_len = 5; /*inimult dtup_1246__STRBUF_RESERVE */ @@ -23265,7 +23313,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1248.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1248.obj_num = 0; - cdat->dobj_1248.obj_hash = 361090113; + cdat->dobj_1248.obj_hash = 438139200; cdat->dobj_1248.obj_len = 2; /*^iniobj */ @@ -23287,7 +23335,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1249.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1249.obj_num = 1; - cdat->dobj_1249.obj_hash = 676909420; + cdat->dobj_1249.obj_hash = 904126154; cdat->dobj_1249.obj_len = 2; @@ -23382,7 +23430,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1257__STRBUF_USEDLENGTH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1257__STRBUF_USEDLENGTH.obj_hash = 477882997; + cdat->dobj_1257__STRBUF_USEDLENGTH.obj_hash = 131798405; cdat->dobj_1257__STRBUF_USEDLENGTH.obj_len = 5; /*inimult dtup_1258__STRBUF_USEDLENGTH */ @@ -23416,7 +23464,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1260.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1260.obj_num = 0; - cdat->dobj_1260.obj_hash = 731494731; + cdat->dobj_1260.obj_hash = 232290649; cdat->dobj_1260.obj_len = 2; @@ -23495,7 +23543,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1266__OUTPUT_LENGTH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1266__OUTPUT_LENGTH.obj_hash = 598333541; + cdat->dobj_1266__OUTPUT_LENGTH.obj_hash = 858057255; cdat->dobj_1266__OUTPUT_LENGTH.obj_len = 5; /*inimult dtup_1267__OUTPUT_LENGTH */ @@ -23557,7 +23605,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1271.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1271.obj_num = 0; - cdat->dobj_1271.obj_hash = 919988195; + cdat->dobj_1271.obj_hash = 277123967; cdat->dobj_1271.obj_len = 2; @@ -23634,7 +23682,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1277__IS_STRBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1277__IS_STRBUF.obj_hash = 275224629; + cdat->dobj_1277__IS_STRBUF.obj_hash = 577436330; cdat->dobj_1277__IS_STRBUF.obj_len = 5; /*inimult dtup_1278__IS_STRBUF */ @@ -23668,7 +23716,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1280.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1280.obj_num = 0; - cdat->dobj_1280.obj_hash = 909338655; + cdat->dobj_1280.obj_hash = 880908285; cdat->dobj_1280.obj_len = 2; @@ -23747,7 +23795,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1286__MAKE_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1286__MAKE_STRING.obj_hash = 196030253; + cdat->dobj_1286__MAKE_STRING.obj_hash = 355713290; cdat->dobj_1286__MAKE_STRING.obj_len = 5; /*inimult dtup_1287__MAKE_STRING */ @@ -23781,7 +23829,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1289.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1289.obj_num = 0; - cdat->dobj_1289.obj_hash = 853900718; + cdat->dobj_1289.obj_hash = 180405874; cdat->dobj_1289.obj_len = 2; /*^iniobj */ @@ -23803,7 +23851,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1290.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1290.obj_num = 1; - cdat->dobj_1290.obj_hash = 336129072; + cdat->dobj_1290.obj_hash = 339684144; cdat->dobj_1290.obj_len = 2; @@ -23891,7 +23939,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1297__IS_STRINGCONST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1297__IS_STRINGCONST.obj_hash = 260601938; + cdat->dobj_1297__IS_STRINGCONST.obj_hash = 478161227; cdat->dobj_1297__IS_STRINGCONST.obj_len = 5; /*inimult dtup_1298__IS_STRINGCONST */ @@ -23925,7 +23973,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1300.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1300.obj_num = 0; - cdat->dobj_1300.obj_hash = 283519689; + cdat->dobj_1300.obj_hash = 881529097; cdat->dobj_1300.obj_len = 2; @@ -23974,7 +24022,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1303.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1303.obj_num = 1; - cdat->dobj_1303.obj_hash = 636635864; + cdat->dobj_1303.obj_hash = 412956338; cdat->dobj_1303.obj_len = 2; @@ -24060,7 +24108,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1310__STRING_LENGTH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1310__STRING_LENGTH.obj_hash = 329482792; + cdat->dobj_1310__STRING_LENGTH.obj_hash = 987561698; cdat->dobj_1310__STRING_LENGTH.obj_len = 5; /*inimult dtup_1311__STRING_LENGTH */ @@ -24094,7 +24142,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1313.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1313.obj_num = 0; - cdat->dobj_1313.obj_hash = 937589876; + cdat->dobj_1313.obj_hash = 893877280; cdat->dobj_1313.obj_len = 2; @@ -24173,7 +24221,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1319__STRING_SUFFIXED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1319__STRING_SUFFIXED.obj_hash = 391036931; + cdat->dobj_1319__STRING_SUFFIXED.obj_hash = 30047651; cdat->dobj_1319__STRING_SUFFIXED.obj_len = 5; /*inimult dtup_1320__STRING_SUFFIXED */ @@ -24207,7 +24255,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1322.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1322.obj_num = 0; - cdat->dobj_1322.obj_hash = 1018415447; + cdat->dobj_1322.obj_hash = 398143202; cdat->dobj_1322.obj_len = 2; /*^iniobj */ @@ -24229,7 +24277,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1323.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1323.obj_num = 1; - cdat->dobj_1323.obj_hash = 433599470; + cdat->dobj_1323.obj_hash = 979020819; cdat->dobj_1323.obj_len = 2; @@ -24315,7 +24363,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1330__STRING_DYNLOADED_SUFFIXED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1330__STRING_DYNLOADED_SUFFIXED.obj_hash = 427836258; + cdat->dobj_1330__STRING_DYNLOADED_SUFFIXED.obj_hash = 66753571; cdat->dobj_1330__STRING_DYNLOADED_SUFFIXED.obj_len = 5; /*inimult dtup_1331__STRING_DYNLOADED_SUFFIXED */ @@ -24349,7 +24397,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1333.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1333.obj_num = 0; - cdat->dobj_1333.obj_hash = 1073071216; + cdat->dobj_1333.obj_hash = 92168653; cdat->dobj_1333.obj_len = 2; @@ -24429,7 +24477,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1339__STRING_PREFIXED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1339__STRING_PREFIXED.obj_hash = 886517213; + cdat->dobj_1339__STRING_PREFIXED.obj_hash = 374554529; cdat->dobj_1339__STRING_PREFIXED.obj_len = 5; /*inimult dtup_1340__STRING_PREFIXED */ @@ -24463,7 +24511,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1342.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1342.obj_num = 0; - cdat->dobj_1342.obj_hash = 120370122; + cdat->dobj_1342.obj_hash = 41516597; cdat->dobj_1342.obj_len = 2; /*^iniobj */ @@ -24485,7 +24533,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1343.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1343.obj_num = 1; - cdat->dobj_1343.obj_hash = 82987685; + cdat->dobj_1343.obj_hash = 237946978; cdat->dobj_1343.obj_len = 2; @@ -24571,7 +24619,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1350__STRING_STARTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1350__STRING_STARTS.obj_hash = 816895137; + cdat->dobj_1350__STRING_STARTS.obj_hash = 702599546; cdat->dobj_1350__STRING_STARTS.obj_len = 5; /*inimult dtup_1351__STRING_STARTS */ @@ -24633,7 +24681,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1355.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1355.obj_num = 0; - cdat->dobj_1355.obj_hash = 481362847; + cdat->dobj_1355.obj_hash = 381499116; cdat->dobj_1355.obj_len = 2; @@ -24683,7 +24731,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1358.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1358.obj_num = 1; - cdat->dobj_1358.obj_hash = 749963516; + cdat->dobj_1358.obj_hash = 161137767; cdat->dobj_1358.obj_len = 2; @@ -24772,7 +24820,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1365__STRING_ENDS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1365__STRING_ENDS.obj_hash = 497796344; + cdat->dobj_1365__STRING_ENDS.obj_hash = 865427404; cdat->dobj_1365__STRING_ENDS.obj_len = 5; /*inimult dtup_1366__STRING_ENDS */ @@ -24806,7 +24854,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1368.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1368.obj_num = 0; - cdat->dobj_1368.obj_hash = 26948705; + cdat->dobj_1368.obj_hash = 61369646; cdat->dobj_1368.obj_len = 2; /*^iniobj */ @@ -24828,7 +24876,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1369.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1369.obj_num = 1; - cdat->dobj_1369.obj_hash = 343084710; + cdat->dobj_1369.obj_hash = 762990526; cdat->dobj_1369.obj_len = 2; @@ -24917,7 +24965,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1376__STRING_HEX_MD5SUM_CONSTPATH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1376__STRING_HEX_MD5SUM_CONSTPATH.obj_hash = 81090503; + cdat->dobj_1376__STRING_HEX_MD5SUM_CONSTPATH.obj_hash = 1041911821; cdat->dobj_1376__STRING_HEX_MD5SUM_CONSTPATH.obj_len = 5; /*inimult dtup_1377__STRING_HEX_MD5SUM_CONSTPATH */ @@ -24979,7 +25027,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1381.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1381.obj_num = 0; - cdat->dobj_1381.obj_hash = 1032793812; + cdat->dobj_1381.obj_hash = 898228280; cdat->dobj_1381.obj_len = 2; @@ -25058,7 +25106,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1387__STRING_HEX_MD5SUM_PATHSTRV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1387__STRING_HEX_MD5SUM_PATHSTRV.obj_hash = 306152975; + cdat->dobj_1387__STRING_HEX_MD5SUM_PATHSTRV.obj_hash = 585814546; cdat->dobj_1387__STRING_HEX_MD5SUM_PATHSTRV.obj_len = 5; /*inimult dtup_1388__STRING_HEX_MD5SUM_PATHSTRV */ @@ -25120,7 +25168,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1392.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1392.obj_num = 0; - cdat->dobj_1392.obj_hash = 617051830; + cdat->dobj_1392.obj_hash = 886855056; cdat->dobj_1392.obj_len = 2; @@ -25199,7 +25247,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1398__STRING_HEX_MD5SUM_PATH_SEQUENCE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1398__STRING_HEX_MD5SUM_PATH_SEQUENCE.obj_hash = 956921662; + cdat->dobj_1398__STRING_HEX_MD5SUM_PATH_SEQUENCE.obj_hash = 694907082; cdat->dobj_1398__STRING_HEX_MD5SUM_PATH_SEQUENCE.obj_len = 5; /*inimult dtup_1399__STRING_HEX_MD5SUM_PATH_SEQUENCE */ @@ -25262,7 +25310,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1403.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1403.obj_num = 0; - cdat->dobj_1403.obj_hash = 601796402; + cdat->dobj_1403.obj_hash = 572897473; cdat->dobj_1403.obj_len = 2; @@ -25341,7 +25389,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1409__SPLIT_STRING_SPACE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1409__SPLIT_STRING_SPACE.obj_hash = 386386479; + cdat->dobj_1409__SPLIT_STRING_SPACE.obj_hash = 713142384; cdat->dobj_1409__SPLIT_STRING_SPACE.obj_len = 5; /*inimult dtup_1410__SPLIT_STRING_SPACE */ @@ -25375,7 +25423,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1412.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1412.obj_num = 0; - cdat->dobj_1412.obj_hash = 645402380; + cdat->dobj_1412.obj_hash = 605187792; cdat->dobj_1412.obj_len = 2; /*^iniobj */ @@ -25397,7 +25445,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1413.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1413.obj_num = 1; - cdat->dobj_1413.obj_hash = 270823693; + cdat->dobj_1413.obj_hash = 394243739; cdat->dobj_1413.obj_len = 2; @@ -25485,7 +25533,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1420__SPLIT_STRING_COMMA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1420__SPLIT_STRING_COMMA.obj_hash = 482971410; + cdat->dobj_1420__SPLIT_STRING_COMMA.obj_hash = 437131710; cdat->dobj_1420__SPLIT_STRING_COMMA.obj_len = 5; /*inimult dtup_1421__SPLIT_STRING_COMMA */ @@ -25519,7 +25567,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1423.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1423.obj_num = 0; - cdat->dobj_1423.obj_hash = 406151415; + cdat->dobj_1423.obj_hash = 928290799; cdat->dobj_1423.obj_len = 2; /*^iniobj */ @@ -25541,7 +25589,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1424.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1424.obj_num = 1; - cdat->dobj_1424.obj_hash = 120232544; + cdat->dobj_1424.obj_hash = 50158220; cdat->dobj_1424.obj_len = 2; @@ -25629,7 +25677,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1431__SPLIT_STRING_COLON.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1431__SPLIT_STRING_COLON.obj_hash = 719260293; + cdat->dobj_1431__SPLIT_STRING_COLON.obj_hash = 642096441; cdat->dobj_1431__SPLIT_STRING_COLON.obj_len = 5; /*inimult dtup_1432__SPLIT_STRING_COLON */ @@ -25663,7 +25711,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1434.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1434.obj_num = 0; - cdat->dobj_1434.obj_hash = 52906119; + cdat->dobj_1434.obj_hash = 750018297; cdat->dobj_1434.obj_len = 2; /*^iniobj */ @@ -25685,7 +25733,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1435.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1435.obj_num = 1; - cdat->dobj_1435.obj_hash = 799497395; + cdat->dobj_1435.obj_hash = 245910538; cdat->dobj_1435.obj_len = 2; @@ -25773,7 +25821,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1442__SPLIT_STRING_EQUAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1442__SPLIT_STRING_EQUAL.obj_hash = 75608152; + cdat->dobj_1442__SPLIT_STRING_EQUAL.obj_hash = 342645801; cdat->dobj_1442__SPLIT_STRING_EQUAL.obj_len = 5; /*inimult dtup_1443__SPLIT_STRING_EQUAL */ @@ -25807,7 +25855,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1445.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1445.obj_num = 0; - cdat->dobj_1445.obj_hash = 472478169; + cdat->dobj_1445.obj_hash = 639542592; cdat->dobj_1445.obj_len = 2; /*^iniobj */ @@ -25829,7 +25877,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1446.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1446.obj_num = 1; - cdat->dobj_1446.obj_hash = 852360629; + cdat->dobj_1446.obj_hash = 851765051; cdat->dobj_1446.obj_len = 2; @@ -25917,7 +25965,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1453__STRBUF2STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1453__STRBUF2STRING.obj_hash = 607001624; + cdat->dobj_1453__STRBUF2STRING.obj_hash = 769137832; cdat->dobj_1453__STRBUF2STRING.obj_len = 5; /*inimult dtup_1454__STRBUF2STRING */ @@ -25951,7 +25999,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1456.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1456.obj_num = 0; - cdat->dobj_1456.obj_hash = 399486992; + cdat->dobj_1456.obj_hash = 203486860; cdat->dobj_1456.obj_len = 2; /*^iniobj */ @@ -25973,7 +26021,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1457.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1457.obj_num = 1; - cdat->dobj_1457.obj_hash = 741846772; + cdat->dobj_1457.obj_hash = 287049845; cdat->dobj_1457.obj_len = 2; @@ -26062,7 +26110,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1464__MAKE_STRING_NAKEDBASENAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1464__MAKE_STRING_NAKEDBASENAME.obj_hash = 182969511; + cdat->dobj_1464__MAKE_STRING_NAKEDBASENAME.obj_hash = 577514206; cdat->dobj_1464__MAKE_STRING_NAKEDBASENAME.obj_len = 5; /*inimult dtup_1465__MAKE_STRING_NAKEDBASENAME */ @@ -26096,7 +26144,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1467.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1467.obj_num = 0; - cdat->dobj_1467.obj_hash = 874154351; + cdat->dobj_1467.obj_hash = 270154065; cdat->dobj_1467.obj_len = 2; /*^iniobj */ @@ -26118,7 +26166,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1468.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1468.obj_num = 1; - cdat->dobj_1468.obj_hash = 480576857; + cdat->dobj_1468.obj_hash = 249741777; cdat->dobj_1468.obj_len = 2; @@ -26205,7 +26253,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1475__MAKE_STRING_TEMPNAME_SUFFIXED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1475__MAKE_STRING_TEMPNAME_SUFFIXED.obj_hash = 159926531; + cdat->dobj_1475__MAKE_STRING_TEMPNAME_SUFFIXED.obj_hash = 378718560; cdat->dobj_1475__MAKE_STRING_TEMPNAME_SUFFIXED.obj_len = 5; /*inimult dtup_1476__MAKE_STRING_TEMPNAME_SUFFIXED */ @@ -26239,7 +26287,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1478.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1478.obj_num = 0; - cdat->dobj_1478.obj_hash = 11297034; + cdat->dobj_1478.obj_hash = 538675845; cdat->dobj_1478.obj_len = 2; /*^iniobj */ @@ -26261,7 +26309,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1479.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1479.obj_num = 1; - cdat->dobj_1479.obj_hash = 893929527; + cdat->dobj_1479.obj_hash = 990207592; cdat->dobj_1479.obj_len = 2; @@ -26311,7 +26359,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1482.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1482.obj_num = 2; - cdat->dobj_1482.obj_hash = 944848489; + cdat->dobj_1482.obj_hash = 473361089; cdat->dobj_1482.obj_len = 2; @@ -26406,7 +26454,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1490__MAKE_STRING_WITHOUT_SUFFIX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1490__MAKE_STRING_WITHOUT_SUFFIX.obj_hash = 927621677; + cdat->dobj_1490__MAKE_STRING_WITHOUT_SUFFIX.obj_hash = 1045417306; cdat->dobj_1490__MAKE_STRING_WITHOUT_SUFFIX.obj_len = 5; /*inimult dtup_1491__MAKE_STRING_WITHOUT_SUFFIX */ @@ -26440,7 +26488,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1493.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1493.obj_num = 0; - cdat->dobj_1493.obj_hash = 325102092; + cdat->dobj_1493.obj_hash = 681687990; cdat->dobj_1493.obj_len = 2; /*^iniobj */ @@ -26462,7 +26510,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1494.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1494.obj_num = 1; - cdat->dobj_1494.obj_hash = 569675055; + cdat->dobj_1494.obj_hash = 824897175; cdat->dobj_1494.obj_len = 2; @@ -26513,7 +26561,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1497.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1497.obj_num = 2; - cdat->dobj_1497.obj_hash = 914839594; + cdat->dobj_1497.obj_hash = 776109989; cdat->dobj_1497.obj_len = 2; @@ -26607,7 +26655,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1505__MAKE_STRING_WITHOUT_DYNLOADED_SUFFIX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1505__MAKE_STRING_WITHOUT_DYNLOADED_SUFFIX.obj_hash = 443298267; + cdat->dobj_1505__MAKE_STRING_WITHOUT_DYNLOADED_SUFFIX.obj_hash = 464888091; cdat->dobj_1505__MAKE_STRING_WITHOUT_DYNLOADED_SUFFIX.obj_len = 5; /*inimult dtup_1506__MAKE_STRING_WITHOUT_DYNLOADED_SUFFIX */ @@ -26641,7 +26689,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1508.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1508.obj_num = 0; - cdat->dobj_1508.obj_hash = 199697341; + cdat->dobj_1508.obj_hash = 175481780; cdat->dobj_1508.obj_len = 2; /*^iniobj */ @@ -26663,7 +26711,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1509.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1509.obj_num = 1; - cdat->dobj_1509.obj_hash = 1010415307; + cdat->dobj_1509.obj_hash = 850955420; cdat->dobj_1509.obj_len = 2; @@ -26751,7 +26799,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1516__MAKE_STRING_GENERATED_C_FILENAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1516__MAKE_STRING_GENERATED_C_FILENAME.obj_hash = 633191589; + cdat->dobj_1516__MAKE_STRING_GENERATED_C_FILENAME.obj_hash = 59341352; cdat->dobj_1516__MAKE_STRING_GENERATED_C_FILENAME.obj_len = 5; /*inimult dtup_1517__MAKE_STRING_GENERATED_C_FILENAME */ @@ -26785,7 +26833,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1519.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1519.obj_num = 0; - cdat->dobj_1519.obj_hash = 241049741; + cdat->dobj_1519.obj_hash = 56952154; cdat->dobj_1519.obj_len = 2; @@ -26836,7 +26884,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1522.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1522.obj_num = 1; - cdat->dobj_1522.obj_hash = 731115370; + cdat->dobj_1522.obj_hash = 741887812; cdat->dobj_1522.obj_len = 2; @@ -26887,7 +26935,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1525.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1525.obj_num = 2; - cdat->dobj_1525.obj_hash = 56952154; + cdat->dobj_1525.obj_hash = 438130059; cdat->dobj_1525.obj_len = 2; @@ -26983,7 +27031,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1533__MAKE_STRING_REAL_ACCESS_PATH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1533__MAKE_STRING_REAL_ACCESS_PATH.obj_hash = 709153274; + cdat->dobj_1533__MAKE_STRING_REAL_ACCESS_PATH.obj_hash = 519612053; cdat->dobj_1533__MAKE_STRING_REAL_ACCESS_PATH.obj_len = 5; /*inimult dtup_1534__MAKE_STRING_REAL_ACCESS_PATH */ @@ -27017,7 +27065,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1536.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1536.obj_num = 0; - cdat->dobj_1536.obj_hash = 944151758; + cdat->dobj_1536.obj_hash = 45508551; cdat->dobj_1536.obj_len = 2; @@ -27068,7 +27116,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1539.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1539.obj_num = 1; - cdat->dobj_1539.obj_hash = 531589873; + cdat->dobj_1539.obj_hash = 168822351; cdat->dobj_1539.obj_len = 2; @@ -27154,7 +27202,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1546__MAKE_STRING_REAL_ACCESS_PATH_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1546__MAKE_STRING_REAL_ACCESS_PATH_VALUE.obj_hash = 913336438; + cdat->dobj_1546__MAKE_STRING_REAL_ACCESS_PATH_VALUE.obj_hash = 33434593; cdat->dobj_1546__MAKE_STRING_REAL_ACCESS_PATH_VALUE.obj_len = 5; /*inimult dtup_1547__MAKE_STRING_REAL_ACCESS_PATH_VALUE */ @@ -27188,7 +27236,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1549.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1549.obj_num = 0; - cdat->dobj_1549.obj_hash = 1035064464; + cdat->dobj_1549.obj_hash = 220856560; cdat->dobj_1549.obj_len = 2; @@ -27238,7 +27286,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1552.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1552.obj_num = 1; - cdat->dobj_1552.obj_hash = 617020110; + cdat->dobj_1552.obj_hash = 626377266; cdat->dobj_1552.obj_len = 2; @@ -27325,7 +27373,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1559__GENERATE_OPTIMIZED_MELT_MODULE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1559__GENERATE_OPTIMIZED_MELT_MODULE.obj_hash = 754928103; + cdat->dobj_1559__GENERATE_OPTIMIZED_MELT_MODULE.obj_hash = 841578618; cdat->dobj_1559__GENERATE_OPTIMIZED_MELT_MODULE.obj_len = 5; /*inimult dtup_1560__GENERATE_OPTIMIZED_MELT_MODULE */ @@ -27387,7 +27435,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1564.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1564.obj_num = 0; - cdat->dobj_1564.obj_hash = 819687026; + cdat->dobj_1564.obj_hash = 339479159; cdat->dobj_1564.obj_len = 2; @@ -27438,7 +27486,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1567.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1567.obj_num = 1; - cdat->dobj_1567.obj_hash = 513475948; + cdat->dobj_1567.obj_hash = 1062080405; cdat->dobj_1567.obj_len = 2; @@ -27527,7 +27575,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1574__GENERATE_FLAVORED_MELT_MODULE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1574__GENERATE_FLAVORED_MELT_MODULE.obj_hash = 920305698; + cdat->dobj_1574__GENERATE_FLAVORED_MELT_MODULE.obj_hash = 593601753; cdat->dobj_1574__GENERATE_FLAVORED_MELT_MODULE.obj_len = 5; /*inimult dtup_1575__GENERATE_FLAVORED_MELT_MODULE */ @@ -27561,7 +27609,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1577.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1577.obj_num = 0; - cdat->dobj_1577.obj_hash = 863123297; + cdat->dobj_1577.obj_hash = 544477367; cdat->dobj_1577.obj_len = 2; /*^iniobj */ @@ -27583,7 +27631,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1578.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1578.obj_num = 1; - cdat->dobj_1578.obj_hash = 93681283; + cdat->dobj_1578.obj_hash = 483763959; cdat->dobj_1578.obj_len = 2; @@ -27634,7 +27682,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1581.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1581.obj_num = 2; - cdat->dobj_1581.obj_hash = 178722448; + cdat->dobj_1581.obj_hash = 705665710; cdat->dobj_1581.obj_len = 2; @@ -27732,7 +27780,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1589__GENERATE_DEBUG_MELT_MODULE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1589__GENERATE_DEBUG_MELT_MODULE.obj_hash = 872818059; + cdat->dobj_1589__GENERATE_DEBUG_MELT_MODULE.obj_hash = 423895198; cdat->dobj_1589__GENERATE_DEBUG_MELT_MODULE.obj_len = 5; /*inimult dtup_1590__GENERATE_DEBUG_MELT_MODULE */ @@ -27766,7 +27814,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1592.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1592.obj_num = 0; - cdat->dobj_1592.obj_hash = 1065375020; + cdat->dobj_1592.obj_hash = 848048554; cdat->dobj_1592.obj_len = 2; /*^iniobj */ @@ -27788,7 +27836,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1593.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1593.obj_num = 1; - cdat->dobj_1593.obj_hash = 54634739; + cdat->dobj_1593.obj_hash = 689380432; cdat->dobj_1593.obj_len = 2; @@ -27877,7 +27925,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1600__GENERATE_QUICKLY_MELT_MODULE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1600__GENERATE_QUICKLY_MELT_MODULE.obj_hash = 537532996; + cdat->dobj_1600__GENERATE_QUICKLY_MELT_MODULE.obj_hash = 926672852; cdat->dobj_1600__GENERATE_QUICKLY_MELT_MODULE.obj_len = 5; /*inimult dtup_1601__GENERATE_QUICKLY_MELT_MODULE */ @@ -27911,7 +27959,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1603.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1603.obj_num = 0; - cdat->dobj_1603.obj_hash = 822299257; + cdat->dobj_1603.obj_hash = 381882568; cdat->dobj_1603.obj_len = 2; /*^iniobj */ @@ -27933,7 +27981,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1604.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1604.obj_num = 1; - cdat->dobj_1604.obj_hash = 522232373; + cdat->dobj_1604.obj_hash = 16722192; cdat->dobj_1604.obj_len = 2; @@ -28022,7 +28070,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1611__START_MELT_MODULE_OF_FLAVOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1611__START_MELT_MODULE_OF_FLAVOR.obj_hash = 916897828; + cdat->dobj_1611__START_MELT_MODULE_OF_FLAVOR.obj_hash = 1036375770; cdat->dobj_1611__START_MELT_MODULE_OF_FLAVOR.obj_len = 5; /*inimult dtup_1612__START_MELT_MODULE_OF_FLAVOR */ @@ -28084,7 +28132,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1616.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1616.obj_num = 0; - cdat->dobj_1616.obj_hash = 252079368; + cdat->dobj_1616.obj_hash = 864412614; cdat->dobj_1616.obj_len = 2; @@ -28135,7 +28183,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1619.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1619.obj_num = 1; - cdat->dobj_1619.obj_hash = 263921445; + cdat->dobj_1619.obj_hash = 733771865; cdat->dobj_1619.obj_len = 2; /*^iniobj */ @@ -28157,7 +28205,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1620.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1620.obj_num = 2; - cdat->dobj_1620.obj_hash = 785643938; + cdat->dobj_1620.obj_hash = 376296944; cdat->dobj_1620.obj_len = 2; @@ -28254,7 +28302,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1628__MELT_VERSION_STR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1628__MELT_VERSION_STR.obj_hash = 891958903; + cdat->dobj_1628__MELT_VERSION_STR.obj_hash = 548873622; cdat->dobj_1628__MELT_VERSION_STR.obj_len = 5; /*inimult dtup_1629__MELT_VERSION_STR */ @@ -28338,7 +28386,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1635__OBJECT_LENGTH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1635__OBJECT_LENGTH.obj_hash = 243154197; + cdat->dobj_1635__OBJECT_LENGTH.obj_hash = 867467644; cdat->dobj_1635__OBJECT_LENGTH.obj_len = 5; /*inimult dtup_1636__OBJECT_LENGTH */ @@ -28399,7 +28447,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1640.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1640.obj_num = 0; - cdat->dobj_1640.obj_hash = 1048379233; + cdat->dobj_1640.obj_hash = 604401675; cdat->dobj_1640.obj_len = 2; @@ -28478,7 +28526,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1646__OBJECT_NTH_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1646__OBJECT_NTH_FIELD.obj_hash = 432890092; + cdat->dobj_1646__OBJECT_NTH_FIELD.obj_hash = 472871912; cdat->dobj_1646__OBJECT_NTH_FIELD.obj_len = 5; /*inimult dtup_1647__OBJECT_NTH_FIELD */ @@ -28512,7 +28560,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1649.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1649.obj_num = 0; - cdat->dobj_1649.obj_hash = 103911398; + cdat->dobj_1649.obj_hash = 967718077; cdat->dobj_1649.obj_len = 2; /*^iniobj */ @@ -28534,7 +28582,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1650.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1650.obj_num = 1; - cdat->dobj_1650.obj_hash = 544338485; + cdat->dobj_1650.obj_hash = 136978959; cdat->dobj_1650.obj_len = 2; @@ -28620,7 +28668,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1657__SUBCLASS_OF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1657__SUBCLASS_OF.obj_hash = 555463838; + cdat->dobj_1657__SUBCLASS_OF.obj_hash = 1053508880; cdat->dobj_1657__SUBCLASS_OF.obj_len = 5; /*inimult dtup_1658__SUBCLASS_OF */ @@ -28682,7 +28730,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1662.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1662.obj_num = 0; - cdat->dobj_1662.obj_hash = 252755941; + cdat->dobj_1662.obj_hash = 1012343488; cdat->dobj_1662.obj_len = 2; @@ -28732,7 +28780,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1665.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1665.obj_num = 1; - cdat->dobj_1665.obj_hash = 963456207; + cdat->dobj_1665.obj_hash = 371643002; cdat->dobj_1665.obj_len = 2; @@ -28821,7 +28869,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1672__SUBCLASS_OR_EQ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1672__SUBCLASS_OR_EQ.obj_hash = 501081176; + cdat->dobj_1672__SUBCLASS_OR_EQ.obj_hash = 386764431; cdat->dobj_1672__SUBCLASS_OR_EQ.obj_len = 5; /*inimult dtup_1673__SUBCLASS_OR_EQ */ @@ -28855,7 +28903,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1675.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1675.obj_num = 0; - cdat->dobj_1675.obj_hash = 1009458929; + cdat->dobj_1675.obj_hash = 130519565; cdat->dobj_1675.obj_len = 2; /*^iniobj */ @@ -28877,7 +28925,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1676.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1676.obj_num = 1; - cdat->dobj_1676.obj_hash = 209729899; + cdat->dobj_1676.obj_hash = 410976706; cdat->dobj_1676.obj_len = 2; @@ -28980,7 +29028,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1685__IS_MULTIPLE_OR_NULL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1685__IS_MULTIPLE_OR_NULL.obj_hash = 571535310; + cdat->dobj_1685__IS_MULTIPLE_OR_NULL.obj_hash = 874012998; cdat->dobj_1685__IS_MULTIPLE_OR_NULL.obj_len = 5; /*inimult dtup_1686__IS_MULTIPLE_OR_NULL */ @@ -29042,7 +29090,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1690.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1690.obj_num = 0; - cdat->dobj_1690.obj_hash = 615222551; + cdat->dobj_1690.obj_hash = 1036528715; cdat->dobj_1690.obj_len = 2; @@ -29129,7 +29177,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1697__SUBSEQ_MULTIPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1697__SUBSEQ_MULTIPLE.obj_hash = 516896624; + cdat->dobj_1697__SUBSEQ_MULTIPLE.obj_hash = 644044902; cdat->dobj_1697__SUBSEQ_MULTIPLE.obj_len = 5; /*inimult dtup_1698__SUBSEQ_MULTIPLE */ @@ -29163,7 +29211,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1700.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1700.obj_num = 0; - cdat->dobj_1700.obj_hash = 394625245; + cdat->dobj_1700.obj_hash = 819104909; cdat->dobj_1700.obj_len = 2; @@ -29214,7 +29262,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1703.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1703.obj_num = 1; - cdat->dobj_1703.obj_hash = 637561881; + cdat->dobj_1703.obj_hash = 518219016; cdat->dobj_1703.obj_len = 2; @@ -29264,7 +29312,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1706.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1706.obj_num = 2; - cdat->dobj_1706.obj_hash = 819104909; + cdat->dobj_1706.obj_hash = 357769641; cdat->dobj_1706.obj_len = 2; @@ -29327,7 +29375,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1712__TUPLE_NTH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CMATCHER)))); - cdat->dobj_1712__TUPLE_NTH.obj_hash = 810425706; + cdat->dobj_1712__TUPLE_NTH.obj_hash = 236839366; cdat->dobj_1712__TUPLE_NTH.obj_len = 9; @@ -29386,7 +29434,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1716.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1716.obj_num = 0; - cdat->dobj_1716.obj_hash = 1069106806; + cdat->dobj_1716.obj_hash = 388560942; cdat->dobj_1716.obj_len = 2; /*inimult dtup_1717__TUPLE_NTH */ @@ -29442,7 +29490,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1720.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - cdat->dobj_1720.obj_hash = 824388136; + cdat->dobj_1720.obj_hash = 555650919; cdat->dobj_1720.obj_len = 2; @@ -29493,7 +29541,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1723.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1723.obj_num = 0; - cdat->dobj_1723.obj_hash = 825077476; + cdat->dobj_1723.obj_hash = 395926218; cdat->dobj_1723.obj_len = 2; /*inimult dtup_1724__TUPLE_NTH */ @@ -29630,7 +29678,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1738__TUPLE_SIZED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CMATCHER)))); - cdat->dobj_1738__TUPLE_SIZED.obj_hash = 236839366; + cdat->dobj_1738__TUPLE_SIZED.obj_hash = 885637706; cdat->dobj_1738__TUPLE_SIZED.obj_len = 9; @@ -29689,7 +29737,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1742.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1742.obj_num = 0; - cdat->dobj_1742.obj_hash = 520820692; + cdat->dobj_1742.obj_hash = 806623256; cdat->dobj_1742.obj_len = 2; /*inimult dtup_1743__TUPLE_SIZED */ @@ -29744,7 +29792,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1746.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - cdat->dobj_1746.obj_hash = 596625176; + cdat->dobj_1746.obj_hash = 586995359; cdat->dobj_1746.obj_len = 2; /*inimult dtup_1747__TUPLE_SIZED */ @@ -29935,7 +29983,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "MELT_IS_BOOTSTRAPPING", sizeof (cdat->dstr_1765__MELT_IS_BOOTSTRA. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1014:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1015:/ iniobj"); /*iniobj dobj_1766__MELT_IS_BOOTSTRAPPING*/ /*_.VALDATA___V1792*/ meltfptr[1791] = @@ -29953,7 +30001,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1766__MELT_IS_BOOTSTRAPPING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1766__MELT_IS_BOOTSTRAPPING.obj_hash = 917982307; + cdat->dobj_1766__MELT_IS_BOOTSTRAPPING.obj_hash = 1043298687; cdat->dobj_1766__MELT_IS_BOOTSTRAPPING.obj_len = 5; /*inimult dtup_1767__MELT_IS_BOOTSTRAPPING */ @@ -30017,7 +30065,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1772__IS_OUT.val, "IS_OUT", sizeof (cdat->dstr_1772__IS_OUT.val) - 1); - MELT_LOCATION ("warmelt-base.melt:1021:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1022:/ iniobj"); /*iniobj dobj_1773__IS_OUT*/ /*_.VALDATA___V1799*/ meltfptr[1798] = @@ -30035,7 +30083,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1773__IS_OUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1773__IS_OUT.obj_hash = 615409614; + cdat->dobj_1773__IS_OUT.obj_hash = 147746827; cdat->dobj_1773__IS_OUT.obj_len = 5; /*inimult dtup_1774__IS_OUT */ @@ -30069,7 +30117,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1776.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1776.obj_num = 0; - cdat->dobj_1776.obj_hash = 141402505; + cdat->dobj_1776.obj_hash = 102135540; cdat->dobj_1776.obj_len = 2; @@ -30126,7 +30174,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1781__IS_FILE.val, "IS_FILE", sizeof (cdat->dstr_1781__IS_FILE.val) - 1); - MELT_LOCATION ("warmelt-base.melt:1025:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1026:/ iniobj"); /*iniobj dobj_1782__IS_FILE*/ /*_.VALDATA___V1808*/ meltfptr[1807] = @@ -30144,7 +30192,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1782__IS_FILE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1782__IS_FILE.obj_hash = 736046573; + cdat->dobj_1782__IS_FILE.obj_hash = 855944703; cdat->dobj_1782__IS_FILE.obj_len = 5; /*inimult dtup_1783__IS_FILE */ @@ -30178,7 +30226,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1785.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1785.obj_num = 0; - cdat->dobj_1785.obj_hash = 455407715; + cdat->dobj_1785.obj_hash = 865226680; cdat->dobj_1785.obj_len = 2; @@ -30237,7 +30285,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_STRCONST", sizeof (cdat->dstr_1790__ADD2SBUF_STRCONS. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1030:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1031:/ iniobj"); /*iniobj dobj_1791__ADD2SBUF_STRCONST*/ /*_.VALDATA___V1817*/ meltfptr[1816] = @@ -30255,7 +30303,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1791__ADD2SBUF_STRCONST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1791__ADD2SBUF_STRCONST.obj_hash = 667865892; + cdat->dobj_1791__ADD2SBUF_STRCONST.obj_hash = 515589620; cdat->dobj_1791__ADD2SBUF_STRCONST.obj_len = 5; /*inimult dtup_1792__ADD2SBUF_STRCONST */ @@ -30289,7 +30337,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1794.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1794.obj_num = 0; - cdat->dobj_1794.obj_hash = 520849176; + cdat->dobj_1794.obj_hash = 735821587; cdat->dobj_1794.obj_len = 2; /*^iniobj */ @@ -30311,7 +30359,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1795.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1795.obj_num = 1; - cdat->dobj_1795.obj_hash = 398293390; + cdat->dobj_1795.obj_hash = 1070878620; cdat->dobj_1795.obj_len = 2; @@ -30379,7 +30427,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_DYNLOADED_SUFFIX", sizeof (cdat->dstr_1801__ADD2SBUF_DYNLOAD. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1035:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1036:/ iniobj"); /*iniobj dobj_1802__ADD2SBUF_DYNLOADED_SUFFIX*/ /*_.VALDATA___V1828*/ meltfptr[1827] = @@ -30397,7 +30445,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1802__ADD2SBUF_DYNLOADED_SUFFIX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1802__ADD2SBUF_DYNLOADED_SUFFIX.obj_hash = 102135540; + cdat->dobj_1802__ADD2SBUF_DYNLOADED_SUFFIX.obj_hash = 792058628; cdat->dobj_1802__ADD2SBUF_DYNLOADED_SUFFIX.obj_len = 5; /*inimult dtup_1803__ADD2SBUF_DYNLOADED_SUFFIX */ @@ -30431,7 +30479,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1805.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1805.obj_num = 0; - cdat->dobj_1805.obj_hash = 749637918; + cdat->dobj_1805.obj_hash = 468190812; cdat->dobj_1805.obj_len = 2; @@ -30493,7 +30541,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_STRING", sizeof (cdat->dstr_1810__ADD2SBUF_STRING. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1041:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1042:/ iniobj"); /*iniobj dobj_1811__ADD2SBUF_STRING*/ /*_.VALDATA___V1837*/ meltfptr[1836] = @@ -30511,7 +30559,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1811__ADD2SBUF_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1811__ADD2SBUF_STRING.obj_hash = 865226680; + cdat->dobj_1811__ADD2SBUF_STRING.obj_hash = 957877994; cdat->dobj_1811__ADD2SBUF_STRING.obj_len = 5; /*inimult dtup_1812__ADD2SBUF_STRING */ @@ -30545,7 +30593,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1814.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1814.obj_num = 0; - cdat->dobj_1814.obj_hash = 856791820; + cdat->dobj_1814.obj_hash = 490544739; cdat->dobj_1814.obj_len = 2; /*^iniobj */ @@ -30567,7 +30615,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1815.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1815.obj_num = 1; - cdat->dobj_1815.obj_hash = 2786850; + cdat->dobj_1815.obj_hash = 674617030; cdat->dobj_1815.obj_len = 2; @@ -30636,7 +30684,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_MIXLOC", sizeof (cdat->dstr_1821__ADD2SBUF_MIXLOC. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1048:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1049:/ iniobj"); /*iniobj dobj_1822__ADD2SBUF_MIXLOC*/ /*_.VALDATA___V1848*/ meltfptr[1847] = @@ -30654,7 +30702,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1822__ADD2SBUF_MIXLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1822__ADD2SBUF_MIXLOC.obj_hash = 250995231; + cdat->dobj_1822__ADD2SBUF_MIXLOC.obj_hash = 903580609; cdat->dobj_1822__ADD2SBUF_MIXLOC.obj_len = 5; /*inimult dtup_1823__ADD2SBUF_MIXLOC */ @@ -30688,7 +30736,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1825.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1825.obj_num = 0; - cdat->dobj_1825.obj_hash = 220997702; + cdat->dobj_1825.obj_hash = 123885586; cdat->dobj_1825.obj_len = 2; @@ -30738,7 +30786,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1828.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1828.obj_num = 1; - cdat->dobj_1828.obj_hash = 915949835; + cdat->dobj_1828.obj_hash = 696532324; cdat->dobj_1828.obj_len = 2; @@ -30819,7 +30867,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_SHORT_MIXLOC", sizeof (cdat->dstr_1835__ADD2SBUF_SHORT_M. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1060:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1061:/ iniobj"); /*iniobj dobj_1836__ADD2SBUF_SHORT_MIXLOC*/ /*_.VALDATA___V1862*/ meltfptr[1861] = @@ -30837,7 +30885,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1836__ADD2SBUF_SHORT_MIXLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1836__ADD2SBUF_SHORT_MIXLOC.obj_hash = 332711768; + cdat->dobj_1836__ADD2SBUF_SHORT_MIXLOC.obj_hash = 1043360957; cdat->dobj_1836__ADD2SBUF_SHORT_MIXLOC.obj_len = 5; /*inimult dtup_1837__ADD2SBUF_SHORT_MIXLOC */ @@ -30871,7 +30919,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1839.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1839.obj_num = 0; - cdat->dobj_1839.obj_hash = 123683934; + cdat->dobj_1839.obj_hash = 404746231; cdat->dobj_1839.obj_len = 2; /*^iniobj */ @@ -30893,7 +30941,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1840.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1840.obj_num = 1; - cdat->dobj_1840.obj_hash = 35928474; + cdat->dobj_1840.obj_hash = 351494200; cdat->dobj_1840.obj_len = 2; @@ -30975,7 +31023,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_TEXI_MIXLOC", sizeof (cdat->dstr_1847__ADD2SBUF_TEXI_MI. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1069:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1070:/ iniobj"); /*iniobj dobj_1848__ADD2SBUF_TEXI_MIXLOC*/ /*_.VALDATA___V1874*/ meltfptr[1873] = @@ -30993,7 +31041,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1848__ADD2SBUF_TEXI_MIXLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1848__ADD2SBUF_TEXI_MIXLOC.obj_hash = 1039538968; + cdat->dobj_1848__ADD2SBUF_TEXI_MIXLOC.obj_hash = 674000944; cdat->dobj_1848__ADD2SBUF_TEXI_MIXLOC.obj_len = 5; /*inimult dtup_1849__ADD2SBUF_TEXI_MIXLOC */ @@ -31027,7 +31075,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1851.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1851.obj_num = 0; - cdat->dobj_1851.obj_hash = 825141158; + cdat->dobj_1851.obj_hash = 647637838; cdat->dobj_1851.obj_len = 2; /*^iniobj */ @@ -31049,7 +31097,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1852.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1852.obj_num = 1; - cdat->dobj_1852.obj_hash = 1014241157; + cdat->dobj_1852.obj_hash = 590887548; cdat->dobj_1852.obj_len = 2; @@ -31131,7 +31179,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_INDENT", sizeof (cdat->dstr_1859__ADD2SBUF_INDENT. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1079:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1080:/ iniobj"); /*iniobj dobj_1860__ADD2SBUF_INDENT*/ /*_.VALDATA___V1886*/ meltfptr[1885] = @@ -31149,7 +31197,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1860__ADD2SBUF_INDENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1860__ADD2SBUF_INDENT.obj_hash = 5184045; + cdat->dobj_1860__ADD2SBUF_INDENT.obj_hash = 978862042; cdat->dobj_1860__ADD2SBUF_INDENT.obj_len = 5; /*inimult dtup_1861__ADD2SBUF_INDENT */ @@ -31183,7 +31231,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1863.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1863.obj_num = 0; - cdat->dobj_1863.obj_hash = 903446547; + cdat->dobj_1863.obj_hash = 821089778; cdat->dobj_1863.obj_len = 2; @@ -31233,7 +31281,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1866.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1866.obj_num = 1; - cdat->dobj_1866.obj_hash = 427978095; + cdat->dobj_1866.obj_hash = 873864383; cdat->dobj_1866.obj_len = 2; @@ -31301,7 +31349,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_INDENTNL", sizeof (cdat->dstr_1872__ADD2SBUF_INDENTN. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1085:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1086:/ iniobj"); /*iniobj dobj_1873__ADD2SBUF_INDENTNL*/ /*_.VALDATA___V1899*/ meltfptr[1898] = @@ -31319,7 +31367,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1873__ADD2SBUF_INDENTNL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1873__ADD2SBUF_INDENTNL.obj_hash = 1014303024; + cdat->dobj_1873__ADD2SBUF_INDENTNL.obj_hash = 700736540; cdat->dobj_1873__ADD2SBUF_INDENTNL.obj_len = 5; /*inimult dtup_1874__ADD2SBUF_INDENTNL */ @@ -31353,7 +31401,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1876.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1876.obj_num = 0; - cdat->dobj_1876.obj_hash = 124564057; + cdat->dobj_1876.obj_hash = 376326670; cdat->dobj_1876.obj_len = 2; /*^iniobj */ @@ -31375,7 +31423,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1877.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1877.obj_num = 1; - cdat->dobj_1877.obj_hash = 17259401; + cdat->dobj_1877.obj_hash = 798791720; cdat->dobj_1877.obj_len = 2; @@ -31443,7 +31491,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_SBUF", sizeof (cdat->dstr_1883__ADD2SBUF_SBUF.val) - 1); - MELT_LOCATION ("warmelt-base.melt:1091:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1092:/ iniobj"); /*iniobj dobj_1884__ADD2SBUF_SBUF*/ /*_.VALDATA___V1910*/ meltfptr[1909] = @@ -31461,7 +31509,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1884__ADD2SBUF_SBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1884__ADD2SBUF_SBUF.obj_hash = 191159282; + cdat->dobj_1884__ADD2SBUF_SBUF.obj_hash = 109578058; cdat->dobj_1884__ADD2SBUF_SBUF.obj_len = 5; /*inimult dtup_1885__ADD2SBUF_SBUF */ @@ -31495,7 +31543,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1887.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1887.obj_num = 0; - cdat->dobj_1887.obj_hash = 83779940; + cdat->dobj_1887.obj_hash = 995928208; cdat->dobj_1887.obj_len = 2; @@ -31545,7 +31593,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1890.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1890.obj_num = 1; - cdat->dobj_1890.obj_hash = 994895024; + cdat->dobj_1890.obj_hash = 947876016; cdat->dobj_1890.obj_len = 2; @@ -31615,7 +31663,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_CENCSTRING", sizeof (cdat->dstr_1896__ADD2SBUF_CENCSTR. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1098:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1099:/ iniobj"); /*iniobj dobj_1897__ADD2SBUF_CENCSTRING*/ /*_.VALDATA___V1923*/ meltfptr[1922] = @@ -31633,7 +31681,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1897__ADD2SBUF_CENCSTRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1897__ADD2SBUF_CENCSTRING.obj_hash = 267987586; + cdat->dobj_1897__ADD2SBUF_CENCSTRING.obj_hash = 828458195; cdat->dobj_1897__ADD2SBUF_CENCSTRING.obj_len = 5; /*inimult dtup_1898__ADD2SBUF_CENCSTRING */ @@ -31667,7 +31715,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1900.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1900.obj_num = 0; - cdat->dobj_1900.obj_hash = 391948762; + cdat->dobj_1900.obj_hash = 76914816; cdat->dobj_1900.obj_len = 2; /*^iniobj */ @@ -31689,7 +31737,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1901.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1901.obj_num = 1; - cdat->dobj_1901.obj_hash = 91061964; + cdat->dobj_1901.obj_hash = 592801149; cdat->dobj_1901.obj_len = 2; @@ -31758,7 +31806,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_CENCSTRBUF", sizeof (cdat->dstr_1907__ADD2SBUF_CENCSTR. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1104:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1105:/ iniobj"); /*iniobj dobj_1908__ADD2SBUF_CENCSTRBUF*/ /*_.VALDATA___V1934*/ meltfptr[1933] = @@ -31776,7 +31824,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1908__ADD2SBUF_CENCSTRBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1908__ADD2SBUF_CENCSTRBUF.obj_hash = 306274720; + cdat->dobj_1908__ADD2SBUF_CENCSTRBUF.obj_hash = 120025304; cdat->dobj_1908__ADD2SBUF_CENCSTRBUF.obj_len = 5; /*inimult dtup_1909__ADD2SBUF_CENCSTRBUF */ @@ -31810,7 +31858,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1911.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1911.obj_num = 0; - cdat->dobj_1911.obj_hash = 997737309; + cdat->dobj_1911.obj_hash = 889460407; cdat->dobj_1911.obj_len = 2; /*^iniobj */ @@ -31832,7 +31880,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1912.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1912.obj_num = 1; - cdat->dobj_1912.obj_hash = 763996167; + cdat->dobj_1912.obj_hash = 816535279; cdat->dobj_1912.obj_len = 2; @@ -31903,7 +31951,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_CCOMSTRING", sizeof (cdat->dstr_1918__ADD2SBUF_CCOMSTR. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1110:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1111:/ iniobj"); /*iniobj dobj_1919__ADD2SBUF_CCOMSTRING*/ /*_.VALDATA___V1945*/ meltfptr[1944] = @@ -31921,7 +31969,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1919__ADD2SBUF_CCOMSTRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1919__ADD2SBUF_CCOMSTRING.obj_hash = 74973691; + cdat->dobj_1919__ADD2SBUF_CCOMSTRING.obj_hash = 851238336; cdat->dobj_1919__ADD2SBUF_CCOMSTRING.obj_len = 5; /*inimult dtup_1920__ADD2SBUF_CCOMSTRING */ @@ -31955,7 +32003,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1922.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1922.obj_num = 0; - cdat->dobj_1922.obj_hash = 989561758; + cdat->dobj_1922.obj_hash = 1023388775; cdat->dobj_1922.obj_len = 2; /*^iniobj */ @@ -31977,7 +32025,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1923.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1923.obj_num = 1; - cdat->dobj_1923.obj_hash = 604954959; + cdat->dobj_1923.obj_hash = 154631348; cdat->dobj_1923.obj_len = 2; @@ -32046,7 +32094,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_CCOMSTRBUF", sizeof (cdat->dstr_1929__ADD2SBUF_CCOMSTR. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1116:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1117:/ iniobj"); /*iniobj dobj_1930__ADD2SBUF_CCOMSTRBUF*/ /*_.VALDATA___V1956*/ meltfptr[1955] = @@ -32064,7 +32112,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1930__ADD2SBUF_CCOMSTRBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1930__ADD2SBUF_CCOMSTRBUF.obj_hash = 1057305368; + cdat->dobj_1930__ADD2SBUF_CCOMSTRBUF.obj_hash = 778868761; cdat->dobj_1930__ADD2SBUF_CCOMSTRBUF.obj_len = 5; /*inimult dtup_1931__ADD2SBUF_CCOMSTRBUF */ @@ -32098,7 +32146,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1933.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1933.obj_num = 0; - cdat->dobj_1933.obj_hash = 786335003; + cdat->dobj_1933.obj_hash = 271105828; cdat->dobj_1933.obj_len = 2; /*^iniobj */ @@ -32120,7 +32168,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1934.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1934.obj_num = 1; - cdat->dobj_1934.obj_hash = 65123974; + cdat->dobj_1934.obj_hash = 164244029; cdat->dobj_1934.obj_len = 2; @@ -32189,7 +32237,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_CCOMCONST", sizeof (cdat->dstr_1940__ADD2SBUF_CCOMCON. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1122:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1123:/ iniobj"); /*iniobj dobj_1941__ADD2SBUF_CCOMCONST*/ /*_.VALDATA___V1967*/ meltfptr[1966] = @@ -32207,7 +32255,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1941__ADD2SBUF_CCOMCONST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1941__ADD2SBUF_CCOMCONST.obj_hash = 452690732; + cdat->dobj_1941__ADD2SBUF_CCOMCONST.obj_hash = 725105435; cdat->dobj_1941__ADD2SBUF_CCOMCONST.obj_len = 5; /*inimult dtup_1942__ADD2SBUF_CCOMCONST */ @@ -32241,7 +32289,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1944.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1944.obj_num = 0; - cdat->dobj_1944.obj_hash = 705253132; + cdat->dobj_1944.obj_hash = 175558067; cdat->dobj_1944.obj_len = 2; @@ -32291,7 +32339,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1947.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1947.obj_num = 1; - cdat->dobj_1947.obj_hash = 142273394; + cdat->dobj_1947.obj_hash = 91437839; cdat->dobj_1947.obj_len = 2; @@ -32359,7 +32407,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_CIDENT", sizeof (cdat->dstr_1953__ADD2SBUF_CIDENT. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1129:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1130:/ iniobj"); /*iniobj dobj_1954__ADD2SBUF_CIDENT*/ /*_.VALDATA___V1980*/ meltfptr[1979] = @@ -32377,7 +32425,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1954__ADD2SBUF_CIDENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1954__ADD2SBUF_CIDENT.obj_hash = 624247144; + cdat->dobj_1954__ADD2SBUF_CIDENT.obj_hash = 596954081; cdat->dobj_1954__ADD2SBUF_CIDENT.obj_len = 5; /*inimult dtup_1955__ADD2SBUF_CIDENT */ @@ -32411,7 +32459,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1957.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1957.obj_num = 0; - cdat->dobj_1957.obj_hash = 513305449; + cdat->dobj_1957.obj_hash = 613394029; cdat->dobj_1957.obj_len = 2; /*^iniobj */ @@ -32433,7 +32481,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1958.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1958.obj_num = 1; - cdat->dobj_1958.obj_hash = 892365817; + cdat->dobj_1958.obj_hash = 947827270; cdat->dobj_1958.obj_len = 2; @@ -32504,7 +32552,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_CIDENTPREFIX", sizeof (cdat->dstr_1964__ADD2SBUF_CIDENTP. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1137:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1138:/ iniobj"); /*iniobj dobj_1965__ADD2SBUF_CIDENTPREFIX*/ /*_.VALDATA___V1991*/ meltfptr[1990] = @@ -32522,7 +32570,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1965__ADD2SBUF_CIDENTPREFIX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1965__ADD2SBUF_CIDENTPREFIX.obj_hash = 326191942; + cdat->dobj_1965__ADD2SBUF_CIDENTPREFIX.obj_hash = 795739461; cdat->dobj_1965__ADD2SBUF_CIDENTPREFIX.obj_len = 5; /*inimult dtup_1966__ADD2SBUF_CIDENTPREFIX */ @@ -32556,7 +32604,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1968.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1968.obj_num = 0; - cdat->dobj_1968.obj_hash = 159860114; + cdat->dobj_1968.obj_hash = 482757416; cdat->dobj_1968.obj_len = 2; /*^iniobj */ @@ -32578,7 +32626,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1969.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1969.obj_num = 1; - cdat->dobj_1969.obj_hash = 113027656; + cdat->dobj_1969.obj_hash = 527556005; cdat->dobj_1969.obj_len = 2; @@ -32629,7 +32677,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1972.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1972.obj_num = 2; - cdat->dobj_1972.obj_hash = 449828196; + cdat->dobj_1972.obj_hash = 824058733; cdat->dobj_1972.obj_len = 2; @@ -32705,7 +32753,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_LONGDEC", sizeof (cdat->dstr_1979__ADD2SBUF_LONGDEC. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1144:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1145:/ iniobj"); /*iniobj dobj_1980__ADD2SBUF_LONGDEC*/ /*_.VALDATA___V2006*/ meltfptr[2005] = @@ -32723,7 +32771,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1980__ADD2SBUF_LONGDEC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1980__ADD2SBUF_LONGDEC.obj_hash = 193581635; + cdat->dobj_1980__ADD2SBUF_LONGDEC.obj_hash = 224502252; cdat->dobj_1980__ADD2SBUF_LONGDEC.obj_len = 5; /*inimult dtup_1981__ADD2SBUF_LONGDEC */ @@ -32757,7 +32805,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1983.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1983.obj_num = 0; - cdat->dobj_1983.obj_hash = 734857287; + cdat->dobj_1983.obj_hash = 628312588; cdat->dobj_1983.obj_len = 2; /*^iniobj */ @@ -32779,7 +32827,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1984.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1984.obj_num = 1; - cdat->dobj_1984.obj_hash = 232915223; + cdat->dobj_1984.obj_hash = 1035985032; cdat->dobj_1984.obj_len = 2; @@ -32847,7 +32895,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_LONGHEX", sizeof (cdat->dstr_1990__ADD2SBUF_LONGHEX. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1149:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1150:/ iniobj"); /*iniobj dobj_1991__ADD2SBUF_LONGHEX*/ /*_.VALDATA___V2017*/ meltfptr[2016] = @@ -32865,7 +32913,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1991__ADD2SBUF_LONGHEX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_1991__ADD2SBUF_LONGHEX.obj_hash = 480526060; + cdat->dobj_1991__ADD2SBUF_LONGHEX.obj_hash = 566821686; cdat->dobj_1991__ADD2SBUF_LONGHEX.obj_len = 5; /*inimult dtup_1992__ADD2SBUF_LONGHEX */ @@ -32899,7 +32947,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1994.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1994.obj_num = 0; - cdat->dobj_1994.obj_hash = 70424851; + cdat->dobj_1994.obj_hash = 261019517; cdat->dobj_1994.obj_len = 2; /*^iniobj */ @@ -32921,7 +32969,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_1995.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1995.obj_num = 1; - cdat->dobj_1995.obj_hash = 67994110; + cdat->dobj_1995.obj_hash = 528614958; cdat->dobj_1995.obj_len = 2; @@ -32989,7 +33037,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2SBUF_ROUTINEDESCR", sizeof (cdat->dstr_2001__ADD2SBUF_ROUTINE. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1154:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1155:/ iniobj"); /*iniobj dobj_2002__ADD2SBUF_ROUTINEDESCR*/ /*_.VALDATA___V2028*/ meltfptr[2027] = @@ -33007,7 +33055,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2002__ADD2SBUF_ROUTINEDESCR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2002__ADD2SBUF_ROUTINEDESCR.obj_hash = 714284565; + cdat->dobj_2002__ADD2SBUF_ROUTINEDESCR.obj_hash = 512392179; cdat->dobj_2002__ADD2SBUF_ROUTINEDESCR.obj_len = 5; /*inimult dtup_2003__ADD2SBUF_ROUTINEDESCR */ @@ -33041,7 +33089,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2005.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2005.obj_num = 0; - cdat->dobj_2005.obj_hash = 755531448; + cdat->dobj_2005.obj_hash = 211196401; cdat->dobj_2005.obj_len = 2; @@ -33091,7 +33139,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2008.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2008.obj_num = 1; - cdat->dobj_2008.obj_hash = 345850267; + cdat->dobj_2008.obj_hash = 118643604; cdat->dobj_2008.obj_len = 2; @@ -33162,7 +33210,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "OUTPUT_SBUF_STRCONST", sizeof (cdat->dstr_2014__OUTPUT_SBUF_STRC. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1160:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1161:/ iniobj"); /*iniobj dobj_2015__OUTPUT_SBUF_STRCONST*/ /*_.VALDATA___V2041*/ meltfptr[2040] = @@ -33180,7 +33228,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2015__OUTPUT_SBUF_STRCONST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2015__OUTPUT_SBUF_STRCONST.obj_hash = 577062436; + cdat->dobj_2015__OUTPUT_SBUF_STRCONST.obj_hash = 978498544; cdat->dobj_2015__OUTPUT_SBUF_STRCONST.obj_len = 5; /*inimult dtup_2016__OUTPUT_SBUF_STRCONST */ @@ -33214,7 +33262,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2018.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2018.obj_num = 0; - cdat->dobj_2018.obj_hash = 493907698; + cdat->dobj_2018.obj_hash = 899079661; cdat->dobj_2018.obj_len = 2; @@ -33264,7 +33312,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2021.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2021.obj_num = 1; - cdat->dobj_2021.obj_hash = 1022089930; + cdat->dobj_2021.obj_hash = 722902908; cdat->dobj_2021.obj_len = 2; @@ -33332,7 +33380,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "OUTPUT_SBUF_STRVAL", sizeof (cdat->dstr_2027__OUTPUT_SBUF_STRV. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1164:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1165:/ iniobj"); /*iniobj dobj_2028__OUTPUT_SBUF_STRVAL*/ /*_.VALDATA___V2054*/ meltfptr[2053] = @@ -33350,7 +33398,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2028__OUTPUT_SBUF_STRVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2028__OUTPUT_SBUF_STRVAL.obj_hash = 1031869211; + cdat->dobj_2028__OUTPUT_SBUF_STRVAL.obj_hash = 505379874; cdat->dobj_2028__OUTPUT_SBUF_STRVAL.obj_len = 5; /*inimult dtup_2029__OUTPUT_SBUF_STRVAL */ @@ -33384,7 +33432,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2031.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2031.obj_num = 0; - cdat->dobj_2031.obj_hash = 816729551; + cdat->dobj_2031.obj_hash = 691340074; cdat->dobj_2031.obj_len = 2; @@ -33434,7 +33482,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2034.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2034.obj_num = 1; - cdat->dobj_2034.obj_hash = 100794355; + cdat->dobj_2034.obj_hash = 1031053819; cdat->dobj_2034.obj_len = 2; @@ -33505,7 +33553,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "OUTPUT_SBUF_NO_OVERWRITE_STRCONST", sizeof (cdat->dstr_2040__OUTPUT_SBUF_NO_O. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1169:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1170:/ iniobj"); /*iniobj dobj_2041__OUTPUT_SBUF_NO_OVERWRITE_STRCONST*/ /*_.VALDATA___V2067*/ meltfptr[2066] = @@ -33523,7 +33571,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2041__OUTPUT_SBUF_NO_OVERWRITE_STRCONST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2041__OUTPUT_SBUF_NO_OVERWRITE_STRCONST.obj_hash = 720130303; + cdat->dobj_2041__OUTPUT_SBUF_NO_OVERWRITE_STRCONST.obj_hash = 172170813; cdat->dobj_2041__OUTPUT_SBUF_NO_OVERWRITE_STRCONST.obj_len = 5; /*inimult dtup_2042__OUTPUT_SBUF_NO_OVERWRITE_STRCONST */ @@ -33557,7 +33605,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2044.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2044.obj_num = 0; - cdat->dobj_2044.obj_hash = 992740197; + cdat->dobj_2044.obj_hash = 766572078; cdat->dobj_2044.obj_len = 2; /*^iniobj */ @@ -33579,7 +33627,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2045.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2045.obj_num = 1; - cdat->dobj_2045.obj_hash = 125273706; + cdat->dobj_2045.obj_hash = 601887700; cdat->dobj_2045.obj_len = 2; @@ -33647,7 +33695,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "OUTPUT_SBUF_NO_OVERWRITE_STRVAL", sizeof (cdat->dstr_2051__OUTPUT_SBUF_NO_O. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1173:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1174:/ iniobj"); /*iniobj dobj_2052__OUTPUT_SBUF_NO_OVERWRITE_STRVAL*/ /*_.VALDATA___V2078*/ meltfptr[2077] = @@ -33665,7 +33713,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2052__OUTPUT_SBUF_NO_OVERWRITE_STRVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2052__OUTPUT_SBUF_NO_OVERWRITE_STRVAL.obj_hash = 593785096; + cdat->dobj_2052__OUTPUT_SBUF_NO_OVERWRITE_STRVAL.obj_hash = 349249641; cdat->dobj_2052__OUTPUT_SBUF_NO_OVERWRITE_STRVAL.obj_len = 5; /*inimult dtup_2053__OUTPUT_SBUF_NO_OVERWRITE_STRVAL */ @@ -33699,7 +33747,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2055.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2055.obj_num = 0; - cdat->dobj_2055.obj_hash = 90029809; + cdat->dobj_2055.obj_hash = 698444907; cdat->dobj_2055.obj_len = 2; /*^iniobj */ @@ -33721,7 +33769,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2056.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2056.obj_num = 1; - cdat->dobj_2056.obj_hash = 787288518; + cdat->dobj_2056.obj_hash = 99562875; cdat->dobj_2056.obj_len = 2; @@ -33790,7 +33838,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_STRCONST", sizeof (cdat->dstr_2062__ADD2OUT_STRCONST. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1183:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1184:/ iniobj"); /*iniobj dobj_2063__ADD2OUT_STRCONST*/ /*_.VALDATA___V2089*/ meltfptr[2088] = @@ -33808,7 +33856,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2063__ADD2OUT_STRCONST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2063__ADD2OUT_STRCONST.obj_hash = 791431543; + cdat->dobj_2063__ADD2OUT_STRCONST.obj_hash = 747664521; cdat->dobj_2063__ADD2OUT_STRCONST.obj_len = 5; /*inimult dtup_2064__ADD2OUT_STRCONST */ @@ -33842,7 +33890,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2066.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2066.obj_num = 0; - cdat->dobj_2066.obj_hash = 448326679; + cdat->dobj_2066.obj_hash = 628480032; cdat->dobj_2066.obj_len = 2; /*^iniobj */ @@ -33864,7 +33912,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2067.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2067.obj_num = 1; - cdat->dobj_2067.obj_hash = 773143384; + cdat->dobj_2067.obj_hash = 162958397; cdat->dobj_2067.obj_len = 2; @@ -33932,7 +33980,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_STRING", sizeof (cdat->dstr_2073__ADD2OUT_STRING.val) - 1); - MELT_LOCATION ("warmelt-base.melt:1187:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1188:/ iniobj"); /*iniobj dobj_2074__ADD2OUT_STRING*/ /*_.VALDATA___V2100*/ meltfptr[2099] = @@ -33950,7 +33998,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2074__ADD2OUT_STRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2074__ADD2OUT_STRING.obj_hash = 394157650; + cdat->dobj_2074__ADD2OUT_STRING.obj_hash = 23257661; cdat->dobj_2074__ADD2OUT_STRING.obj_len = 5; /*inimult dtup_2075__ADD2OUT_STRING */ @@ -33984,7 +34032,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2077.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2077.obj_num = 0; - cdat->dobj_2077.obj_hash = 491565727; + cdat->dobj_2077.obj_hash = 97643728; cdat->dobj_2077.obj_len = 2; /*^iniobj */ @@ -34006,7 +34054,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2078.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2078.obj_num = 1; - cdat->dobj_2078.obj_hash = 48256497; + cdat->dobj_2078.obj_hash = 1040282848; cdat->dobj_2078.obj_len = 2; @@ -34077,7 +34125,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_MIXLOC", sizeof (cdat->dstr_2084__ADD2OUT_MIXLOC.val) - 1); - MELT_LOCATION ("warmelt-base.melt:1192:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1193:/ iniobj"); /*iniobj dobj_2085__ADD2OUT_MIXLOC*/ /*_.VALDATA___V2111*/ meltfptr[2110] = @@ -34095,7 +34143,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2085__ADD2OUT_MIXLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2085__ADD2OUT_MIXLOC.obj_hash = 589979436; + cdat->dobj_2085__ADD2OUT_MIXLOC.obj_hash = 612355740; cdat->dobj_2085__ADD2OUT_MIXLOC.obj_len = 5; /*inimult dtup_2086__ADD2OUT_MIXLOC */ @@ -34129,7 +34177,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2088.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2088.obj_num = 0; - cdat->dobj_2088.obj_hash = 866114165; + cdat->dobj_2088.obj_hash = 526321710; cdat->dobj_2088.obj_len = 2; /*^iniobj */ @@ -34151,7 +34199,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2089.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2089.obj_num = 1; - cdat->dobj_2089.obj_hash = 583291134; + cdat->dobj_2089.obj_hash = 846550092; cdat->dobj_2089.obj_len = 2; @@ -34232,7 +34280,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_INDENT", sizeof (cdat->dstr_2096__ADD2OUT_INDENT.val) - 1); - MELT_LOCATION ("warmelt-base.melt:1207:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1208:/ iniobj"); /*iniobj dobj_2097__ADD2OUT_INDENT*/ /*_.VALDATA___V2123*/ meltfptr[2122] = @@ -34250,7 +34298,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2097__ADD2OUT_INDENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2097__ADD2OUT_INDENT.obj_hash = 572965945; + cdat->dobj_2097__ADD2OUT_INDENT.obj_hash = 767988521; cdat->dobj_2097__ADD2OUT_INDENT.obj_len = 5; /*inimult dtup_2098__ADD2OUT_INDENT */ @@ -34284,7 +34332,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2100.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2100.obj_num = 0; - cdat->dobj_2100.obj_hash = 23257661; + cdat->dobj_2100.obj_hash = 777876450; cdat->dobj_2100.obj_len = 2; /*^iniobj */ @@ -34306,7 +34354,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2101.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2101.obj_num = 1; - cdat->dobj_2101.obj_hash = 247458098; + cdat->dobj_2101.obj_hash = 1069780935; cdat->dobj_2101.obj_len = 2; @@ -34374,7 +34422,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_INDENTNL", sizeof (cdat->dstr_2107__ADD2OUT_INDENTNL. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1214:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1215:/ iniobj"); /*iniobj dobj_2108__ADD2OUT_INDENTNL*/ /*_.VALDATA___V2134*/ meltfptr[2133] = @@ -34392,7 +34440,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2108__ADD2OUT_INDENTNL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2108__ADD2OUT_INDENTNL.obj_hash = 388513846; + cdat->dobj_2108__ADD2OUT_INDENTNL.obj_hash = 244083665; cdat->dobj_2108__ADD2OUT_INDENTNL.obj_len = 5; /*inimult dtup_2109__ADD2OUT_INDENTNL */ @@ -34426,7 +34474,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2111.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2111.obj_num = 0; - cdat->dobj_2111.obj_hash = 612355740; + cdat->dobj_2111.obj_hash = 278256948; cdat->dobj_2111.obj_len = 2; /*^iniobj */ @@ -34448,7 +34496,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2112.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2112.obj_num = 1; - cdat->dobj_2112.obj_hash = 933374768; + cdat->dobj_2112.obj_hash = 824838795; cdat->dobj_2112.obj_len = 2; @@ -34516,7 +34564,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_SBUF", sizeof (cdat->dstr_2118__ADD2OUT_SBUF.val) - 1); - MELT_LOCATION ("warmelt-base.melt:1221:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1222:/ iniobj"); /*iniobj dobj_2119__ADD2OUT_SBUF*/ /*_.VALDATA___V2145*/ meltfptr[2144] = @@ -34534,7 +34582,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2119__ADD2OUT_SBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2119__ADD2OUT_SBUF.obj_hash = 515726571; + cdat->dobj_2119__ADD2OUT_SBUF.obj_hash = 488582989; cdat->dobj_2119__ADD2OUT_SBUF.obj_len = 5; /*inimult dtup_2120__ADD2OUT_SBUF */ @@ -34568,7 +34616,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2122.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2122.obj_num = 0; - cdat->dobj_2122.obj_hash = 770341592; + cdat->dobj_2122.obj_hash = 613369687; cdat->dobj_2122.obj_len = 2; /*^iniobj */ @@ -34590,7 +34638,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2123.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2123.obj_num = 1; - cdat->dobj_2123.obj_hash = 758961540; + cdat->dobj_2123.obj_hash = 916452244; cdat->dobj_2123.obj_len = 2; @@ -34661,7 +34709,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_CENCSTRING", sizeof (cdat->dstr_2129__ADD2OUT_CENCSTRI. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1226:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1227:/ iniobj"); /*iniobj dobj_2130__ADD2OUT_CENCSTRING*/ /*_.VALDATA___V2156*/ meltfptr[2155] = @@ -34679,7 +34727,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2130__ADD2OUT_CENCSTRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2130__ADD2OUT_CENCSTRING.obj_hash = 939615063; + cdat->dobj_2130__ADD2OUT_CENCSTRING.obj_hash = 233847070; cdat->dobj_2130__ADD2OUT_CENCSTRING.obj_len = 5; /*inimult dtup_2131__ADD2OUT_CENCSTRING */ @@ -34713,7 +34761,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2133.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2133.obj_num = 0; - cdat->dobj_2133.obj_hash = 620093320; + cdat->dobj_2133.obj_hash = 300296800; cdat->dobj_2133.obj_len = 2; /*^iniobj */ @@ -34735,7 +34783,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2134.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2134.obj_num = 1; - cdat->dobj_2134.obj_hash = 1073713787; + cdat->dobj_2134.obj_hash = 441708694; cdat->dobj_2134.obj_len = 2; @@ -34805,7 +34853,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_CENCSUBSTRING", sizeof (cdat->dstr_2140__ADD2OUT_CENCSUBS. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1232:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1233:/ iniobj"); /*iniobj dobj_2141__ADD2OUT_CENCSUBSTRING*/ /*_.VALDATA___V2167*/ meltfptr[2166] = @@ -34823,7 +34871,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2141__ADD2OUT_CENCSUBSTRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2141__ADD2OUT_CENCSUBSTRING.obj_hash = 507250498; + cdat->dobj_2141__ADD2OUT_CENCSUBSTRING.obj_hash = 357312347; cdat->dobj_2141__ADD2OUT_CENCSUBSTRING.obj_len = 5; /*inimult dtup_2142__ADD2OUT_CENCSUBSTRING */ @@ -34857,7 +34905,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2144.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2144.obj_num = 0; - cdat->dobj_2144.obj_hash = 307849867; + cdat->dobj_2144.obj_hash = 190121774; cdat->dobj_2144.obj_len = 2; /*^iniobj */ @@ -34879,7 +34927,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2145.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2145.obj_num = 1; - cdat->dobj_2145.obj_hash = 711412119; + cdat->dobj_2145.obj_hash = 246185142; cdat->dobj_2145.obj_len = 2; @@ -34929,7 +34977,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2148.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2148.obj_num = 2; - cdat->dobj_2148.obj_hash = 389433079; + cdat->dobj_2148.obj_hash = 687691724; cdat->dobj_2148.obj_len = 2; @@ -34979,7 +35027,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2151.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2151.obj_num = 3; - cdat->dobj_2151.obj_hash = 632616459; + cdat->dobj_2151.obj_hash = 121887660; cdat->dobj_2151.obj_len = 2; @@ -35062,7 +35110,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_CENCONST", sizeof (cdat->dstr_2159__ADD2OUT_CENCONST. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1239:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1240:/ iniobj"); /*iniobj dobj_2160__ADD2OUT_CENCONST*/ /*_.VALDATA___V2186*/ meltfptr[2185] = @@ -35080,7 +35128,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2160__ADD2OUT_CENCONST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2160__ADD2OUT_CENCONST.obj_hash = 441708694; + cdat->dobj_2160__ADD2OUT_CENCONST.obj_hash = 723705699; cdat->dobj_2160__ADD2OUT_CENCONST.obj_len = 5; /*inimult dtup_2161__ADD2OUT_CENCONST */ @@ -35114,7 +35162,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2163.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2163.obj_num = 0; - cdat->dobj_2163.obj_hash = 333672492; + cdat->dobj_2163.obj_hash = 836943376; cdat->dobj_2163.obj_len = 2; /*^iniobj */ @@ -35136,7 +35184,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2164.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2164.obj_num = 1; - cdat->dobj_2164.obj_hash = 510726131; + cdat->dobj_2164.obj_hash = 696313742; cdat->dobj_2164.obj_len = 2; @@ -35204,7 +35252,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_CENCSTRBUF", sizeof (cdat->dstr_2170__ADD2OUT_CENCSTRB. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1243:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1244:/ iniobj"); /*iniobj dobj_2171__ADD2OUT_CENCSTRBUF*/ /*_.VALDATA___V2197*/ meltfptr[2196] = @@ -35222,7 +35270,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2171__ADD2OUT_CENCSTRBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2171__ADD2OUT_CENCSTRBUF.obj_hash = 246185142; + cdat->dobj_2171__ADD2OUT_CENCSTRBUF.obj_hash = 204869462; cdat->dobj_2171__ADD2OUT_CENCSTRBUF.obj_len = 5; /*inimult dtup_2172__ADD2OUT_CENCSTRBUF */ @@ -35256,7 +35304,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2174.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2174.obj_num = 0; - cdat->dobj_2174.obj_hash = 478276211; + cdat->dobj_2174.obj_hash = 824995874; cdat->dobj_2174.obj_len = 2; /*^iniobj */ @@ -35278,7 +35326,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2175.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2175.obj_num = 1; - cdat->dobj_2175.obj_hash = 5192827; + cdat->dobj_2175.obj_hash = 670435997; cdat->dobj_2175.obj_len = 2; @@ -35349,7 +35397,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_CCOMSTRING", sizeof (cdat->dstr_2181__ADD2OUT_CCOMSTRI. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1248:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1249:/ iniobj"); /*iniobj dobj_2182__ADD2OUT_CCOMSTRING*/ /*_.VALDATA___V2208*/ meltfptr[2207] = @@ -35367,7 +35415,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2182__ADD2OUT_CCOMSTRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2182__ADD2OUT_CCOMSTRING.obj_hash = 790369396; + cdat->dobj_2182__ADD2OUT_CCOMSTRING.obj_hash = 97379047; cdat->dobj_2182__ADD2OUT_CCOMSTRING.obj_len = 5; /*inimult dtup_2183__ADD2OUT_CCOMSTRING */ @@ -35401,7 +35449,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2185.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2185.obj_num = 0; - cdat->dobj_2185.obj_hash = 562483717; + cdat->dobj_2185.obj_hash = 429675299; cdat->dobj_2185.obj_len = 2; /*^iniobj */ @@ -35423,7 +35471,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2186.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2186.obj_num = 1; - cdat->dobj_2186.obj_hash = 1281671; + cdat->dobj_2186.obj_hash = 875977789; cdat->dobj_2186.obj_len = 2; @@ -35492,7 +35540,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_CCOMSTRBUF", sizeof (cdat->dstr_2192__ADD2OUT_CCOMSTRB. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1254:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1255:/ iniobj"); /*iniobj dobj_2193__ADD2OUT_CCOMSTRBUF*/ /*_.VALDATA___V2219*/ meltfptr[2218] = @@ -35510,7 +35558,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2193__ADD2OUT_CCOMSTRBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2193__ADD2OUT_CCOMSTRBUF.obj_hash = 735722938; + cdat->dobj_2193__ADD2OUT_CCOMSTRBUF.obj_hash = 311094950; cdat->dobj_2193__ADD2OUT_CCOMSTRBUF.obj_len = 5; /*inimult dtup_2194__ADD2OUT_CCOMSTRBUF */ @@ -35544,7 +35592,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2196.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2196.obj_num = 0; - cdat->dobj_2196.obj_hash = 77756687; + cdat->dobj_2196.obj_hash = 70218100; cdat->dobj_2196.obj_len = 2; /*^iniobj */ @@ -35566,7 +35614,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2197.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2197.obj_num = 1; - cdat->dobj_2197.obj_hash = 697543787; + cdat->dobj_2197.obj_hash = 940051999; cdat->dobj_2197.obj_len = 2; @@ -35635,7 +35683,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_CCOMCONST", sizeof (cdat->dstr_2203__ADD2OUT_CCOMCONS. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1260:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1261:/ iniobj"); /*iniobj dobj_2204__ADD2OUT_CCOMCONST*/ /*_.VALDATA___V2230*/ meltfptr[2229] = @@ -35653,7 +35701,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2204__ADD2OUT_CCOMCONST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2204__ADD2OUT_CCOMCONST.obj_hash = 907115018; + cdat->dobj_2204__ADD2OUT_CCOMCONST.obj_hash = 3318343; cdat->dobj_2204__ADD2OUT_CCOMCONST.obj_len = 5; /*inimult dtup_2205__ADD2OUT_CCOMCONST */ @@ -35687,7 +35735,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2207.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2207.obj_num = 0; - cdat->dobj_2207.obj_hash = 785017622; + cdat->dobj_2207.obj_hash = 834275602; cdat->dobj_2207.obj_len = 2; /*^iniobj */ @@ -35709,7 +35757,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2208.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2208.obj_num = 1; - cdat->dobj_2208.obj_hash = 572616385; + cdat->dobj_2208.obj_hash = 811085618; cdat->dobj_2208.obj_len = 2; @@ -35777,7 +35825,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_CIDENT", sizeof (cdat->dstr_2214__ADD2OUT_CIDENT.val) - 1); - MELT_LOCATION ("warmelt-base.melt:1266:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1267:/ iniobj"); /*iniobj dobj_2215__ADD2OUT_CIDENT*/ /*_.VALDATA___V2241*/ meltfptr[2240] = @@ -35795,7 +35843,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2215__ADD2OUT_CIDENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2215__ADD2OUT_CIDENT.obj_hash = 578572493; + cdat->dobj_2215__ADD2OUT_CIDENT.obj_hash = 741336541; cdat->dobj_2215__ADD2OUT_CIDENT.obj_len = 5; /*inimult dtup_2216__ADD2OUT_CIDENT */ @@ -35829,7 +35877,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2218.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2218.obj_num = 0; - cdat->dobj_2218.obj_hash = 111581823; + cdat->dobj_2218.obj_hash = 670175138; cdat->dobj_2218.obj_len = 2; /*^iniobj */ @@ -35851,7 +35899,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2219.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2219.obj_num = 1; - cdat->dobj_2219.obj_hash = 649568327; + cdat->dobj_2219.obj_hash = 911647376; cdat->dobj_2219.obj_len = 2; @@ -35921,7 +35969,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_CIDENTPREFIX", sizeof (cdat->dstr_2225__ADD2OUT_CIDENTPR. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1274:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1275:/ iniobj"); /*iniobj dobj_2226__ADD2OUT_CIDENTPREFIX*/ /*_.VALDATA___V2252*/ meltfptr[2251] = @@ -35939,7 +35987,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2226__ADD2OUT_CIDENTPREFIX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2226__ADD2OUT_CIDENTPREFIX.obj_hash = 453230528; + cdat->dobj_2226__ADD2OUT_CIDENTPREFIX.obj_hash = 1025610408; cdat->dobj_2226__ADD2OUT_CIDENTPREFIX.obj_len = 5; /*inimult dtup_2227__ADD2OUT_CIDENTPREFIX */ @@ -35973,7 +36021,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2229.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2229.obj_num = 0; - cdat->dobj_2229.obj_hash = 181333170; + cdat->dobj_2229.obj_hash = 446488739; cdat->dobj_2229.obj_len = 2; /*^iniobj */ @@ -35995,7 +36043,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2230.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2230.obj_num = 1; - cdat->dobj_2230.obj_hash = 563766893; + cdat->dobj_2230.obj_hash = 17416847; cdat->dobj_2230.obj_len = 2; /*^iniobj */ @@ -36017,7 +36065,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2231.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2231.obj_num = 2; - cdat->dobj_2231.obj_hash = 339525167; + cdat->dobj_2231.obj_hash = 544296184; cdat->dobj_2231.obj_len = 2; @@ -36094,7 +36142,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_LONGDEC", sizeof (cdat->dstr_2238__ADD2OUT_LONGDEC. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1282:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1283:/ iniobj"); /*iniobj dobj_2239__ADD2OUT_LONGDEC*/ /*_.VALDATA___V2265*/ meltfptr[2264] = @@ -36112,7 +36160,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2239__ADD2OUT_LONGDEC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2239__ADD2OUT_LONGDEC.obj_hash = 629746470; + cdat->dobj_2239__ADD2OUT_LONGDEC.obj_hash = 972874356; cdat->dobj_2239__ADD2OUT_LONGDEC.obj_len = 5; /*inimult dtup_2240__ADD2OUT_LONGDEC */ @@ -36146,7 +36194,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2242.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2242.obj_num = 0; - cdat->dobj_2242.obj_hash = 704192688; + cdat->dobj_2242.obj_hash = 132885764; cdat->dobj_2242.obj_len = 2; /*^iniobj */ @@ -36168,7 +36216,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2243.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2243.obj_num = 1; - cdat->dobj_2243.obj_hash = 171467001; + cdat->dobj_2243.obj_hash = 847561225; cdat->dobj_2243.obj_len = 2; @@ -36236,7 +36284,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_LONGHEX", sizeof (cdat->dstr_2249__ADD2OUT_LONGHEX. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1287:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1288:/ iniobj"); /*iniobj dobj_2250__ADD2OUT_LONGHEX*/ /*_.VALDATA___V2276*/ meltfptr[2275] = @@ -36254,7 +36302,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2250__ADD2OUT_LONGHEX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2250__ADD2OUT_LONGHEX.obj_hash = 1012754706; + cdat->dobj_2250__ADD2OUT_LONGHEX.obj_hash = 617995201; cdat->dobj_2250__ADD2OUT_LONGHEX.obj_len = 5; /*inimult dtup_2251__ADD2OUT_LONGHEX */ @@ -36288,7 +36336,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2253.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2253.obj_num = 0; - cdat->dobj_2253.obj_hash = 1003074881; + cdat->dobj_2253.obj_hash = 261028653; cdat->dobj_2253.obj_len = 2; /*^iniobj */ @@ -36310,7 +36358,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2254.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2254.obj_num = 1; - cdat->dobj_2254.obj_hash = 387417135; + cdat->dobj_2254.obj_hash = 664320883; cdat->dobj_2254.obj_len = 2; @@ -36378,7 +36426,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ADD2OUT_ROUTINEDESCR", sizeof (cdat->dstr_2260__ADD2OUT_ROUTINED. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1292:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1293:/ iniobj"); /*iniobj dobj_2261__ADD2OUT_ROUTINEDESCR*/ /*_.VALDATA___V2287*/ meltfptr[2286] = @@ -36396,7 +36444,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2261__ADD2OUT_ROUTINEDESCR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2261__ADD2OUT_ROUTINEDESCR.obj_hash = 269278030; + cdat->dobj_2261__ADD2OUT_ROUTINEDESCR.obj_hash = 747664839; cdat->dobj_2261__ADD2OUT_ROUTINEDESCR.obj_len = 5; /*inimult dtup_2262__ADD2OUT_ROUTINEDESCR */ @@ -36430,7 +36478,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2264.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2264.obj_num = 0; - cdat->dobj_2264.obj_hash = 220362838; + cdat->dobj_2264.obj_hash = 806176112; cdat->dobj_2264.obj_len = 2; /*^iniobj */ @@ -36452,7 +36500,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2265.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2265.obj_num = 1; - cdat->dobj_2265.obj_hash = 422320114; + cdat->dobj_2265.obj_hash = 872996609; cdat->dobj_2265.obj_len = 2; @@ -36579,7 +36627,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_2275__RECV.val, "RECV", sizeof (cdat->dstr_2275__RECV.val) - 1); - MELT_LOCATION ("warmelt-base.melt:1298:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1299:/ iniobj"); /*iniobj dobj_2276*/ /*_.VALDATA___V2302*/ meltfptr[2301] = (melt_ptr_t) & cdat->dobj_2276; @@ -36598,7 +36646,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2276.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2276.obj_num = 0; - cdat->dobj_2276.obj_hash = 213801488; + cdat->dobj_2276.obj_hash = 742256337; cdat->dobj_2276.obj_len = 2; /*^iniobj */ @@ -36620,7 +36668,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2277.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2277.obj_num = 1; - cdat->dobj_2277.obj_hash = 664320883; + cdat->dobj_2277.obj_hash = 815999096; cdat->dobj_2277.obj_len = 2; /*inimult dtup_2278__ADD_TO_OUT */ @@ -36646,7 +36694,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2279__ADD_TO_OUT.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V9*/ meltfptr[8]); - cdat->dobj_2279__ADD_TO_OUT.obj_hash = 914520985; + cdat->dobj_2279__ADD_TO_OUT.obj_hash = 1051831507; cdat->dobj_2279__ADD_TO_OUT.obj_len = 4; @@ -36663,7 +36711,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2281__ADD2OUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2281__ADD2OUT.routdescr, - "ADD2OUT @warmelt-base.melt:1304", MELT_ROUTDESCR_LEN - 1); + "ADD2OUT @warmelt-base.melt:1305", MELT_ROUTDESCR_LEN - 1); cdat->drout_2281__ADD2OUT.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2281__ADD2OUT, meltrout_7_warmelt_base_ADD2OUT); @@ -36681,7 +36729,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2283__STRING4OUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2283__STRING4OUT.routdescr, - "STRING4OUT @warmelt-base.melt:1357", MELT_ROUTDESCR_LEN - 1); + "STRING4OUT @warmelt-base.melt:1358", MELT_ROUTDESCR_LEN - 1); cdat->drout_2283__STRING4OUT.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2283__STRING4OUT, meltrout_8_warmelt_base_STRING4OUT); @@ -36792,7 +36840,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2291__ADD2OUT4NULL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2291__ADD2OUT4NULL.routdescr, - "ADD2OUT4NULL @warmelt-base.melt:1424", MELT_ROUTDESCR_LEN - 1); + "ADD2OUT4NULL @warmelt-base.melt:1425", MELT_ROUTDESCR_LEN - 1); cdat->drout_2291__ADD2OUT4NULL.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2291__ADD2OUT4NULL, meltrout_9_warmelt_base_ADD2OUT4NULL); @@ -36872,7 +36920,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2297__ADD2OUT4INTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2297__ADD2OUT4INTEGER.routdescr, - "ADD2OUT4INTEGER @warmelt-base.melt:1429", MELT_ROUTDESCR_LEN - 1); + "ADD2OUT4INTEGER @warmelt-base.melt:1430", MELT_ROUTDESCR_LEN - 1); cdat->drout_2297__ADD2OUT4INTEGER.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2297__ADD2OUT4INTEGER, meltrout_10_warmelt_base_ADD2OUT4INTEGER); @@ -36921,7 +36969,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2301__ADD2OUT4STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2301__ADD2OUT4STRING.routdescr, - "ADD2OUT4STRING @warmelt-base.melt:1434", MELT_ROUTDESCR_LEN - 1); + "ADD2OUT4STRING @warmelt-base.melt:1435", MELT_ROUTDESCR_LEN - 1); cdat->drout_2301__ADD2OUT4STRING.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2301__ADD2OUT4STRING, meltrout_11_warmelt_base_ADD2OUT4STRING); @@ -36939,7 +36987,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2303__ADD2OUT4STRBUF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2303__ADD2OUT4STRBUF.routdescr, - "ADD2OUT4STRBUF @warmelt-base.melt:1439", MELT_ROUTDESCR_LEN - 1); + "ADD2OUT4STRBUF @warmelt-base.melt:1440", MELT_ROUTDESCR_LEN - 1); cdat->drout_2303__ADD2OUT4STRBUF.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2303__ADD2OUT4STRBUF, meltrout_12_warmelt_base_ADD2OUT4STRBUF); @@ -36957,7 +37005,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2305__ADD2OUT4CLONEDSYMB.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2305__ADD2OUT4CLONEDSYMB.routdescr, - "ADD2OUT4CLONEDSYMB @warmelt-base.melt:1444", + "ADD2OUT4CLONEDSYMB @warmelt-base.melt:1445", MELT_ROUTDESCR_LEN - 1); cdat->drout_2305__ADD2OUT4CLONEDSYMB.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2305__ADD2OUT4CLONEDSYMB, @@ -37038,7 +37086,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2311__ADD2OUT4NAMED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2311__ADD2OUT4NAMED.routdescr, - "ADD2OUT4NAMED @warmelt-base.melt:1457", MELT_ROUTDESCR_LEN - 1); + "ADD2OUT4NAMED @warmelt-base.melt:1458", MELT_ROUTDESCR_LEN - 1); cdat->drout_2311__ADD2OUT4NAMED.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2311__ADD2OUT4NAMED, meltrout_14_warmelt_base_ADD2OUT4NAMED); @@ -37056,7 +37104,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2313__ADD2OUT4ROOTOBJECT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2313__ADD2OUT4ROOTOBJECT.routdescr, - "ADD2OUT4ROOTOBJECT @warmelt-base.melt:1461", + "ADD2OUT4ROOTOBJECT @warmelt-base.melt:1462", MELT_ROUTDESCR_LEN - 1); cdat->drout_2313__ADD2OUT4ROOTOBJECT.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2313__ADD2OUT4ROOTOBJECT, @@ -37104,7 +37152,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2317__ADD2OUT4ANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2317__ADD2OUT4ANY.routdescr, - "ADD2OUT4ANY @warmelt-base.melt:1469", MELT_ROUTDESCR_LEN - 1); + "ADD2OUT4ANY @warmelt-base.melt:1470", MELT_ROUTDESCR_LEN - 1); cdat->drout_2317__ADD2OUT4ANY.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2317__ADD2OUT4ANY, meltrout_16_warmelt_base_ADD2OUT4ANY); @@ -37147,7 +37195,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "DISCR_ANY_RECEIVER", sizeof (cdat->dstr_2320__DISCR_ANY_RECEIV. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1477:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1478:/ iniobj"); /*iniobj dobj_2321__CSTRING_SAME*/ /*_.VALDATA___V2347*/ meltfptr[2346] = @@ -37165,7 +37213,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2321__CSTRING_SAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CMATCHER)))); - cdat->dobj_2321__CSTRING_SAME.obj_hash = 293585601; + cdat->dobj_2321__CSTRING_SAME.obj_hash = 470553748; cdat->dobj_2321__CSTRING_SAME.obj_len = 9; @@ -37197,7 +37245,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2323.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2323.obj_num = 0; - cdat->dobj_2323.obj_hash = 191305802; + cdat->dobj_2323.obj_hash = 549233837; cdat->dobj_2323.obj_len = 2; /*inimult dtup_2324__CSTRING_SAME */ @@ -37224,7 +37272,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2325.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - cdat->dobj_2325.obj_hash = 752507427; + cdat->dobj_2325.obj_hash = 895088673; cdat->dobj_2325.obj_len = 2; /*inimult dtup_2326__CSTRING_SAME */ @@ -37311,7 +37359,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dtup_2335__CSTRING_SAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_MULTIPLE)))); cdat->dtup_2335__CSTRING_SAME.nbval = 11; - MELT_LOCATION ("warmelt-base.melt:1489:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1490:/ iniobj"); /*iniobj dobj_2336__CSTRING_PREFIXED*/ /*_.VALDATA___V2362*/ meltfptr[2361] = @@ -37329,7 +37377,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2336__CSTRING_PREFIXED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CMATCHER)))); - cdat->dobj_2336__CSTRING_PREFIXED.obj_hash = 244629613; + cdat->dobj_2336__CSTRING_PREFIXED.obj_hash = 123790411; cdat->dobj_2336__CSTRING_PREFIXED.obj_len = 9; @@ -37361,7 +37409,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2338.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2338.obj_num = 0; - cdat->dobj_2338.obj_hash = 848667687; + cdat->dobj_2338.obj_hash = 960231545; cdat->dobj_2338.obj_len = 2; /*inimult dtup_2339__CSTRING_PREFIXED */ @@ -37388,7 +37436,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2340.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); - cdat->dobj_2340.obj_hash = 941382270; + cdat->dobj_2340.obj_hash = 728582728; cdat->dobj_2340.obj_len = 2; /*inimult dtup_2341__CSTRING_PREFIXED */ @@ -37517,7 +37565,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "CSTRING_LENGTH", sizeof (cdat->dstr_2353__CSTRING_LENGTH.val) - 1); - MELT_LOCATION ("warmelt-base.melt:1503:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1504:/ iniobj"); /*iniobj dobj_2354__CSTRING_LENGTH*/ /*_.VALDATA___V2380*/ meltfptr[2379] = @@ -37535,7 +37583,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2354__CSTRING_LENGTH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2354__CSTRING_LENGTH.obj_hash = 723821678; + cdat->dobj_2354__CSTRING_LENGTH.obj_hash = 823299441; cdat->dobj_2354__CSTRING_LENGTH.obj_len = 5; /*inimult dtup_2355__CSTRING_LENGTH */ @@ -37569,7 +37617,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2357.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2357.obj_num = 0; - cdat->dobj_2357.obj_hash = 30402670; + cdat->dobj_2357.obj_hash = 912844897; cdat->dobj_2357.obj_len = 2; @@ -37610,7 +37658,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2362__MAPSTRING_EVERY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2362__MAPSTRING_EVERY.routdescr, - "MAPSTRING_EVERY @warmelt-base.melt:1513", MELT_ROUTDESCR_LEN - 1); + "MAPSTRING_EVERY @warmelt-base.melt:1514", MELT_ROUTDESCR_LEN - 1); cdat->drout_2362__MAPSTRING_EVERY.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2362__MAPSTRING_EVERY, meltrout_17_warmelt_base_MAPSTRING_EVERY); @@ -37628,7 +37676,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2364__MAPSTRING_ITERATE_TEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2364__MAPSTRING_ITERATE_TEST.routdescr, - "MAPSTRING_ITERATE_TEST @warmelt-base.melt:1526", + "MAPSTRING_ITERATE_TEST @warmelt-base.melt:1527", MELT_ROUTDESCR_LEN - 1); cdat->drout_2364__MAPSTRING_ITERATE_TEST.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2364__MAPSTRING_ITERATE_TEST, @@ -37672,7 +37720,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "MAPSTRING_SIZE", sizeof (cdat->dstr_2367__MAPSTRING_SIZE.val) - 1); - MELT_LOCATION ("warmelt-base.melt:1547:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1548:/ iniobj"); /*iniobj dobj_2368__MAPSTRING_SIZE*/ /*_.VALDATA___V2394*/ meltfptr[2393] = @@ -37690,7 +37738,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2368__MAPSTRING_SIZE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2368__MAPSTRING_SIZE.obj_hash = 692660942; + cdat->dobj_2368__MAPSTRING_SIZE.obj_hash = 280973688; cdat->dobj_2368__MAPSTRING_SIZE.obj_len = 5; /*inimult dtup_2369__MAPSTRING_SIZE */ @@ -37752,7 +37800,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2373.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2373.obj_num = 0; - cdat->dobj_2373.obj_hash = 141260616; + cdat->dobj_2373.obj_hash = 386062588; cdat->dobj_2373.obj_len = 2; @@ -37813,7 +37861,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "MAPSTRING_COUNT", sizeof (cdat->dstr_2378__MAPSTRING_COUNT. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1552:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1553:/ iniobj"); /*iniobj dobj_2379__MAPSTRING_COUNT*/ /*_.VALDATA___V2405*/ meltfptr[2404] = @@ -37831,7 +37879,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2379__MAPSTRING_COUNT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2379__MAPSTRING_COUNT.obj_hash = 328272695; + cdat->dobj_2379__MAPSTRING_COUNT.obj_hash = 489935788; cdat->dobj_2379__MAPSTRING_COUNT.obj_len = 5; /*inimult dtup_2380__MAPSTRING_COUNT */ @@ -37865,7 +37913,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2382.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2382.obj_num = 0; - cdat->dobj_2382.obj_hash = 724533481; + cdat->dobj_2382.obj_hash = 348188999; cdat->dobj_2382.obj_len = 2; @@ -37926,7 +37974,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "MAPSTRING_RAWGET", sizeof (cdat->dstr_2387__MAPSTRING_RAWGET. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1558:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1559:/ iniobj"); /*iniobj dobj_2388__MAPSTRING_RAWGET*/ /*_.VALDATA___V2414*/ meltfptr[2413] = @@ -37944,7 +37992,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2388__MAPSTRING_RAWGET.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2388__MAPSTRING_RAWGET.obj_hash = 836593543; + cdat->dobj_2388__MAPSTRING_RAWGET.obj_hash = 561507362; cdat->dobj_2388__MAPSTRING_RAWGET.obj_len = 5; /*inimult dtup_2389__MAPSTRING_RAWGET */ @@ -37978,7 +38026,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2391.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2391.obj_num = 0; - cdat->dobj_2391.obj_hash = 330698901; + cdat->dobj_2391.obj_hash = 952108389; cdat->dobj_2391.obj_len = 2; /*^iniobj */ @@ -38000,7 +38048,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2392.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2392.obj_num = 1; - cdat->dobj_2392.obj_hash = 487409423; + cdat->dobj_2392.obj_hash = 48039725; cdat->dobj_2392.obj_len = 2; @@ -38068,7 +38116,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "MAPSTRING_RAWPUT", sizeof (cdat->dstr_2398__MAPSTRING_RAWPUT. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1563:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1564:/ iniobj"); /*iniobj dobj_2399__MAPSTRING_RAWPUT*/ /*_.VALDATA___V2425*/ meltfptr[2424] = @@ -38086,7 +38134,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2399__MAPSTRING_RAWPUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2399__MAPSTRING_RAWPUT.obj_hash = 936248901; + cdat->dobj_2399__MAPSTRING_RAWPUT.obj_hash = 90030812; cdat->dobj_2399__MAPSTRING_RAWPUT.obj_len = 5; /*inimult dtup_2400__MAPSTRING_RAWPUT */ @@ -38120,7 +38168,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2402.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2402.obj_num = 0; - cdat->dobj_2402.obj_hash = 504397501; + cdat->dobj_2402.obj_hash = 722364320; cdat->dobj_2402.obj_len = 2; @@ -38170,7 +38218,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2405.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2405.obj_num = 1; - cdat->dobj_2405.obj_hash = 980129758; + cdat->dobj_2405.obj_hash = 621164450; cdat->dobj_2405.obj_len = 2; /*^iniobj */ @@ -38192,7 +38240,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2406.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2406.obj_num = 2; - cdat->dobj_2406.obj_hash = 480047092; + cdat->dobj_2406.obj_hash = 188175948; cdat->dobj_2406.obj_len = 2; @@ -38270,7 +38318,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "MAPSTRING_RAWREMOVE", sizeof (cdat->dstr_2413__MAPSTRING_RAWREM. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1568:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1569:/ iniobj"); /*iniobj dobj_2414__MAPSTRING_RAWREMOVE*/ /*_.VALDATA___V2440*/ meltfptr[2439] = @@ -38288,7 +38336,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2414__MAPSTRING_RAWREMOVE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2414__MAPSTRING_RAWREMOVE.obj_hash = 1058765067; + cdat->dobj_2414__MAPSTRING_RAWREMOVE.obj_hash = 248920166; cdat->dobj_2414__MAPSTRING_RAWREMOVE.obj_len = 5; /*inimult dtup_2415__MAPSTRING_RAWREMOVE */ @@ -38322,7 +38370,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2417.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2417.obj_num = 0; - cdat->dobj_2417.obj_hash = 1016099421; + cdat->dobj_2417.obj_hash = 1047360134; cdat->dobj_2417.obj_len = 2; /*^iniobj */ @@ -38344,7 +38392,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2418.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2418.obj_num = 1; - cdat->dobj_2418.obj_hash = 510391015; + cdat->dobj_2418.obj_hash = 96895651; cdat->dobj_2418.obj_len = 2; @@ -38387,7 +38435,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2423__MULTIPLE_EVERY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2423__MULTIPLE_EVERY.routdescr, - "MULTIPLE_EVERY @warmelt-base.melt:1575", MELT_ROUTDESCR_LEN - 1); + "MULTIPLE_EVERY @warmelt-base.melt:1576", MELT_ROUTDESCR_LEN - 1); cdat->drout_2423__MULTIPLE_EVERY.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2423__MULTIPLE_EVERY, meltrout_19_warmelt_base_MULTIPLE_EVERY); @@ -38405,7 +38453,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2425__MULTIPLE_BACKWARD_EVERY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2425__MULTIPLE_BACKWARD_EVERY.routdescr, - "MULTIPLE_BACKWARD_EVERY @warmelt-base.melt:1586", + "MULTIPLE_BACKWARD_EVERY @warmelt-base.melt:1587", MELT_ROUTDESCR_LEN - 1); cdat->drout_2425__MULTIPLE_BACKWARD_EVERY.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2425__MULTIPLE_BACKWARD_EVERY, @@ -38424,7 +38472,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2427__MULTIPLE_EVERY_BOTH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2427__MULTIPLE_EVERY_BOTH.routdescr, - "MULTIPLE_EVERY_BOTH @warmelt-base.melt:1598", + "MULTIPLE_EVERY_BOTH @warmelt-base.melt:1599", MELT_ROUTDESCR_LEN - 1); cdat->drout_2427__MULTIPLE_EVERY_BOTH.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2427__MULTIPLE_EVERY_BOTH, @@ -38468,7 +38516,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "MELT_APPLICATION_DEPTH", sizeof (cdat->dstr_2430__MELT_APPLICATION. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1615:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1616:/ iniobj"); /*iniobj dobj_2431__MELT_APPLICATION_DEPTH*/ /*_.VALDATA___V2457*/ meltfptr[2456] = @@ -38486,7 +38534,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2431__MELT_APPLICATION_DEPTH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2431__MELT_APPLICATION_DEPTH.obj_hash = 1053710780; + cdat->dobj_2431__MELT_APPLICATION_DEPTH.obj_hash = 167564336; cdat->dobj_2431__MELT_APPLICATION_DEPTH.obj_len = 5; /*inimult dtup_2432__MELT_APPLICATION_DEPTH */ @@ -38552,7 +38600,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "MELT_APPLICATION_SHALLOWER", sizeof (cdat->dstr_2437__MELT_APPLICATION. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1619:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1620:/ iniobj"); /*iniobj dobj_2438__MELT_APPLICATION_SHALLOWER*/ /*_.VALDATA___V2464*/ meltfptr[2463] = @@ -38570,7 +38618,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2438__MELT_APPLICATION_SHALLOWER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2438__MELT_APPLICATION_SHALLOWER.obj_hash = 625373803; + cdat->dobj_2438__MELT_APPLICATION_SHALLOWER.obj_hash = 859786212; cdat->dobj_2438__MELT_APPLICATION_SHALLOWER.obj_len = 5; /*inimult dtup_2439__MELT_APPLICATION_SHALLOWER */ @@ -38604,7 +38652,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2441.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2441.obj_num = 0; - cdat->dobj_2441.obj_hash = 291002877; + cdat->dobj_2441.obj_hash = 436743737; cdat->dobj_2441.obj_len = 2; @@ -38665,7 +38713,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "MELT_APPLICATION_COUNT", sizeof (cdat->dstr_2446__MELT_APPLICATION. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1624:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1625:/ iniobj"); /*iniobj dobj_2447__MELT_APPLICATION_COUNT*/ /*_.VALDATA___V2473*/ meltfptr[2472] = @@ -38683,7 +38731,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2447__MELT_APPLICATION_COUNT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2447__MELT_APPLICATION_COUNT.obj_hash = 1042066781; + cdat->dobj_2447__MELT_APPLICATION_COUNT.obj_hash = 854472040; cdat->dobj_2447__MELT_APPLICATION_COUNT.obj_len = 5; /*inimult dtup_2448__MELT_APPLICATION_COUNT */ @@ -38780,7 +38828,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "CLASS_REFERENCE", sizeof (cdat->dstr_2455__CLASS_REFERENCE. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1628:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1629:/ iniobj"); /*iniobj dobj_2456__MELT_MODE_REFERENCE*/ /*_.VALDATA___V2482*/ meltfptr[2481] = @@ -38797,7 +38845,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2456__MELT_MODE_REFERENCE.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V20*/ meltfptr[19]); - cdat->dobj_2456__MELT_MODE_REFERENCE.obj_hash = 146827696; + cdat->dobj_2456__MELT_MODE_REFERENCE.obj_hash = 680224603; cdat->dobj_2456__MELT_MODE_REFERENCE.obj_len = 1; @@ -38831,7 +38879,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "PASS_EXECUTION_REFERENCE", sizeof (cdat->dstr_2458__PASS_EXECUTION_R. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1633:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1634:/ iniobj"); /*iniobj dobj_2459__PASS_EXECUTION_REFERENCE*/ /*_.VALDATA___V2485*/ meltfptr[2484] = @@ -38849,7 +38897,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2459__PASS_EXECUTION_REFERENCE.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V20*/ meltfptr[19]); - cdat->dobj_2459__PASS_EXECUTION_REFERENCE.obj_hash = 652285145; + cdat->dobj_2459__PASS_EXECUTION_REFERENCE.obj_hash = 696198826; cdat->dobj_2459__PASS_EXECUTION_REFERENCE.obj_len = 1; /*inirout drout_2460__RUN_ALL_PASS_EXECUTION_HOOKS */ @@ -38858,7 +38906,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2460__RUN_ALL_PASS_EXECUTION_HOOKS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2460__RUN_ALL_PASS_EXECUTION_HOOKS.routdescr, - "RUN_ALL_PASS_EXECUTION_HOOKS @warmelt-base.melt:1637", + "RUN_ALL_PASS_EXECUTION_HOOKS @warmelt-base.melt:1638", MELT_ROUTDESCR_LEN - 1); cdat->drout_2460__RUN_ALL_PASS_EXECUTION_HOOKS.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2460__RUN_ALL_PASS_EXECUTION_HOOKS, @@ -38877,7 +38925,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2462__REGISTER_PASS_EXECUTION_HOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2462__REGISTER_PASS_EXECUTION_HOOK.routdescr, - "REGISTER_PASS_EXECUTION_HOOK @warmelt-base.melt:1648", + "REGISTER_PASS_EXECUTION_HOOK @warmelt-base.melt:1649", MELT_ROUTDESCR_LEN - 1); cdat->drout_2462__REGISTER_PASS_EXECUTION_HOOK.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2462__REGISTER_PASS_EXECUTION_HOOK, @@ -38927,7 +38975,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2466__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2466__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-base.melt:1673", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-base.melt:1674", MELT_ROUTDESCR_LEN - 1); cdat->drout_2466__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2466__LAMBDA_, meltrout_24_warmelt_base_LAMBDA___1__); @@ -38969,7 +39017,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2469__UNREGISTER_PASS_EXECUTION_HOOK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2469__UNREGISTER_PASS_EXECUTION_HOOK.routdescr, - "UNREGISTER_PASS_EXECUTION_HOOK @warmelt-base.melt:1679", + "UNREGISTER_PASS_EXECUTION_HOOK @warmelt-base.melt:1680", MELT_ROUTDESCR_LEN - 1); cdat->drout_2469__UNREGISTER_PASS_EXECUTION_HOOK.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -38989,7 +39037,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2471__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2471__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-base.melt:1698", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-base.melt:1699", MELT_ROUTDESCR_LEN - 1); cdat->drout_2471__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2471__LAMBDA_, meltrout_26_warmelt_base_LAMBDA___2__); @@ -39000,7 +39048,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2472__REGISTER_PRAGMA_HANDLER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2472__REGISTER_PRAGMA_HANDLER.routdescr, - "REGISTER_PRAGMA_HANDLER @warmelt-base.melt:1703", + "REGISTER_PRAGMA_HANDLER @warmelt-base.melt:1704", MELT_ROUTDESCR_LEN - 1); cdat->drout_2472__REGISTER_PRAGMA_HANDLER.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2472__REGISTER_PRAGMA_HANDLER, @@ -39137,7 +39185,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "CLASS_DELAYED_QUEUE", sizeof (cdat->dstr_2481__CLASS_DELAYED_QU. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1739:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1740:/ iniobj"); /*iniobj dobj_2482__PREGENERICIZE_DELAYED_QUEUE*/ /*_.VALDATA___V2508*/ meltfptr[2507] = @@ -39155,7 +39203,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2482__PREGENERICIZE_DELAYED_QUEUE.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - cdat->dobj_2482__PREGENERICIZE_DELAYED_QUEUE.obj_hash = 882757099; + cdat->dobj_2482__PREGENERICIZE_DELAYED_QUEUE.obj_hash = 181821505; cdat->dobj_2482__PREGENERICIZE_DELAYED_QUEUE.obj_len = 5; @@ -39174,7 +39222,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2484__REGISTER_PRE_GENERICIZE_HOOK_FIRST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2484__REGISTER_PRE_GENERICIZE_HOOK_FIRST.routdescr, - "REGISTER_PRE_GENERICIZE_HOOK_FIRST @warmelt-base.melt:1745", + "REGISTER_PRE_GENERICIZE_HOOK_FIRST @warmelt-base.melt:1746", MELT_ROUTDESCR_LEN - 1); cdat->drout_2484__REGISTER_PRE_GENERICIZE_HOOK_FIRST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -39223,7 +39271,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2488__REGISTER_PRE_GENERICIZE_HOOK_LAST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2488__REGISTER_PRE_GENERICIZE_HOOK_LAST.routdescr, - "REGISTER_PRE_GENERICIZE_HOOK_LAST @warmelt-base.melt:1768", + "REGISTER_PRE_GENERICIZE_HOOK_LAST @warmelt-base.melt:1769", MELT_ROUTDESCR_LEN - 1); cdat->drout_2488__REGISTER_PRE_GENERICIZE_HOOK_LAST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -39243,7 +39291,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2490__PRE_GENERICIZE_HOOK_RUNNER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2490__PRE_GENERICIZE_HOOK_RUNNER.routdescr, - "PRE_GENERICIZE_HOOK_RUNNER @warmelt-base.melt:1792", + "PRE_GENERICIZE_HOOK_RUNNER @warmelt-base.melt:1793", MELT_ROUTDESCR_LEN - 1); cdat->drout_2490__PRE_GENERICIZE_HOOK_RUNNER.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2490__PRE_GENERICIZE_HOOK_RUNNER, @@ -39287,7 +39335,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "FINISHTYPE_DELAYED_QUEUE", sizeof (cdat->dstr_2493__FINISHTYPE_DELAY. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1824:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1825:/ iniobj"); /*iniobj dobj_2494__FINISHTYPE_DELAYED_QUEUE*/ /*_.VALDATA___V2520*/ meltfptr[2519] = @@ -39305,7 +39353,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2494__FINISHTYPE_DELAYED_QUEUE.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - cdat->dobj_2494__FINISHTYPE_DELAYED_QUEUE.obj_hash = 243125569; + cdat->dobj_2494__FINISHTYPE_DELAYED_QUEUE.obj_hash = 1019112043; cdat->dobj_2494__FINISHTYPE_DELAYED_QUEUE.obj_len = 5; @@ -39349,7 +39397,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "MELT_NOTIFY_FINISH_TYPE", sizeof (cdat->dstr_2497__MELT_NOTIFY_FINI. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1832:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1833:/ iniobj"); /*iniobj dobj_2498__MELT_NOTIFY_FINISH_TYPE*/ /*_.VALDATA___V2524*/ meltfptr[2523] = @@ -39367,7 +39415,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2498__MELT_NOTIFY_FINISH_TYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2498__MELT_NOTIFY_FINISH_TYPE.obj_hash = 674237815; + cdat->dobj_2498__MELT_NOTIFY_FINISH_TYPE.obj_hash = 999712563; cdat->dobj_2498__MELT_NOTIFY_FINISH_TYPE.obj_len = 5; /*inimult dtup_2499__MELT_NOTIFY_FINISH_TYPE */ @@ -39408,7 +39456,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2503__MELT_FINISH_TYPE_RUNNER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2503__MELT_FINISH_TYPE_RUNNER.routdescr, - "MELT_FINISH_TYPE_RUNNER @warmelt-base.melt:1837", + "MELT_FINISH_TYPE_RUNNER @warmelt-base.melt:1838", MELT_ROUTDESCR_LEN - 1); cdat->drout_2503__MELT_FINISH_TYPE_RUNNER.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2503__MELT_FINISH_TYPE_RUNNER, @@ -39427,7 +39475,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2505__REGISTER_FINISH_TYPE_HOOK_FIRST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2505__REGISTER_FINISH_TYPE_HOOK_FIRST.routdescr, - "REGISTER_FINISH_TYPE_HOOK_FIRST @warmelt-base.melt:1861", + "REGISTER_FINISH_TYPE_HOOK_FIRST @warmelt-base.melt:1862", MELT_ROUTDESCR_LEN - 1); cdat->drout_2505__REGISTER_FINISH_TYPE_HOOK_FIRST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -39447,7 +39495,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2507__REGISTER_FINISH_TYPE_HOOK_LAST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2507__REGISTER_FINISH_TYPE_HOOK_LAST.routdescr, - "REGISTER_FINISH_TYPE_HOOK_LAST @warmelt-base.melt:1887", + "REGISTER_FINISH_TYPE_HOOK_LAST @warmelt-base.melt:1888", MELT_ROUTDESCR_LEN - 1); cdat->drout_2507__REGISTER_FINISH_TYPE_HOOK_LAST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -39492,7 +39540,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "MELT_NOTIFY_FINISH_DECL", sizeof (cdat->dstr_2510__MELT_NOTIFY_FINI. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1916:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1917:/ iniobj"); /*iniobj dobj_2511__MELT_NOTIFY_FINISH_DECL*/ /*_.VALDATA___V2537*/ meltfptr[2536] = @@ -39510,7 +39558,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2511__MELT_NOTIFY_FINISH_DECL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2511__MELT_NOTIFY_FINISH_DECL.obj_hash = 120765021; + cdat->dobj_2511__MELT_NOTIFY_FINISH_DECL.obj_hash = 521731543; cdat->dobj_2511__MELT_NOTIFY_FINISH_DECL.obj_len = 5; /*inimult dtup_2512__MELT_NOTIFY_FINISH_DECL */ @@ -39576,7 +39624,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "FINISHDECL_DELAYED_QUEUE", sizeof (cdat->dstr_2517__FINISHDECL_DELAY. val) - 1); - MELT_LOCATION ("warmelt-base.melt:1921:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:1922:/ iniobj"); /*iniobj dobj_2518__FINISHDECL_DELAYED_QUEUE*/ /*_.VALDATA___V2544*/ meltfptr[2543] = @@ -39594,7 +39642,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2518__FINISHDECL_DELAYED_QUEUE.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - cdat->dobj_2518__FINISHDECL_DELAYED_QUEUE.obj_hash = 349120188; + cdat->dobj_2518__FINISHDECL_DELAYED_QUEUE.obj_hash = 184448593; cdat->dobj_2518__FINISHDECL_DELAYED_QUEUE.obj_len = 5; @@ -39613,7 +39661,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2520__MELT_FINISH_DECL_RUNNER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2520__MELT_FINISH_DECL_RUNNER.routdescr, - "MELT_FINISH_DECL_RUNNER @warmelt-base.melt:1928", + "MELT_FINISH_DECL_RUNNER @warmelt-base.melt:1929", MELT_ROUTDESCR_LEN - 1); cdat->drout_2520__MELT_FINISH_DECL_RUNNER.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2520__MELT_FINISH_DECL_RUNNER, @@ -39632,7 +39680,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2522__REGISTER_FINISH_DECL_HOOK_FIRST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2522__REGISTER_FINISH_DECL_HOOK_FIRST.routdescr, - "REGISTER_FINISH_DECL_HOOK_FIRST @warmelt-base.melt:1952", + "REGISTER_FINISH_DECL_HOOK_FIRST @warmelt-base.melt:1953", MELT_ROUTDESCR_LEN - 1); cdat->drout_2522__REGISTER_FINISH_DECL_HOOK_FIRST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -39652,7 +39700,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2524__REGISTER_FINISH_DECL_HOOK_LAST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2524__REGISTER_FINISH_DECL_HOOK_LAST.routdescr, - "REGISTER_FINISH_DECL_HOOK_LAST @warmelt-base.melt:1979", + "REGISTER_FINISH_DECL_HOOK_LAST @warmelt-base.melt:1980", MELT_ROUTDESCR_LEN - 1); cdat->drout_2524__REGISTER_FINISH_DECL_HOOK_LAST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -39697,7 +39745,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ALL_PASSES_START_DELAYED_QUEUE", sizeof (cdat->dstr_2527__ALL_PASSES_START. val) - 1); - MELT_LOCATION ("warmelt-base.melt:2013:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:2014:/ iniobj"); /*iniobj dobj_2528__ALL_PASSES_START_DELAYED_QUEUE*/ /*_.VALDATA___V2554*/ meltfptr[2553] = @@ -39715,7 +39763,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2528__ALL_PASSES_START_DELAYED_QUEUE.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - cdat->dobj_2528__ALL_PASSES_START_DELAYED_QUEUE.obj_hash = 735582671; + cdat->dobj_2528__ALL_PASSES_START_DELAYED_QUEUE.obj_hash = 334349080; cdat->dobj_2528__ALL_PASSES_START_DELAYED_QUEUE.obj_len = 5; @@ -39734,7 +39782,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2530__MELT_ALL_PASSES_START_RUNNER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2530__MELT_ALL_PASSES_START_RUNNER.routdescr, - "MELT_ALL_PASSES_START_RUNNER @warmelt-base.melt:2020", + "MELT_ALL_PASSES_START_RUNNER @warmelt-base.melt:2021", MELT_ROUTDESCR_LEN - 1); cdat->drout_2530__MELT_ALL_PASSES_START_RUNNER.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2530__MELT_ALL_PASSES_START_RUNNER, @@ -39753,7 +39801,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2532__REGISTER_ALL_PASSES_START_HOOK_FIRST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2532__REGISTER_ALL_PASSES_START_HOOK_FIRST.routdescr, - "REGISTER_ALL_PASSES_START_HOOK_FIRST @warmelt-base.melt:2044", + "REGISTER_ALL_PASSES_START_HOOK_FIRST @warmelt-base.melt:2045", MELT_ROUTDESCR_LEN - 1); cdat->drout_2532__REGISTER_ALL_PASSES_START_HOOK_FIRST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -39773,7 +39821,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2534__REGISTER_ALL_PASSES_START_HOOK_LAST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2534__REGISTER_ALL_PASSES_START_HOOK_LAST.routdescr, - "REGISTER_ALL_PASSES_START_HOOK_LAST @warmelt-base.melt:2069", + "REGISTER_ALL_PASSES_START_HOOK_LAST @warmelt-base.melt:2070", MELT_ROUTDESCR_LEN - 1); cdat->drout_2534__REGISTER_ALL_PASSES_START_HOOK_LAST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -39818,7 +39866,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ALL_PASSES_END_DELAYED_QUEUE", sizeof (cdat->dstr_2537__ALL_PASSES_END_D. val) - 1); - MELT_LOCATION ("warmelt-base.melt:2099:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:2100:/ iniobj"); /*iniobj dobj_2538__ALL_PASSES_END_DELAYED_QUEUE*/ /*_.VALDATA___V2564*/ meltfptr[2563] = @@ -39836,7 +39884,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2538__ALL_PASSES_END_DELAYED_QUEUE.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - cdat->dobj_2538__ALL_PASSES_END_DELAYED_QUEUE.obj_hash = 445474148; + cdat->dobj_2538__ALL_PASSES_END_DELAYED_QUEUE.obj_hash = 454200670; cdat->dobj_2538__ALL_PASSES_END_DELAYED_QUEUE.obj_len = 5; @@ -39855,7 +39903,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2540__MELT_ALL_PASSES_END_RUNNER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2540__MELT_ALL_PASSES_END_RUNNER.routdescr, - "MELT_ALL_PASSES_END_RUNNER @warmelt-base.melt:2106", + "MELT_ALL_PASSES_END_RUNNER @warmelt-base.melt:2107", MELT_ROUTDESCR_LEN - 1); cdat->drout_2540__MELT_ALL_PASSES_END_RUNNER.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2540__MELT_ALL_PASSES_END_RUNNER, @@ -39874,7 +39922,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2542__REGISTER_ALL_PASSES_END_HOOK_FIRST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2542__REGISTER_ALL_PASSES_END_HOOK_FIRST.routdescr, - "REGISTER_ALL_PASSES_END_HOOK_FIRST @warmelt-base.melt:2130", + "REGISTER_ALL_PASSES_END_HOOK_FIRST @warmelt-base.melt:2131", MELT_ROUTDESCR_LEN - 1); cdat->drout_2542__REGISTER_ALL_PASSES_END_HOOK_FIRST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -39894,7 +39942,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2544__REGISTER_ALL_PASSES_END_HOOK_LAST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2544__REGISTER_ALL_PASSES_END_HOOK_LAST.routdescr, - "REGISTER_ALL_PASSES_END_HOOK_LAST @warmelt-base.melt:2155", + "REGISTER_ALL_PASSES_END_HOOK_LAST @warmelt-base.melt:2156", MELT_ROUTDESCR_LEN - 1); cdat->drout_2544__REGISTER_ALL_PASSES_END_HOOK_LAST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -39939,7 +39987,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ALL_IPA_PASSES_START_DELAYED_QUEUE", sizeof (cdat->dstr_2547__ALL_IPA_PASSES_S. val) - 1); - MELT_LOCATION ("warmelt-base.melt:2185:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:2186:/ iniobj"); /*iniobj dobj_2548__ALL_IPA_PASSES_START_DELAYED_QUEUE*/ /*_.VALDATA___V2574*/ meltfptr[2573] = @@ -39957,7 +40005,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2548__ALL_IPA_PASSES_START_DELAYED_QUEUE.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - cdat->dobj_2548__ALL_IPA_PASSES_START_DELAYED_QUEUE.obj_hash = 411116096; + cdat->dobj_2548__ALL_IPA_PASSES_START_DELAYED_QUEUE.obj_hash = 470635385; cdat->dobj_2548__ALL_IPA_PASSES_START_DELAYED_QUEUE.obj_len = 5; @@ -39976,7 +40024,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2550__MELT_ALL_IPA_PASSES_START_RUNNER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2550__MELT_ALL_IPA_PASSES_START_RUNNER.routdescr, - "MELT_ALL_IPA_PASSES_START_RUNNER @warmelt-base.melt:2192", + "MELT_ALL_IPA_PASSES_START_RUNNER @warmelt-base.melt:2193", MELT_ROUTDESCR_LEN - 1); cdat->drout_2550__MELT_ALL_IPA_PASSES_START_RUNNER.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -39997,7 +40045,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2552__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST. routdescr, - "REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST @warmelt-base.melt:2216", + "REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST @warmelt-base.melt:2217", MELT_ROUTDESCR_LEN - 1); cdat->drout_2552__REGISTER_ALL_IPA_PASSES_START_HOOK_FIRST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -40018,7 +40066,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2554__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST. routdescr, - "REGISTER_ALL_IPA_PASSES_START_HOOK_LAST @warmelt-base.melt:2241", + "REGISTER_ALL_IPA_PASSES_START_HOOK_LAST @warmelt-base.melt:2242", MELT_ROUTDESCR_LEN - 1); cdat->drout_2554__REGISTER_ALL_IPA_PASSES_START_HOOK_LAST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -40063,7 +40111,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "ALL_IPA_PASSES_END_DELAYED_QUEUE", sizeof (cdat->dstr_2557__ALL_IPA_PASSES_E. val) - 1); - MELT_LOCATION ("warmelt-base.melt:2271:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:2272:/ iniobj"); /*iniobj dobj_2558__ALL_IPA_PASSES_END_DELAYED_QUEUE*/ /*_.VALDATA___V2584*/ meltfptr[2583] = @@ -40081,7 +40129,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2558__ALL_IPA_PASSES_END_DELAYED_QUEUE.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - cdat->dobj_2558__ALL_IPA_PASSES_END_DELAYED_QUEUE.obj_hash = 434883124; + cdat->dobj_2558__ALL_IPA_PASSES_END_DELAYED_QUEUE.obj_hash = 691898197; cdat->dobj_2558__ALL_IPA_PASSES_END_DELAYED_QUEUE.obj_len = 5; @@ -40100,7 +40148,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2560__MELT_ALL_IPA_PASSES_END_RUNNER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2560__MELT_ALL_IPA_PASSES_END_RUNNER.routdescr, - "MELT_ALL_IPA_PASSES_END_RUNNER @warmelt-base.melt:2278", + "MELT_ALL_IPA_PASSES_END_RUNNER @warmelt-base.melt:2279", MELT_ROUTDESCR_LEN - 1); cdat->drout_2560__MELT_ALL_IPA_PASSES_END_RUNNER.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -40120,7 +40168,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2562__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2562__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST.routdescr, - "REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST @warmelt-base.melt:2302", + "REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST @warmelt-base.melt:2303", MELT_ROUTDESCR_LEN - 1); cdat->drout_2562__REGISTER_ALL_IPA_PASSES_END_HOOK_FIRST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -40140,7 +40188,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2564__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2564__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST.routdescr, - "REGISTER_ALL_IPA_PASSES_END_HOOK_LAST @warmelt-base.melt:2327", + "REGISTER_ALL_IPA_PASSES_END_HOOK_LAST @warmelt-base.melt:2328", MELT_ROUTDESCR_LEN - 1); cdat->drout_2564__REGISTER_ALL_IPA_PASSES_END_HOOK_LAST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -40186,7 +40234,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "EARLY_GIMPLE_PASSES_START_DELAYED_QUEUE", sizeof (cdat->dstr_2567__EARLY_GIMPLE_PAS. val) - 1); - MELT_LOCATION ("warmelt-base.melt:2360:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:2361:/ iniobj"); /*iniobj dobj_2568__EARLY_GIMPLE_PASSES_START_DELAYED_QUEUE*/ /*_.VALDATA___V2594*/ meltfptr[2593] = @@ -40205,7 +40253,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2568__EARLY_GIMPLE_PASSES_START_DELAYED_QUEUE.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); cdat->dobj_2568__EARLY_GIMPLE_PASSES_START_DELAYED_QUEUE.obj_hash = - 249816129; + 659330875; cdat->dobj_2568__EARLY_GIMPLE_PASSES_START_DELAYED_QUEUE.obj_len = 5; @@ -40224,7 +40272,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2570__MELT_EARLY_GIMPLE_PASSES_START_RUNNER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2570__MELT_EARLY_GIMPLE_PASSES_START_RUNNER.routdescr, - "MELT_EARLY_GIMPLE_PASSES_START_RUNNER @warmelt-base.melt:2367", + "MELT_EARLY_GIMPLE_PASSES_START_RUNNER @warmelt-base.melt:2368", MELT_ROUTDESCR_LEN - 1); cdat->drout_2570__MELT_EARLY_GIMPLE_PASSES_START_RUNNER.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -40246,7 +40294,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2572__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST. routdescr, - "REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST @warmelt-base.melt:2391", + "REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST @warmelt-base.melt:2392", MELT_ROUTDESCR_LEN - 1); cdat->drout_2572__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_FIRST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -40269,7 +40317,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2574__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST. routdescr, - "REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST @warmelt-base.melt:2416", + "REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST @warmelt-base.melt:2417", MELT_ROUTDESCR_LEN - 1); cdat->drout_2574__REGISTER_EARLY_GIMPLE_PASSES_START_HOOK_LAST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -40315,7 +40363,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "EARLY_GIMPLE_PASSES_END_DELAYED_QUEUE", sizeof (cdat->dstr_2577__EARLY_GIMPLE_PAS. val) - 1); - MELT_LOCATION ("warmelt-base.melt:2446:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:2447:/ iniobj"); /*iniobj dobj_2578__EARLY_GIMPLE_PASSES_END_DELAYED_QUEUE*/ /*_.VALDATA___V2604*/ meltfptr[2603] = @@ -40333,7 +40381,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2578__EARLY_GIMPLE_PASSES_END_DELAYED_QUEUE.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - cdat->dobj_2578__EARLY_GIMPLE_PASSES_END_DELAYED_QUEUE.obj_hash = 576908573; + cdat->dobj_2578__EARLY_GIMPLE_PASSES_END_DELAYED_QUEUE.obj_hash = 246148035; cdat->dobj_2578__EARLY_GIMPLE_PASSES_END_DELAYED_QUEUE.obj_len = 5; @@ -40352,7 +40400,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2580__MELT_EARLY_GIMPLE_PASSES_END_RUNNER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2580__MELT_EARLY_GIMPLE_PASSES_END_RUNNER.routdescr, - "MELT_EARLY_GIMPLE_PASSES_END_RUNNER @warmelt-base.melt:2453", + "MELT_EARLY_GIMPLE_PASSES_END_RUNNER @warmelt-base.melt:2454", MELT_ROUTDESCR_LEN - 1); cdat->drout_2580__MELT_EARLY_GIMPLE_PASSES_END_RUNNER.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -40374,7 +40422,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2582__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST. routdescr, - "REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST @warmelt-base.melt:2477", + "REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST @warmelt-base.melt:2478", MELT_ROUTDESCR_LEN - 1); cdat->drout_2582__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_FIRST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -40397,7 +40445,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2584__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST. routdescr, - "REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST @warmelt-base.melt:2502", + "REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST @warmelt-base.melt:2503", MELT_ROUTDESCR_LEN - 1); cdat->drout_2584__REGISTER_EARLY_GIMPLE_PASSES_END_HOOK_LAST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -40443,7 +40491,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "CLASS_VALUE_DESCRIPTOR", sizeof (cdat->dstr_2587__CLASS_VALUE_DESC. val) - 1); - MELT_LOCATION ("warmelt-base.melt:2531:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:2532:/ iniobj"); /*iniobj dobj_2588__CLASS_VALUE_DESCRIPTOR*/ /*_.VALDATA___V2614*/ meltfptr[2613] = @@ -40462,7 +40510,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2588__CLASS_VALUE_DESCRIPTOR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_2588__CLASS_VALUE_DESCRIPTOR.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_2588__CLASS_VALUE_DESCRIPTOR.obj_hash = 566348961; + cdat->dobj_2588__CLASS_VALUE_DESCRIPTOR.obj_hash = 166283671; cdat->dobj_2588__CLASS_VALUE_DESCRIPTOR.obj_len = 8; @@ -40537,7 +40585,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2594__VALDESC_OBJMAGIC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_2594__VALDESC_OBJMAGIC.obj_num = 2; - cdat->dobj_2594__VALDESC_OBJMAGIC.obj_hash = 137021062; + cdat->dobj_2594__VALDESC_OBJMAGIC.obj_hash = 928178340; cdat->dobj_2594__VALDESC_OBJMAGIC.obj_len = 4; @@ -40600,7 +40648,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2598__VALDESC_STRUCT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_2598__VALDESC_STRUCT.obj_num = 3; - cdat->dobj_2598__VALDESC_STRUCT.obj_hash = 505771744; + cdat->dobj_2598__VALDESC_STRUCT.obj_hash = 490348884; cdat->dobj_2598__VALDESC_STRUCT.obj_len = 4; @@ -40663,7 +40711,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2602__VALDESC_UNIONMEM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_2602__VALDESC_UNIONMEM.obj_num = 4; - cdat->dobj_2602__VALDESC_UNIONMEM.obj_hash = 821505572; + cdat->dobj_2602__VALDESC_UNIONMEM.obj_hash = 1030639604; cdat->dobj_2602__VALDESC_UNIONMEM.obj_len = 4; @@ -40726,7 +40774,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2606__VALDESC_GTY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_2606__VALDESC_GTY.obj_num = 5; - cdat->dobj_2606__VALDESC_GTY.obj_hash = 608983629; + cdat->dobj_2606__VALDESC_GTY.obj_hash = 537902505; cdat->dobj_2606__VALDESC_GTY.obj_len = 4; @@ -40789,7 +40837,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2610__VALDESC_MEMBCHUNK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_2610__VALDESC_MEMBCHUNK.obj_num = 6; - cdat->dobj_2610__VALDESC_MEMBCHUNK.obj_hash = 674465180; + cdat->dobj_2610__VALDESC_MEMBCHUNK.obj_hash = 484526086; cdat->dobj_2610__VALDESC_MEMBCHUNK.obj_len = 4; @@ -40852,7 +40900,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2614__VALDESC_DECLCHUNK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_2614__VALDESC_DECLCHUNK.obj_num = 7; - cdat->dobj_2614__VALDESC_DECLCHUNK.obj_hash = 166283671; + cdat->dobj_2614__VALDESC_DECLCHUNK.obj_hash = 649552018; cdat->dobj_2614__VALDESC_DECLCHUNK.obj_len = 4; @@ -40915,7 +40963,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2618__VALDESC_COPYCHUNK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_2618__VALDESC_COPYCHUNK.obj_num = 8; - cdat->dobj_2618__VALDESC_COPYCHUNK.obj_hash = 928178340; + cdat->dobj_2618__VALDESC_COPYCHUNK.obj_hash = 717453677; cdat->dobj_2618__VALDESC_COPYCHUNK.obj_len = 4; @@ -40978,7 +41026,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2622__VALDESC_FORWCHUNK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_2622__VALDESC_FORWCHUNK.obj_num = 9; - cdat->dobj_2622__VALDESC_FORWCHUNK.obj_hash = 490348884; + cdat->dobj_2622__VALDESC_FORWCHUNK.obj_hash = 1026028239; cdat->dobj_2622__VALDESC_FORWCHUNK.obj_len = 4; @@ -41041,7 +41089,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2626__VALDESC_CLONECHUNK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_2626__VALDESC_CLONECHUNK.obj_num = 10; - cdat->dobj_2626__VALDESC_CLONECHUNK.obj_hash = 1030639604; + cdat->dobj_2626__VALDESC_CLONECHUNK.obj_hash = 314676431; cdat->dobj_2626__VALDESC_CLONECHUNK.obj_len = 4; @@ -41085,7 +41133,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "CLASS_VARISIZED_VALUE_DESCRIPTOR", sizeof (cdat->dstr_2629__CLASS_VARISIZED_. val) - 1); - MELT_LOCATION ("warmelt-base.melt:2559:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:2560:/ iniobj"); /*iniobj dobj_2630__CLASS_VARISIZED_VALUE_DESCRIPTOR*/ /*_.VALDATA___V2656*/ meltfptr[2655] = @@ -41105,7 +41153,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_2630__CLASS_VARISIZED_VALUE_DESCRIPTOR.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_2630__CLASS_VARISIZED_VALUE_DESCRIPTOR.obj_hash = 707552370; + cdat->dobj_2630__CLASS_VARISIZED_VALUE_DESCRIPTOR.obj_hash = 526965910; cdat->dobj_2630__CLASS_VARISIZED_VALUE_DESCRIPTOR.obj_len = 8; @@ -41136,7 +41184,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2634__SET_REFERENCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2634__SET_REFERENCE.routdescr, - "SET_REFERENCE @warmelt-base.melt:2571", MELT_ROUTDESCR_LEN - 1); + "SET_REFERENCE @warmelt-base.melt:2572", MELT_ROUTDESCR_LEN - 1); cdat->drout_2634__SET_REFERENCE.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2634__SET_REFERENCE, meltrout_55_warmelt_base_SET_REFERENCE); @@ -41179,7 +41227,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "VALUE_DESCRIPTOR_LIST_REFERENCE", sizeof (cdat->dstr_2637__VALUE_DESCRIPTOR. val) - 1); - MELT_LOCATION ("warmelt-base.melt:2578:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:2579:/ iniobj"); /*iniobj dobj_2638__VALUE_DESCRIPTOR_LIST_REFERENCE*/ /*_.VALDATA___V2664*/ meltfptr[2663] = @@ -41197,7 +41245,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2638__VALUE_DESCRIPTOR_LIST_REFERENCE.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V20*/ meltfptr[19]); - cdat->dobj_2638__VALUE_DESCRIPTOR_LIST_REFERENCE.obj_hash = 219355580; + cdat->dobj_2638__VALUE_DESCRIPTOR_LIST_REFERENCE.obj_hash = 752770404; cdat->dobj_2638__VALUE_DESCRIPTOR_LIST_REFERENCE.obj_len = 1; /*inirout drout_2639__INSTALL_VALUE_DESCRIPTOR */ @@ -41206,7 +41254,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2639__INSTALL_VALUE_DESCRIPTOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2639__INSTALL_VALUE_DESCRIPTOR.routdescr, - "INSTALL_VALUE_DESCRIPTOR @warmelt-base.melt:2583", + "INSTALL_VALUE_DESCRIPTOR @warmelt-base.melt:2584", MELT_ROUTDESCR_LEN - 1); cdat->drout_2639__INSTALL_VALUE_DESCRIPTOR.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_2639__INSTALL_VALUE_DESCRIPTOR, @@ -41225,7 +41273,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->drout_2641__RETRIEVE_VALUE_DESCRIPTOR_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_2641__RETRIEVE_VALUE_DESCRIPTOR_LIST.routdescr, - "RETRIEVE_VALUE_DESCRIPTOR_LIST @warmelt-base.melt:2588", + "RETRIEVE_VALUE_DESCRIPTOR_LIST @warmelt-base.melt:2589", MELT_ROUTDESCR_LEN - 1); cdat->drout_2641__RETRIEVE_VALUE_DESCRIPTOR_LIST.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -41270,7 +41318,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "VALDESC_OBJECT", sizeof (cdat->dstr_2644__VALDESC_OBJECT.val) - 1); - MELT_LOCATION ("warmelt-base.melt:2593:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:2594:/ iniobj"); /*iniobj dobj_2645__VALDESC_OBJECT*/ /*_.VALDATA___V2672*/ meltfptr[2671] = @@ -41287,7 +41335,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2645__VALDESC_OBJECT.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2656*/ meltfptr[2655]); - cdat->dobj_2645__VALDESC_OBJECT.obj_hash = 213640547; + cdat->dobj_2645__VALDESC_OBJECT.obj_hash = 450820623; cdat->dobj_2645__VALDESC_OBJECT.obj_len = 11; @@ -41478,7 +41526,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "VALDESC_MAPOBJECTS", sizeof (cdat->dstr_2656__VALDESC_MAPOBJEC. val) - 1); - MELT_LOCATION ("warmelt-base.melt:2674:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:2675:/ iniobj"); /*iniobj dobj_2657__VALDESC_MAPOBJECTS*/ /*_.VALDATA___V2684*/ meltfptr[2683] = @@ -41495,7 +41543,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2657__VALDESC_MAPOBJECTS.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2657__VALDESC_MAPOBJECTS.obj_hash = 687852814; + cdat->dobj_2657__VALDESC_MAPOBJECTS.obj_hash = 521045545; cdat->dobj_2657__VALDESC_MAPOBJECTS.obj_len = 11; @@ -41734,7 +41782,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "VALDESC_MAPSTRINGS", sizeof (cdat->dstr_2668__VALDESC_MAPSTRIN. val) - 1); - MELT_LOCATION ("warmelt-base.melt:2779:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:2780:/ iniobj"); /*iniobj dobj_2669__VALDESC_MAPSTRINGS*/ /*_.VALDATA___V2696*/ meltfptr[2695] = @@ -41751,7 +41799,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2669__VALDESC_MAPSTRINGS.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2669__VALDESC_MAPSTRINGS.obj_hash = 379770642; + cdat->dobj_2669__VALDESC_MAPSTRINGS.obj_hash = 697201944; cdat->dobj_2669__VALDESC_MAPSTRINGS.obj_len = 11; @@ -41965,7 +42013,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "VALDESC_DECAY", sizeof (cdat->dstr_2679__VALDESC_DECAY.val) - 1); - MELT_LOCATION ("warmelt-base.melt:2879:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:2880:/ iniobj"); /*iniobj dobj_2680__VALDESC_DECAY*/ /*_.VALDATA___V2707*/ meltfptr[2706] = @@ -41982,7 +42030,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2680__VALDESC_DECAY.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2680__VALDESC_DECAY.obj_hash = 606619256; + cdat->dobj_2680__VALDESC_DECAY.obj_hash = 535020739; cdat->dobj_2680__VALDESC_DECAY.obj_len = 11; @@ -42132,7 +42180,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "VALDESC_MULTIPLE", sizeof (cdat->dstr_2692__VALDESC_MULTIPLE. val) - 1); - MELT_LOCATION ("warmelt-base.melt:2907:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:2908:/ iniobj"); /*iniobj dobj_2693__VALDESC_MULTIPLE*/ /*_.VALDATA___V2720*/ meltfptr[2719] = @@ -42149,7 +42197,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2693__VALDESC_MULTIPLE.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2656*/ meltfptr[2655]); - cdat->dobj_2693__VALDESC_MULTIPLE.obj_hash = 576321626; + cdat->dobj_2693__VALDESC_MULTIPLE.obj_hash = 1019064075; cdat->dobj_2693__VALDESC_MULTIPLE.obj_len = 11; @@ -42320,7 +42368,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, "VALDESC_CLOSURE", sizeof (cdat->dstr_2704__VALDESC_CLOSURE. val) - 1); - MELT_LOCATION ("warmelt-base.melt:2965:/ iniobj"); + MELT_LOCATION ("warmelt-base.melt:2966:/ iniobj"); /*iniobj dobj_2705__VALDESC_CLOSURE*/ /*_.VALDATA___V2732*/ meltfptr[2731] = @@ -42337,7 +42385,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2705__VALDESC_CLOSURE.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2656*/ meltfptr[2655]); - cdat->dobj_2705__VALDESC_CLOSURE.obj_hash = 569425025; + cdat->dobj_2705__VALDESC_CLOSURE.obj_hash = 601365048; cdat->dobj_2705__VALDESC_CLOSURE.obj_len = 11; @@ -42400,10 +42448,10 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, " /* decl VALDESC_CLOSURE in warmelt-base.melt */\n#define MELT_C" "LOSURE_STRUCT(N) { \\\n meltobject_ptr_t discr; " " \\\n meltroutine_ptr_t rout;\t\t\t\\\n unsign" - "ed nbval; \\\n melt_ptr_t tabval[N]", + "ed nbval; \\\n melt_ptr_t tabval[N+", /*big */ 256); /*end big inistring */ strncpy (cdat->dstr_2711__decl_VALDESC.val + 256, - "; \\\n long _gap; }\n ", + "1]; }\n ", sizeof (cdat->dstr_2711__decl_VALDESC.val) - 257); @@ -42527,7 +42575,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2717__VALDESC_ROUTINE.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2656*/ meltfptr[2655]); - cdat->dobj_2717__VALDESC_ROUTINE.obj_hash = 1035822801; + cdat->dobj_2717__VALDESC_ROUTINE.obj_hash = 584928326; cdat->dobj_2717__VALDESC_ROUTINE.obj_len = 11; @@ -42702,7 +42750,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2728__VALDESC_BUCKETLONGS.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2656*/ meltfptr[2655]); - cdat->dobj_2728__VALDESC_BUCKETLONGS.obj_hash = 859272230; + cdat->dobj_2728__VALDESC_BUCKETLONGS.obj_hash = 278577850; cdat->dobj_2728__VALDESC_BUCKETLONGS.obj_len = 11; @@ -42936,7 +42984,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2740__VALDESC_STRING.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2656*/ meltfptr[2655]); - cdat->dobj_2740__VALDESC_STRING.obj_hash = 356470884; + cdat->dobj_2740__VALDESC_STRING.obj_hash = 751329141; cdat->dobj_2740__VALDESC_STRING.obj_len = 11; @@ -43086,7 +43134,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2751__VALDESC_STRBUF.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2751__VALDESC_STRBUF.obj_hash = 186854; + cdat->dobj_2751__VALDESC_STRBUF.obj_hash = 30722930; cdat->dobj_2751__VALDESC_STRBUF.obj_len = 11; @@ -43265,7 +43313,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2761__VALDESC_PAIR.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2761__VALDESC_PAIR.obj_hash = 1019152282; + cdat->dobj_2761__VALDESC_PAIR.obj_hash = 329912892; cdat->dobj_2761__VALDESC_PAIR.obj_len = 11; @@ -43418,7 +43466,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2773__VALDESC_LIST.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2773__VALDESC_LIST.obj_hash = 132227472; + cdat->dobj_2773__VALDESC_LIST.obj_hash = 431938226; cdat->dobj_2773__VALDESC_LIST.obj_len = 11; @@ -43596,7 +43644,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2785__VALDESC_INT.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2785__VALDESC_INT.obj_hash = 469097501; + cdat->dobj_2785__VALDESC_INT.obj_hash = 548170244; cdat->dobj_2785__VALDESC_INT.obj_len = 11; @@ -43736,7 +43784,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2795__VALDESC_MIXINT.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2795__VALDESC_MIXINT.obj_hash = 23038116; + cdat->dobj_2795__VALDESC_MIXINT.obj_hash = 782232755; cdat->dobj_2795__VALDESC_MIXINT.obj_len = 11; @@ -43870,7 +43918,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2805__VALDESC_MIXLOC.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2805__VALDESC_MIXLOC.obj_hash = 217238940; + cdat->dobj_2805__VALDESC_MIXLOC.obj_hash = 559158240; cdat->dobj_2805__VALDESC_MIXLOC.obj_len = 11; @@ -44004,7 +44052,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2815__VALDESC_MIXBIGINT.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2656*/ meltfptr[2655]); - cdat->dobj_2815__VALDESC_MIXBIGINT.obj_hash = 353281975; + cdat->dobj_2815__VALDESC_MIXBIGINT.obj_hash = 436811590; cdat->dobj_2815__VALDESC_MIXBIGINT.obj_len = 11; @@ -44161,7 +44209,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2825__VALDESC_REAL.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2825__VALDESC_REAL.obj_hash = 324123367; + cdat->dobj_2825__VALDESC_REAL.obj_hash = 517973311; cdat->dobj_2825__VALDESC_REAL.obj_len = 11; @@ -44284,7 +44332,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2834__VALDESC_SPECIAL_FILE.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2834__VALDESC_SPECIAL_FILE.obj_hash = 714038485; + cdat->dobj_2834__VALDESC_SPECIAL_FILE.obj_hash = 752134683; cdat->dobj_2834__VALDESC_SPECIAL_FILE.obj_len = 11; @@ -44432,7 +44480,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2845__VALDESC_SPECIAL_RAW_FILE.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2845__VALDESC_SPECIAL_RAW_FILE.obj_hash = 647550546; + cdat->dobj_2845__VALDESC_SPECIAL_RAW_FILE.obj_hash = 718824741; cdat->dobj_2845__VALDESC_SPECIAL_RAW_FILE.obj_len = 11; @@ -44584,7 +44632,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2856__VALDESC_SPECIAL_MPFR.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2856__VALDESC_SPECIAL_MPFR.obj_hash = 733828493; + cdat->dobj_2856__VALDESC_SPECIAL_MPFR.obj_hash = 1007858180; cdat->dobj_2856__VALDESC_SPECIAL_MPFR.obj_len = 11; @@ -44732,7 +44780,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2867__VALDESC_SPECIAL_PPL_COEFFICIENT.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2867__VALDESC_SPECIAL_PPL_COEFFICIENT.obj_hash = 217730336; + cdat->dobj_2867__VALDESC_SPECIAL_PPL_COEFFICIENT.obj_hash = 1053132861; cdat->dobj_2867__VALDESC_SPECIAL_PPL_COEFFICIENT.obj_len = 11; @@ -44886,7 +44934,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2878__VALDESC_SPECIAL_PPL_LINEAR_EXPRESSION.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2878__VALDESC_SPECIAL_PPL_LINEAR_EXPRESSION.obj_hash = 527494760; + cdat->dobj_2878__VALDESC_SPECIAL_PPL_LINEAR_EXPRESSION.obj_hash = 630313830; cdat->dobj_2878__VALDESC_SPECIAL_PPL_LINEAR_EXPRESSION.obj_len = 11; @@ -45039,7 +45087,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2889__VALDESC_SPECIAL_PPL_CONSTRAINT.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2889__VALDESC_SPECIAL_PPL_CONSTRAINT.obj_hash = 749788075; + cdat->dobj_2889__VALDESC_SPECIAL_PPL_CONSTRAINT.obj_hash = 339170283; cdat->dobj_2889__VALDESC_SPECIAL_PPL_CONSTRAINT.obj_len = 11; @@ -45192,7 +45240,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2900__VALDESC_SPECIAL_PPL_CONSTRAINT_SYSTEM.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2900__VALDESC_SPECIAL_PPL_CONSTRAINT_SYSTEM.obj_hash = 700253233; + cdat->dobj_2900__VALDESC_SPECIAL_PPL_CONSTRAINT_SYSTEM.obj_hash = 173468289; cdat->dobj_2900__VALDESC_SPECIAL_PPL_CONSTRAINT_SYSTEM.obj_len = 11; @@ -45345,7 +45393,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2911__VALDESC_SPECIAL_PPL_GENERATOR.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2911__VALDESC_SPECIAL_PPL_GENERATOR.obj_hash = 182651271; + cdat->dobj_2911__VALDESC_SPECIAL_PPL_GENERATOR.obj_hash = 846178956; cdat->dobj_2911__VALDESC_SPECIAL_PPL_GENERATOR.obj_len = 11; @@ -45497,7 +45545,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2922__VALDESC_SPECIAL_PPL_GENERATOR_SYSTEM.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2922__VALDESC_SPECIAL_PPL_GENERATOR_SYSTEM.obj_hash = 708140158; + cdat->dobj_2922__VALDESC_SPECIAL_PPL_GENERATOR_SYSTEM.obj_hash = 856046795; cdat->dobj_2922__VALDESC_SPECIAL_PPL_GENERATOR_SYSTEM.obj_len = 11; @@ -45650,7 +45698,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2933__VALDESC_SPECIAL_PPL_POLYHEDRON.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - cdat->dobj_2933__VALDESC_SPECIAL_PPL_POLYHEDRON.obj_hash = 1022808272; + cdat->dobj_2933__VALDESC_SPECIAL_PPL_POLYHEDRON.obj_hash = 734521317; cdat->dobj_2933__VALDESC_SPECIAL_PPL_POLYHEDRON.obj_len = 11; @@ -45804,7 +45852,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2944__VARIADIC_INDEX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2944__VARIADIC_INDEX.obj_hash = 267441901; + cdat->dobj_2944__VARIADIC_INDEX.obj_hash = 837998464; cdat->dobj_2944__VARIADIC_INDEX.obj_len = 5; /*inimult dtup_2945__VARIADIC_INDEX */ @@ -45888,7 +45936,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2951__VARIADIC_LENGTH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2951__VARIADIC_LENGTH.obj_hash = 207895535; + cdat->dobj_2951__VARIADIC_LENGTH.obj_hash = 121473803; cdat->dobj_2951__VARIADIC_LENGTH.obj_len = 5; /*inimult dtup_2952__VARIADIC_LENGTH */ @@ -45972,7 +46020,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2958__VARIADIC_SKIP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2958__VARIADIC_SKIP.obj_hash = 587094456; + cdat->dobj_2958__VARIADIC_SKIP.obj_hash = 773813492; cdat->dobj_2958__VARIADIC_SKIP.obj_len = 5; /*inimult dtup_2959__VARIADIC_SKIP */ @@ -46034,7 +46082,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2963.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2963.obj_num = 0; - cdat->dobj_2963.obj_hash = 910588511; + cdat->dobj_2963.obj_hash = 86498343; cdat->dobj_2963.obj_len = 2; @@ -46124,7 +46172,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2970__VARIADIC_TYPE_CODE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2970__VARIADIC_TYPE_CODE.obj_hash = 868789314; + cdat->dobj_2970__VARIADIC_TYPE_CODE.obj_hash = 251721737; cdat->dobj_2970__VARIADIC_TYPE_CODE.obj_len = 5; /*inimult dtup_2971__VARIADIC_TYPE_CODE */ @@ -46158,7 +46206,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2973.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2973.obj_num = 0; - cdat->dobj_2973.obj_hash = 16222807; + cdat->dobj_2973.obj_hash = 908790017; cdat->dobj_2973.obj_len = 2; @@ -46268,7 +46316,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2982__VARIADIC_CTYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2982__VARIADIC_CTYPE.obj_hash = 211358820; + cdat->dobj_2982__VARIADIC_CTYPE.obj_hash = 404083580; cdat->dobj_2982__VARIADIC_CTYPE.obj_len = 5; /*inimult dtup_2983__VARIADIC_CTYPE */ @@ -46302,7 +46350,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2985.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2985.obj_num = 0; - cdat->dobj_2985.obj_hash = 680775494; + cdat->dobj_2985.obj_hash = 798808680; cdat->dobj_2985.obj_len = 2; @@ -46401,7 +46449,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_2993__POLL_ALL_INPUTS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_2993__POLL_ALL_INPUTS.obj_hash = 889792730; + cdat->dobj_2993__POLL_ALL_INPUTS.obj_hash = 487973146; cdat->dobj_2993__POLL_ALL_INPUTS.obj_len = 5; /*inimult dtup_2994__POLL_ALL_INPUTS */ @@ -46464,7 +46512,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_2998.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_2998.obj_num = 0; - cdat->dobj_2998.obj_hash = 634056015; + cdat->dobj_2998.obj_hash = 1036817542; cdat->dobj_2998.obj_len = 2; @@ -46541,7 +46589,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_3004__INCREMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_3004__INCREMENT.obj_hash = 856499202; + cdat->dobj_3004__INCREMENT.obj_hash = 326030335; cdat->dobj_3004__INCREMENT.obj_len = 5; /*inimult dtup_3005__INCREMENT */ @@ -46603,7 +46651,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_3009.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_3009.obj_num = 0; - cdat->dobj_3009.obj_hash = 70826040; + cdat->dobj_3009.obj_hash = 521387887; cdat->dobj_3009.obj_len = 2; @@ -46653,7 +46701,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, cdat->dobj_3012.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_3012.obj_num = 1; - cdat->dobj_3012.obj_hash = 713677786; + cdat->dobj_3012.obj_hash = 128340609; cdat->dobj_3012.obj_len = 2; @@ -46705,7 +46753,7 @@ initialize_module_meltdata_warmelt_base (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_3017__BLOCK_SIGNALS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CITERATOR)))); - cdat->dobj_3017__BLOCK_SIGNALS.obj_hash = 767751677; + cdat->dobj_3017__BLOCK_SIGNALS.obj_hash = 810376507; cdat->dobj_3017__BLOCK_SIGNALS.obj_len = 7; @@ -48507,8 +48555,7 @@ start_module_melt (void *modargp_) melt_topframe = (struct melt_callframe_st *) &meltfram__; /**initial routine prologue**/ /* set initial frame marking */ - ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = - /*minihash */ -4087; + ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = /*minihash */ -615; ((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout = meltmod__warmelt_base__forward_or_mark_module_start_frame; /**COMMENT: get previous environment **/ ; @@ -95220,7 +95267,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1790*/ meltfptr[1789]); - MELT_LOCATION ("warmelt-base.melt:1014:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1015:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95241,7 +95288,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1794*/ meltfptr[1793]); - MELT_LOCATION ("warmelt-base.melt:1014:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1015:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95259,7 +95306,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1794*/ meltfptr[1793]); - MELT_LOCATION ("warmelt-base.melt:1014:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1015:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95295,7 +95342,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1796*/ meltfptr[1795]); - MELT_LOCATION ("warmelt-base.melt:1014:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1015:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95313,7 +95360,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1796*/ meltfptr[1795]); - MELT_LOCATION ("warmelt-base.melt:1014:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1015:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1792*/ meltfptr[1791]); @@ -95337,7 +95384,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1797*/ meltfptr[1796]); - MELT_LOCATION ("warmelt-base.melt:1021:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1022:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95355,7 +95402,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1800*/ meltfptr[1799]); - MELT_LOCATION ("warmelt-base.melt:1021:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1022:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95373,7 +95420,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V32*/ meltfptr[31]); - MELT_LOCATION ("warmelt-base.melt:1021:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1022:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95392,7 +95439,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1021:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1022:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1801*/ meltfptr[1800]); @@ -95414,7 +95461,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1802*/ meltfptr[1801]); - MELT_LOCATION ("warmelt-base.melt:1021:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1022:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95432,7 +95479,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1802*/ meltfptr[1801]); - MELT_LOCATION ("warmelt-base.melt:1021:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1022:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95496,7 +95543,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1805*/ meltfptr[1804]); - MELT_LOCATION ("warmelt-base.melt:1021:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1022:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95514,7 +95561,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1805*/ meltfptr[1804]); - MELT_LOCATION ("warmelt-base.melt:1021:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1022:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1799*/ meltfptr[1798]); @@ -95538,7 +95585,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1806*/ meltfptr[1805]); - MELT_LOCATION ("warmelt-base.melt:1025:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1026:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95556,7 +95603,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1809*/ meltfptr[1808]); - MELT_LOCATION ("warmelt-base.melt:1025:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1026:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95574,7 +95621,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V32*/ meltfptr[31]); - MELT_LOCATION ("warmelt-base.melt:1025:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1026:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95593,7 +95640,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1025:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1026:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1810*/ meltfptr[1809]); @@ -95615,7 +95662,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1811*/ meltfptr[1810]); - MELT_LOCATION ("warmelt-base.melt:1025:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1026:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95633,7 +95680,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1811*/ meltfptr[1810]); - MELT_LOCATION ("warmelt-base.melt:1025:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1026:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95697,7 +95744,7 @@ meltmod__warmelt_base__initialmeltchunk_25 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1814*/ meltfptr[1813]); - MELT_LOCATION ("warmelt-base.melt:1025:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1026:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95727,7 +95774,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L - MELT_LOCATION ("warmelt-base.melt:1025:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1026:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1808*/ meltfptr[1807]); @@ -95751,7 +95798,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1815*/ meltfptr[1814]); - MELT_LOCATION ("warmelt-base.melt:1030:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1031:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95769,7 +95816,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1818*/ meltfptr[1817]); - MELT_LOCATION ("warmelt-base.melt:1030:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1031:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95787,7 +95834,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1030:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1031:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95806,12 +95853,12 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1030:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1031:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1819*/ meltfptr[1818]); - MELT_LOCATION ("warmelt-base.melt:1030:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1031:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95829,7 +95876,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); - MELT_LOCATION ("warmelt-base.melt:1030:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1031:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95848,7 +95895,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_CSTRING)))); - MELT_LOCATION ("warmelt-base.melt:1030:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1031:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1820*/ meltfptr[1819]); @@ -95884,7 +95931,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1821*/ meltfptr[1820]); - MELT_LOCATION ("warmelt-base.melt:1030:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1031:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95902,7 +95949,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1821*/ meltfptr[1820]); - MELT_LOCATION ("warmelt-base.melt:1030:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1031:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -95994,7 +96041,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1825*/ meltfptr[1824]); - MELT_LOCATION ("warmelt-base.melt:1030:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1031:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96012,7 +96059,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1825*/ meltfptr[1824]); - MELT_LOCATION ("warmelt-base.melt:1030:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1031:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1817*/ meltfptr[1816]); @@ -96036,7 +96083,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1826*/ meltfptr[1825]); - MELT_LOCATION ("warmelt-base.melt:1035:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1036:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96054,7 +96101,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1829*/ meltfptr[1828]); - MELT_LOCATION ("warmelt-base.melt:1035:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1036:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96072,7 +96119,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1035:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1036:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96091,7 +96138,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1035:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1036:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1830*/ meltfptr[1829]); @@ -96113,7 +96160,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1831*/ meltfptr[1830]); - MELT_LOCATION ("warmelt-base.melt:1035:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1036:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96131,7 +96178,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1831*/ meltfptr[1830]); - MELT_LOCATION ("warmelt-base.melt:1035:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1036:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96195,7 +96242,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1834*/ meltfptr[1833]); - MELT_LOCATION ("warmelt-base.melt:1035:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1036:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96213,7 +96260,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1834*/ meltfptr[1833]); - MELT_LOCATION ("warmelt-base.melt:1035:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1036:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1828*/ meltfptr[1827]); @@ -96237,7 +96284,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1835*/ meltfptr[1834]); - MELT_LOCATION ("warmelt-base.melt:1041:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1042:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96255,7 +96302,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1838*/ meltfptr[1837]); - MELT_LOCATION ("warmelt-base.melt:1041:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1042:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96273,7 +96320,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1041:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1042:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96292,12 +96339,12 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1041:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1042:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1839*/ meltfptr[1838]); - MELT_LOCATION ("warmelt-base.melt:1041:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1042:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96315,7 +96362,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); - MELT_LOCATION ("warmelt-base.melt:1041:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1042:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96334,7 +96381,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1041:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1042:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1840*/ meltfptr[1839]); @@ -96370,7 +96417,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1841*/ meltfptr[1840]); - MELT_LOCATION ("warmelt-base.melt:1041:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1042:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96388,7 +96435,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1841*/ meltfptr[1840]); - MELT_LOCATION ("warmelt-base.melt:1041:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1042:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96480,7 +96527,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1845*/ meltfptr[1844]); - MELT_LOCATION ("warmelt-base.melt:1041:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1042:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96498,7 +96545,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1845*/ meltfptr[1844]); - MELT_LOCATION ("warmelt-base.melt:1041:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1042:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1837*/ meltfptr[1836]); @@ -96522,7 +96569,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1846*/ meltfptr[1845]); - MELT_LOCATION ("warmelt-base.melt:1048:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1049:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96540,7 +96587,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1849*/ meltfptr[1848]); - MELT_LOCATION ("warmelt-base.melt:1048:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1049:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96558,7 +96605,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1048:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1049:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96577,7 +96624,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1048:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1049:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1850*/ meltfptr[1849]); @@ -96601,7 +96648,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1852*/ meltfptr[1851]); - MELT_LOCATION ("warmelt-base.melt:1048:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1049:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96619,7 +96666,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1852*/ meltfptr[1851]); - MELT_LOCATION ("warmelt-base.melt:1048:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1049:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96638,7 +96685,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1048:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1049:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1851*/ meltfptr[1850]); @@ -96674,7 +96721,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1854*/ meltfptr[1853]); - MELT_LOCATION ("warmelt-base.melt:1048:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1049:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96692,7 +96739,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1854*/ meltfptr[1853]); - MELT_LOCATION ("warmelt-base.melt:1048:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1049:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96812,7 +96859,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1859*/ meltfptr[1858]); - MELT_LOCATION ("warmelt-base.melt:1048:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1049:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96830,7 +96877,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1859*/ meltfptr[1858]); - MELT_LOCATION ("warmelt-base.melt:1048:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1049:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1848*/ meltfptr[1847]); @@ -96854,7 +96901,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1860*/ meltfptr[1859]); - MELT_LOCATION ("warmelt-base.melt:1060:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1061:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96872,7 +96919,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1863*/ meltfptr[1862]); - MELT_LOCATION ("warmelt-base.melt:1060:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1061:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96890,7 +96937,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1060:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1061:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96909,12 +96956,12 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1060:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1061:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1864*/ meltfptr[1863]); - MELT_LOCATION ("warmelt-base.melt:1060:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1061:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96932,7 +96979,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1852*/ meltfptr[1851]); - MELT_LOCATION ("warmelt-base.melt:1060:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1061:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -96951,7 +96998,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1060:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1061:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1865*/ meltfptr[1864]); @@ -96987,7 +97034,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1866*/ meltfptr[1865]); - MELT_LOCATION ("warmelt-base.melt:1060:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1061:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97005,7 +97052,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1866*/ meltfptr[1865]); - MELT_LOCATION ("warmelt-base.melt:1060:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1061:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97125,7 +97172,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1871*/ meltfptr[1870]); - MELT_LOCATION ("warmelt-base.melt:1060:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1061:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97143,7 +97190,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1871*/ meltfptr[1870]); - MELT_LOCATION ("warmelt-base.melt:1060:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1061:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1862*/ meltfptr[1861]); @@ -97167,7 +97214,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1872*/ meltfptr[1871]); - MELT_LOCATION ("warmelt-base.melt:1069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1070:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97185,7 +97232,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1875*/ meltfptr[1874]); - MELT_LOCATION ("warmelt-base.melt:1069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1070:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97203,7 +97250,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1070:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97222,12 +97269,12 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1070:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1876*/ meltfptr[1875]); - MELT_LOCATION ("warmelt-base.melt:1069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1070:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97245,7 +97292,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1852*/ meltfptr[1851]); - MELT_LOCATION ("warmelt-base.melt:1069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1070:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97264,7 +97311,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1070:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1877*/ meltfptr[1876]); @@ -97300,7 +97347,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1878*/ meltfptr[1877]); - MELT_LOCATION ("warmelt-base.melt:1069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1070:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97318,7 +97365,7 @@ meltmod__warmelt_base__initialmeltchunk_26 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1878*/ meltfptr[1877]); - MELT_LOCATION ("warmelt-base.melt:1069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1070:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97450,7 +97497,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1883*/ meltfptr[1882]); - MELT_LOCATION ("warmelt-base.melt:1069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1070:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97468,7 +97515,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1883*/ meltfptr[1882]); - MELT_LOCATION ("warmelt-base.melt:1069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1070:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1874*/ meltfptr[1873]); @@ -97492,7 +97539,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1884*/ meltfptr[1883]); - MELT_LOCATION ("warmelt-base.melt:1079:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1080:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97510,7 +97557,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1887*/ meltfptr[1886]); - MELT_LOCATION ("warmelt-base.melt:1079:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1080:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97528,7 +97575,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1079:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1080:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97547,7 +97594,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1079:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1080:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1888*/ meltfptr[1887]); @@ -97571,7 +97618,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1890*/ meltfptr[1889]); - MELT_LOCATION ("warmelt-base.melt:1079:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1080:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97589,7 +97636,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1890*/ meltfptr[1889]); - MELT_LOCATION ("warmelt-base.melt:1079:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1080:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97608,7 +97655,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); - MELT_LOCATION ("warmelt-base.melt:1079:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1080:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1889*/ meltfptr[1888]); @@ -97644,7 +97691,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1892*/ meltfptr[1891]); - MELT_LOCATION ("warmelt-base.melt:1079:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1080:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97662,7 +97709,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1892*/ meltfptr[1891]); - MELT_LOCATION ("warmelt-base.melt:1079:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1080:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97754,7 +97801,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1896*/ meltfptr[1895]); - MELT_LOCATION ("warmelt-base.melt:1079:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1080:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97772,7 +97819,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1896*/ meltfptr[1895]); - MELT_LOCATION ("warmelt-base.melt:1079:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1080:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1886*/ meltfptr[1885]); @@ -97796,7 +97843,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1897*/ meltfptr[1896]); - MELT_LOCATION ("warmelt-base.melt:1085:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1086:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97814,7 +97861,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1900*/ meltfptr[1899]); - MELT_LOCATION ("warmelt-base.melt:1085:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1086:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97832,7 +97879,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1085:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1086:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97851,12 +97898,12 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1085:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1086:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1901*/ meltfptr[1900]); - MELT_LOCATION ("warmelt-base.melt:1085:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1086:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97874,7 +97921,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1890*/ meltfptr[1889]); - MELT_LOCATION ("warmelt-base.melt:1085:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1086:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97893,7 +97940,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); - MELT_LOCATION ("warmelt-base.melt:1085:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1086:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1902*/ meltfptr[1901]); @@ -97929,7 +97976,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1903*/ meltfptr[1902]); - MELT_LOCATION ("warmelt-base.melt:1085:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1086:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -97947,7 +97994,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1903*/ meltfptr[1902]); - MELT_LOCATION ("warmelt-base.melt:1085:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1086:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98039,7 +98086,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1907*/ meltfptr[1906]); - MELT_LOCATION ("warmelt-base.melt:1085:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1086:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98057,7 +98104,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1907*/ meltfptr[1906]); - MELT_LOCATION ("warmelt-base.melt:1085:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1086:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1899*/ meltfptr[1898]); @@ -98081,7 +98128,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1908*/ meltfptr[1907]); - MELT_LOCATION ("warmelt-base.melt:1091:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1092:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98099,7 +98146,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1911*/ meltfptr[1910]); - MELT_LOCATION ("warmelt-base.melt:1091:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1092:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98117,7 +98164,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1091:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1092:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98136,7 +98183,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1091:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1092:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1912*/ meltfptr[1911]); @@ -98160,7 +98207,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1914*/ meltfptr[1913]); - MELT_LOCATION ("warmelt-base.melt:1091:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1092:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98178,7 +98225,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1914*/ meltfptr[1913]); - MELT_LOCATION ("warmelt-base.melt:1091:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1092:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98197,7 +98244,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1091:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1092:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1913*/ meltfptr[1912]); @@ -98233,7 +98280,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1916*/ meltfptr[1915]); - MELT_LOCATION ("warmelt-base.melt:1091:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1092:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98251,7 +98298,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1916*/ meltfptr[1915]); - MELT_LOCATION ("warmelt-base.melt:1091:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1092:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98343,7 +98390,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1920*/ meltfptr[1919]); - MELT_LOCATION ("warmelt-base.melt:1091:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1092:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98361,7 +98408,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1920*/ meltfptr[1919]); - MELT_LOCATION ("warmelt-base.melt:1091:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1092:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1910*/ meltfptr[1909]); @@ -98385,7 +98432,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1921*/ meltfptr[1920]); - MELT_LOCATION ("warmelt-base.melt:1098:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1099:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98403,7 +98450,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1924*/ meltfptr[1923]); - MELT_LOCATION ("warmelt-base.melt:1098:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1099:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98421,7 +98468,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1098:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1099:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98440,12 +98487,12 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1098:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1099:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1925*/ meltfptr[1924]); - MELT_LOCATION ("warmelt-base.melt:1098:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1099:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98463,7 +98510,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); - MELT_LOCATION ("warmelt-base.melt:1098:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1099:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98482,7 +98529,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1098:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1099:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1926*/ meltfptr[1925]); @@ -98518,7 +98565,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1927*/ meltfptr[1926]); - MELT_LOCATION ("warmelt-base.melt:1098:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1099:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98536,7 +98583,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1927*/ meltfptr[1926]); - MELT_LOCATION ("warmelt-base.melt:1098:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1099:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98628,7 +98675,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1931*/ meltfptr[1930]); - MELT_LOCATION ("warmelt-base.melt:1098:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1099:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98646,7 +98693,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1931*/ meltfptr[1930]); - MELT_LOCATION ("warmelt-base.melt:1098:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1099:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1923*/ meltfptr[1922]); @@ -98670,7 +98717,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1932*/ meltfptr[1931]); - MELT_LOCATION ("warmelt-base.melt:1104:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1105:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98688,7 +98735,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1935*/ meltfptr[1934]); - MELT_LOCATION ("warmelt-base.melt:1104:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1105:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98706,7 +98753,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1104:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1105:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98725,12 +98772,12 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1104:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1105:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1936*/ meltfptr[1935]); - MELT_LOCATION ("warmelt-base.melt:1104:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1105:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98748,7 +98795,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1914*/ meltfptr[1913]); - MELT_LOCATION ("warmelt-base.melt:1104:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1105:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98767,7 +98814,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1104:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1105:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1937*/ meltfptr[1936]); @@ -98803,7 +98850,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1938*/ meltfptr[1937]); - MELT_LOCATION ("warmelt-base.melt:1104:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1105:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98821,7 +98868,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1938*/ meltfptr[1937]); - MELT_LOCATION ("warmelt-base.melt:1104:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1105:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98913,7 +98960,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1942*/ meltfptr[1941]); - MELT_LOCATION ("warmelt-base.melt:1104:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1105:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98931,7 +98978,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1942*/ meltfptr[1941]); - MELT_LOCATION ("warmelt-base.melt:1104:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1105:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1934*/ meltfptr[1933]); @@ -98955,7 +99002,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1943*/ meltfptr[1942]); - MELT_LOCATION ("warmelt-base.melt:1110:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1111:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98973,7 +99020,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1946*/ meltfptr[1945]); - MELT_LOCATION ("warmelt-base.melt:1110:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1111:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -98991,7 +99038,7 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1110:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1111:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99010,12 +99057,12 @@ meltmod__warmelt_base__initialmeltchunk_27 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1110:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1111:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1947*/ meltfptr[1946]); - MELT_LOCATION ("warmelt-base.melt:1110:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1111:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99045,7 +99092,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L - MELT_LOCATION ("warmelt-base.melt:1110:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1111:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99064,7 +99111,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1110:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1111:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1948*/ meltfptr[1947]); @@ -99100,7 +99147,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1949*/ meltfptr[1948]); - MELT_LOCATION ("warmelt-base.melt:1110:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1111:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99118,7 +99165,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1949*/ meltfptr[1948]); - MELT_LOCATION ("warmelt-base.melt:1110:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1111:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99210,7 +99257,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1953*/ meltfptr[1952]); - MELT_LOCATION ("warmelt-base.melt:1110:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1111:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99228,7 +99275,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1953*/ meltfptr[1952]); - MELT_LOCATION ("warmelt-base.melt:1110:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1111:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1945*/ meltfptr[1944]); @@ -99252,7 +99299,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1954*/ meltfptr[1953]); - MELT_LOCATION ("warmelt-base.melt:1116:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1117:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99270,7 +99317,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1957*/ meltfptr[1956]); - MELT_LOCATION ("warmelt-base.melt:1116:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1117:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99288,7 +99335,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1116:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1117:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99307,12 +99354,12 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1116:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1117:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1958*/ meltfptr[1957]); - MELT_LOCATION ("warmelt-base.melt:1116:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1117:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99330,7 +99377,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1914*/ meltfptr[1913]); - MELT_LOCATION ("warmelt-base.melt:1116:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1117:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99349,7 +99396,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1116:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1117:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1959*/ meltfptr[1958]); @@ -99385,7 +99432,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1960*/ meltfptr[1959]); - MELT_LOCATION ("warmelt-base.melt:1116:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1117:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99403,7 +99450,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1960*/ meltfptr[1959]); - MELT_LOCATION ("warmelt-base.melt:1116:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1117:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99495,7 +99542,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1964*/ meltfptr[1963]); - MELT_LOCATION ("warmelt-base.melt:1116:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1117:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99513,7 +99560,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1964*/ meltfptr[1963]); - MELT_LOCATION ("warmelt-base.melt:1116:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1117:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1956*/ meltfptr[1955]); @@ -99537,7 +99584,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1965*/ meltfptr[1964]); - MELT_LOCATION ("warmelt-base.melt:1122:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1123:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99555,7 +99602,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1968*/ meltfptr[1967]); - MELT_LOCATION ("warmelt-base.melt:1122:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1123:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99573,7 +99620,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1122:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1123:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99592,7 +99639,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1122:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1123:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1969*/ meltfptr[1968]); @@ -99616,7 +99663,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1971*/ meltfptr[1970]); - MELT_LOCATION ("warmelt-base.melt:1122:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1123:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99634,7 +99681,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1971*/ meltfptr[1970]); - MELT_LOCATION ("warmelt-base.melt:1122:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1123:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99653,7 +99700,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_CSTRING)))); - MELT_LOCATION ("warmelt-base.melt:1122:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1123:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1970*/ meltfptr[1969]); @@ -99689,7 +99736,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1973*/ meltfptr[1972]); - MELT_LOCATION ("warmelt-base.melt:1122:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1123:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99707,7 +99754,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1973*/ meltfptr[1972]); - MELT_LOCATION ("warmelt-base.melt:1122:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1123:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99799,7 +99846,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1977*/ meltfptr[1976]); - MELT_LOCATION ("warmelt-base.melt:1122:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1123:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99817,7 +99864,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1977*/ meltfptr[1976]); - MELT_LOCATION ("warmelt-base.melt:1122:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1123:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1967*/ meltfptr[1966]); @@ -99841,7 +99888,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1978*/ meltfptr[1977]); - MELT_LOCATION ("warmelt-base.melt:1129:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1130:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99859,7 +99906,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1981*/ meltfptr[1980]); - MELT_LOCATION ("warmelt-base.melt:1129:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1130:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99877,7 +99924,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1129:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1130:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99896,12 +99943,12 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1129:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1130:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1982*/ meltfptr[1981]); - MELT_LOCATION ("warmelt-base.melt:1129:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1130:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99919,7 +99966,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); - MELT_LOCATION ("warmelt-base.melt:1129:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1130:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99938,7 +99985,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1129:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1130:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1983*/ meltfptr[1982]); @@ -99974,7 +100021,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1984*/ meltfptr[1983]); - MELT_LOCATION ("warmelt-base.melt:1129:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1130:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -99992,7 +100039,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1984*/ meltfptr[1983]); - MELT_LOCATION ("warmelt-base.melt:1129:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1130:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100084,7 +100131,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1988*/ meltfptr[1987]); - MELT_LOCATION ("warmelt-base.melt:1129:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1130:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100102,7 +100149,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V1988*/ meltfptr[1987]); - MELT_LOCATION ("warmelt-base.melt:1129:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1130:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1980*/ meltfptr[1979]); @@ -100126,7 +100173,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1989*/ meltfptr[1988]); - MELT_LOCATION ("warmelt-base.melt:1137:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1138:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100144,7 +100191,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1992*/ meltfptr[1991]); - MELT_LOCATION ("warmelt-base.melt:1137:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1138:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100162,7 +100209,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1137:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1138:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100181,12 +100228,12 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1137:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1138:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1993*/ meltfptr[1992]); - MELT_LOCATION ("warmelt-base.melt:1137:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1138:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100204,7 +100251,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); - MELT_LOCATION ("warmelt-base.melt:1137:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1138:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100223,7 +100270,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1137:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1138:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1994*/ meltfptr[1993]); @@ -100247,7 +100294,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1996*/ meltfptr[1995]); - MELT_LOCATION ("warmelt-base.melt:1137:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1138:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100265,7 +100312,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1996*/ meltfptr[1995]); - MELT_LOCATION ("warmelt-base.melt:1137:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1138:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100284,7 +100331,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); - MELT_LOCATION ("warmelt-base.melt:1137:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1138:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1995*/ meltfptr[1994]); @@ -100334,7 +100381,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1998*/ meltfptr[1997]); - MELT_LOCATION ("warmelt-base.melt:1137:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1138:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100352,7 +100399,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V1998*/ meltfptr[1997]); - MELT_LOCATION ("warmelt-base.melt:1137:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1138:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100472,7 +100519,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2003*/ meltfptr[2002]); - MELT_LOCATION ("warmelt-base.melt:1137:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1138:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100490,7 +100537,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2003*/ meltfptr[2002]); - MELT_LOCATION ("warmelt-base.melt:1137:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1138:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1991*/ meltfptr[1990]); @@ -100514,7 +100561,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2004*/ meltfptr[2003]); - MELT_LOCATION ("warmelt-base.melt:1144:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1145:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100532,7 +100579,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2007*/ meltfptr[2006]); - MELT_LOCATION ("warmelt-base.melt:1144:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1145:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100550,7 +100597,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1144:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1145:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100569,12 +100616,12 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1144:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1145:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2008*/ meltfptr[2007]); - MELT_LOCATION ("warmelt-base.melt:1144:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1145:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100592,7 +100639,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730]); - MELT_LOCATION ("warmelt-base.melt:1144:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1145:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100611,7 +100658,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); - MELT_LOCATION ("warmelt-base.melt:1144:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1145:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2009*/ meltfptr[2008]); @@ -100647,7 +100694,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2010*/ meltfptr[2009]); - MELT_LOCATION ("warmelt-base.melt:1144:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1145:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100665,7 +100712,7 @@ meltmod__warmelt_base__initialmeltchunk_28 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2010*/ meltfptr[2009]); - MELT_LOCATION ("warmelt-base.melt:1144:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1145:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100769,7 +100816,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2014*/ meltfptr[2013]); - MELT_LOCATION ("warmelt-base.melt:1144:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1145:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100787,7 +100834,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2014*/ meltfptr[2013]); - MELT_LOCATION ("warmelt-base.melt:1144:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1145:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2006*/ meltfptr[2005]); @@ -100811,7 +100858,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2015*/ meltfptr[2014]); - MELT_LOCATION ("warmelt-base.melt:1149:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1150:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100829,7 +100876,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2018*/ meltfptr[2017]); - MELT_LOCATION ("warmelt-base.melt:1149:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1150:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100847,7 +100894,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1149:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1150:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100866,12 +100913,12 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1149:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1150:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2019*/ meltfptr[2018]); - MELT_LOCATION ("warmelt-base.melt:1149:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1150:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100889,7 +100936,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730]); - MELT_LOCATION ("warmelt-base.melt:1149:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1150:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100908,7 +100955,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); - MELT_LOCATION ("warmelt-base.melt:1149:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1150:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2020*/ meltfptr[2019]); @@ -100944,7 +100991,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2021*/ meltfptr[2020]); - MELT_LOCATION ("warmelt-base.melt:1149:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1150:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -100962,7 +101009,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2021*/ meltfptr[2020]); - MELT_LOCATION ("warmelt-base.melt:1149:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1150:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101054,7 +101101,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2025*/ meltfptr[2024]); - MELT_LOCATION ("warmelt-base.melt:1149:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1150:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101072,7 +101119,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2025*/ meltfptr[2024]); - MELT_LOCATION ("warmelt-base.melt:1149:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1150:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2017*/ meltfptr[2016]); @@ -101096,7 +101143,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2026*/ meltfptr[2025]); - MELT_LOCATION ("warmelt-base.melt:1154:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1155:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101114,7 +101161,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2029*/ meltfptr[2028]); - MELT_LOCATION ("warmelt-base.melt:1154:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1155:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101132,7 +101179,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1154:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1155:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101151,7 +101198,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1154:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1155:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2030*/ meltfptr[2029]); @@ -101175,7 +101222,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2032*/ meltfptr[2031]); - MELT_LOCATION ("warmelt-base.melt:1154:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1155:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101193,7 +101240,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V2032*/ meltfptr[2031]); - MELT_LOCATION ("warmelt-base.melt:1154:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1155:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101212,7 +101259,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1154:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1155:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2031*/ meltfptr[2030]); @@ -101248,7 +101295,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2034*/ meltfptr[2033]); - MELT_LOCATION ("warmelt-base.melt:1154:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1155:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101266,7 +101313,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2034*/ meltfptr[2033]); - MELT_LOCATION ("warmelt-base.melt:1154:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1155:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101358,7 +101405,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2038*/ meltfptr[2037]); - MELT_LOCATION ("warmelt-base.melt:1154:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1155:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101376,7 +101423,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2038*/ meltfptr[2037]); - MELT_LOCATION ("warmelt-base.melt:1154:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1155:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2028*/ meltfptr[2027]); @@ -101400,7 +101447,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2039*/ meltfptr[2038]); - MELT_LOCATION ("warmelt-base.melt:1160:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1161:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101418,7 +101465,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2042*/ meltfptr[2041]); - MELT_LOCATION ("warmelt-base.melt:1160:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1161:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101436,7 +101483,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1160:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1161:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101455,7 +101502,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1160:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1161:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2043*/ meltfptr[2042]); @@ -101479,7 +101526,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2045*/ meltfptr[2044]); - MELT_LOCATION ("warmelt-base.melt:1160:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1161:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101497,7 +101544,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V2045*/ meltfptr[2044]); - MELT_LOCATION ("warmelt-base.melt:1160:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1161:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101516,7 +101563,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_CSTRING)))); - MELT_LOCATION ("warmelt-base.melt:1160:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1161:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2044*/ meltfptr[2043]); @@ -101552,7 +101599,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2047*/ meltfptr[2046]); - MELT_LOCATION ("warmelt-base.melt:1160:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1161:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101570,7 +101617,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2047*/ meltfptr[2046]); - MELT_LOCATION ("warmelt-base.melt:1160:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1161:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101662,7 +101709,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2051*/ meltfptr[2050]); - MELT_LOCATION ("warmelt-base.melt:1160:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1161:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101680,7 +101727,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2051*/ meltfptr[2050]); - MELT_LOCATION ("warmelt-base.melt:1160:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1161:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2041*/ meltfptr[2040]); @@ -101704,7 +101751,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2052*/ meltfptr[2051]); - MELT_LOCATION ("warmelt-base.melt:1164:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1165:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101722,7 +101769,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2055*/ meltfptr[2054]); - MELT_LOCATION ("warmelt-base.melt:1164:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1165:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101740,7 +101787,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1164:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1165:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101759,7 +101806,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1164:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1165:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2056*/ meltfptr[2055]); @@ -101783,7 +101830,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2058*/ meltfptr[2057]); - MELT_LOCATION ("warmelt-base.melt:1164:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1165:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101801,7 +101848,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V2058*/ meltfptr[2057]); - MELT_LOCATION ("warmelt-base.melt:1164:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1165:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101820,7 +101867,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1164:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1165:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2057*/ meltfptr[2056]); @@ -101856,7 +101903,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2060*/ meltfptr[2059]); - MELT_LOCATION ("warmelt-base.melt:1164:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1165:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101874,7 +101921,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2060*/ meltfptr[2059]); - MELT_LOCATION ("warmelt-base.melt:1164:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1165:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101966,7 +102013,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2064*/ meltfptr[2063]); - MELT_LOCATION ("warmelt-base.melt:1164:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1165:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -101984,7 +102031,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2064*/ meltfptr[2063]); - MELT_LOCATION ("warmelt-base.melt:1164:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1165:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2054*/ meltfptr[2053]); @@ -102008,7 +102055,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2065*/ meltfptr[2064]); - MELT_LOCATION ("warmelt-base.melt:1169:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1170:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102026,7 +102073,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2068*/ meltfptr[2067]); - MELT_LOCATION ("warmelt-base.melt:1169:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1170:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102044,7 +102091,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1169:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1170:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102063,12 +102110,12 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1169:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1170:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2069*/ meltfptr[2068]); - MELT_LOCATION ("warmelt-base.melt:1169:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1170:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102086,7 +102133,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V2045*/ meltfptr[2044]); - MELT_LOCATION ("warmelt-base.melt:1169:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1170:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102105,7 +102152,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_CSTRING)))); - MELT_LOCATION ("warmelt-base.melt:1169:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1170:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2070*/ meltfptr[2069]); @@ -102141,7 +102188,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2071*/ meltfptr[2070]); - MELT_LOCATION ("warmelt-base.melt:1169:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1170:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102159,7 +102206,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2071*/ meltfptr[2070]); - MELT_LOCATION ("warmelt-base.melt:1169:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1170:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102251,7 +102298,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2075*/ meltfptr[2074]); - MELT_LOCATION ("warmelt-base.melt:1169:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1170:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102269,7 +102316,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2075*/ meltfptr[2074]); - MELT_LOCATION ("warmelt-base.melt:1169:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1170:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2067*/ meltfptr[2066]); @@ -102293,7 +102340,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2076*/ meltfptr[2075]); - MELT_LOCATION ("warmelt-base.melt:1173:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1174:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102311,7 +102358,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2079*/ meltfptr[2078]); - MELT_LOCATION ("warmelt-base.melt:1173:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1174:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102329,7 +102376,7 @@ meltmod__warmelt_base__initialmeltchunk_29 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1173:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1174:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102360,12 +102407,12 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L - MELT_LOCATION ("warmelt-base.melt:1173:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1174:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2080*/ meltfptr[2079]); - MELT_LOCATION ("warmelt-base.melt:1173:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1174:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102383,7 +102430,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V2058*/ meltfptr[2057]); - MELT_LOCATION ("warmelt-base.melt:1173:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1174:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102402,7 +102449,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1173:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1174:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2081*/ meltfptr[2080]); @@ -102438,7 +102485,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2082*/ meltfptr[2081]); - MELT_LOCATION ("warmelt-base.melt:1173:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1174:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102456,7 +102503,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2082*/ meltfptr[2081]); - MELT_LOCATION ("warmelt-base.melt:1173:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1174:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102548,7 +102595,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2086*/ meltfptr[2085]); - MELT_LOCATION ("warmelt-base.melt:1173:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1174:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102566,7 +102613,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2086*/ meltfptr[2085]); - MELT_LOCATION ("warmelt-base.melt:1173:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1174:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2078*/ meltfptr[2077]); @@ -102590,7 +102637,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2087*/ meltfptr[2086]); - MELT_LOCATION ("warmelt-base.melt:1183:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1184:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102608,7 +102655,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2090*/ meltfptr[2089]); - MELT_LOCATION ("warmelt-base.melt:1183:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1184:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102626,7 +102673,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1183:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1184:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102645,12 +102692,12 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1183:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1184:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2091*/ meltfptr[2090]); - MELT_LOCATION ("warmelt-base.melt:1183:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1184:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102668,7 +102715,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); - MELT_LOCATION ("warmelt-base.melt:1183:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1184:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102687,7 +102734,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_CSTRING)))); - MELT_LOCATION ("warmelt-base.melt:1183:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1184:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2092*/ meltfptr[2091]); @@ -102723,7 +102770,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2093*/ meltfptr[2092]); - MELT_LOCATION ("warmelt-base.melt:1183:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1184:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102741,7 +102788,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2093*/ meltfptr[2092]); - MELT_LOCATION ("warmelt-base.melt:1183:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1184:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102833,7 +102880,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2097*/ meltfptr[2096]); - MELT_LOCATION ("warmelt-base.melt:1183:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1184:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102851,7 +102898,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2097*/ meltfptr[2096]); - MELT_LOCATION ("warmelt-base.melt:1183:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1184:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2089*/ meltfptr[2088]); @@ -102875,7 +102922,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2098*/ meltfptr[2097]); - MELT_LOCATION ("warmelt-base.melt:1187:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1188:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102893,7 +102940,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2101*/ meltfptr[2100]); - MELT_LOCATION ("warmelt-base.melt:1187:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1188:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102911,7 +102958,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1187:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1188:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102930,12 +102977,12 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1187:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1188:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2102*/ meltfptr[2101]); - MELT_LOCATION ("warmelt-base.melt:1187:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1188:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102953,7 +103000,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); - MELT_LOCATION ("warmelt-base.melt:1187:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1188:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -102972,7 +103019,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1187:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1188:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2103*/ meltfptr[2102]); @@ -103008,7 +103055,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2104*/ meltfptr[2103]); - MELT_LOCATION ("warmelt-base.melt:1187:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1188:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103026,7 +103073,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2104*/ meltfptr[2103]); - MELT_LOCATION ("warmelt-base.melt:1187:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1188:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103118,7 +103165,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2108*/ meltfptr[2107]); - MELT_LOCATION ("warmelt-base.melt:1187:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1188:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103136,7 +103183,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2108*/ meltfptr[2107]); - MELT_LOCATION ("warmelt-base.melt:1187:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1188:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2100*/ meltfptr[2099]); @@ -103160,7 +103207,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2109*/ meltfptr[2108]); - MELT_LOCATION ("warmelt-base.melt:1192:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1193:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103178,7 +103225,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2112*/ meltfptr[2111]); - MELT_LOCATION ("warmelt-base.melt:1192:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1193:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103196,7 +103243,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1192:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1193:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103215,12 +103262,12 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1192:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1193:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2113*/ meltfptr[2112]); - MELT_LOCATION ("warmelt-base.melt:1192:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1193:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103238,7 +103285,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1852*/ meltfptr[1851]); - MELT_LOCATION ("warmelt-base.melt:1192:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1193:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103257,7 +103304,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1192:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1193:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2114*/ meltfptr[2113]); @@ -103293,7 +103340,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2115*/ meltfptr[2114]); - MELT_LOCATION ("warmelt-base.melt:1192:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1193:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103311,7 +103358,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2115*/ meltfptr[2114]); - MELT_LOCATION ("warmelt-base.melt:1192:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1193:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103431,7 +103478,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2120*/ meltfptr[2119]); - MELT_LOCATION ("warmelt-base.melt:1192:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1193:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103449,7 +103496,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2120*/ meltfptr[2119]); - MELT_LOCATION ("warmelt-base.melt:1192:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1193:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2111*/ meltfptr[2110]); @@ -103473,7 +103520,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2121*/ meltfptr[2120]); - MELT_LOCATION ("warmelt-base.melt:1207:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1208:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103491,7 +103538,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2124*/ meltfptr[2123]); - MELT_LOCATION ("warmelt-base.melt:1207:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1208:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103509,7 +103556,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1207:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1208:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103528,12 +103575,12 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1207:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1208:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2125*/ meltfptr[2124]); - MELT_LOCATION ("warmelt-base.melt:1207:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1208:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103551,7 +103598,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1890*/ meltfptr[1889]); - MELT_LOCATION ("warmelt-base.melt:1207:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1208:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103570,7 +103617,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); - MELT_LOCATION ("warmelt-base.melt:1207:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1208:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2126*/ meltfptr[2125]); @@ -103606,7 +103653,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2127*/ meltfptr[2126]); - MELT_LOCATION ("warmelt-base.melt:1207:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1208:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103624,7 +103671,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2127*/ meltfptr[2126]); - MELT_LOCATION ("warmelt-base.melt:1207:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1208:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103716,7 +103763,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2131*/ meltfptr[2130]); - MELT_LOCATION ("warmelt-base.melt:1207:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1208:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103734,7 +103781,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2131*/ meltfptr[2130]); - MELT_LOCATION ("warmelt-base.melt:1207:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1208:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2123*/ meltfptr[2122]); @@ -103758,7 +103805,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2132*/ meltfptr[2131]); - MELT_LOCATION ("warmelt-base.melt:1214:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1215:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103776,7 +103823,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2135*/ meltfptr[2134]); - MELT_LOCATION ("warmelt-base.melt:1214:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1215:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103794,7 +103841,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1214:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1215:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103813,12 +103860,12 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1214:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1215:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2136*/ meltfptr[2135]); - MELT_LOCATION ("warmelt-base.melt:1214:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1215:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103836,7 +103883,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1890*/ meltfptr[1889]); - MELT_LOCATION ("warmelt-base.melt:1214:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1215:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103855,7 +103902,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); - MELT_LOCATION ("warmelt-base.melt:1214:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1215:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2137*/ meltfptr[2136]); @@ -103891,7 +103938,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2138*/ meltfptr[2137]); - MELT_LOCATION ("warmelt-base.melt:1214:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1215:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -103909,7 +103956,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2138*/ meltfptr[2137]); - MELT_LOCATION ("warmelt-base.melt:1214:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1215:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104001,7 +104048,7 @@ meltmod__warmelt_base__initialmeltchunk_30 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2142*/ meltfptr[2141]); - MELT_LOCATION ("warmelt-base.melt:1214:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1215:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104031,7 +104078,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L - MELT_LOCATION ("warmelt-base.melt:1214:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1215:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2134*/ meltfptr[2133]); @@ -104055,7 +104102,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2143*/ meltfptr[2142]); - MELT_LOCATION ("warmelt-base.melt:1221:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104073,7 +104120,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2146*/ meltfptr[2145]); - MELT_LOCATION ("warmelt-base.melt:1221:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104091,7 +104138,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1221:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104110,12 +104157,12 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1221:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1222:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2147*/ meltfptr[2146]); - MELT_LOCATION ("warmelt-base.melt:1221:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104133,7 +104180,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1914*/ meltfptr[1913]); - MELT_LOCATION ("warmelt-base.melt:1221:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104152,7 +104199,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1221:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1222:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2148*/ meltfptr[2147]); @@ -104188,7 +104235,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2149*/ meltfptr[2148]); - MELT_LOCATION ("warmelt-base.melt:1221:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104206,7 +104253,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2149*/ meltfptr[2148]); - MELT_LOCATION ("warmelt-base.melt:1221:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104298,7 +104345,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2153*/ meltfptr[2152]); - MELT_LOCATION ("warmelt-base.melt:1221:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104316,7 +104363,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2153*/ meltfptr[2152]); - MELT_LOCATION ("warmelt-base.melt:1221:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1222:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2145*/ meltfptr[2144]); @@ -104340,7 +104387,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2154*/ meltfptr[2153]); - MELT_LOCATION ("warmelt-base.melt:1226:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1227:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104358,7 +104405,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2157*/ meltfptr[2156]); - MELT_LOCATION ("warmelt-base.melt:1226:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1227:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104376,7 +104423,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1226:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1227:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104395,12 +104442,12 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1226:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1227:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2158*/ meltfptr[2157]); - MELT_LOCATION ("warmelt-base.melt:1226:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1227:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104418,7 +104465,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); - MELT_LOCATION ("warmelt-base.melt:1226:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1227:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104437,7 +104484,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1226:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1227:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2159*/ meltfptr[2158]); @@ -104473,7 +104520,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2160*/ meltfptr[2159]); - MELT_LOCATION ("warmelt-base.melt:1226:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1227:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104491,7 +104538,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2160*/ meltfptr[2159]); - MELT_LOCATION ("warmelt-base.melt:1226:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1227:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104583,7 +104630,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2164*/ meltfptr[2163]); - MELT_LOCATION ("warmelt-base.melt:1226:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1227:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104601,7 +104648,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2164*/ meltfptr[2163]); - MELT_LOCATION ("warmelt-base.melt:1226:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1227:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2156*/ meltfptr[2155]); @@ -104625,7 +104672,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2165*/ meltfptr[2164]); - MELT_LOCATION ("warmelt-base.melt:1232:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1233:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104643,7 +104690,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2168*/ meltfptr[2167]); - MELT_LOCATION ("warmelt-base.melt:1232:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1233:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104661,7 +104708,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1232:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1233:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104680,12 +104727,12 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1232:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1233:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2169*/ meltfptr[2168]); - MELT_LOCATION ("warmelt-base.melt:1232:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1233:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104703,7 +104750,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); - MELT_LOCATION ("warmelt-base.melt:1232:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1233:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104722,7 +104769,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1232:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1233:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2170*/ meltfptr[2169]); @@ -104746,7 +104793,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2172*/ meltfptr[2171]); - MELT_LOCATION ("warmelt-base.melt:1232:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1233:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104764,7 +104811,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V2172*/ meltfptr[2171]); - MELT_LOCATION ("warmelt-base.melt:1232:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1233:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104783,7 +104830,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); - MELT_LOCATION ("warmelt-base.melt:1232:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1233:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2171*/ meltfptr[2170]); @@ -104807,7 +104854,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2175*/ meltfptr[2174]); - MELT_LOCATION ("warmelt-base.melt:1232:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1233:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104825,7 +104872,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V2175*/ meltfptr[2174]); - MELT_LOCATION ("warmelt-base.melt:1232:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1233:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104844,7 +104891,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); - MELT_LOCATION ("warmelt-base.melt:1232:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1233:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2174*/ meltfptr[2173]); @@ -104908,7 +104955,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2177*/ meltfptr[2176]); - MELT_LOCATION ("warmelt-base.melt:1232:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1233:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -104926,7 +104973,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2177*/ meltfptr[2176]); - MELT_LOCATION ("warmelt-base.melt:1232:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1233:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105074,7 +105121,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2183*/ meltfptr[2182]); - MELT_LOCATION ("warmelt-base.melt:1232:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1233:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105092,7 +105139,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2183*/ meltfptr[2182]); - MELT_LOCATION ("warmelt-base.melt:1232:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1233:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2167*/ meltfptr[2166]); @@ -105116,7 +105163,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2184*/ meltfptr[2183]); - MELT_LOCATION ("warmelt-base.melt:1239:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1240:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105134,7 +105181,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2187*/ meltfptr[2186]); - MELT_LOCATION ("warmelt-base.melt:1239:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1240:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105152,7 +105199,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-base.melt:1239:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1240:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105171,12 +105218,12 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1239:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1240:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2188*/ meltfptr[2187]); - MELT_LOCATION ("warmelt-base.melt:1239:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1240:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105194,7 +105241,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1971*/ meltfptr[1970]); - MELT_LOCATION ("warmelt-base.melt:1239:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1240:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105213,7 +105260,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_CSTRING)))); - MELT_LOCATION ("warmelt-base.melt:1239:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1240:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2189*/ meltfptr[2188]); @@ -105249,7 +105296,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2190*/ meltfptr[2189]); - MELT_LOCATION ("warmelt-base.melt:1239:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1240:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105267,7 +105314,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2190*/ meltfptr[2189]); - MELT_LOCATION ("warmelt-base.melt:1239:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1240:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105359,7 +105406,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2194*/ meltfptr[2193]); - MELT_LOCATION ("warmelt-base.melt:1239:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1240:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105377,7 +105424,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2194*/ meltfptr[2193]); - MELT_LOCATION ("warmelt-base.melt:1239:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1240:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2186*/ meltfptr[2185]); @@ -105401,7 +105448,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2195*/ meltfptr[2194]); - MELT_LOCATION ("warmelt-base.melt:1243:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1244:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105419,7 +105466,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2198*/ meltfptr[2197]); - MELT_LOCATION ("warmelt-base.melt:1243:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1244:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105437,7 +105484,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1243:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1244:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105456,12 +105503,12 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1243:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1244:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2199*/ meltfptr[2198]); - MELT_LOCATION ("warmelt-base.melt:1243:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1244:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105479,7 +105526,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1914*/ meltfptr[1913]); - MELT_LOCATION ("warmelt-base.melt:1243:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1244:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105498,7 +105545,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1243:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1244:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2200*/ meltfptr[2199]); @@ -105534,7 +105581,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2201*/ meltfptr[2200]); - MELT_LOCATION ("warmelt-base.melt:1243:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1244:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105552,7 +105599,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2201*/ meltfptr[2200]); - MELT_LOCATION ("warmelt-base.melt:1243:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1244:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105644,7 +105691,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2205*/ meltfptr[2204]); - MELT_LOCATION ("warmelt-base.melt:1243:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1244:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105662,7 +105709,7 @@ meltmod__warmelt_base__initialmeltchunk_31 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2205*/ meltfptr[2204]); - MELT_LOCATION ("warmelt-base.melt:1243:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1244:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2197*/ meltfptr[2196]); @@ -105698,7 +105745,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st /*touch:VALUEDATA_*/ meltgc_touch ( /*_.VALDATA___V2206*/ meltfptr[2205]); - MELT_LOCATION ("warmelt-base.melt:1248:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1249:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105716,7 +105763,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2209*/ meltfptr[2208]); - MELT_LOCATION ("warmelt-base.melt:1248:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1249:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105734,7 +105781,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1248:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1249:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105753,12 +105800,12 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1248:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1249:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2210*/ meltfptr[2209]); - MELT_LOCATION ("warmelt-base.melt:1248:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1249:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105776,7 +105823,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); - MELT_LOCATION ("warmelt-base.melt:1248:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1249:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105795,7 +105842,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1248:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1249:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2211*/ meltfptr[2210]); @@ -105831,7 +105878,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2212*/ meltfptr[2211]); - MELT_LOCATION ("warmelt-base.melt:1248:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1249:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105849,7 +105896,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2212*/ meltfptr[2211]); - MELT_LOCATION ("warmelt-base.melt:1248:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1249:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105941,7 +105988,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2216*/ meltfptr[2215]); - MELT_LOCATION ("warmelt-base.melt:1248:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1249:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -105959,7 +106006,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2216*/ meltfptr[2215]); - MELT_LOCATION ("warmelt-base.melt:1248:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1249:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2208*/ meltfptr[2207]); @@ -105983,7 +106030,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2217*/ meltfptr[2216]); - MELT_LOCATION ("warmelt-base.melt:1254:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1255:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106001,7 +106048,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2220*/ meltfptr[2219]); - MELT_LOCATION ("warmelt-base.melt:1254:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1255:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106019,7 +106066,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1254:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1255:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106038,12 +106085,12 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1254:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1255:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2221*/ meltfptr[2220]); - MELT_LOCATION ("warmelt-base.melt:1254:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1255:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106061,7 +106108,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1914*/ meltfptr[1913]); - MELT_LOCATION ("warmelt-base.melt:1254:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1255:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106080,7 +106127,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1254:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1255:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2222*/ meltfptr[2221]); @@ -106116,7 +106163,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2223*/ meltfptr[2222]); - MELT_LOCATION ("warmelt-base.melt:1254:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1255:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106134,7 +106181,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2223*/ meltfptr[2222]); - MELT_LOCATION ("warmelt-base.melt:1254:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1255:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106226,7 +106273,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2227*/ meltfptr[2226]); - MELT_LOCATION ("warmelt-base.melt:1254:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1255:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106244,7 +106291,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2227*/ meltfptr[2226]); - MELT_LOCATION ("warmelt-base.melt:1254:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1255:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2219*/ meltfptr[2218]); @@ -106268,7 +106315,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2228*/ meltfptr[2227]); - MELT_LOCATION ("warmelt-base.melt:1260:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1261:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106286,7 +106333,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2231*/ meltfptr[2230]); - MELT_LOCATION ("warmelt-base.melt:1260:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1261:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106304,7 +106351,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1260:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1261:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106323,12 +106370,12 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1260:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1261:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2232*/ meltfptr[2231]); - MELT_LOCATION ("warmelt-base.melt:1260:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1261:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106346,7 +106393,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1971*/ meltfptr[1970]); - MELT_LOCATION ("warmelt-base.melt:1260:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1261:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106365,7 +106412,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_CSTRING)))); - MELT_LOCATION ("warmelt-base.melt:1260:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1261:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2233*/ meltfptr[2232]); @@ -106401,7 +106448,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2234*/ meltfptr[2233]); - MELT_LOCATION ("warmelt-base.melt:1260:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1261:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106419,7 +106466,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2234*/ meltfptr[2233]); - MELT_LOCATION ("warmelt-base.melt:1260:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1261:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106511,7 +106558,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2238*/ meltfptr[2237]); - MELT_LOCATION ("warmelt-base.melt:1260:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1261:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106529,7 +106576,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2238*/ meltfptr[2237]); - MELT_LOCATION ("warmelt-base.melt:1260:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1261:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2230*/ meltfptr[2229]); @@ -106553,7 +106600,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2239*/ meltfptr[2238]); - MELT_LOCATION ("warmelt-base.melt:1266:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1267:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106571,7 +106618,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2242*/ meltfptr[2241]); - MELT_LOCATION ("warmelt-base.melt:1266:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1267:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106589,7 +106636,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1266:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1267:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106608,12 +106655,12 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1266:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1267:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2243*/ meltfptr[2242]); - MELT_LOCATION ("warmelt-base.melt:1266:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1267:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106631,7 +106678,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); - MELT_LOCATION ("warmelt-base.melt:1266:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1267:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106650,7 +106697,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1266:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1267:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2244*/ meltfptr[2243]); @@ -106686,7 +106733,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2245*/ meltfptr[2244]); - MELT_LOCATION ("warmelt-base.melt:1266:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1267:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106704,7 +106751,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2245*/ meltfptr[2244]); - MELT_LOCATION ("warmelt-base.melt:1266:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1267:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106796,7 +106843,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2249*/ meltfptr[2248]); - MELT_LOCATION ("warmelt-base.melt:1266:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1267:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106814,7 +106861,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2249*/ meltfptr[2248]); - MELT_LOCATION ("warmelt-base.melt:1266:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1267:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2241*/ meltfptr[2240]); @@ -106838,7 +106885,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2250*/ meltfptr[2249]); - MELT_LOCATION ("warmelt-base.melt:1274:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1275:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106856,7 +106903,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2253*/ meltfptr[2252]); - MELT_LOCATION ("warmelt-base.melt:1274:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1275:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106874,7 +106921,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1274:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1275:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106893,12 +106940,12 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1274:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1275:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2254*/ meltfptr[2253]); - MELT_LOCATION ("warmelt-base.melt:1274:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1275:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106916,7 +106963,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); - MELT_LOCATION ("warmelt-base.melt:1274:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1275:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106935,12 +106982,12 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1274:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1275:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2255*/ meltfptr[2254]); - MELT_LOCATION ("warmelt-base.melt:1274:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1275:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106958,7 +107005,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1996*/ meltfptr[1995]); - MELT_LOCATION ("warmelt-base.melt:1274:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1275:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -106977,7 +107024,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); - MELT_LOCATION ("warmelt-base.melt:1274:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1275:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2256*/ meltfptr[2255]); @@ -107027,7 +107074,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2257*/ meltfptr[2256]); - MELT_LOCATION ("warmelt-base.melt:1274:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1275:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107045,7 +107092,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2257*/ meltfptr[2256]); - MELT_LOCATION ("warmelt-base.melt:1274:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1275:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107165,7 +107212,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2262*/ meltfptr[2261]); - MELT_LOCATION ("warmelt-base.melt:1274:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1275:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107183,7 +107230,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2262*/ meltfptr[2261]); - MELT_LOCATION ("warmelt-base.melt:1274:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1275:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2252*/ meltfptr[2251]); @@ -107207,7 +107254,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2263*/ meltfptr[2262]); - MELT_LOCATION ("warmelt-base.melt:1282:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1283:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107225,7 +107272,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2266*/ meltfptr[2265]); - MELT_LOCATION ("warmelt-base.melt:1282:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1283:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107243,7 +107290,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1282:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1283:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107262,12 +107309,12 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1282:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1283:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2267*/ meltfptr[2266]); - MELT_LOCATION ("warmelt-base.melt:1282:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1283:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107285,7 +107332,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730]); - MELT_LOCATION ("warmelt-base.melt:1282:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1283:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107304,7 +107351,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); - MELT_LOCATION ("warmelt-base.melt:1282:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1283:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2268*/ meltfptr[2267]); @@ -107340,7 +107387,7 @@ meltmod__warmelt_base__initialmeltchunk_32 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2269*/ meltfptr[2268]); - MELT_LOCATION ("warmelt-base.melt:1282:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1283:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107370,7 +107417,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L - MELT_LOCATION ("warmelt-base.melt:1282:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1283:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107462,7 +107509,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2273*/ meltfptr[2272]); - MELT_LOCATION ("warmelt-base.melt:1282:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1283:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107480,7 +107527,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2273*/ meltfptr[2272]); - MELT_LOCATION ("warmelt-base.melt:1282:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1283:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2265*/ meltfptr[2264]); @@ -107504,7 +107551,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2274*/ meltfptr[2273]); - MELT_LOCATION ("warmelt-base.melt:1287:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1288:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107522,7 +107569,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2277*/ meltfptr[2276]); - MELT_LOCATION ("warmelt-base.melt:1287:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1288:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107540,7 +107587,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1287:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1288:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107559,12 +107606,12 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1287:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1288:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2278*/ meltfptr[2277]); - MELT_LOCATION ("warmelt-base.melt:1287:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1288:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107582,7 +107629,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V731*/ meltfptr[730]); - MELT_LOCATION ("warmelt-base.melt:1287:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1288:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107601,7 +107648,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); - MELT_LOCATION ("warmelt-base.melt:1287:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1288:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2279*/ meltfptr[2278]); @@ -107637,7 +107684,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2280*/ meltfptr[2279]); - MELT_LOCATION ("warmelt-base.melt:1287:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1288:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107655,7 +107702,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2280*/ meltfptr[2279]); - MELT_LOCATION ("warmelt-base.melt:1287:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1288:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107747,7 +107794,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2284*/ meltfptr[2283]); - MELT_LOCATION ("warmelt-base.melt:1287:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1288:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107765,7 +107812,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2284*/ meltfptr[2283]); - MELT_LOCATION ("warmelt-base.melt:1287:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1288:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2276*/ meltfptr[2275]); @@ -107789,7 +107836,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2285*/ meltfptr[2284]); - MELT_LOCATION ("warmelt-base.melt:1292:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1293:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107807,7 +107854,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2288*/ meltfptr[2287]); - MELT_LOCATION ("warmelt-base.melt:1292:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1293:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107825,7 +107872,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1292:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1293:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107844,12 +107891,12 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1292:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1293:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2289*/ meltfptr[2288]); - MELT_LOCATION ("warmelt-base.melt:1292:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1293:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107867,7 +107914,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V2032*/ meltfptr[2031]); - MELT_LOCATION ("warmelt-base.melt:1292:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1293:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107886,7 +107933,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1292:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1293:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2290*/ meltfptr[2289]); @@ -107922,7 +107969,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2291*/ meltfptr[2290]); - MELT_LOCATION ("warmelt-base.melt:1292:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1293:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -107940,7 +107987,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2291*/ meltfptr[2290]); - MELT_LOCATION ("warmelt-base.melt:1292:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1293:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -108032,7 +108079,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2295*/ meltfptr[2294]); - MELT_LOCATION ("warmelt-base.melt:1292:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1293:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -108050,7 +108097,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2295*/ meltfptr[2294]); - MELT_LOCATION ("warmelt-base.melt:1292:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1293:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2287*/ meltfptr[2286]); @@ -108112,7 +108159,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2300*/ meltfptr[2299]); - MELT_LOCATION ("warmelt-base.melt:1298:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1299:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -108130,7 +108177,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V2300*/ meltfptr[2299]); - MELT_LOCATION ("warmelt-base.melt:1298:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1299:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -108149,12 +108196,12 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1298:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1299:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2302*/ meltfptr[2301]); - MELT_LOCATION ("warmelt-base.melt:1298:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1299:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -108172,7 +108219,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1295*/ meltfptr[1294]); - MELT_LOCATION ("warmelt-base.melt:1298:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1299:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -108191,7 +108238,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1298:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1299:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2303*/ meltfptr[2302]); @@ -108227,7 +108274,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2304*/ meltfptr[2303]); - MELT_LOCATION ("warmelt-base.melt:1298:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1299:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -108245,12 +108292,12 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2306*/ meltfptr[2305]); - MELT_LOCATION ("warmelt-base.melt:1298:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1299:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2305*/ meltfptr[2304]); - MELT_LOCATION ("warmelt-base.melt:1304:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1305:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -108263,7 +108310,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2307*/ meltfptr[2306])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-base.melt:1304:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1305:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -108275,7 +108322,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2307*/ meltfptr[2306])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V2305*/ meltfptr[2304]); - MELT_LOCATION ("warmelt-base.melt:1304:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1305:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2307*/ meltfptr[2306]); @@ -108295,7 +108342,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2308*/ meltfptr[2307]); - MELT_LOCATION ("warmelt-base.melt:1357:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1358:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -108308,7 +108355,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2309*/ meltfptr[2308])->tabval[0] = (melt_ptr_t) ( /*_.DISCR_STRING__V10*/ meltfptr[9]); - MELT_LOCATION ("warmelt-base.melt:1357:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1358:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -108321,7 +108368,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2309*/ meltfptr[2308])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DISCRIMINANT__V11*/ meltfptr[10]); - MELT_LOCATION ("warmelt-base.melt:1357:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1358:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -108334,7 +108381,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2309*/ meltfptr[2308])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-base.melt:1357:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1358:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -108347,7 +108394,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2309*/ meltfptr[2308])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-base.melt:1357:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1358:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -108359,7 +108406,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2309*/ meltfptr[2308])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V2305*/ meltfptr[2304]); - MELT_LOCATION ("warmelt-base.melt:1357:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1358:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2309*/ meltfptr[2308]); @@ -108553,7 +108600,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2330*/ meltfptr[2329]); - MELT_LOCATION ("warmelt-base.melt:1444:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1445:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -108566,7 +108613,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2331*/ meltfptr[2330])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V16*/ meltfptr[15]); - MELT_LOCATION ("warmelt-base.melt:1444:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1445:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -108579,7 +108626,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2331*/ meltfptr[2330])->tabval[1] = (melt_ptr_t) ( /*_.INTEGERBOX_OF__V17*/ meltfptr[16]); - MELT_LOCATION ("warmelt-base.melt:1444:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1445:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2331*/ meltfptr[2330]); @@ -108637,7 +108684,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2335*/ meltfptr[2334]); - MELT_LOCATION ("warmelt-base.melt:1457:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1458:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -108650,7 +108697,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2337*/ meltfptr[2336])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-base.melt:1457:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1458:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2337*/ meltfptr[2336]); @@ -108670,7 +108717,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2338*/ meltfptr[2337]); - MELT_LOCATION ("warmelt-base.melt:1461:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1462:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -108683,7 +108730,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2339*/ meltfptr[2338])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-base.melt:1461:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1462:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2339*/ meltfptr[2338]); @@ -108722,7 +108769,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2341*/ meltfptr[2340]); - MELT_LOCATION ("warmelt-base.melt:1469:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1470:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -108735,7 +108782,7 @@ meltmod__warmelt_base__initialmeltchunk_33 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2343*/ meltfptr[2342])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-base.melt:1469:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1470:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2343*/ meltfptr[2342]); @@ -108786,7 +108833,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L - MELT_LOCATION ("warmelt-base.melt:1477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1478:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -108804,7 +108851,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2348*/ meltfptr[2347]); - MELT_LOCATION ("warmelt-base.melt:1477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1478:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -108822,7 +108869,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1971*/ meltfptr[1970]); - MELT_LOCATION ("warmelt-base.melt:1477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1478:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -108841,7 +108888,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_CSTRING)))); - MELT_LOCATION ("warmelt-base.melt:1477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1478:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2349*/ meltfptr[2348]); @@ -108863,7 +108910,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2350*/ meltfptr[2349]); - MELT_LOCATION ("warmelt-base.melt:1477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1478:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -108881,7 +108928,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2350*/ meltfptr[2349]); - MELT_LOCATION ("warmelt-base.melt:1477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1478:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -108899,7 +108946,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); - MELT_LOCATION ("warmelt-base.melt:1477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1478:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -108918,12 +108965,12 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_CSTRING)))); - MELT_LOCATION ("warmelt-base.melt:1477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1478:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2351*/ meltfptr[2350]); - MELT_LOCATION ("warmelt-base.melt:1477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1478:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -108944,7 +108991,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2352*/ meltfptr[2351]); - MELT_LOCATION ("warmelt-base.melt:1477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1478:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -108981,7 +109028,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2353*/ meltfptr[2352]); - MELT_LOCATION ("warmelt-base.melt:1477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1478:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109156,7 +109203,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2361*/ meltfptr[2360]); - MELT_LOCATION ("warmelt-base.melt:1477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1478:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109174,12 +109221,12 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V2361*/ meltfptr[2360]); - MELT_LOCATION ("warmelt-base.melt:1477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1478:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2347*/ meltfptr[2346]); - MELT_LOCATION ("warmelt-base.melt:1489:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1490:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109197,7 +109244,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2363*/ meltfptr[2362]); - MELT_LOCATION ("warmelt-base.melt:1489:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1490:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109215,7 +109262,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1971*/ meltfptr[1970]); - MELT_LOCATION ("warmelt-base.melt:1489:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1490:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109234,7 +109281,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_CSTRING)))); - MELT_LOCATION ("warmelt-base.melt:1489:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1490:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2364*/ meltfptr[2363]); @@ -109256,7 +109303,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2365*/ meltfptr[2364]); - MELT_LOCATION ("warmelt-base.melt:1489:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1490:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109274,7 +109321,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2365*/ meltfptr[2364]); - MELT_LOCATION ("warmelt-base.melt:1489:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1490:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109292,7 +109339,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V608*/ meltfptr[607]); - MELT_LOCATION ("warmelt-base.melt:1489:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1490:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109311,12 +109358,12 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_CSTRING)))); - MELT_LOCATION ("warmelt-base.melt:1489:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1490:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2366*/ meltfptr[2365]); - MELT_LOCATION ("warmelt-base.melt:1489:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1490:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109337,7 +109384,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2367*/ meltfptr[2366]); - MELT_LOCATION ("warmelt-base.melt:1489:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1490:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109374,7 +109421,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2368*/ meltfptr[2367]); - MELT_LOCATION ("warmelt-base.melt:1489:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1490:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109577,7 +109624,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2377*/ meltfptr[2376]); - MELT_LOCATION ("warmelt-base.melt:1489:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1490:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109595,7 +109642,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V2377*/ meltfptr[2376]); - MELT_LOCATION ("warmelt-base.melt:1489:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1490:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2362*/ meltfptr[2361]); @@ -109619,7 +109666,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2378*/ meltfptr[2377]); - MELT_LOCATION ("warmelt-base.melt:1503:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1504:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109637,7 +109684,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2381*/ meltfptr[2380]); - MELT_LOCATION ("warmelt-base.melt:1503:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1504:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109655,7 +109702,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1971*/ meltfptr[1970]); - MELT_LOCATION ("warmelt-base.melt:1503:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1504:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109674,7 +109721,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_CSTRING)))); - MELT_LOCATION ("warmelt-base.melt:1503:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1504:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2382*/ meltfptr[2381]); @@ -109696,7 +109743,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2383*/ meltfptr[2382]); - MELT_LOCATION ("warmelt-base.melt:1503:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1504:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109714,7 +109761,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2383*/ meltfptr[2382]); - MELT_LOCATION ("warmelt-base.melt:1503:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1504:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109806,7 +109853,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2387*/ meltfptr[2386]); - MELT_LOCATION ("warmelt-base.melt:1503:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1504:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109824,7 +109871,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2387*/ meltfptr[2386]); - MELT_LOCATION ("warmelt-base.melt:1503:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1504:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2380*/ meltfptr[2379]); @@ -109878,7 +109925,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2392*/ meltfptr[2391]); - MELT_LOCATION ("warmelt-base.melt:1547:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1548:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109915,7 +109962,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2397*/ meltfptr[2396]); - MELT_LOCATION ("warmelt-base.melt:1547:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1548:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109933,7 +109980,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V2397*/ meltfptr[2396]); - MELT_LOCATION ("warmelt-base.melt:1547:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1548:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109952,7 +109999,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1547:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1548:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2396*/ meltfptr[2395]); @@ -109974,7 +110021,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2399*/ meltfptr[2398]); - MELT_LOCATION ("warmelt-base.melt:1547:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1548:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -109992,7 +110039,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2399*/ meltfptr[2398]); - MELT_LOCATION ("warmelt-base.melt:1547:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1548:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110056,7 +110103,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2402*/ meltfptr[2401]); - MELT_LOCATION ("warmelt-base.melt:1547:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1548:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110074,7 +110121,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2402*/ meltfptr[2401]); - MELT_LOCATION ("warmelt-base.melt:1547:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1548:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2394*/ meltfptr[2393]); @@ -110098,7 +110145,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2403*/ meltfptr[2402]); - MELT_LOCATION ("warmelt-base.melt:1552:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1553:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110116,7 +110163,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2406*/ meltfptr[2405]); - MELT_LOCATION ("warmelt-base.melt:1552:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1553:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110134,7 +110181,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V2397*/ meltfptr[2396]); - MELT_LOCATION ("warmelt-base.melt:1552:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1553:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110153,7 +110200,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1552:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1553:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2407*/ meltfptr[2406]); @@ -110175,7 +110222,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2408*/ meltfptr[2407]); - MELT_LOCATION ("warmelt-base.melt:1552:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1553:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110193,7 +110240,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2408*/ meltfptr[2407]); - MELT_LOCATION ("warmelt-base.melt:1552:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1553:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110257,7 +110304,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2411*/ meltfptr[2410]); - MELT_LOCATION ("warmelt-base.melt:1552:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1553:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110275,7 +110322,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2411*/ meltfptr[2410]); - MELT_LOCATION ("warmelt-base.melt:1552:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1553:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2405*/ meltfptr[2404]); @@ -110299,7 +110346,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2412*/ meltfptr[2411]); - MELT_LOCATION ("warmelt-base.melt:1558:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110317,7 +110364,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2415*/ meltfptr[2414]); - MELT_LOCATION ("warmelt-base.melt:1558:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110335,7 +110382,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V2397*/ meltfptr[2396]); - MELT_LOCATION ("warmelt-base.melt:1558:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110354,12 +110401,12 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1558:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1559:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2416*/ meltfptr[2415]); - MELT_LOCATION ("warmelt-base.melt:1558:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110377,7 +110424,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1971*/ meltfptr[1970]); - MELT_LOCATION ("warmelt-base.melt:1558:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110396,7 +110443,7 @@ meltmod__warmelt_base__initialmeltchunk_34 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_CSTRING)))); - MELT_LOCATION ("warmelt-base.melt:1558:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1559:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2417*/ meltfptr[2416]); @@ -110444,7 +110491,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2418*/ meltfptr[2417]); - MELT_LOCATION ("warmelt-base.melt:1558:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110462,7 +110509,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2418*/ meltfptr[2417]); - MELT_LOCATION ("warmelt-base.melt:1558:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110554,7 +110601,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2422*/ meltfptr[2421]); - MELT_LOCATION ("warmelt-base.melt:1558:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1559:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110572,7 +110619,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2422*/ meltfptr[2421]); - MELT_LOCATION ("warmelt-base.melt:1558:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1559:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2414*/ meltfptr[2413]); @@ -110596,7 +110643,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2423*/ meltfptr[2422]); - MELT_LOCATION ("warmelt-base.melt:1563:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1564:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110614,7 +110661,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2426*/ meltfptr[2425]); - MELT_LOCATION ("warmelt-base.melt:1563:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1564:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110632,7 +110679,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V2397*/ meltfptr[2396]); - MELT_LOCATION ("warmelt-base.melt:1563:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1564:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110651,7 +110698,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1563:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1564:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2427*/ meltfptr[2426]); @@ -110675,7 +110722,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2429*/ meltfptr[2428]); - MELT_LOCATION ("warmelt-base.melt:1563:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1564:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110693,7 +110740,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V2429*/ meltfptr[2428]); - MELT_LOCATION ("warmelt-base.melt:1563:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1564:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110712,12 +110759,12 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_CSTRING)))); - MELT_LOCATION ("warmelt-base.melt:1563:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1564:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2428*/ meltfptr[2427]); - MELT_LOCATION ("warmelt-base.melt:1563:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1564:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110735,7 +110782,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V81*/ meltfptr[80]); - MELT_LOCATION ("warmelt-base.melt:1563:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1564:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110754,7 +110801,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1563:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1564:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2431*/ meltfptr[2430]); @@ -110804,7 +110851,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2432*/ meltfptr[2431]); - MELT_LOCATION ("warmelt-base.melt:1563:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1564:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110822,7 +110869,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2432*/ meltfptr[2431]); - MELT_LOCATION ("warmelt-base.melt:1563:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1564:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110942,7 +110989,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2437*/ meltfptr[2436]); - MELT_LOCATION ("warmelt-base.melt:1563:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1564:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -110960,7 +111007,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2437*/ meltfptr[2436]); - MELT_LOCATION ("warmelt-base.melt:1563:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1564:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2425*/ meltfptr[2424]); @@ -110984,7 +111031,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2438*/ meltfptr[2437]); - MELT_LOCATION ("warmelt-base.melt:1568:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1569:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111002,7 +111049,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2441*/ meltfptr[2440]); - MELT_LOCATION ("warmelt-base.melt:1568:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1569:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111020,7 +111067,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V2397*/ meltfptr[2396]); - MELT_LOCATION ("warmelt-base.melt:1568:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1569:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111039,12 +111086,12 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-base.melt:1568:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1569:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2442*/ meltfptr[2441]); - MELT_LOCATION ("warmelt-base.melt:1568:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1569:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111062,7 +111109,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V2429*/ meltfptr[2428]); - MELT_LOCATION ("warmelt-base.melt:1568:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1569:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111081,7 +111128,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_CSTRING)))); - MELT_LOCATION ("warmelt-base.melt:1568:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1569:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2443*/ meltfptr[2442]); @@ -111117,7 +111164,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2444*/ meltfptr[2443]); - MELT_LOCATION ("warmelt-base.melt:1568:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1569:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111135,7 +111182,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2444*/ meltfptr[2443]); - MELT_LOCATION ("warmelt-base.melt:1568:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1569:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111227,7 +111274,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2448*/ meltfptr[2447]); - MELT_LOCATION ("warmelt-base.melt:1568:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1569:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111245,7 +111292,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2448*/ meltfptr[2447]); - MELT_LOCATION ("warmelt-base.melt:1568:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1569:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2440*/ meltfptr[2439]); @@ -111314,7 +111361,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2455*/ meltfptr[2454]); - MELT_LOCATION ("warmelt-base.melt:1615:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1616:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111335,7 +111382,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2459*/ meltfptr[2458]); - MELT_LOCATION ("warmelt-base.melt:1615:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1616:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111353,7 +111400,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2459*/ meltfptr[2458]); - MELT_LOCATION ("warmelt-base.melt:1615:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1616:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111389,7 +111436,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2461*/ meltfptr[2460]); - MELT_LOCATION ("warmelt-base.melt:1615:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1616:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111407,7 +111454,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2461*/ meltfptr[2460]); - MELT_LOCATION ("warmelt-base.melt:1615:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1616:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2457*/ meltfptr[2456]); @@ -111431,7 +111478,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2462*/ meltfptr[2461]); - MELT_LOCATION ("warmelt-base.melt:1619:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1620:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111449,7 +111496,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2465*/ meltfptr[2464]); - MELT_LOCATION ("warmelt-base.melt:1619:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1620:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111467,7 +111514,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.VALDATA___V1218*/ meltfptr[1217]); - MELT_LOCATION ("warmelt-base.melt:1619:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1620:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111486,7 +111533,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); - MELT_LOCATION ("warmelt-base.melt:1619:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1620:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2466*/ meltfptr[2465]); @@ -111508,7 +111555,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2467*/ meltfptr[2466]); - MELT_LOCATION ("warmelt-base.melt:1619:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1620:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111526,7 +111573,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2467*/ meltfptr[2466]); - MELT_LOCATION ("warmelt-base.melt:1619:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1620:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111590,7 +111637,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2470*/ meltfptr[2469]); - MELT_LOCATION ("warmelt-base.melt:1619:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1620:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111608,7 +111655,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2470*/ meltfptr[2469]); - MELT_LOCATION ("warmelt-base.melt:1619:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1620:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2464*/ meltfptr[2463]); @@ -111632,7 +111679,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2471*/ meltfptr[2470]); - MELT_LOCATION ("warmelt-base.melt:1624:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1625:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111653,7 +111700,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2475*/ meltfptr[2474]); - MELT_LOCATION ("warmelt-base.melt:1624:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1625:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111671,7 +111718,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2475*/ meltfptr[2474]); - MELT_LOCATION ("warmelt-base.melt:1624:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1625:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111707,7 +111754,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2477*/ meltfptr[2476]); - MELT_LOCATION ("warmelt-base.melt:1624:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1625:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -111725,7 +111772,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2477*/ meltfptr[2476]); - MELT_LOCATION ("warmelt-base.melt:1624:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1625:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2473*/ meltfptr[2472]); @@ -111768,7 +111815,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2480*/ meltfptr[2479]); - MELT_LOCATION ("warmelt-base.melt:1628:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1629:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2482*/ meltfptr[2481]); @@ -111792,7 +111839,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2483*/ meltfptr[2482]); - MELT_LOCATION ("warmelt-base.melt:1633:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1634:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2485*/ meltfptr[2484]); @@ -111812,7 +111859,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2487*/ meltfptr[2486]); - MELT_LOCATION ("warmelt-base.melt:1648:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1649:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -111824,7 +111871,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2488*/ meltfptr[2487])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2485*/ meltfptr[2484]); - MELT_LOCATION ("warmelt-base.melt:1648:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1649:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -111838,7 +111885,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2488*/ meltfptr[2487])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V20*/ meltfptr[19]); - MELT_LOCATION ("warmelt-base.melt:1648:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1649:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -111852,7 +111899,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2488*/ meltfptr[2487])->tabval[2] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:1648:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1649:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -111864,7 +111911,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2488*/ meltfptr[2487])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V2487*/ meltfptr[2486]); - MELT_LOCATION ("warmelt-base.melt:1673:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1674:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -111876,12 +111923,12 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2489*/ meltfptr[2488])->tabval[0] = (melt_ptr_t) ( /*_.VALCLO___V2487*/ meltfptr[2486]); - MELT_LOCATION ("warmelt-base.melt:1673:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1674:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2489*/ meltfptr[2488]); - MELT_LOCATION ("warmelt-base.melt:1648:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1649:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -111895,7 +111942,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2488*/ meltfptr[2487])->tabval[4] = (melt_ptr_t) ( /*_.VALROUT___V2489*/ meltfptr[2488]); - MELT_LOCATION ("warmelt-base.melt:1648:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1649:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -111909,7 +111956,7 @@ meltmod__warmelt_base__initialmeltchunk_35 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2488*/ meltfptr[2487])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:1648:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1649:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2488*/ meltfptr[2487]); @@ -111979,7 +112026,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2493*/ meltfptr[2492]); - MELT_LOCATION ("warmelt-base.melt:1679:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1680:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -111991,7 +112038,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2495*/ meltfptr[2494])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2485*/ meltfptr[2484]); - MELT_LOCATION ("warmelt-base.melt:1679:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1680:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112005,7 +112052,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2495*/ meltfptr[2494])->tabval[1] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:1679:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1680:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112019,7 +112066,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2495*/ meltfptr[2494])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:1679:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1680:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -112031,7 +112078,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2495*/ meltfptr[2494])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V2487*/ meltfptr[2486]); - MELT_LOCATION ("warmelt-base.melt:1698:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1699:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -112043,12 +112090,12 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2496*/ meltfptr[2495])->tabval[0] = (melt_ptr_t) ( /*_.VALCLO___V2487*/ meltfptr[2486]); - MELT_LOCATION ("warmelt-base.melt:1698:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1699:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2496*/ meltfptr[2495]); - MELT_LOCATION ("warmelt-base.melt:1679:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1680:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112062,7 +112109,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2495*/ meltfptr[2494])->tabval[4] = (melt_ptr_t) ( /*_.VALROUT___V2496*/ meltfptr[2495]); - MELT_LOCATION ("warmelt-base.melt:1679:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1680:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2495*/ meltfptr[2494]); @@ -112082,7 +112129,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2497*/ meltfptr[2496]); - MELT_LOCATION ("warmelt-base.melt:1703:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1704:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112096,7 +112143,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2498*/ meltfptr[2497])->tabval[0] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:1703:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1704:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112110,7 +112157,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2498*/ meltfptr[2497])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:1703:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1704:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -112122,7 +112169,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2498*/ meltfptr[2497])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V557*/ meltfptr[556]); - MELT_LOCATION ("warmelt-base.melt:1703:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1704:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112136,7 +112183,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2498*/ meltfptr[2497])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V23*/ meltfptr[22]); - MELT_LOCATION ("warmelt-base.melt:1703:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1704:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112150,7 +112197,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2498*/ meltfptr[2497])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_GCC_PRAGMA__V24*/ meltfptr[23]); - MELT_LOCATION ("warmelt-base.melt:1703:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1704:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2498*/ meltfptr[2497]); @@ -112246,7 +112293,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2506*/ meltfptr[2505]); - MELT_LOCATION ("warmelt-base.melt:1739:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1740:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -112264,7 +112311,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2509*/ meltfptr[2508]); - MELT_LOCATION ("warmelt-base.melt:1739:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1740:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -112282,7 +112329,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:1739:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1740:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -112300,12 +112347,12 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st obj_vartab[3] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:1739:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1740:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2508*/ meltfptr[2507]); - MELT_LOCATION ("warmelt-base.melt:1745:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1746:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -112317,7 +112364,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2510*/ meltfptr[2509])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2508*/ meltfptr[2507]); - MELT_LOCATION ("warmelt-base.melt:1745:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1746:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112331,7 +112378,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2510*/ meltfptr[2509])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:1745:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1746:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112345,7 +112392,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2510*/ meltfptr[2509])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:1745:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1746:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112359,7 +112406,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2510*/ meltfptr[2509])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:1792:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1793:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -112371,7 +112418,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2512*/ meltfptr[2511])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2508*/ meltfptr[2507]); - MELT_LOCATION ("warmelt-base.melt:1792:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1793:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112385,7 +112432,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2512*/ meltfptr[2511])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:1792:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1793:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112399,7 +112446,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2512*/ meltfptr[2511])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:1792:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1793:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2512*/ meltfptr[2511]); @@ -112419,7 +112466,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2511*/ meltfptr[2510]); - MELT_LOCATION ("warmelt-base.melt:1745:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1746:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -112431,7 +112478,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2510*/ meltfptr[2509])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2511*/ meltfptr[2510]); - MELT_LOCATION ("warmelt-base.melt:1745:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1746:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112445,7 +112492,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2510*/ meltfptr[2509])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:1745:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1746:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2510*/ meltfptr[2509]); @@ -112484,7 +112531,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2514*/ meltfptr[2513]); - MELT_LOCATION ("warmelt-base.melt:1768:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1769:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -112496,7 +112543,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2516*/ meltfptr[2515])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2508*/ meltfptr[2507]); - MELT_LOCATION ("warmelt-base.melt:1768:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1769:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112510,7 +112557,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2516*/ meltfptr[2515])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:1768:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1769:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112524,7 +112571,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2516*/ meltfptr[2515])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:1768:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1769:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112538,7 +112585,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2516*/ meltfptr[2515])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:1768:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1769:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -112550,7 +112597,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2516*/ meltfptr[2515])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2511*/ meltfptr[2510]); - MELT_LOCATION ("warmelt-base.melt:1768:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1769:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112564,7 +112611,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2516*/ meltfptr[2515])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:1768:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1769:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2516*/ meltfptr[2515]); @@ -112603,7 +112650,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2518*/ meltfptr[2517]); - MELT_LOCATION ("warmelt-base.melt:1824:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1825:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -112621,7 +112668,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2521*/ meltfptr[2520]); - MELT_LOCATION ("warmelt-base.melt:1824:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1825:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -112639,7 +112686,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:1824:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1825:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -112657,7 +112704,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st obj_vartab[3] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:1824:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1825:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2520*/ meltfptr[2519]); @@ -112681,7 +112728,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2522*/ meltfptr[2521]); - MELT_LOCATION ("warmelt-base.melt:1832:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1833:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -112702,7 +112749,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2526*/ meltfptr[2525]); - MELT_LOCATION ("warmelt-base.melt:1832:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1833:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -112720,7 +112767,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2526*/ meltfptr[2525]); - MELT_LOCATION ("warmelt-base.melt:1832:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1833:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -112756,7 +112803,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2528*/ meltfptr[2527]); - MELT_LOCATION ("warmelt-base.melt:1832:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1833:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -112774,12 +112821,12 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2528*/ meltfptr[2527]); - MELT_LOCATION ("warmelt-base.melt:1832:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1833:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2524*/ meltfptr[2523]); - MELT_LOCATION ("warmelt-base.melt:1837:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1838:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -112791,7 +112838,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2529*/ meltfptr[2528])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2520*/ meltfptr[2519]); - MELT_LOCATION ("warmelt-base.melt:1837:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1838:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112805,7 +112852,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2529*/ meltfptr[2528])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:1837:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1838:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112819,7 +112866,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2529*/ meltfptr[2528])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:1837:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1838:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2529*/ meltfptr[2528]); @@ -112839,7 +112886,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2530*/ meltfptr[2529]); - MELT_LOCATION ("warmelt-base.melt:1861:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1862:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -112851,7 +112898,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2531*/ meltfptr[2530])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2520*/ meltfptr[2519]); - MELT_LOCATION ("warmelt-base.melt:1861:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1862:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112865,7 +112912,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2531*/ meltfptr[2530])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:1861:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1862:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112879,7 +112926,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2531*/ meltfptr[2530])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:1861:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1862:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112893,7 +112940,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2531*/ meltfptr[2530])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:1861:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1862:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -112905,7 +112952,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2531*/ meltfptr[2530])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2530*/ meltfptr[2529]); - MELT_LOCATION ("warmelt-base.melt:1861:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1862:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112919,7 +112966,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2531*/ meltfptr[2530])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:1861:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1862:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2531*/ meltfptr[2530]); @@ -112939,7 +112986,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2532*/ meltfptr[2531]); - MELT_LOCATION ("warmelt-base.melt:1887:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1888:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -112951,7 +112998,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2533*/ meltfptr[2532])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2520*/ meltfptr[2519]); - MELT_LOCATION ("warmelt-base.melt:1887:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1888:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112965,7 +113012,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2533*/ meltfptr[2532])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:1887:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1888:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112979,7 +113026,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2533*/ meltfptr[2532])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:1887:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1888:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -112993,7 +113040,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2533*/ meltfptr[2532])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:1887:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1888:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -113005,7 +113052,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2533*/ meltfptr[2532])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2530*/ meltfptr[2529]); - MELT_LOCATION ("warmelt-base.melt:1887:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1888:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113019,7 +113066,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2533*/ meltfptr[2532])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:1887:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1888:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2533*/ meltfptr[2532]); @@ -113058,7 +113105,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2535*/ meltfptr[2534]); - MELT_LOCATION ("warmelt-base.melt:1916:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1917:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -113079,7 +113126,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2539*/ meltfptr[2538]); - MELT_LOCATION ("warmelt-base.melt:1916:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1917:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -113097,7 +113144,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALTUP___V2539*/ meltfptr[2538]); - MELT_LOCATION ("warmelt-base.melt:1916:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1917:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -113133,7 +113180,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2541*/ meltfptr[2540]); - MELT_LOCATION ("warmelt-base.melt:1916:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1917:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -113151,7 +113198,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALTUP___V2541*/ meltfptr[2540]); - MELT_LOCATION ("warmelt-base.melt:1916:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1917:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2537*/ meltfptr[2536]); @@ -113175,7 +113222,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2542*/ meltfptr[2541]); - MELT_LOCATION ("warmelt-base.melt:1921:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1922:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -113193,7 +113240,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2545*/ meltfptr[2544]); - MELT_LOCATION ("warmelt-base.melt:1921:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1922:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -113211,7 +113258,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:1921:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1922:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -113229,12 +113276,12 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st obj_vartab[3] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:1921:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1922:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:1928:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1929:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -113246,7 +113293,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2546*/ meltfptr[2545])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:1928:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1929:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113260,7 +113307,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2546*/ meltfptr[2545])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:1928:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1929:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113274,7 +113321,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2546*/ meltfptr[2545])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:1928:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1929:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2546*/ meltfptr[2545]); @@ -113294,7 +113341,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2547*/ meltfptr[2546]); - MELT_LOCATION ("warmelt-base.melt:1952:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1953:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -113306,7 +113353,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2548*/ meltfptr[2547])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:1952:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1953:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113320,7 +113367,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2548*/ meltfptr[2547])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:1952:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1953:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113334,7 +113381,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2548*/ meltfptr[2547])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:1952:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1953:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113348,7 +113395,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2548*/ meltfptr[2547])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:1952:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1953:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -113360,7 +113407,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2548*/ meltfptr[2547])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2547*/ meltfptr[2546]); - MELT_LOCATION ("warmelt-base.melt:1952:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1953:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113374,7 +113421,7 @@ meltmod__warmelt_base__initialmeltchunk_36 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2548*/ meltfptr[2547])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:1952:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1953:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2548*/ meltfptr[2547]); @@ -113406,7 +113453,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2549*/ meltfptr[2548]); - MELT_LOCATION ("warmelt-base.melt:1979:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1980:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -113418,7 +113465,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2550*/ meltfptr[2549])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:1979:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1980:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113432,7 +113479,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2550*/ meltfptr[2549])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:1979:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1980:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113446,7 +113493,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2550*/ meltfptr[2549])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:1979:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1980:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113460,7 +113507,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2550*/ meltfptr[2549])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:1979:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1980:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -113472,7 +113519,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2550*/ meltfptr[2549])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2547*/ meltfptr[2546]); - MELT_LOCATION ("warmelt-base.melt:1979:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1980:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113486,7 +113533,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2550*/ meltfptr[2549])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:1979:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1980:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2550*/ meltfptr[2549]); @@ -113525,7 +113572,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2552*/ meltfptr[2551]); - MELT_LOCATION ("warmelt-base.melt:2013:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2014:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -113543,7 +113590,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2555*/ meltfptr[2554]); - MELT_LOCATION ("warmelt-base.melt:2013:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2014:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -113561,7 +113608,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:2013:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2014:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -113579,12 +113626,12 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st obj_vartab[3] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:2013:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2014:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2554*/ meltfptr[2553]); - MELT_LOCATION ("warmelt-base.melt:2020:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2021:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -113596,7 +113643,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2556*/ meltfptr[2555])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2020:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2021:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113610,7 +113657,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2556*/ meltfptr[2555])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2020:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2021:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113624,7 +113671,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2556*/ meltfptr[2555])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2020:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2021:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2556*/ meltfptr[2555]); @@ -113644,7 +113691,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2557*/ meltfptr[2556]); - MELT_LOCATION ("warmelt-base.melt:2044:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2045:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -113656,7 +113703,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2558*/ meltfptr[2557])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2044:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2045:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113670,7 +113717,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2558*/ meltfptr[2557])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2044:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2045:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113684,7 +113731,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2558*/ meltfptr[2557])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2044:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2045:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113698,7 +113745,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2558*/ meltfptr[2557])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:2044:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2045:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -113710,7 +113757,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2558*/ meltfptr[2557])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2557*/ meltfptr[2556]); - MELT_LOCATION ("warmelt-base.melt:2044:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2045:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113724,7 +113771,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2558*/ meltfptr[2557])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:2044:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2045:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2558*/ meltfptr[2557]); @@ -113744,7 +113791,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2559*/ meltfptr[2558]); - MELT_LOCATION ("warmelt-base.melt:2069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2070:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -113756,7 +113803,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2560*/ meltfptr[2559])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2070:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113770,7 +113817,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2560*/ meltfptr[2559])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2070:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113784,7 +113831,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2560*/ meltfptr[2559])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2070:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113798,7 +113845,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2560*/ meltfptr[2559])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:2069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2070:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -113810,7 +113857,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2560*/ meltfptr[2559])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2557*/ meltfptr[2556]); - MELT_LOCATION ("warmelt-base.melt:2069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2070:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113824,7 +113871,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2560*/ meltfptr[2559])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:2069:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2070:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2560*/ meltfptr[2559]); @@ -113863,7 +113910,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2562*/ meltfptr[2561]); - MELT_LOCATION ("warmelt-base.melt:2099:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2100:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -113881,7 +113928,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2565*/ meltfptr[2564]); - MELT_LOCATION ("warmelt-base.melt:2099:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2100:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -113899,7 +113946,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:2099:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2100:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -113917,12 +113964,12 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st obj_vartab[3] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:2099:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2100:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2564*/ meltfptr[2563]); - MELT_LOCATION ("warmelt-base.melt:2106:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2107:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -113934,7 +113981,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2566*/ meltfptr[2565])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2106:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2107:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113948,7 +113995,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2566*/ meltfptr[2565])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2106:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2107:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -113962,7 +114009,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2566*/ meltfptr[2565])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2106:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2107:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2566*/ meltfptr[2565]); @@ -113982,7 +114029,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2567*/ meltfptr[2566]); - MELT_LOCATION ("warmelt-base.melt:2130:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2131:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -113994,7 +114041,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2568*/ meltfptr[2567])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2130:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2131:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114008,7 +114055,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2568*/ meltfptr[2567])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2130:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2131:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114022,7 +114069,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2568*/ meltfptr[2567])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2130:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2131:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114036,7 +114083,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2568*/ meltfptr[2567])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:2130:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2131:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -114048,7 +114095,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2568*/ meltfptr[2567])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2567*/ meltfptr[2566]); - MELT_LOCATION ("warmelt-base.melt:2130:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2131:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114062,7 +114109,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2568*/ meltfptr[2567])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:2130:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2131:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2568*/ meltfptr[2567]); @@ -114082,7 +114129,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2569*/ meltfptr[2568]); - MELT_LOCATION ("warmelt-base.melt:2155:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2156:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -114094,7 +114141,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2570*/ meltfptr[2569])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2155:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2156:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114108,7 +114155,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2570*/ meltfptr[2569])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2155:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2156:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114122,7 +114169,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2570*/ meltfptr[2569])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2155:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2156:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114136,7 +114183,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2570*/ meltfptr[2569])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:2155:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2156:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -114148,7 +114195,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2570*/ meltfptr[2569])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2567*/ meltfptr[2566]); - MELT_LOCATION ("warmelt-base.melt:2155:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2156:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114162,7 +114209,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2570*/ meltfptr[2569])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:2155:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2156:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2570*/ meltfptr[2569]); @@ -114201,7 +114248,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2572*/ meltfptr[2571]); - MELT_LOCATION ("warmelt-base.melt:2185:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2186:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -114219,7 +114266,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2575*/ meltfptr[2574]); - MELT_LOCATION ("warmelt-base.melt:2185:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2186:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -114237,7 +114284,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:2185:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2186:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -114255,12 +114302,12 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st obj_vartab[3] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:2185:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2186:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2574*/ meltfptr[2573]); - MELT_LOCATION ("warmelt-base.melt:2192:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2193:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -114272,7 +114319,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2576*/ meltfptr[2575])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2192:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2193:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114286,7 +114333,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2576*/ meltfptr[2575])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2192:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2193:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114300,7 +114347,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2576*/ meltfptr[2575])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2192:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2193:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2576*/ meltfptr[2575]); @@ -114320,7 +114367,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2577*/ meltfptr[2576]); - MELT_LOCATION ("warmelt-base.melt:2216:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2217:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -114332,7 +114379,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2578*/ meltfptr[2577])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2216:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2217:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114346,7 +114393,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2578*/ meltfptr[2577])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2216:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2217:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114360,7 +114407,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2578*/ meltfptr[2577])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2216:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2217:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114374,7 +114421,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2578*/ meltfptr[2577])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:2216:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2217:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -114386,7 +114433,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2578*/ meltfptr[2577])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2577*/ meltfptr[2576]); - MELT_LOCATION ("warmelt-base.melt:2216:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2217:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114400,7 +114447,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2578*/ meltfptr[2577])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:2216:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2217:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2578*/ meltfptr[2577]); @@ -114420,7 +114467,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2579*/ meltfptr[2578]); - MELT_LOCATION ("warmelt-base.melt:2241:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2242:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -114432,7 +114479,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2580*/ meltfptr[2579])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2241:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2242:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114446,7 +114493,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2580*/ meltfptr[2579])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2241:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2242:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114460,7 +114507,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2580*/ meltfptr[2579])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2241:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2242:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114474,7 +114521,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2580*/ meltfptr[2579])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:2241:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2242:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -114486,7 +114533,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2580*/ meltfptr[2579])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2577*/ meltfptr[2576]); - MELT_LOCATION ("warmelt-base.melt:2241:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2242:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114500,7 +114547,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2580*/ meltfptr[2579])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:2241:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2242:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2580*/ meltfptr[2579]); @@ -114539,7 +114586,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2582*/ meltfptr[2581]); - MELT_LOCATION ("warmelt-base.melt:2271:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2272:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -114557,7 +114604,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2585*/ meltfptr[2584]); - MELT_LOCATION ("warmelt-base.melt:2271:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2272:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -114575,7 +114622,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:2271:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2272:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -114593,12 +114640,12 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st obj_vartab[3] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:2271:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2272:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2584*/ meltfptr[2583]); - MELT_LOCATION ("warmelt-base.melt:2278:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2279:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -114610,7 +114657,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2586*/ meltfptr[2585])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2278:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2279:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114624,7 +114671,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2586*/ meltfptr[2585])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2278:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2279:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114638,7 +114685,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2586*/ meltfptr[2585])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2278:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2279:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2586*/ meltfptr[2585]); @@ -114658,7 +114705,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2587*/ meltfptr[2586]); - MELT_LOCATION ("warmelt-base.melt:2302:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2303:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -114670,7 +114717,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2588*/ meltfptr[2587])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2302:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2303:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114684,7 +114731,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2588*/ meltfptr[2587])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2302:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2303:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114698,7 +114745,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2588*/ meltfptr[2587])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2302:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2303:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114712,7 +114759,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2588*/ meltfptr[2587])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:2302:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2303:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -114724,7 +114771,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2588*/ meltfptr[2587])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2587*/ meltfptr[2586]); - MELT_LOCATION ("warmelt-base.melt:2302:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2303:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114738,7 +114785,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2588*/ meltfptr[2587])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:2302:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2303:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2588*/ meltfptr[2587]); @@ -114758,7 +114805,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2589*/ meltfptr[2588]); - MELT_LOCATION ("warmelt-base.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2328:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -114770,7 +114817,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2590*/ meltfptr[2589])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2328:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114784,7 +114831,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2590*/ meltfptr[2589])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2328:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114798,7 +114845,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2590*/ meltfptr[2589])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2328:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114812,7 +114859,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2590*/ meltfptr[2589])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2328:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -114824,7 +114871,7 @@ meltmod__warmelt_base__initialmeltchunk_37 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2590*/ meltfptr[2589])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2587*/ meltfptr[2586]); - MELT_LOCATION ("warmelt-base.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2328:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114850,7 +114897,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L - MELT_LOCATION ("warmelt-base.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2328:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2590*/ meltfptr[2589]); @@ -114889,7 +114936,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2592*/ meltfptr[2591]); - MELT_LOCATION ("warmelt-base.melt:2360:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2361:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -114907,7 +114954,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2595*/ meltfptr[2594]); - MELT_LOCATION ("warmelt-base.melt:2360:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2361:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -114925,7 +114972,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:2360:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2361:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -114943,12 +114990,12 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[3] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:2360:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2361:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2594*/ meltfptr[2593]); - MELT_LOCATION ("warmelt-base.melt:2367:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2368:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -114960,7 +115007,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2596*/ meltfptr[2595])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2367:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2368:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114974,7 +115021,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2596*/ meltfptr[2595])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2367:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2368:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -114988,7 +115035,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2596*/ meltfptr[2595])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2367:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2368:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2596*/ meltfptr[2595]); @@ -115008,7 +115055,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2597*/ meltfptr[2596]); - MELT_LOCATION ("warmelt-base.melt:2391:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2392:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -115020,7 +115067,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2598*/ meltfptr[2597])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2391:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2392:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115034,7 +115081,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2598*/ meltfptr[2597])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2391:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2392:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115048,7 +115095,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2598*/ meltfptr[2597])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2391:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2392:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115062,7 +115109,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2598*/ meltfptr[2597])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:2391:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2392:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -115074,7 +115121,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2598*/ meltfptr[2597])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2597*/ meltfptr[2596]); - MELT_LOCATION ("warmelt-base.melt:2391:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2392:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115088,7 +115135,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2598*/ meltfptr[2597])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:2391:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2392:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2598*/ meltfptr[2597]); @@ -115108,7 +115155,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2599*/ meltfptr[2598]); - MELT_LOCATION ("warmelt-base.melt:2416:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2417:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -115120,7 +115167,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2600*/ meltfptr[2599])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2416:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2417:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115134,7 +115181,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2600*/ meltfptr[2599])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2416:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2417:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115148,7 +115195,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2600*/ meltfptr[2599])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2416:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2417:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115162,7 +115209,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2600*/ meltfptr[2599])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:2416:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2417:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -115174,7 +115221,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2600*/ meltfptr[2599])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2597*/ meltfptr[2596]); - MELT_LOCATION ("warmelt-base.melt:2416:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2417:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115188,7 +115235,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2600*/ meltfptr[2599])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:2416:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2417:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2600*/ meltfptr[2599]); @@ -115227,7 +115274,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2602*/ meltfptr[2601]); - MELT_LOCATION ("warmelt-base.melt:2446:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2447:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115245,7 +115292,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2605*/ meltfptr[2604]); - MELT_LOCATION ("warmelt-base.melt:2446:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2447:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115263,7 +115310,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:2446:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2447:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115281,12 +115328,12 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[3] = (melt_ptr_t) ( ( /*nil */ NULL)); - MELT_LOCATION ("warmelt-base.melt:2446:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2447:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2604*/ meltfptr[2603]); - MELT_LOCATION ("warmelt-base.melt:2453:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2454:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -115298,7 +115345,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2606*/ meltfptr[2605])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2453:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2454:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115312,7 +115359,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2606*/ meltfptr[2605])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2453:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2454:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115326,7 +115373,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2606*/ meltfptr[2605])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2453:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2454:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2606*/ meltfptr[2605]); @@ -115346,7 +115393,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2607*/ meltfptr[2606]); - MELT_LOCATION ("warmelt-base.melt:2477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2478:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -115358,7 +115405,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2608*/ meltfptr[2607])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2478:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115372,7 +115419,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2608*/ meltfptr[2607])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2478:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115386,7 +115433,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2608*/ meltfptr[2607])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2478:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115400,7 +115447,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2608*/ meltfptr[2607])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:2477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2478:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -115412,7 +115459,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2608*/ meltfptr[2607])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2607*/ meltfptr[2606]); - MELT_LOCATION ("warmelt-base.melt:2477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2478:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115426,7 +115473,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2608*/ meltfptr[2607])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:2477:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2478:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2608*/ meltfptr[2607]); @@ -115446,7 +115493,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2609*/ meltfptr[2608]); - MELT_LOCATION ("warmelt-base.melt:2502:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2503:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -115458,7 +115505,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2610*/ meltfptr[2609])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2544*/ meltfptr[2543]); - MELT_LOCATION ("warmelt-base.melt:2502:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2503:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115472,7 +115519,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2610*/ meltfptr[2609])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_DELAYED_QUEUE__V25*/ meltfptr[24]); - MELT_LOCATION ("warmelt-base.melt:2502:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2503:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115486,7 +115533,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2610*/ meltfptr[2609])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]); - MELT_LOCATION ("warmelt-base.melt:2502:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2503:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115500,7 +115547,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2610*/ meltfptr[2609])->tabval[3] = (melt_ptr_t) ( /*_.INITIAL_SYSTEM_DATA__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-base.melt:2502:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2503:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -115512,7 +115559,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2610*/ meltfptr[2609])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V2607*/ meltfptr[2606]); - MELT_LOCATION ("warmelt-base.melt:2502:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2503:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -115526,7 +115573,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2610*/ meltfptr[2609])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SYSTEM_DATA__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-base.melt:2502:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2503:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2610*/ meltfptr[2609]); @@ -115565,7 +115612,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2612*/ meltfptr[2611]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115583,7 +115630,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2615*/ meltfptr[2614]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115654,7 +115701,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2616*/ meltfptr[2615]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115672,7 +115719,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V2616*/ meltfptr[2615]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115690,7 +115737,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2618*/ meltfptr[2617]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115708,12 +115755,12 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2617*/ meltfptr[2616]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115731,7 +115778,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2620*/ meltfptr[2619]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115749,12 +115796,12 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2619*/ meltfptr[2618]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115772,7 +115819,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2622*/ meltfptr[2621]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115790,12 +115837,12 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2621*/ meltfptr[2620]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115813,7 +115860,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2624*/ meltfptr[2623]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115831,12 +115878,12 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2623*/ meltfptr[2622]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115854,7 +115901,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2626*/ meltfptr[2625]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115872,12 +115919,12 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2625*/ meltfptr[2624]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115895,7 +115942,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2628*/ meltfptr[2627]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115913,12 +115960,12 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2627*/ meltfptr[2626]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115936,7 +115983,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2630*/ meltfptr[2629]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115954,12 +116001,12 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2629*/ meltfptr[2628]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115977,7 +116024,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2632*/ meltfptr[2631]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -115995,12 +116042,12 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2631*/ meltfptr[2630]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -116018,7 +116065,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2634*/ meltfptr[2633]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -116036,7 +116083,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2633*/ meltfptr[2632]); @@ -116206,7 +116253,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2635*/ meltfptr[2634]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -116224,7 +116271,7 @@ meltmod__warmelt_base__initialmeltchunk_38 (struct frame_start_module_melt_st obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V2635*/ meltfptr[2634]); - MELT_LOCATION ("warmelt-base.melt:2531:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2532:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2614*/ meltfptr[2613]); @@ -116431,7 +116478,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2654*/ meltfptr[2653]); - MELT_LOCATION ("warmelt-base.melt:2559:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2560:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -116449,7 +116496,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2657*/ meltfptr[2656]); - MELT_LOCATION ("warmelt-base.melt:2559:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2560:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -116534,7 +116581,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2658*/ meltfptr[2657]); - MELT_LOCATION ("warmelt-base.melt:2559:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2560:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -116717,7 +116764,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V2659*/ meltfptr[2658]); - MELT_LOCATION ("warmelt-base.melt:2559:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2560:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -116735,12 +116782,12 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V2659*/ meltfptr[2658]); - MELT_LOCATION ("warmelt-base.melt:2559:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2560:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2656*/ meltfptr[2655]); - MELT_LOCATION ("warmelt-base.melt:2571:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2572:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -116753,7 +116800,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2660*/ meltfptr[2659])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V20*/ meltfptr[19]); - MELT_LOCATION ("warmelt-base.melt:2571:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2572:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2660*/ meltfptr[2659]); @@ -116795,7 +116842,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st /*_.MAKE_LIST__V2665*/ meltfptr[2664] = (meltgc_new_list ((meltobject_ptr_t) ( /*_.DISCR_LIST__V26*/ meltfptr[25]))); - MELT_LOCATION ("warmelt-base.melt:2578:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2579:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -116813,12 +116860,12 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[0] = (melt_ptr_t) ( /*_.MAKE_LIST__V2665*/ meltfptr[2664]); - MELT_LOCATION ("warmelt-base.melt:2578:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2579:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2664*/ meltfptr[2663]); - MELT_LOCATION ("warmelt-base.melt:2583:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2584:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -116830,7 +116877,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2666*/ meltfptr[2665])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2614*/ meltfptr[2613]); - MELT_LOCATION ("warmelt-base.melt:2583:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2584:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -116842,7 +116889,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2666*/ meltfptr[2665])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V2664*/ meltfptr[2663]); - MELT_LOCATION ("warmelt-base.melt:2583:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2584:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -116856,7 +116903,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2666*/ meltfptr[2665])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V20*/ meltfptr[19]); - MELT_LOCATION ("warmelt-base.melt:2583:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2584:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2666*/ meltfptr[2665]); @@ -116876,7 +116923,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V2667*/ meltfptr[2666]); - MELT_LOCATION ("warmelt-base.melt:2588:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2589:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -116888,7 +116935,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2668*/ meltfptr[2667])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V2664*/ meltfptr[2663]); - MELT_LOCATION ("warmelt-base.melt:2588:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2589:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -116902,7 +116949,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V2668*/ meltfptr[2667])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V20*/ meltfptr[19]); - MELT_LOCATION ("warmelt-base.melt:2588:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2589:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V2668*/ meltfptr[2667]); @@ -116941,7 +116988,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2670*/ meltfptr[2669]); - MELT_LOCATION ("warmelt-base.melt:2593:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2594:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -116959,7 +117006,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2673*/ meltfptr[2672]); - MELT_LOCATION ("warmelt-base.melt:2593:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2594:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -116977,7 +117024,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALSTR___V2674*/ meltfptr[2673]); - MELT_LOCATION ("warmelt-base.melt:2593:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2594:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -116995,7 +117042,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[3] = (melt_ptr_t) ( /*_.VALSTR___V2675*/ meltfptr[2674]); - MELT_LOCATION ("warmelt-base.melt:2593:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2594:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117013,7 +117060,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALSTR___V2676*/ meltfptr[2675]); - MELT_LOCATION ("warmelt-base.melt:2593:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2594:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117031,7 +117078,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[6] = (melt_ptr_t) ( /*_.VALSTR___V2677*/ meltfptr[2676]); - MELT_LOCATION ("warmelt-base.melt:2593:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2594:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117049,7 +117096,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[7] = (melt_ptr_t) ( /*_.VALSTR___V2678*/ meltfptr[2677]); - MELT_LOCATION ("warmelt-base.melt:2593:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2594:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117067,7 +117114,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[8] = (melt_ptr_t) ( /*_.VALSTR___V2679*/ meltfptr[2678]); - MELT_LOCATION ("warmelt-base.melt:2593:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2594:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117085,7 +117132,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[9] = (melt_ptr_t) ( /*_.VALSTR___V2680*/ meltfptr[2679]); - MELT_LOCATION ("warmelt-base.melt:2593:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2594:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117103,7 +117150,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[10] = (melt_ptr_t) ( /*_.VALSTR___V2681*/ meltfptr[2680]); - MELT_LOCATION ("warmelt-base.melt:2593:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2594:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2672*/ meltfptr[2671]); @@ -117127,7 +117174,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2682*/ meltfptr[2681]); - MELT_LOCATION ("warmelt-base.melt:2674:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2675:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117145,7 +117192,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2685*/ meltfptr[2684]); - MELT_LOCATION ("warmelt-base.melt:2674:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2675:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117163,7 +117210,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALSTR___V2686*/ meltfptr[2685]); - MELT_LOCATION ("warmelt-base.melt:2674:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2675:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117181,7 +117228,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[3] = (melt_ptr_t) ( /*_.VALSTR___V2687*/ meltfptr[2686]); - MELT_LOCATION ("warmelt-base.melt:2674:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2675:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117199,7 +117246,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALSTR___V2688*/ meltfptr[2687]); - MELT_LOCATION ("warmelt-base.melt:2674:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2675:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117217,7 +117264,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[6] = (melt_ptr_t) ( /*_.VALSTR___V2689*/ meltfptr[2688]); - MELT_LOCATION ("warmelt-base.melt:2674:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2675:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117235,7 +117282,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[7] = (melt_ptr_t) ( /*_.VALSTR___V2690*/ meltfptr[2689]); - MELT_LOCATION ("warmelt-base.melt:2674:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2675:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117253,7 +117300,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[8] = (melt_ptr_t) ( /*_.VALSTR___V2691*/ meltfptr[2690]); - MELT_LOCATION ("warmelt-base.melt:2674:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2675:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117271,7 +117318,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[9] = (melt_ptr_t) ( /*_.VALSTR___V2692*/ meltfptr[2691]); - MELT_LOCATION ("warmelt-base.melt:2674:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2675:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117289,7 +117336,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[10] = (melt_ptr_t) ( /*_.VALSTR___V2693*/ meltfptr[2692]); - MELT_LOCATION ("warmelt-base.melt:2674:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2675:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2684*/ meltfptr[2683]); @@ -117313,7 +117360,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2694*/ meltfptr[2693]); - MELT_LOCATION ("warmelt-base.melt:2779:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2780:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117331,7 +117378,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2697*/ meltfptr[2696]); - MELT_LOCATION ("warmelt-base.melt:2779:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2780:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117349,7 +117396,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALSTR___V2698*/ meltfptr[2697]); - MELT_LOCATION ("warmelt-base.melt:2779:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2780:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117367,7 +117414,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[3] = (melt_ptr_t) ( /*_.VALSTR___V2699*/ meltfptr[2698]); - MELT_LOCATION ("warmelt-base.melt:2779:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2780:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117385,7 +117432,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALSTR___V2700*/ meltfptr[2699]); - MELT_LOCATION ("warmelt-base.melt:2779:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2780:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117403,7 +117450,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[6] = (melt_ptr_t) ( /*_.VALSTR___V2701*/ meltfptr[2700]); - MELT_LOCATION ("warmelt-base.melt:2779:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2780:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117421,7 +117468,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[8] = (melt_ptr_t) ( /*_.VALSTR___V2702*/ meltfptr[2701]); - MELT_LOCATION ("warmelt-base.melt:2779:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2780:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117439,7 +117486,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[9] = (melt_ptr_t) ( /*_.VALSTR___V2703*/ meltfptr[2702]); - MELT_LOCATION ("warmelt-base.melt:2779:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2780:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117457,7 +117504,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[10] = (melt_ptr_t) ( /*_.VALSTR___V2704*/ meltfptr[2703]); - MELT_LOCATION ("warmelt-base.melt:2779:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2780:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2696*/ meltfptr[2695]); @@ -117481,7 +117528,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2705*/ meltfptr[2704]); - MELT_LOCATION ("warmelt-base.melt:2879:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2880:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117499,7 +117546,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2708*/ meltfptr[2707]); - MELT_LOCATION ("warmelt-base.melt:2879:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2880:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117517,7 +117564,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALSTR___V2709*/ meltfptr[2708]); - MELT_LOCATION ("warmelt-base.melt:2879:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2880:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117535,7 +117582,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[3] = (melt_ptr_t) ( /*_.VALSTR___V2710*/ meltfptr[2709]); - MELT_LOCATION ("warmelt-base.melt:2879:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2880:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117553,7 +117600,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALSTR___V2711*/ meltfptr[2710]); - MELT_LOCATION ("warmelt-base.melt:2879:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2880:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117571,7 +117618,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[5] = (melt_ptr_t) ( /*_.VALSTR___V2712*/ meltfptr[2711]); - MELT_LOCATION ("warmelt-base.melt:2879:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2880:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117589,7 +117636,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[6] = (melt_ptr_t) ( /*_.VALSTR___V2713*/ meltfptr[2712]); - MELT_LOCATION ("warmelt-base.melt:2879:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2880:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117607,7 +117654,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[8] = (melt_ptr_t) ( /*_.VALSTR___V2714*/ meltfptr[2713]); - MELT_LOCATION ("warmelt-base.melt:2879:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2880:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117644,7 +117691,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2716*/ meltfptr[2715]); - MELT_LOCATION ("warmelt-base.melt:2879:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2880:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117662,7 +117709,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[10] = (melt_ptr_t) ( /*_.VALDATA___V2716*/ meltfptr[2715]); - MELT_LOCATION ("warmelt-base.melt:2879:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2880:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2707*/ meltfptr[2706]); @@ -117686,7 +117733,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2718*/ meltfptr[2717]); - MELT_LOCATION ("warmelt-base.melt:2907:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117704,7 +117751,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2721*/ meltfptr[2720]); - MELT_LOCATION ("warmelt-base.melt:2907:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117722,7 +117769,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALSTR___V2722*/ meltfptr[2721]); - MELT_LOCATION ("warmelt-base.melt:2907:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117740,7 +117787,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[3] = (melt_ptr_t) ( /*_.VALSTR___V2723*/ meltfptr[2722]); - MELT_LOCATION ("warmelt-base.melt:2907:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117758,7 +117805,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALSTR___V2724*/ meltfptr[2723]); - MELT_LOCATION ("warmelt-base.melt:2907:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117776,7 +117823,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[6] = (melt_ptr_t) ( /*_.VALSTR___V2725*/ meltfptr[2724]); - MELT_LOCATION ("warmelt-base.melt:2907:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117794,7 +117841,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[7] = (melt_ptr_t) ( /*_.VALSTR___V2726*/ meltfptr[2725]); - MELT_LOCATION ("warmelt-base.melt:2907:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117812,7 +117859,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[8] = (melt_ptr_t) ( /*_.VALSTR___V2727*/ meltfptr[2726]); - MELT_LOCATION ("warmelt-base.melt:2907:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117830,7 +117877,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[9] = (melt_ptr_t) ( /*_.VALSTR___V2728*/ meltfptr[2727]); - MELT_LOCATION ("warmelt-base.melt:2907:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2908:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117848,7 +117895,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[10] = (melt_ptr_t) ( /*_.VALSTR___V2729*/ meltfptr[2728]); - MELT_LOCATION ("warmelt-base.melt:2907:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2908:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2720*/ meltfptr[2719]); @@ -117872,7 +117919,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2730*/ meltfptr[2729]); - MELT_LOCATION ("warmelt-base.melt:2965:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2966:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117890,7 +117937,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V2733*/ meltfptr[2732]); - MELT_LOCATION ("warmelt-base.melt:2965:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2966:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117908,7 +117955,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[2] = (melt_ptr_t) ( /*_.VALSTR___V2734*/ meltfptr[2733]); - MELT_LOCATION ("warmelt-base.melt:2965:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2966:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117926,7 +117973,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[3] = (melt_ptr_t) ( /*_.VALSTR___V2735*/ meltfptr[2734]); - MELT_LOCATION ("warmelt-base.melt:2965:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2966:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117944,7 +117991,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[4] = (melt_ptr_t) ( /*_.VALSTR___V2736*/ meltfptr[2735]); - MELT_LOCATION ("warmelt-base.melt:2965:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2966:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117962,7 +118009,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[6] = (melt_ptr_t) ( /*_.VALSTR___V2737*/ meltfptr[2736]); - MELT_LOCATION ("warmelt-base.melt:2965:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2966:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117980,7 +118027,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[7] = (melt_ptr_t) ( /*_.VALSTR___V2738*/ meltfptr[2737]); - MELT_LOCATION ("warmelt-base.melt:2965:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2966:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -117998,7 +118045,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[8] = (melt_ptr_t) ( /*_.VALSTR___V2739*/ meltfptr[2738]); - MELT_LOCATION ("warmelt-base.melt:2965:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2966:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -118016,7 +118063,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[9] = (melt_ptr_t) ( /*_.VALSTR___V2740*/ meltfptr[2739]); - MELT_LOCATION ("warmelt-base.melt:2965:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2966:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -118034,7 +118081,7 @@ meltmod__warmelt_base__initialmeltchunk_39 (struct frame_start_module_melt_st obj_vartab[10] = (melt_ptr_t) ( /*_.VALSTR___V2741*/ meltfptr[2740]); - MELT_LOCATION ("warmelt-base.melt:2965:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2966:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V2732*/ meltfptr[2731]); @@ -124594,7 +124641,7 @@ meltmod__warmelt_base__initialmeltchunk_43 (struct frame_start_module_melt_st /*clear *//*_.OR___V3165*/ meltfptr[3164] = 0; } - MELT_LOCATION ("warmelt-base.melt:1427:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1428:/ initchunk"); /*^block */ /*anyblock */ { @@ -124628,7 +124675,7 @@ meltmod__warmelt_base__initialmeltchunk_43 (struct frame_start_module_melt_st /*clear *//*_.INSTALL_METHOD__V3168*/ meltfptr[3165] = 0; } - MELT_LOCATION ("warmelt-base.melt:1432:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1433:/ initchunk"); /*^block */ /*anyblock */ { @@ -124661,7 +124708,7 @@ meltmod__warmelt_base__initialmeltchunk_43 (struct frame_start_module_melt_st /*clear *//*_.INSTALL_METHOD__V3169*/ meltfptr[3166] = 0; } - MELT_LOCATION ("warmelt-base.melt:1437:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1438:/ initchunk"); /*^block */ /*anyblock */ { @@ -124694,7 +124741,7 @@ meltmod__warmelt_base__initialmeltchunk_43 (struct frame_start_module_melt_st /*clear *//*_.INSTALL_METHOD__V3170*/ meltfptr[3164] = 0; } - MELT_LOCATION ("warmelt-base.melt:1442:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1443:/ initchunk"); /*^block */ /*anyblock */ { @@ -124727,7 +124774,7 @@ meltmod__warmelt_base__initialmeltchunk_43 (struct frame_start_module_melt_st /*clear *//*_.INSTALL_METHOD__V3171*/ meltfptr[3165] = 0; } - MELT_LOCATION ("warmelt-base.melt:1455:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1456:/ initchunk"); /*^block */ /*anyblock */ { @@ -124761,7 +124808,7 @@ meltmod__warmelt_base__initialmeltchunk_43 (struct frame_start_module_melt_st /*clear *//*_.INSTALL_METHOD__V3172*/ meltfptr[3166] = 0; } - MELT_LOCATION ("warmelt-base.melt:1459:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1460:/ initchunk"); /*^block */ /*anyblock */ { @@ -124794,7 +124841,7 @@ meltmod__warmelt_base__initialmeltchunk_43 (struct frame_start_module_melt_st /*clear *//*_.INSTALL_METHOD__V3173*/ meltfptr[3164] = 0; } - MELT_LOCATION ("warmelt-base.melt:1467:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1468:/ initchunk"); /*^block */ /*anyblock */ { @@ -124827,7 +124874,7 @@ meltmod__warmelt_base__initialmeltchunk_43 (struct frame_start_module_melt_st /*clear *//*_.INSTALL_METHOD__V3174*/ meltfptr[3165] = 0; } - MELT_LOCATION ("warmelt-base.melt:1472:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:1473:/ initchunk"); /*^block */ /*anyblock */ { @@ -124861,7 +124908,7 @@ meltmod__warmelt_base__initialmeltchunk_43 (struct frame_start_module_melt_st /*clear *//*_.INSTALL_METHOD__V3175*/ meltfptr[3166] = 0; } - MELT_LOCATION ("warmelt-base.melt:2566:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2567:/ initchunk"); /*^block */ /*anyblock */ { @@ -125089,7 +125136,7 @@ meltmod__warmelt_base__initialmeltchunk_43 (struct frame_start_module_melt_st /*clear *//*_.VALUEXPORTER___V3176*/ meltfptr[3164] = 0; } - MELT_LOCATION ("warmelt-base.melt:2670:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2671:/ initchunk"); /*^block */ /*anyblock */ { @@ -125114,7 +125161,7 @@ meltmod__warmelt_base__initialmeltchunk_43 (struct frame_start_module_melt_st /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3177*/ meltfptr[3165] = 0; } - MELT_LOCATION ("warmelt-base.melt:2776:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2777:/ initchunk"); /*^block */ /*anyblock */ { @@ -125139,7 +125186,7 @@ meltmod__warmelt_base__initialmeltchunk_43 (struct frame_start_module_melt_st /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3178*/ meltfptr[3166] = 0; } - MELT_LOCATION ("warmelt-base.melt:2875:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2876:/ initchunk"); /*^block */ /*anyblock */ { @@ -125164,7 +125211,7 @@ meltmod__warmelt_base__initialmeltchunk_43 (struct frame_start_module_melt_st /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3179*/ meltfptr[3164] = 0; } - MELT_LOCATION ("warmelt-base.melt:2903:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2904:/ initchunk"); /*^block */ /*anyblock */ { @@ -125189,7 +125236,7 @@ meltmod__warmelt_base__initialmeltchunk_43 (struct frame_start_module_melt_st /*clear *//*_.INSTALL_VALUE_DESCRIPTOR__V3180*/ meltfptr[3165] = 0; } - MELT_LOCATION ("warmelt-base.melt:2962:/ initchunk"); + MELT_LOCATION ("warmelt-base.melt:2963:/ initchunk"); /*^block */ /*anyblock */ { @@ -133267,7 +133314,7 @@ meltmod__warmelt_base__forward_or_mark_module_start_frame (struct int ix = 0; initial_frame_st *meltframptr_ = (initial_frame_st *) fp; melt_assertmsg ("check module frame", - meltframptr_->mcfr_nbvar == /*minihash */ -4087); + meltframptr_->mcfr_nbvar == /*minihash */ -615); if (!marking && melt_is_forwarding) { dbgprintf diff --git a/gcc/melt/generated/warmelt-debug+01.c b/gcc/melt/generated/warmelt-debug+01.c index f419f5febef..5ca29177beb 100644 --- a/gcc/melt/generated/warmelt-debug+01.c +++ b/gcc/melt/generated/warmelt-debug+01.c @@ -1099,7 +1099,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-debug.melt:226:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:226:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -1330,7 +1342,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-debug.melt:239:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:239:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -1560,7 +1584,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-debug.melt:252:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:252:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5549,7 +5585,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V6*/ meltfptr[4];; - MELT_LOCATION ("warmelt-debug.melt:447:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:447:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5776,7 +5824,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-debug.melt:477:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:477:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V10*/ meltfptr[9] = /*_.RETURN___V11*/ meltfptr[10];; @@ -5998,7 +6058,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V6*/ meltfptr[4];; - MELT_LOCATION ("warmelt-debug.melt:467:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:467:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6890,7 +6962,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-debug.melt:494:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:494:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7584,7 +7668,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-debug.melt:546:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:546:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9043,7 +9139,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V6*/ meltfptr[4];; - MELT_LOCATION ("warmelt-debug.melt:702:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:702:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11473,7 +11581,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.DBG_OUT__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-debug.melt:849:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:849:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14508,7 +14628,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-debug.melt:1009:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:1009:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15991,7 +16123,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-debug.melt:1093:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:1093:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16279,7 +16423,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-debug.melt:1109:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:1109:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16990,7 +17146,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-debug.melt:1129:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:1129:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-debug+02.c b/gcc/melt/generated/warmelt-debug+02.c index 26ba46ed088..e4d1a4019e7 100644 --- a/gcc/melt/generated/warmelt-debug+02.c +++ b/gcc/melt/generated/warmelt-debug+02.c @@ -2642,7 +2642,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-debug.melt:1289:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:1289:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -2982,7 +2994,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-debug.melt:1299:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:1299:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3627,7 +3651,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-debug.melt:1322:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:1322:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4178,7 +4214,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-debug.melt:1347:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:1347:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5389,7 +5437,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-debug.melt:1411:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:1411:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-debug+meltdesc.c b/gcc/melt/generated/warmelt-debug+meltdesc.c index 0127fbcaf67..ce1f19cb2fe 100644 --- a/gcc/melt/generated/warmelt-debug+meltdesc.c +++ b/gcc/melt/generated/warmelt-debug+meltdesc.c @@ -19,7 +19,7 @@ #endif /*__cplusplus */ /* version of the GCC compiler & MELT runtime generating this */ -const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revision 188875] MELT_0.9.6-pre" +const char melt_genversionstr[]="4.8.0 20120702 (experimental) [melt-branch revision 189162] MELT_0.9.6-pre" #ifdef __cplusplus " (in C++)" @@ -28,7 +28,7 @@ const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revi #endif ; -const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_188875]"; +const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_189162]"; /* source name & real path of the module */ /*MELTMODULENAME MELT-STAGE-ZERO/warmelt-debug */ @@ -36,15 +36,15 @@ const char melt_modulename[]="warmelt-debug"; const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.8.0/melt-modules/0.9.6-pre/warmelt-debug"; /* hash of preprocessed melt-run.h generating this */ -const char melt_prepromd5meltrun[]="40fea0fe808f877cf6541857ec8d6c2d"; +const char melt_prepromd5meltrun[]="b3a18a5fcc8e78e7c3ea5bf55f88e347"; /* hexmd5checksum of primary C file */ -const char melt_primaryhexmd5[]="9ca26911122acb1e216e86c18d7b02da"; +const char melt_primaryhexmd5[]="0d783f671b847155e7278571def7f9e1"; /* hexmd5checksum of secondary C files */ const char* const melt_secondaryhexmd5tab[]={ /*nosecfile*/ (const char*)0, - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-debug+01.c #1 */ "37154de324c28a7420ca121b62463811", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-debug+02.c #2 */ "811b74ddca847ee9c6ed535f5d0b6faf", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-debug+01.c #1 */ "dd1829e6e810d8757bba6ce4f86900d5", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-debug+02.c #2 */ "666c5920c6c6e853fb9d927782e982fa", /*nosecfile*/ (const char*)0, (const char*)0 }; @@ -52,10 +52,10 @@ const char* const melt_secondaryhexmd5tab[]={ const int melt_lastsecfileindex=2; /* cumulated checksum of primary & secondary files */ -const char melt_cumulated_hexmd5[]="0a6af2a1b44c3569fb727f50c02a6a7c" ; +const char melt_cumulated_hexmd5[]="47dee6ad6093f1a17fc05e86845752e8" ; /* include the timestamp file */ -#define meltmod_warmelt_debug_mds__0a6af2a1b44c3569fb727f50c02a6a7c 1 +#define meltmod_warmelt_debug_mds__47dee6ad6093f1a17fc05e86845752e8 1 #include "warmelt-debug+melttime.h" diff --git a/gcc/melt/generated/warmelt-debug+melttime.h b/gcc/melt/generated/warmelt-debug+melttime.h index b64ae039582..b4bd4fce031 100644 --- a/gcc/melt/generated/warmelt-debug+melttime.h +++ b/gcc/melt/generated/warmelt-debug+melttime.h @@ -5,7 +5,7 @@ /* This warmelt-debug+melttime.h is included from warmelt-debug+meltdesc.c only. */ -#if meltmod_warmelt_debug_mds__0a6af2a1b44c3569fb727f50c02a6a7c +#if meltmod_warmelt_debug_mds__47dee6ad6093f1a17fc05e86845752e8 /* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-debug */ #ifdef __cplusplus @@ -18,8 +18,8 @@ extern "C" { /*MELT BOOTSTRAP*/ -const char melt_gen_timestamp[]="Fri Jun 22 15:20:01 2012 CEST"; -const long long melt_gen_timenum=1340371201; +const char melt_gen_timestamp[]="Mon Jul 2 17:04:54 2012 MEST"; +const long long melt_gen_timenum=1341241494; const char melt_build_timestamp[]= __DATE__ "@" __TIME__ #ifdef __cplusplus @@ -34,7 +34,7 @@ const long long melt_gen_timenum=1340371201; } ; /* end extern C */ #endif /*__cplusplus */ - #else /* ! meltmod_warmelt_debug_mds__0a6af2a1b44c3569fb727f50c02a6a7c */ + #else /* ! meltmod_warmelt_debug_mds__47dee6ad6093f1a17fc05e86845752e8 */ #error invalid timestamp file for MELT-STAGE-ZERO/warmelt-debug - #endif /* meltmod_warmelt_debug_mds__0a6af2a1b44c3569fb727f50c02a6a7c */ + #endif /* meltmod_warmelt_debug_mds__47dee6ad6093f1a17fc05e86845752e8 */ diff --git a/gcc/melt/generated/warmelt-debug.c b/gcc/melt/generated/warmelt-debug.c index 1c8d7cfe927..19ec431c81f 100644 --- a/gcc/melt/generated/warmelt-debug.c +++ b/gcc/melt/generated/warmelt-debug.c @@ -1895,7 +1895,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-debug.melt:187:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:187:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -2123,7 +2135,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-debug.melt:200:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:200:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -2354,7 +2378,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-debug.melt:213:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-debug.melt:213:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -2474,7 +2510,7 @@ initialize_module_meltdata_warmelt_debug (initial_frame_st * iniframp__, dbgprintf ("start initialize_module_meltdata_warmelt_debug iniframp__=%p", (void *) iniframp__); melt_assertmsg ("check module initial frame", - iniframp__->mcfr_nbvar == /*minihash */ -423); + iniframp__->mcfr_nbvar == /*minihash */ -1828); struct cdata_st { @@ -6842,7 +6878,8 @@ start_module_melt (void *modargp_) melt_topframe = (struct melt_callframe_st *) &meltfram__; /**initial routine prologue**/ /* set initial frame marking */ - ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = /*minihash */ -423; + ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = + /*minihash */ -1828; ((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout = meltmod__warmelt_debug__forward_or_mark_module_start_frame; /**COMMENT: get previous environment **/ ; @@ -16713,7 +16750,7 @@ meltmod__warmelt_debug__forward_or_mark_module_start_frame (struct int ix = 0; initial_frame_st *meltframptr_ = (initial_frame_st *) fp; melt_assertmsg ("check module frame", - meltframptr_->mcfr_nbvar == /*minihash */ -423); + meltframptr_->mcfr_nbvar == /*minihash */ -1828); if (!marking && melt_is_forwarding) { dbgprintf diff --git a/gcc/melt/generated/warmelt-first+01.c b/gcc/melt/generated/warmelt-first+01.c index 92ccddf775a..6d7d6a3f6d5 100644 --- a/gcc/melt/generated/warmelt-first+01.c +++ b/gcc/melt/generated/warmelt-first+01.c @@ -1420,7 +1420,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V6*/ meltfptr[4];; - MELT_LOCATION ("warmelt-first.melt:2782:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:2782:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -1740,7 +1752,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-first.melt:2791:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:2791:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -2062,7 +2086,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-first.melt:2806:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:2806:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -2578,7 +2614,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-first.melt:2822:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:2822:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -2813,7 +2861,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NEWCONT__V7*/ meltfptr[6];; - MELT_LOCATION ("warmelt-first.melt:2882:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:2882:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V3*/ meltfptr[2] = /*_.RETURN___V9*/ meltfptr[8];; @@ -2833,7 +2893,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-first.melt:2873:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:2873:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3017,7 +3089,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-first.melt:2892:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:2892:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-first.melt:2889:/ quasiblock"); @@ -3228,7 +3312,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-first.melt:2900:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:2900:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-first.melt:2898:/ quasiblock"); @@ -3493,7 +3589,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-first.melt:2918:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:2918:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-first.melt:2914:/ quasiblock"); @@ -3583,7 +3691,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-first.melt:2923:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:2923:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-first.melt:2919:/ quasiblock"); @@ -3678,8 +3799,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION - ("warmelt-first.melt:2928:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:2928:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION @@ -3777,8 +3912,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION - ("warmelt-first.melt:2933:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:2933:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION @@ -3880,8 +4029,23 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION - ("warmelt-first.melt:2938:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:2938:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION @@ -3979,8 +4143,23 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION - ("warmelt-first.melt:2943:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:2943:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION @@ -4090,8 +4269,23 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION - ("warmelt-first.melt:2949:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:2949:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; @@ -4233,8 +4427,21 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr [0] = NULL;; - MELT_LOCATION - ("warmelt-first.melt:2961:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:2961:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto @@ -4540,7 +4747,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-first.melt:2966:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:2966:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V24*/ meltfptr[20] = /*_.RETURN___V64*/ meltfptr[53];; @@ -4593,7 +4812,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-first.melt:2886:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:2886:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4763,7 +4994,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-first.melt:2984:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:2984:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-first.melt:2975:/ quasiblock"); @@ -5088,7 +5331,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-first.melt:3004:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3004:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V14*/ meltfptr[13] = /*_.RETURN___V20*/ meltfptr[18];; @@ -5194,7 +5449,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.VBIND_VALUE__V23*/ meltfptr[16];; - MELT_LOCATION ("warmelt-first.melt:3007:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3007:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V11*/ meltfptr[9] = /*_.RETURN___V24*/ meltfptr[17];; @@ -5218,7 +5485,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V11*/ meltfptr[9];; - MELT_LOCATION ("warmelt-first.melt:2971:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:2971:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5466,7 +5745,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-first.melt:3018:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3018:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-first.melt:3014:/ quasiblock"); @@ -5599,7 +5890,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-first.melt:3026:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3026:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-first.melt:3023:/ quasiblock"); @@ -5812,7 +6115,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-first.melt:3036:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3036:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V23*/ meltfptr[16] = /*_.RETURN___V27*/ meltfptr[26];; @@ -5844,7 +6159,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[9];; - MELT_LOCATION ("warmelt-first.melt:3011:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3011:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6065,7 +6392,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-first.melt:3047:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3047:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-first.melt:3043:/ quasiblock"); @@ -6198,7 +6537,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-first.melt:3055:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3055:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-first.melt:3052:/ quasiblock"); @@ -6482,7 +6833,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-first.melt:3067:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3067:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V25*/ meltfptr[23] = /*_.RETURN___V29*/ meltfptr[28];; @@ -6516,7 +6879,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[9];; - MELT_LOCATION ("warmelt-first.melt:3040:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3040:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7639,7 +8014,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-first.melt:3159:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3159:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8886,7 +9273,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-first.melt:3247:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3247:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9892,7 +10291,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-first.melt:3301:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3301:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10944,7 +11355,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OPTRES__V15*/ meltfptr[14];; - MELT_LOCATION ("warmelt-first.melt:3375:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3375:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V14*/ meltfptr[12] = /*_.RETURN___V16*/ meltfptr[15];; @@ -10989,7 +11412,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-first.melt:3380:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3380:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-first.melt:3376:/ quasiblock"); @@ -11025,7 +11460,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-first.melt:3363:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3363:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11504,7 +11951,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.HELPSYMB__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-first.melt:3411:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3411:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V9*/ meltfptr[8] = /*_.RETURN___V11*/ meltfptr[10];; @@ -11621,7 +12080,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.HELPSYMB__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-first.melt:3437:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3437:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[9] = /*_.RETURN___V17*/ meltfptr[16];; @@ -11669,7 +12140,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-first.melt:3398:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3398:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11799,7 +12282,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NAMED_NAME__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-first.melt:3416:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3416:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-first+02.c b/gcc/melt/generated/warmelt-first+02.c index d6ab471d08d..89969c81d32 100644 --- a/gcc/melt/generated/warmelt-first+02.c +++ b/gcc/melt/generated/warmelt-first+02.c @@ -2100,7 +2100,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.DLIST__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-first.melt:3589:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3589:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V4*/ meltfptr[3] = /*_.RETURN___V5*/ meltfptr[4];; @@ -2200,7 +2212,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.DLIST__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-first.melt:3595:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3595:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-first.melt:3585:/ checksignal"); @@ -2210,7 +2234,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V11*/ meltfptr[10];; - MELT_LOCATION ("warmelt-first.melt:3585:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3585:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -2533,7 +2569,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-first.melt:3600:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3600:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -2781,8 +2829,21 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.T__V13*/ meltfptr[12];; - MELT_LOCATION - ("warmelt-first.melt:3627:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3627:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V14*/ meltfptr[13] = @@ -2939,8 +3000,21 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.CURELEM__V21*/ meltfptr[14];; - MELT_LOCATION - ("warmelt-first.melt:3633:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3633:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V22*/ meltfptr[16] = @@ -3040,7 +3114,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-first.melt:3617:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3617:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3341,7 +3427,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-first.melt:3640:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3640:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3939,7 +4037,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.TUP__V15*/ meltfptr[12];; - MELT_LOCATION ("warmelt-first.melt:3684:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3684:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V14*/ meltfptr[11] = /*_.RETURN___V25*/ meltfptr[19];; @@ -3969,7 +4079,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-first.melt:3660:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3660:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4573,7 +4695,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-first.melt:3742:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3742:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4852,7 +4986,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LIS__V9*/ meltfptr[8];; - MELT_LOCATION ("warmelt-first.melt:3772:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3772:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V8*/ meltfptr[7] = /*_.RETURN___V12*/ meltfptr[10];; @@ -4882,7 +5028,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-first.melt:3759:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3759:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5179,7 +5337,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-first.melt:3777:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3777:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5472,7 +5642,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-first.melt:3790:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3790:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6234,7 +6416,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.VEQ__V7*/ meltfptr[6];; - MELT_LOCATION ("warmelt-first.melt:3890:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3890:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V9*/ meltfptr[8] = /*_.RETURN___V10*/ meltfptr[9];; @@ -6325,7 +6519,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.VLESS__V6*/ meltfptr[5];; - MELT_LOCATION ("warmelt-first.melt:3899:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3899:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V17*/ meltfptr[16] = @@ -6352,7 +6559,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.VGREAT__V8*/ meltfptr[7];; - MELT_LOCATION ("warmelt-first.melt:3900:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3900:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V17*/ meltfptr[16] = @@ -6446,8 +6666,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.VLESS__V6*/ meltfptr[5];; - MELT_LOCATION - ("warmelt-first.melt:3906:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3906:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V24*/ meltfptr[23] = @@ -6492,8 +6726,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.VGREAT__V8*/ meltfptr[7];; - MELT_LOCATION - ("warmelt-first.melt:3908:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3908:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V26*/ meltfptr[24] = @@ -6571,8 +6819,23 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.VLESS__V6*/ meltfptr[5];; - MELT_LOCATION - ("warmelt-first.melt:3917:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3917:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V31*/ meltfptr[30] = @@ -6618,8 +6881,23 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.VGREAT__V8*/ meltfptr[7];; - MELT_LOCATION - ("warmelt-first.melt:3919:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3919:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V33*/ meltfptr[31] @@ -6715,8 +6993,23 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION - ("warmelt-first.melt:3923:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3923:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION @@ -6905,8 +7198,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.VLESS__V6*/ meltfptr[5];; - MELT_LOCATION - ("warmelt-first.melt:3931:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3931:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V44*/ meltfptr[29] = @@ -6954,8 +7261,23 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.VGREAT__V8*/ meltfptr[7];; - MELT_LOCATION - ("warmelt-first.melt:3933:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3933:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V46*/ meltfptr[26] = @@ -7001,8 +7323,23 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.VLESS__V6*/ meltfptr[5];; - MELT_LOCATION - ("warmelt-first.melt:3935:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3935:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V48*/ meltfptr[24] @@ -7054,8 +7391,23 @@ lab_endgetargs:; meltfptr[0] = /*_.VGREAT__V8*/ meltfptr[7];; - MELT_LOCATION - ("warmelt-first.melt:3937:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3937:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; @@ -7090,8 +7442,23 @@ lab_endgetargs:; meltfptr[0] = /*_.VEQ__V7*/ meltfptr[6];; - MELT_LOCATION - ("warmelt-first.melt:3939:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3939:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; @@ -7284,8 +7651,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.COMPARE_OBJ_RANKED__V58*/ meltfptr[30];; - MELT_LOCATION - ("warmelt-first.melt:3945:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3945:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V55*/ meltfptr[15] = @@ -7364,8 +7745,23 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.VLESS__V6*/ meltfptr[5];; - MELT_LOCATION - ("warmelt-first.melt:3948:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3948:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V61*/ meltfptr[26] @@ -7415,8 +7811,23 @@ lab_endgetargs:; meltfptr[0] = /*_.VGREAT__V8*/ meltfptr[7];; - MELT_LOCATION - ("warmelt-first.melt:3950:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3950:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; @@ -7470,8 +7881,26 @@ lab_endgetargs:; meltfptr[0] = /*_.VLESS__V6*/ meltfptr[5];; - MELT_LOCATION - ("warmelt-first.melt:3952:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3952:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && + meltxresdescr_ + [0] + && + meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; @@ -7529,8 +7958,21 @@ lab_endgetargs:; /*_.VGREAT__V8*/ meltfptr [7];; - MELT_LOCATION - ("warmelt-first.melt:3954:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3954:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto @@ -7572,8 +8014,21 @@ lab_endgetargs:; /*_.VEQ__V7*/ meltfptr [6];; - MELT_LOCATION - ("warmelt-first.melt:3956:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3956:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto @@ -7708,8 +8163,23 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.VLESS__V6*/ meltfptr[5];; - MELT_LOCATION - ("warmelt-first.melt:3958:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3958:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V71*/ meltfptr[31] @@ -7761,8 +8231,23 @@ lab_endgetargs:; meltfptr[0] = /*_.VGREAT__V8*/ meltfptr[7];; - MELT_LOCATION - ("warmelt-first.melt:3960:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3960:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; @@ -7797,8 +8282,23 @@ lab_endgetargs:; meltfptr[0] = /*_.VEQ__V7*/ meltfptr[6];; - MELT_LOCATION - ("warmelt-first.melt:3962:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-first.melt:3962:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; @@ -7939,7 +8439,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V9*/ meltfptr[8];; - MELT_LOCATION ("warmelt-first.melt:3888:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3888:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8268,7 +8780,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-first.melt:3970:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3970:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8674,7 +9198,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-first.melt:3996:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:3996:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8781,7 +9317,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MULTIPLE_NTH__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-first.melt:4009:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:4009:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9093,7 +9641,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-first.melt:4023:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:4023:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9659,7 +10219,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.FOREVER___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-first.melt:4045:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:4045:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10227,7 +10799,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.FOREVER___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-first.melt:4068:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:4068:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10745,7 +11329,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-first.melt:4090:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:4090:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11899,7 +12495,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-first.melt:4131:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:4131:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -12065,7 +12673,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-first.melt:4170:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:4170:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-first.melt:4167:/ quasiblock"); @@ -12402,7 +13022,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.REFERENCED_VALUE__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-first.melt:4213:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:4213:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -12536,7 +13168,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.REFERENCED_VALUE__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-first.melt:4218:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:4218:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-first+03.c b/gcc/melt/generated/warmelt-first+03.c index 55dc4ee9198..0176afea8ea 100644 --- a/gcc/melt/generated/warmelt-first+03.c +++ b/gcc/melt/generated/warmelt-first+03.c @@ -1388,7 +1388,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-first.melt:4554:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:4554:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-first+meltdesc.c b/gcc/melt/generated/warmelt-first+meltdesc.c index b8011c9dbc9..07d5504fbb6 100644 --- a/gcc/melt/generated/warmelt-first+meltdesc.c +++ b/gcc/melt/generated/warmelt-first+meltdesc.c @@ -19,7 +19,7 @@ #endif /*__cplusplus */ /* version of the GCC compiler & MELT runtime generating this */ -const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revision 188875] MELT_0.9.6-pre" +const char melt_genversionstr[]="4.8.0 20120702 (experimental) [melt-branch revision 189162] MELT_0.9.6-pre" #ifdef __cplusplus " (in C++)" @@ -28,7 +28,7 @@ const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revi #endif ; -const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_188875]"; +const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_189162]"; /* source name & real path of the module */ /*MELTMODULENAME MELT-STAGE-ZERO/warmelt-first */ @@ -36,26 +36,26 @@ const char melt_modulename[]="warmelt-first"; const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.8.0/melt-modules/0.9.6-pre/warmelt-first"; /* hash of preprocessed melt-run.h generating this */ -const char melt_prepromd5meltrun[]="40fea0fe808f877cf6541857ec8d6c2d"; +const char melt_prepromd5meltrun[]="b3a18a5fcc8e78e7c3ea5bf55f88e347"; /* hexmd5checksum of primary C file */ -const char melt_primaryhexmd5[]="2043d2d4cc326076c8f9f9c1b7611901"; +const char melt_primaryhexmd5[]="438162f75f4bfec56c7e364da2b3f5f9"; /* hexmd5checksum of secondary C files */ const char* const melt_secondaryhexmd5tab[]={ /*nosecfile*/ (const char*)0, - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-first+01.c #1 */ "2b447e9df65a67b5e1dbabbbfba81459", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-first+02.c #2 */ "9a0d7969174cdc18f09efe22866e62b8", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-first+03.c #3 */ "7c0f1e6ed5db4d4324e909fda4b1c8ea", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-first+01.c #1 */ "2907b640852524a15a1f8d824c465dd2", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-first+02.c #2 */ "d9da79a4cad1fee55829cef13593385a", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-first+03.c #3 */ "e826ba895ed50607376fb62be156f6c0", (const char*)0 }; /* last index of secondary files */ const int melt_lastsecfileindex=3; /* cumulated checksum of primary & secondary files */ -const char melt_cumulated_hexmd5[]="46614c9fcb5e69defb4f7788e90690b2" ; +const char melt_cumulated_hexmd5[]="9143eec349a0f10cb656c051baa664b5" ; /* include the timestamp file */ -#define meltmod_warmelt_first_mds__46614c9fcb5e69defb4f7788e90690b2 1 +#define meltmod_warmelt_first_mds__9143eec349a0f10cb656c051baa664b5 1 #include "warmelt-first+melttime.h" diff --git a/gcc/melt/generated/warmelt-first+melttime.h b/gcc/melt/generated/warmelt-first+melttime.h index f41709e6534..01f34c287a3 100644 --- a/gcc/melt/generated/warmelt-first+melttime.h +++ b/gcc/melt/generated/warmelt-first+melttime.h @@ -5,7 +5,7 @@ /* This warmelt-first+melttime.h is included from warmelt-first+meltdesc.c only. */ -#if meltmod_warmelt_first_mds__46614c9fcb5e69defb4f7788e90690b2 +#if meltmod_warmelt_first_mds__9143eec349a0f10cb656c051baa664b5 /* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-first */ #ifdef __cplusplus @@ -18,8 +18,8 @@ extern "C" { /*MELT BOOTSTRAP*/ -const char melt_gen_timestamp[]="Fri Jun 22 15:20:00 2012 CEST"; -const long long melt_gen_timenum=1340371200; +const char melt_gen_timestamp[]="Mon Jul 2 17:04:54 2012 MEST"; +const long long melt_gen_timenum=1341241494; const char melt_build_timestamp[]= __DATE__ "@" __TIME__ #ifdef __cplusplus @@ -34,7 +34,7 @@ const long long melt_gen_timenum=1340371200; } ; /* end extern C */ #endif /*__cplusplus */ - #else /* ! meltmod_warmelt_first_mds__46614c9fcb5e69defb4f7788e90690b2 */ + #else /* ! meltmod_warmelt_first_mds__9143eec349a0f10cb656c051baa664b5 */ #error invalid timestamp file for MELT-STAGE-ZERO/warmelt-first - #endif /* meltmod_warmelt_first_mds__46614c9fcb5e69defb4f7788e90690b2 */ + #endif /* meltmod_warmelt_first_mds__9143eec349a0f10cb656c051baa664b5 */ diff --git a/gcc/melt/generated/warmelt-first.c b/gcc/melt/generated/warmelt-first.c index d1fff9e5f40..2f7e366b986 100644 --- a/gcc/melt/generated/warmelt-first.c +++ b/gcc/melt/generated/warmelt-first.c @@ -1615,7 +1615,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-first.melt:2222:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:2222:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V6*/ meltfptr[5] = /*_.RETURN___V7*/ meltfptr[6];; @@ -1961,7 +1973,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-first.melt:2212:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:2212:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -2206,7 +2230,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V6*/ meltfptr[4];; - MELT_LOCATION ("warmelt-first.melt:2773:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-first.melt:2773:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4115,7 +4151,7 @@ initialize_module_meltdata_warmelt_first (initial_frame_st * iniframp__, dbgprintf ("start initialize_module_meltdata_warmelt_first iniframp__=%p", (void *) iniframp__); melt_assertmsg ("check module initial frame", - iniframp__->mcfr_nbvar == /*minihash */ -70); + iniframp__->mcfr_nbvar == /*minihash */ -803); struct cdata_st { @@ -57203,7 +57239,7 @@ start_module_melt (void *modargp_) melt_topframe = (struct melt_callframe_st *) &meltfram__; /**initial routine prologue**/ /* set initial frame marking */ - ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = /*minihash */ -70; + ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = /*minihash */ -803; ((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout = meltmod__warmelt_first__forward_or_mark_module_start_frame; /**COMMENT: get previous environment **/ ; @@ -158427,7 +158463,7 @@ meltmod__warmelt_first__forward_or_mark_module_start_frame (struct int ix = 0; initial_frame_st *meltframptr_ = (initial_frame_st *) fp; melt_assertmsg ("check module frame", - meltframptr_->mcfr_nbvar == /*minihash */ -70); + meltframptr_->mcfr_nbvar == /*minihash */ -803); if (!marking && melt_is_forwarding) { dbgprintf diff --git a/gcc/melt/generated/warmelt-genobj+01.c b/gcc/melt/generated/warmelt-genobj+01.c index b23d8ee2fc5..e61a9f35a4a 100644 --- a/gcc/melt/generated/warmelt-genobj+01.c +++ b/gcc/melt/generated/warmelt-genobj+01.c @@ -3322,7 +3322,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:810:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:810:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3514,7 +3526,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBV_TYPE__V6*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:821:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:821:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3628,7 +3652,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!CTYPE_VALUE */ meltfrout->tabval[0]);; - MELT_LOCATION ("warmelt-genobj.melt:831:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:831:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; } @@ -3745,14 +3781,38 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!CTYPE_VALUE */ meltfrout->tabval[0]);; - MELT_LOCATION ("warmelt-genobj.melt:838:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:838:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-genobj.melt:837:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-genobj.melt:837:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:837:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3959,7 +4019,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-genobj.melt:843:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:843:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4352,7 +4424,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RECV__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-genobj.melt:861:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:861:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V17*/ meltfptr[16] = /*_.RETURN___V18*/ meltfptr[17];; @@ -4384,7 +4468,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RECV__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-genobj.melt:864:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:864:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-genobj.melt:862:/ quasiblock"); @@ -4431,7 +4527,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:851:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:851:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4622,7 +4730,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RECV__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-genobj.melt:887:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:887:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4794,7 +4914,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-genobj.melt:898:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:898:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.MATCHRES___V3*/ meltfptr[2] = /*_.RETURN___V4*/ meltfptr[3];; @@ -5429,7 +5561,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MATCHRES___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:895:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:895:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5555,7 +5699,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.VARIADIC_IDSTR__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:927:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:927:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5682,7 +5838,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.VARIADIC_IDSTR__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:931:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:931:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7947,7 +8115,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];; - MELT_LOCATION ("warmelt-genobj.melt:940:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:940:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8649,7 +8829,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-genobj.melt:1021:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1021:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8942,7 +9134,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PTHU__V9*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:1074:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1074:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13166,7 +13370,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OINITROUT__V33*/ meltfptr[32];; - MELT_LOCATION ("warmelt-genobj.melt:1410:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1410:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V121*/ meltfptr[112] = /*_.RETURN___V171*/ meltfptr[155];; @@ -13286,7 +13502,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V22*/ meltfptr[20];; - MELT_LOCATION ("warmelt-genobj.melt:1104:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1104:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13709,7 +13937,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[3];; - MELT_LOCATION ("warmelt-genobj.melt:1147:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1147:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14151,7 +14391,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V9*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:1250:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1250:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14350,7 +14602,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-genobj.melt:1282:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1282:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14596,7 +14860,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:1295:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1295:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15288,7 +15564,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:1304:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1304:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16686,7 +16974,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:1375:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1375:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17953,7 +18253,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NLOC__V43*/ meltfptr[42];; - MELT_LOCATION ("warmelt-genobj.melt:1467:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1467:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V39*/ meltfptr[36] = /*_.RETURN___V49*/ meltfptr[45];; @@ -18021,7 +18333,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:1424:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1424:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19201,7 +19525,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NLOC__V39*/ meltfptr[38];; - MELT_LOCATION ("warmelt-genobj.melt:1512:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1512:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V36*/ meltfptr[33] = /*_.RETURN___V45*/ meltfptr[41];; @@ -19261,7 +19597,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:1473:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1473:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19669,7 +20017,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.GET_FREE_OBJLOCLONG__V14*/ meltfptr[13];; - MELT_LOCATION ("warmelt-genobj.melt:1521:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1521:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V13*/ meltfptr[11] = /*_.RETURN___V15*/ meltfptr[14];; @@ -19731,7 +20091,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.GET_FREE_OBJLOCPTR__V17*/ meltfptr[14];; - MELT_LOCATION ("warmelt-genobj.melt:1523:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1523:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V16*/ meltfptr[13] = @@ -19774,8 +20146,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION - ("warmelt-genobj.melt:1526:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1526:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V19*/ meltfptr[14] = @@ -20852,8 +21236,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NLOC__V56*/ meltfptr[55];; - MELT_LOCATION - ("warmelt-genobj.melt:1568:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1568:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V53*/ meltfptr[52] = @@ -20972,7 +21368,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V13*/ meltfptr[11];; - MELT_LOCATION ("warmelt-genobj.melt:1516:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1516:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -22474,8 +22882,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION - ("warmelt-genobj.melt:1618:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1618:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V18*/ meltfptr[17] = @@ -22879,7 +23299,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:1607:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1607:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -23835,7 +24267,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:1628:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1628:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -24118,7 +24562,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:1642:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1642:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -24314,7 +24770,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NEXPR_CTYP__V6*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:1667:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1667:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -24592,7 +25060,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBNIL__V9*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:1678:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1678:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V8*/ meltfptr[6] = /*_.RETURN___V11*/ meltfptr[10];; @@ -24608,7 +25088,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:1673:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1673:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25199,7 +25691,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V18*/ meltfptr[17];; - MELT_LOCATION ("warmelt-genobj.melt:1702:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1702:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V16*/ meltfptr[15] = /*_.RETURN___V24*/ meltfptr[20];; @@ -25229,7 +25733,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:1684:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1684:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -26271,7 +26787,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OVAR__V18*/ meltfptr[17];; - MELT_LOCATION ("warmelt-genobj.melt:1731:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1731:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[10] = /*_.RETURN___V41*/ meltfptr[21];; @@ -26307,7 +26835,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:1708:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1708:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -27372,7 +27912,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:1736:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1736:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-genobj+02.c b/gcc/melt/generated/warmelt-genobj+02.c index e942bd783e3..ede59d561fd 100644 --- a/gcc/melt/generated/warmelt-genobj+02.c +++ b/gcc/melt/generated/warmelt-genobj+02.c @@ -4032,7 +4032,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:1786:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1786:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4656,7 +4668,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OLOCV__V15*/ meltfptr[14];; - MELT_LOCATION ("warmelt-genobj.melt:1844:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1844:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[10] = /*_.RETURN___V24*/ meltfptr[22];; @@ -4682,7 +4706,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:1834:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1834:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5286,7 +5322,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OVLOC__V17*/ meltfptr[16];; - MELT_LOCATION ("warmelt-genobj.melt:1863:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1863:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[10] = /*_.RETURN___V25*/ meltfptr[20];; @@ -5316,7 +5364,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:1850:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1850:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6223,7 +6283,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.CONSTV__V33*/ meltfptr[32];; - MELT_LOCATION ("warmelt-genobj.melt:1915:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1915:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V30*/ meltfptr[25] = /*_.RETURN___V39*/ meltfptr[35];; @@ -6415,7 +6487,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.ODATA__V41*/ meltfptr[30];; - MELT_LOCATION ("warmelt-genobj.melt:1921:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1921:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V40*/ meltfptr[36] = /*_.RETURN___V46*/ meltfptr[18];; @@ -6456,7 +6540,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:1869:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1869:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7060,7 +7156,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.ORES__V20*/ meltfptr[18];; - MELT_LOCATION ("warmelt-genobj.melt:1950:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1950:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V10*/ meltfptr[5] = /*_.RETURN___V26*/ meltfptr[22];; @@ -7090,7 +7198,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[5];; - MELT_LOCATION ("warmelt-genobj.melt:1928:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1928:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8290,7 +8410,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:1956:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1956:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9191,7 +9323,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBLOC__V24*/ meltfptr[23];; - MELT_LOCATION ("warmelt-genobj.melt:2031:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2031:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V18*/ meltfptr[16] = /*_.RETURN___V35*/ meltfptr[31];; @@ -9237,7 +9381,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:1996:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:1996:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9852,7 +10008,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OAGAIN__V16*/ meltfptr[15];; - MELT_LOCATION ("warmelt-genobj.melt:2051:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2051:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[10] = /*_.RETURN___V24*/ meltfptr[20];; @@ -9878,7 +10046,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:2037:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2037:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10066,7 +10246,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.ANYV__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-genobj.melt:2058:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2058:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11157,7 +11349,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBLOCK__V15*/ meltfptr[14];; - MELT_LOCATION ("warmelt-genobj.melt:2146:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2146:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V8*/ meltfptr[6] = /*_.RETURN___V44*/ meltfptr[40];; @@ -11207,7 +11411,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:2065:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2065:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -12874,7 +13090,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBJCOMP__V7*/ meltfptr[3];; - MELT_LOCATION ("warmelt-genobj.melt:2136:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2136:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V12*/ meltfptr[8] = /*_.RETURN___V13*/ meltfptr[9];; @@ -13162,7 +13390,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.DISPOSE_BND_OBJ__V7*/ meltfptr[3];; - MELT_LOCATION ("warmelt-genobj.melt:2142:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2142:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13535,7 +13775,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V11*/ meltfptr[7];; - MELT_LOCATION ("warmelt-genobj.melt:2167:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2167:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15272,7 +15524,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[15];; - MELT_LOCATION ("warmelt-genobj.melt:2178:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2178:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16662,7 +16926,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[15];; - MELT_LOCATION ("warmelt-genobj.melt:2237:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2237:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -21303,7 +21579,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[15];; - MELT_LOCATION ("warmelt-genobj.melt:2361:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2361:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -27907,7 +28195,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:2416:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2416:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30078,7 +30378,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OCBLOCK__V40*/ meltfptr[39];; - MELT_LOCATION ("warmelt-genobj.melt:2764:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2764:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[8] = /*_.RETURN___V92*/ meltfptr[88];; @@ -30160,7 +30472,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:2630:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2630:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30850,7 +31174,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V9*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:2669:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2669:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -31061,7 +31397,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:2704:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2704:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -31270,7 +31618,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:2714:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2714:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -32765,7 +33125,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:2772:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2772:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -33390,7 +33762,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBLOCK__V17*/ meltfptr[16];; - MELT_LOCATION ("warmelt-genobj.melt:2822:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2822:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[10] = /*_.RETURN___V27*/ meltfptr[23];; @@ -33420,7 +33804,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:2799:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2799:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -34316,7 +34712,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.CURVAL__V28*/ meltfptr[27];; - MELT_LOCATION ("warmelt-genobj.melt:2868:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2868:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V27*/ meltfptr[26] = @@ -34443,7 +34851,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:2827:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2827:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -34844,7 +35264,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-genobj.melt:2838:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2838:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -35691,8 +36123,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.CSLOT__V35*/ meltfptr[34];; - MELT_LOCATION - ("warmelt-genobj.melt:2922:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2922:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V34*/ meltfptr[33] = @@ -35743,8 +36187,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MAKECOMPUTE__V41*/ meltfptr[37];; - MELT_LOCATION - ("warmelt-genobj.melt:2923:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2923:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V33*/ meltfptr[32] = @@ -35808,7 +36264,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MAKECOMPUTE__V43*/ meltfptr[35];; - MELT_LOCATION ("warmelt-genobj.melt:2924:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2924:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V29*/ meltfptr[28] = @@ -35867,7 +36335,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MAKECOMPUTE__V45*/ meltfptr[33];; - MELT_LOCATION ("warmelt-genobj.melt:2926:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2926:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V26*/ meltfptr[22] = /*_.RETURN___V46*/ meltfptr[37];; @@ -35912,7 +36392,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:2878:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2878:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -36313,7 +36805,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-genobj.melt:2891:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2891:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -36776,7 +37280,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OGETSLOT__V18*/ meltfptr[17];; - MELT_LOCATION ("warmelt-genobj.melt:2947:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2947:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[8] = /*_.RETURN___V20*/ meltfptr[19];; @@ -36802,7 +37318,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:2932:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2932:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -37402,7 +37930,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBLOCK__V18*/ meltfptr[17];; - MELT_LOCATION ("warmelt-genobj.melt:2995:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2995:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[8] = /*_.RETURN___V26*/ meltfptr[25];; @@ -37436,7 +37976,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:2954:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:2954:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -38352,7 +38904,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OCHINT__V12*/ meltfptr[11];; - MELT_LOCATION ("warmelt-genobj.melt:3010:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3010:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V10*/ meltfptr[5] = /*_.RETURN___V18*/ meltfptr[14];; @@ -38372,7 +38936,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[5];; - MELT_LOCATION ("warmelt-genobj.melt:3001:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3001:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-genobj+03.c b/gcc/melt/generated/warmelt-genobj+03.c index 8dfa5057040..fac41eced92 100644 --- a/gcc/melt/generated/warmelt-genobj+03.c +++ b/gcc/melt/generated/warmelt-genobj+03.c @@ -3554,7 +3554,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OUNC__V18*/ meltfptr[17];; - MELT_LOCATION ("warmelt-genobj.melt:3030:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3030:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[8] = /*_.RETURN___V23*/ meltfptr[19];; @@ -3582,7 +3594,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:3017:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3017:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4231,7 +4255,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:3036:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3036:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4441,7 +4477,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:3047:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3047:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5546,7 +5594,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:3067:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3067:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5867,7 +5927,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-genobj.melt:3081:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3081:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5999,7 +6071,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.COMPILE_OBJ__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:3105:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3105:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6512,7 +6596,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.DISPOSE_BND_OBJ__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:3140:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3140:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7320,7 +7416,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:3149:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3149:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7763,7 +7871,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[3];; - MELT_LOCATION ("warmelt-genobj.melt:3163:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3163:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9022,7 +9142,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:3189:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3189:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9343,7 +9475,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-genobj.melt:3204:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3204:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9475,7 +9619,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.COMPILE_OBJ__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:3224:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3224:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9795,7 +9951,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.DISPOSE_BND_OBJ__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:3266:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3266:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10242,7 +10410,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V14*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:3276:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3276:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10800,7 +10980,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OLOCV__V15*/ meltfptr[14];; - MELT_LOCATION ("warmelt-genobj.melt:3299:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3299:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[8] = /*_.RETURN___V22*/ meltfptr[17];; @@ -10824,7 +11016,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:3289:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3289:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11331,7 +11535,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OSDATA__V14*/ meltfptr[13];; - MELT_LOCATION ("warmelt-genobj.melt:3312:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3312:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[8] = /*_.RETURN___V19*/ meltfptr[15];; @@ -11351,7 +11567,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:3305:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3305:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11929,7 +12157,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OEXPR__V16*/ meltfptr[15];; - MELT_LOCATION ("warmelt-genobj.melt:3328:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3328:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[8] = /*_.RETURN___V23*/ meltfptr[18];; @@ -11955,7 +12195,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:3318:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3318:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -12835,7 +13087,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:3334:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3334:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13683,7 +13947,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:3379:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3379:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14513,7 +14789,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.INIPAIR__V30*/ meltfptr[29];; - MELT_LOCATION ("warmelt-genobj.melt:3457:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3457:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V27*/ meltfptr[25] = /*_.RETURN___V36*/ meltfptr[32];; @@ -14567,7 +14855,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:3423:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3423:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15268,7 +15568,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.INILIST__V27*/ meltfptr[26];; - MELT_LOCATION ("warmelt-genobj.melt:3492:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3492:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V24*/ meltfptr[23] = /*_.RETURN___V33*/ meltfptr[29];; @@ -15318,7 +15630,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:3462:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3462:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16373,7 +16697,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.ININST__V38*/ meltfptr[30];; - MELT_LOCATION ("warmelt-genobj.melt:3538:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3538:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V24*/ meltfptr[23] = /*_.RETURN___V45*/ meltfptr[41];; @@ -16431,7 +16767,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:3498:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3498:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16746,7 +17094,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RECV__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-genobj.melt:3553:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3553:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V12*/ meltfptr[11] = @@ -16875,7 +17235,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBLK__V16*/ meltfptr[15];; - MELT_LOCATION ("warmelt-genobj.melt:3574:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3574:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V14*/ meltfptr[12] = @@ -17085,7 +17457,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBC__V27*/ meltfptr[17];; - MELT_LOCATION ("warmelt-genobj.melt:3590:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3590:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V24*/ meltfptr[19] = @@ -17403,7 +17787,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RECV__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-genobj.melt:3601:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3601:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-genobj.melt:3592:/ quasiblock"); @@ -17457,7 +17853,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:3543:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3543:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18126,7 +18534,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:3608:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3608:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18761,7 +19181,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:3635:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3635:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19415,7 +19847,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:3658:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3658:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19886,7 +20330,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:3683:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3683:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20439,7 +20895,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:3708:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3708:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -21019,7 +21487,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RECV__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-genobj.melt:3721:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3721:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -21268,7 +21748,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RECV__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-genobj.melt:3746:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3746:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -22435,7 +22927,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:3756:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3756:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -23263,7 +23767,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:3788:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3788:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -24147,7 +24663,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:3822:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3822:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-genobj+04.c b/gcc/melt/generated/warmelt-genobj+04.c index 78f990bbb7a..208113bc3f0 100644 --- a/gcc/melt/generated/warmelt-genobj+04.c +++ b/gcc/melt/generated/warmelt-genobj+04.c @@ -3749,7 +3749,7 @@ lab_endgetargs:; ; /*^putpairtail */ /*putpairtail */ - melt_assertmsg ("putpairtail /dde6410 checkpair", + melt_assertmsg ("putpairtail /2914b9b8 checkpair", melt_magic_discr ((melt_ptr_t) ( /*_.PAIROFLIST__V33*/ meltfptr[32])) == @@ -3772,7 +3772,7 @@ lab_endgetargs:; ; /*^putpairtail */ /*putpairtail */ - melt_assertmsg ("putpairtail /13f7e56e checkpair", + melt_assertmsg ("putpairtail /3288290b checkpair", melt_magic_discr ((melt_ptr_t) ( /*_.OVARIADICINDEX__V34*/ meltfptr[33])) == @@ -3795,7 +3795,7 @@ lab_endgetargs:; ; /*^putpairtail */ /*putpairtail */ - melt_assertmsg ("putpairtail /4f4bc43 checkpair", + melt_assertmsg ("putpairtail /c23b206 checkpair", melt_magic_discr ((melt_ptr_t) ( /*_.PAIROFLIST__V35*/ meltfptr[34])) == @@ -4031,7 +4031,7 @@ lab_endgetargs:; ; /*^putpairtail */ /*putpairtail */ - melt_assertmsg ("putpairtail /221ef567 checkpair", + melt_assertmsg ("putpairtail /26d7fc16 checkpair", melt_magic_discr ((melt_ptr_t) ( /*_.PAIROFLIST__V47*/ meltfptr[46])) == @@ -4054,7 +4054,7 @@ lab_endgetargs:; ; /*^putpairtail */ /*putpairtail */ - melt_assertmsg ("putpairtail /61cefd1 checkpair", + melt_assertmsg ("putpairtail /9e139dd checkpair", melt_magic_discr ((melt_ptr_t) ( /*_.PAIROFLIST__V48*/ meltfptr[47])) == @@ -4077,7 +4077,7 @@ lab_endgetargs:; ; /*^putpairtail */ /*putpairtail */ - melt_assertmsg ("putpairtail /3b387796 checkpair", + melt_assertmsg ("putpairtail /261d92d1 checkpair", melt_magic_discr ((melt_ptr_t) ( /*_.PAIROFLIST__V49*/ meltfptr[48])) == @@ -4100,7 +4100,7 @@ lab_endgetargs:; ; /*^putpairtail */ /*putpairtail */ - melt_assertmsg ("putpairtail /3d1f7535 checkpair", + melt_assertmsg ("putpairtail /2611ab10 checkpair", melt_magic_discr ((melt_ptr_t) ( /*_.OVARIADICINDEX__V50*/ meltfptr[49])) == @@ -4123,7 +4123,7 @@ lab_endgetargs:; ; /*^putpairtail */ /*putpairtail */ - melt_assertmsg ("putpairtail /3f09d12b checkpair", + melt_assertmsg ("putpairtail /17206d91 checkpair", melt_magic_discr ((melt_ptr_t) ( /*_.PAIROFLIST__V51*/ meltfptr[50])) == @@ -4146,7 +4146,7 @@ lab_endgetargs:; ; /*^putpairtail */ /*putpairtail */ - melt_assertmsg ("putpairtail /1f5f1647 checkpair", + melt_assertmsg ("putpairtail /3d172389 checkpair", melt_magic_discr ((melt_ptr_t) ( /*_.OVARIADICINDEX__V52*/ meltfptr[51])) == @@ -4169,7 +4169,7 @@ lab_endgetargs:; ; /*^putpairtail */ /*putpairtail */ - melt_assertmsg ("putpairtail /2c1a62c7 checkpair", + melt_assertmsg ("putpairtail /ea5f704 checkpair", melt_magic_discr ((melt_ptr_t) ( /*_.PAIROFLIST__V53*/ meltfptr[52])) == @@ -4192,7 +4192,7 @@ lab_endgetargs:; ; /*^putpairtail */ /*putpairtail */ - melt_assertmsg ("putpairtail /2b3290d8 checkpair", + melt_assertmsg ("putpairtail /14656e1 checkpair", melt_magic_discr ((melt_ptr_t) ( /*_.PAIROFLIST__V54*/ meltfptr[53])) == @@ -4215,7 +4215,7 @@ lab_endgetargs:; ; /*^putpairtail */ /*putpairtail */ - melt_assertmsg ("putpairtail /18e8937e checkpair", + melt_assertmsg ("putpairtail /771fbe checkpair", melt_magic_discr ((melt_ptr_t) ( /*_.PAIROFLIST__V55*/ meltfptr[54])) == @@ -5561,7 +5561,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OCOND__V100*/ meltfptr[50];; - MELT_LOCATION ("warmelt-genobj.melt:3937:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3937:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V26*/ meltfptr[22] = /*_.RETURN___V106*/ meltfptr[31];; @@ -5625,7 +5637,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:3854:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3854:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5813,7 +5837,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!CTYPE_VOID */ meltfrout->tabval[1]);; - MELT_LOCATION ("warmelt-genobj.melt:3940:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3940:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6971,7 +7007,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OCOMP__V39*/ meltfptr[29];; - MELT_LOCATION ("warmelt-genobj.melt:3990:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3990:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V23*/ meltfptr[21] = /*_.RETURN___V45*/ meltfptr[28];; @@ -7013,7 +7061,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:3948:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3948:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7958,7 +8018,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OCOMP__V34*/ meltfptr[33];; - MELT_LOCATION ("warmelt-genobj.melt:4029:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4029:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V32*/ meltfptr[31] = /*_.RETURN___V40*/ meltfptr[36];; @@ -8006,7 +8078,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:3996:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:3996:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8355,7 +8439,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:4034:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4034:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8883,7 +8979,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V22*/ meltfptr[14];; - MELT_LOCATION ("warmelt-genobj.melt:4071:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4071:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V8*/ meltfptr[6] = /*_.RETURN___V24*/ meltfptr[23];; @@ -8917,7 +9025,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:4051:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4051:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9264,7 +9384,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:4077:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4077:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9333,10 +9465,10 @@ meltrout_122_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t struct meltclosure_st *mcfr_clos; struct excepth_melt_st *mcfr_exh; struct melt_callframe_st *mcfr_prev; -#define MELTFRAM_NBVARPTR 42 - melt_ptr_t mcfr_varptr[42]; -#define MELTFRAM_NBVARNUM 12 - long mcfr_varnum[12]; +#define MELTFRAM_NBVARPTR 47 + melt_ptr_t mcfr_varptr[47]; +#define MELTFRAM_NBVARNUM 16 + long mcfr_varnum[16]; /*others*/ long _spare_; } @@ -9349,13 +9481,13 @@ meltrout_122_warmelt_genobj_COMPILOBJ_NREP_RETURN (meltclosure_ptr_t (struct frame_meltrout_122_warmelt_genobj_COMPILOBJ_NREP_RETURN_st *) meltfirstargp_; gt_ggc_mx_melt_un (meltframptr_->mcfr_clos); - for (ix = 0; ix < 42; ix++) + for (ix = 0; ix < 47; ix++) if (meltframptr_->mcfr_varptr[ix]) gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]); return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); - meltfram__.mcfr_nbvar = 42; + meltfram__.mcfr_nbvar = 47; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; melt_topframe = (struct melt_callframe_st *) &meltfram__; @@ -10149,7 +10281,181 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V29*/ meltfptr[28] = 0; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-genobj.melt:4127:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4128:/ checksignal"); + MELT_CHECK_SIGNAL (); + ; + /*_#MULTIPLE_LENGTH__L11*/ meltfnum[9] = + (melt_multiple_length ((melt_ptr_t) ( /*_.RREST__V15*/ meltfptr[14])));; + /*^compute */ + + /*_#I__L12*/ meltfnum[8] = + (( /*_#MULTIPLE_LENGTH__L11*/ meltfnum[9]) == (0));; + MELT_LOCATION ("warmelt-genobj.melt:4128:/ cond"); + /*cond */ if ( /*_#I__L12*/ meltfnum[8]) /*then */ + { + /*^cond.then */ + /*^block */ + /*anyblock */ + { + + MELT_LOCATION ("warmelt-genobj.melt:4129:/ quasiblock"); + + + MELT_LOCATION ("warmelt-genobj.melt:4130:/ checksignal"); + MELT_CHECK_SIGNAL (); + ; + /*^apply */ + /*apply */ + { + union meltparam_un argtab[2]; + memset (&argtab, 0, sizeof (argtab)); + /*^apply.arg */ + argtab[0].meltbp_aptr = + (melt_ptr_t *) & ( /*!CTYPE_VOID */ meltfrout->tabval[11]); + /*^apply.arg */ + argtab[1].meltbp_cstring = + " /*ochecknores compilobj_nrep_return*/\n#if MELT_HAVE_DEBUG\n if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) melt_warn_for_no_expected_secondary_results();\n /* we warned when secondary results are expected but not returned. */\n#endif /*MELT_HAVE_DEBUG*/\n"; + /*_.OCHECKNORES__V37*/ meltfptr[29] = + melt_apply ((meltclosure_ptr_t) + (( /*!MAKE_OBJLOCATEDEXP */ meltfrout->tabval[10])), + (melt_ptr_t) ( /*_.RLOC__V13*/ meltfptr[9]), + (MELTBPARSTR_PTR MELTBPARSTR_CSTRING ""), argtab, + "", (union meltparam_un *) 0); + } + ; + +#if MELT_HAVE_DEBUG + MELT_LOCATION ("warmelt-genobj.melt:4139:/ cppif.then"); + /*^block */ + /*anyblock */ + { + + + { + /*^locexp */ + /*melt_increment_dbgcounter */ +#if MELT_HAVE_DEBUG + melt_dbgcounter++; +#endif + ; + } + ; + /*^checksignal */ + MELT_CHECK_SIGNAL (); + ; + /*_#MELT_NEED_DBG__L13*/ meltfnum[12] = + /*MELT_NEED_DBG */ +#if MELT_HAVE_DEBUG + ( /*melt_need_dbg */ melt_need_debug ((int) 0)) +#else + 0 /* no melt_need_dbg */ +#endif /*MELT_HAVE_DEBUG */ + ;; + MELT_LOCATION ("warmelt-genobj.melt:4139:/ cond"); + /*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[12]) /*then */ + { + /*^cond.then */ + /*^block */ + /*anyblock */ + { + + /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[13] = +#ifdef meltcallcount + meltcallcount /* the_meltcallcount */ +#else + 0L +#endif /* meltcallcount the_meltcallcount */ + ;; + MELT_LOCATION ("warmelt-genobj.melt:4139:/ checksignal"); + MELT_CHECK_SIGNAL (); + ; + /*^apply */ + /*apply */ + { + union meltparam_un argtab[5]; + memset (&argtab, 0, sizeof (argtab)); + /*^apply.arg */ + argtab[0].meltbp_long = + /*_#THE_MELTCALLCOUNT__L14*/ meltfnum[13]; + /*^apply.arg */ + argtab[1].meltbp_cstring = "warmelt-genobj.melt"; + /*^apply.arg */ + argtab[2].meltbp_long = 4139; + /*^apply.arg */ + argtab[3].meltbp_cstring = + "compilobj_nrep_return ochecknores="; + /*^apply.arg */ + argtab[4].meltbp_aptr = + (melt_ptr_t *) & /*_.OCHECKNORES__V37*/ meltfptr[29]; + /*_.MELT_DEBUG_FUN__V40*/ meltfptr[39] = + melt_apply ((meltclosure_ptr_t) + (( /*!MELT_DEBUG_FUN */ meltfrout-> + tabval[2])), + (melt_ptr_t) (( /*nil */ NULL)), + (MELTBPARSTR_LONG MELTBPARSTR_CSTRING + MELTBPARSTR_LONG MELTBPARSTR_CSTRING + MELTBPARSTR_PTR ""), argtab, "", + (union meltparam_un *) 0); + } + ; + /*_.IF___V39*/ meltfptr[34] = + /*_.MELT_DEBUG_FUN__V40*/ meltfptr[39];; + /*epilog */ + + MELT_LOCATION ("warmelt-genobj.melt:4139:/ clear"); + /*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[13] = 0; + /*^clear */ + /*clear *//*_.MELT_DEBUG_FUN__V40*/ meltfptr[39] = 0; + } + ; + } + else + { /*^cond.else */ + + /*_.IF___V39*/ meltfptr[34] = NULL;; + } + ; + MELT_LOCATION ("warmelt-genobj.melt:4139:/ quasiblock"); + + + /*_.PROGN___V41*/ meltfptr[39] = /*_.IF___V39*/ meltfptr[34];; + /*^compute */ + + /*_.IFCPP___V38*/ meltfptr[30] = /*_.PROGN___V41*/ meltfptr[39];; + /*epilog */ + + MELT_LOCATION ("warmelt-genobj.melt:4139:/ clear"); + /*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[12] = 0; + /*^clear */ + /*clear *//*_.IF___V39*/ meltfptr[34] = 0; + /*^clear */ + /*clear *//*_.PROGN___V41*/ meltfptr[39] = 0; + } + +#else /*MELT_HAVE_DEBUG */ + /*^cppif.else */ + /*_.IFCPP___V38*/ meltfptr[30] = ( /*nil */ NULL); +#endif /*MELT_HAVE_DEBUG */ + ; + + { + MELT_LOCATION ("warmelt-genobj.melt:4140:/ locexp"); + meltgc_append_list ((melt_ptr_t) ( /*_.OLIS__V18*/ meltfptr[17]), + (melt_ptr_t) ( /*_.OCHECKNORES__V37*/ + meltfptr[29])); + } + ; + + MELT_LOCATION ("warmelt-genobj.melt:4129:/ clear"); + /*clear *//*_.OCHECKNORES__V37*/ meltfptr[29] = 0; + /*^clear */ + /*clear *//*_.IFCPP___V38*/ meltfptr[30] = 0; + /*epilog */ + } + ; + } /*noelse */ + ; + MELT_LOCATION ("warmelt-genobj.melt:4143:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -10161,9 +10467,9 @@ lab_endgetargs:; melt_ptr_t newobj = 0; melt_raw_object_create (newobj, (melt_ptr_t) (( /*!CLASS_OBJFINALRETURN */ - meltfrout->tabval[10])), (1), + meltfrout->tabval[12])), (1), "CLASS_OBJFINALRETURN"); - /*_.INST__V38*/ meltfptr[30] = + /*_.INST__V43*/ meltfptr[39] = newobj; }; ; @@ -10171,22 +10477,22 @@ lab_endgetargs:; /*putslot */ melt_assertmsg ("putslot checkobj @OBI_LOC", melt_magic_discr ((melt_ptr_t) - ( /*_.INST__V38*/ meltfptr[30])) == + ( /*_.INST__V43*/ meltfptr[39])) == MELTOBMAG_OBJECT); - melt_putfield_object (( /*_.INST__V38*/ meltfptr[30]), (0), + melt_putfield_object (( /*_.INST__V43*/ meltfptr[39]), (0), ( /*_.RLOC__V13*/ meltfptr[9]), "OBI_LOC"); ; - /*_.INST___V37*/ meltfptr[29] = /*_.INST__V38*/ meltfptr[30];; + /*_.INST___V42*/ meltfptr[34] = /*_.INST__V43*/ meltfptr[39];; { - MELT_LOCATION ("warmelt-genobj.melt:4126:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4142:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIS__V18*/ meltfptr[17]), - (melt_ptr_t) ( /*_.INST___V37*/ meltfptr[29])); + (melt_ptr_t) ( /*_.INST___V42*/ meltfptr[34])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4129:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4145:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10204,7 +10510,7 @@ lab_endgetargs:; /*^checksignal */ MELT_CHECK_SIGNAL (); ; - /*_#MELT_NEED_DBG__L11*/ meltfnum[9] = + /*_#MELT_NEED_DBG__L15*/ meltfnum[13] = /*MELT_NEED_DBG */ #if MELT_HAVE_DEBUG ( /*melt_need_dbg */ melt_need_debug ((int) 0)) @@ -10212,22 +10518,22 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4129:/ cond"); - /*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[9]) /*then */ + MELT_LOCATION ("warmelt-genobj.melt:4145:/ cond"); + /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[13]) /*then */ { /*^cond.then */ /*^block */ /*anyblock */ { - /*_#THE_MELTCALLCOUNT__L12*/ meltfnum[8] = + /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12] = #ifdef meltcallcount meltcallcount /* the_meltcallcount */ #else 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4129:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4145:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10237,18 +10543,18 @@ lab_endgetargs:; memset (&argtab, 0, sizeof (argtab)); /*^apply.arg */ argtab[0].meltbp_long = - /*_#THE_MELTCALLCOUNT__L12*/ meltfnum[8]; + /*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12]; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4129; + argtab[2].meltbp_long = 4145; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_return final oblock="; /*^apply.arg */ argtab[4].meltbp_aptr = (melt_ptr_t *) & /*_.OBLOCK__V19*/ meltfptr[18]; - /*_.MELT_DEBUG_FUN__V41*/ meltfptr[40] = + /*_.MELT_DEBUG_FUN__V46*/ meltfptr[45] = melt_apply ((meltclosure_ptr_t) (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[2])), (melt_ptr_t) (( /*nil */ NULL)), @@ -10258,43 +10564,43 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - /*_.IF___V40*/ meltfptr[39] = - /*_.MELT_DEBUG_FUN__V41*/ meltfptr[40];; + /*_.IF___V45*/ meltfptr[30] = + /*_.MELT_DEBUG_FUN__V46*/ meltfptr[45];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4129:/ clear"); - /*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[8] = 0; + MELT_LOCATION ("warmelt-genobj.melt:4145:/ clear"); + /*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[12] = 0; /*^clear */ - /*clear *//*_.MELT_DEBUG_FUN__V41*/ meltfptr[40] = 0; + /*clear *//*_.MELT_DEBUG_FUN__V46*/ meltfptr[45] = 0; } ; } else { /*^cond.else */ - /*_.IF___V40*/ meltfptr[39] = NULL;; + /*_.IF___V45*/ meltfptr[30] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4129:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4145:/ quasiblock"); - /*_.PROGN___V42*/ meltfptr[40] = /*_.IF___V40*/ meltfptr[39];; + /*_.PROGN___V47*/ meltfptr[45] = /*_.IF___V45*/ meltfptr[30];; /*^compute */ - /*_.IFCPP___V39*/ meltfptr[34] = /*_.PROGN___V42*/ meltfptr[40];; + /*_.IFCPP___V44*/ meltfptr[29] = /*_.PROGN___V47*/ meltfptr[45];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4129:/ clear"); - /*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[9] = 0; + MELT_LOCATION ("warmelt-genobj.melt:4145:/ clear"); + /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[13] = 0; /*^clear */ - /*clear *//*_.IF___V40*/ meltfptr[39] = 0; + /*clear *//*_.IF___V45*/ meltfptr[30] = 0; /*^clear */ - /*clear *//*_.PROGN___V42*/ meltfptr[40] = 0; + /*clear *//*_.PROGN___V47*/ meltfptr[45] = 0; } #else /*MELT_HAVE_DEBUG */ /*^cppif.else */ - /*_.IFCPP___V39*/ meltfptr[34] = ( /*nil */ NULL); + /*_.IFCPP___V44*/ meltfptr[29] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; /*^compute */ @@ -10328,9 +10634,13 @@ lab_endgetargs:; /*^clear */ /*clear *//*_.PUT_OBJDEST__V27*/ meltfptr[26] = 0; /*^clear */ - /*clear *//*_.INST___V37*/ meltfptr[29] = 0; + /*clear *//*_#MULTIPLE_LENGTH__L11*/ meltfnum[9] = 0; /*^clear */ - /*clear *//*_.IFCPP___V39*/ meltfptr[34] = 0; + /*clear *//*_#I__L12*/ meltfnum[8] = 0; + /*^clear */ + /*clear *//*_.INST___V42*/ meltfptr[34] = 0; + /*^clear */ + /*clear *//*_.IFCPP___V44*/ meltfptr[29] = 0; MELT_LOCATION ("warmelt-genobj.melt:4094:/ checksignal"); MELT_CHECK_SIGNAL (); ; @@ -10338,7 +10648,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:4094:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4094:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10436,7 +10758,7 @@ meltrout_123_warmelt_genobj_LAMBDA___36__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4136:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4152:/ getarg"); /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -10457,7 +10779,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!CTYPE_VALUE */ meltfrout->tabval[0]);; - MELT_LOCATION ("warmelt-genobj.melt:4136:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4152:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; } @@ -10548,7 +10882,7 @@ meltrout_124_warmelt_genobj_COMPILOBJ_NREP_LAMBDA (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4144:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ getarg"); /*_.NLAM__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -10569,7 +10903,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4145:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4161:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10581,7 +10915,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4145:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4161:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -10589,7 +10923,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4145:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4161:/ cond.else"); /*^block */ /*anyblock */ @@ -10603,7 +10937,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4145) ? (4145) : __LINE__, __FUNCTION__); + (4161) ? (4161) : __LINE__, __FUNCTION__); ; } ; @@ -10618,7 +10952,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4145:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4161:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -10631,7 +10965,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4146:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4162:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10643,7 +10977,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NLAM__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_LAMBDA */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4146:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4162:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -10651,7 +10985,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4146:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4162:/ cond.else"); /*^block */ /*anyblock */ @@ -10665,7 +10999,7 @@ lab_endgetargs:; melt_assert_failed (("check nlam"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4146) ? (4146) : __LINE__, __FUNCTION__); + (4162) ? (4162) : __LINE__, __FUNCTION__); ; } ; @@ -10680,7 +11014,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4146:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4162:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -10693,7 +11027,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4147:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4163:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10719,7 +11053,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4147:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4163:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -10734,7 +11068,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4147:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4163:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10747,7 +11081,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4147; + argtab[2].meltbp_long = 4163; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_lambda nlam="; /*^apply.arg */ @@ -10767,7 +11101,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4147:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4163:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0; @@ -10780,7 +11114,7 @@ lab_endgetargs:; /*_.IF___V9*/ meltfptr[8] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4147:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4163:/ quasiblock"); /*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];; @@ -10789,7 +11123,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4147:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4163:/ clear"); /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V9*/ meltfptr[8] = 0; @@ -10802,7 +11136,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4148:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4164:/ quasiblock"); /*^getslot */ @@ -10813,10 +11147,10 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4149:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4165:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:4150:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4166:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NLAM__V2*/ meltfptr[1]), 1, "NLAMBDA_PROC"); @@ -10826,7 +11160,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4151:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4167:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10838,7 +11172,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CHECKPRO__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_NREP_ROUTPROC */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:4151:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4167:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -10846,7 +11180,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4151:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4167:/ cond.else"); /*^block */ /*anyblock */ @@ -10860,7 +11194,7 @@ lab_endgetargs:; melt_assert_failed (("check checkpro"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4151) ? (4151) : __LINE__, __FUNCTION__); + (4167) ? (4167) : __LINE__, __FUNCTION__); ; } ; @@ -10875,7 +11209,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[15] = /*_.IFELSE___V17*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4151:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4167:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0; @@ -10890,12 +11224,12 @@ lab_endgetargs:; /*_.LET___V14*/ meltfptr[13] = /*_.CHECKPRO__V15*/ meltfptr[14];; - MELT_LOCATION ("warmelt-genobj.melt:4149:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4165:/ clear"); /*clear *//*_.CHECKPRO__V15*/ meltfptr[14] = 0; /*^clear */ /*clear *//*_.IFCPP___V16*/ meltfptr[15] = 0; /*_.NPRO__V18*/ meltfptr[16] = /*_.LET___V14*/ meltfptr[13];; - MELT_LOCATION ("warmelt-genobj.melt:4153:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4169:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NPRO__V18*/ meltfptr[16]), 2, "NRPRO_NAME"); @@ -10903,7 +11237,7 @@ lab_endgetargs:; meltfptr[14] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4154:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4170:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NLAM__V2*/ meltfptr[1]), 3, "NLAMBDA_CLOSEDV"); @@ -10914,7 +11248,7 @@ lab_endgetargs:; /*_#NBCLOSED__L6*/ meltfnum[0] = (melt_multiple_length ((melt_ptr_t) ( /*_.NCLOVTUP__V20*/ meltfptr[15])));; - MELT_LOCATION ("warmelt-genobj.melt:4156:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4172:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10932,7 +11266,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4157:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4173:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NLAM__V2*/ meltfptr[1]), 2, "NLAMBDA_CONSTROUT"); @@ -10940,7 +11274,7 @@ lab_endgetargs:; meltfptr[21] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4158:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4174:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 0, "GNCX_OBJROUT"); @@ -10951,7 +11285,7 @@ lab_endgetargs:; /*_.OLIS__V24*/ meltfptr[23] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));; - MELT_LOCATION ("warmelt-genobj.melt:4160:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4176:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -10995,15 +11329,15 @@ lab_endgetargs:; ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));; { - MELT_LOCATION ("warmelt-genobj.melt:4165:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4181:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.DESTLIST__V27*/ meltfptr[26]), (melt_ptr_t) ( /*_.LOCV__V21*/ meltfptr[20])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4167:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4183:/ checksignal"); MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-genobj.melt:4173:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4189:/ quasiblock"); /*^checksignal */ @@ -11025,9 +11359,9 @@ lab_endgetargs:; ; /*_.LET___V28*/ meltfptr[27] = /*_.CROU__V29*/ meltfptr[28];; - MELT_LOCATION ("warmelt-genobj.melt:4173:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4189:/ clear"); /*clear *//*_.CROU__V29*/ meltfptr[28] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4172:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4188:/ quasiblock"); /*_.PROGN___V30*/ meltfptr[28] = /*_.LET___V28*/ meltfptr[27];; @@ -11037,7 +11371,7 @@ lab_endgetargs:; (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[10])), ( /*_#NBCLOSED__L6*/ meltfnum[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4167:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4183:/ quasiblock"); /*^rawallocobj */ @@ -11103,12 +11437,12 @@ lab_endgetargs:; /*_.INST___V32*/ meltfptr[31] = /*_.INST__V33*/ meltfptr[32];; { - MELT_LOCATION ("warmelt-genobj.melt:4166:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4182:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIS__V24*/ meltfptr[23]), (melt_ptr_t) ( /*_.INST___V32*/ meltfptr[31])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4180:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4196:/ quasiblock"); /*^newclosure */ @@ -11172,7 +11506,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]); ; /*_.LAMBDA___V34*/ meltfptr[33] = /*_.LAMBDA___V35*/ meltfptr[34];; - MELT_LOCATION ("warmelt-genobj.melt:4178:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4194:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11193,14 +11527,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4189:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4205:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIS__V24*/ meltfptr[23]), (melt_ptr_t) ( /*_.LOCV__V21*/ meltfptr[20])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4190:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4206:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11226,7 +11560,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4190:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4206:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -11241,7 +11575,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4190:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4206:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11254,7 +11588,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4190; + argtab[2].meltbp_long = 4206; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_lambda result oblock="; @@ -11275,7 +11609,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V39*/ meltfptr[38];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4190:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4206:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V39*/ meltfptr[38] = 0; @@ -11288,7 +11622,7 @@ lab_endgetargs:; /*_.IF___V38*/ meltfptr[37] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4190:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4206:/ quasiblock"); /*_.PROGN___V40*/ meltfptr[38] = /*_.IF___V38*/ meltfptr[37];; @@ -11297,7 +11631,7 @@ lab_endgetargs:; /*_.IFCPP___V37*/ meltfptr[36] = /*_.PROGN___V40*/ meltfptr[38];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4190:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4206:/ clear"); /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IF___V38*/ meltfptr[37] = 0; @@ -11314,7 +11648,7 @@ lab_endgetargs:; /*_.LET___V12*/ meltfptr[8] = /*_.OBLOCK__V25*/ meltfptr[24];; - MELT_LOCATION ("warmelt-genobj.melt:4148:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4164:/ clear"); /*clear *//*_.NLOC__V13*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.LET___V14*/ meltfptr[13] = 0; @@ -11352,14 +11686,26 @@ lab_endgetargs:; /*clear *//*_.MULTIPLE_EVERY__V36*/ meltfptr[35] = 0; /*^clear */ /*clear *//*_.IFCPP___V37*/ meltfptr[36] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4144:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:4144:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4160:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11457,7 +11803,7 @@ meltrout_125_warmelt_genobj_LAMBDA___37__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4180:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4196:/ getarg"); /*_.CLOV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -11473,14 +11819,14 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-genobj.melt:4183:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4199:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_INTEGERBOX__V3*/ meltfptr[2] = (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[1])), ( /*_#IX__L1*/ meltfnum[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4187:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4203:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -11498,7 +11844,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4183:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4199:/ quasiblock"); /*^rawallocobj */ @@ -11555,14 +11901,14 @@ lab_endgetargs:; /*_.INST___V5*/ meltfptr[4] = /*_.INST__V6*/ meltfptr[5];; { - MELT_LOCATION ("warmelt-genobj.melt:4181:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4197:/ locexp"); meltgc_append_list ((melt_ptr_t) (( /*~OLIS */ meltfclos->tabval[0])), (melt_ptr_t) ( /*_.INST___V5*/ meltfptr[4])); } ; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4180:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4196:/ clear"); /*clear *//*_.MAKE_INTEGERBOX__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_.COMPILE_OBJ__V4*/ meltfptr[3] = 0; @@ -11659,7 +12005,7 @@ meltrout_126_warmelt_genobj_COMPILOBJ_NREP_MAKEINST (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4196:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ getarg"); /*_.NMKI__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -11680,7 +12026,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4197:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4213:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11692,7 +12038,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4197:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4213:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -11700,7 +12046,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4197:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4213:/ cond.else"); /*^block */ /*anyblock */ @@ -11714,7 +12060,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4197) ? (4197) : __LINE__, __FUNCTION__); + (4213) ? (4213) : __LINE__, __FUNCTION__); ; } ; @@ -11729,7 +12075,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4197:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4213:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -11742,7 +12088,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4198:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4214:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11754,7 +12100,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NMKI__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_INSTANCE */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4198:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4214:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -11762,7 +12108,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4198:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4214:/ cond.else"); /*^block */ /*anyblock */ @@ -11776,7 +12122,7 @@ lab_endgetargs:; melt_assert_failed (("check nmki"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4198) ? (4198) : __LINE__, __FUNCTION__); + (4214) ? (4214) : __LINE__, __FUNCTION__); ; } ; @@ -11791,7 +12137,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4198:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4214:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -11804,7 +12150,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4199:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4215:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11830,7 +12176,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4199:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4215:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -11845,7 +12191,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4199:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4215:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11858,7 +12204,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4199; + argtab[2].meltbp_long = 4215; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_makeinst nmki="; /*^apply.arg */ @@ -11878,7 +12224,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4199:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4215:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0; @@ -11891,7 +12237,7 @@ lab_endgetargs:; /*_.IF___V9*/ meltfptr[8] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4199:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4215:/ quasiblock"); /*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];; @@ -11900,7 +12246,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4199:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4215:/ clear"); /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V9*/ meltfptr[8] = 0; @@ -11913,7 +12259,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4200:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4216:/ quasiblock"); /*^getslot */ @@ -11924,7 +12270,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4201:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4217:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMKI__V2*/ meltfptr[1]), 1, "NMINS_CLASS"); @@ -11932,7 +12278,7 @@ lab_endgetargs:; meltfptr[13] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4202:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4218:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMKI__V2*/ meltfptr[1]), 2, "NMINS_CLADATA"); @@ -11940,7 +12286,7 @@ lab_endgetargs:; meltfptr[14] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4203:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4219:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMKI__V2*/ meltfptr[1]), 3, "NMINS_FIELDS"); @@ -11950,7 +12296,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4205:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4221:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11962,7 +12308,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NCLA__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout-> tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:4205:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4221:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -11970,7 +12316,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4205:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4221:/ cond.else"); /*^block */ /*anyblock */ @@ -11984,7 +12330,7 @@ lab_endgetargs:; melt_assert_failed (("check ncla"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4205) ? (4205) : __LINE__, __FUNCTION__); + (4221) ? (4221) : __LINE__, __FUNCTION__); ; } ; @@ -11999,7 +12345,7 @@ lab_endgetargs:; /*_.IFCPP___V17*/ meltfptr[16] = /*_.IFELSE___V18*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4205:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4221:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V18*/ meltfptr[17] = 0; @@ -12010,7 +12356,7 @@ lab_endgetargs:; /*_.IFCPP___V17*/ meltfptr[16] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4206:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4222:/ quasiblock"); /*^getslot */ @@ -12029,7 +12375,7 @@ lab_endgetargs:; /*_.DESTLIST__V21*/ meltfptr[20] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));; - MELT_LOCATION ("warmelt-genobj.melt:4208:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4224:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12051,7 +12397,7 @@ lab_endgetargs:; /*_.OLIS__V23*/ meltfptr[22] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));; - MELT_LOCATION ("warmelt-genobj.melt:4210:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4226:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -12068,7 +12414,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4211:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4227:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -12105,14 +12451,14 @@ lab_endgetargs:; ( /*_.OLIS__V23*/ meltfptr[22]), "OBLO_BODYL"); ; /*_.OBLOCK__V25*/ meltfptr[24] = /*_.INST__V26*/ meltfptr[25];; - MELT_LOCATION ("warmelt-genobj.melt:4214:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4230:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_INTEGERBOX__V27*/ meltfptr[26] = (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[10])), ( /*_#NBFLD__L6*/ meltfnum[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4218:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4234:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCLA__V14*/ meltfptr[13]), 1, "NAMED_NAME"); @@ -12120,7 +12466,7 @@ lab_endgetargs:; meltfptr[27] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4214:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4230:/ quasiblock"); /*^rawallocobj */ @@ -12187,19 +12533,19 @@ lab_endgetargs:; /*_.ORALLOBJ__V29*/ meltfptr[28] = /*_.INST__V30*/ meltfptr[29];; { - MELT_LOCATION ("warmelt-genobj.melt:4221:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4237:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.DESTLIST__V21*/ meltfptr[20]), (melt_ptr_t) ( /*_.LOCV__V22*/ meltfptr[21])); } ; { - MELT_LOCATION ("warmelt-genobj.melt:4222:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4238:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIS__V23*/ meltfptr[22]), (melt_ptr_t) ( /*_.ORALLOBJ__V29*/ meltfptr[28])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4226:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4242:/ quasiblock"); /*^newclosure */ @@ -12263,7 +12609,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.LOCV__V22*/ meltfptr[21]); ; /*_.LAMBDA___V31*/ meltfptr[30] = /*_.LAMBDA___V32*/ meltfptr[31];; - MELT_LOCATION ("warmelt-genobj.melt:4224:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4240:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12284,14 +12630,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4244:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4260:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIS__V23*/ meltfptr[22]), (melt_ptr_t) ( /*_.LOCV__V22*/ meltfptr[21])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4245:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4261:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12317,7 +12663,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4245:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4261:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -12332,7 +12678,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4245:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4261:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12345,7 +12691,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4245; + argtab[2].meltbp_long = 4261; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_makeinst result oblock="; @@ -12366,7 +12712,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V36*/ meltfptr[35];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4245:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4261:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V36*/ meltfptr[35] = 0; @@ -12379,7 +12725,7 @@ lab_endgetargs:; /*_.IF___V35*/ meltfptr[34] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4245:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4261:/ quasiblock"); /*_.PROGN___V37*/ meltfptr[35] = /*_.IF___V35*/ meltfptr[34];; @@ -12388,7 +12734,7 @@ lab_endgetargs:; /*_.IFCPP___V34*/ meltfptr[33] = /*_.PROGN___V37*/ meltfptr[35];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4245:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4261:/ clear"); /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IF___V35*/ meltfptr[34] = 0; @@ -12405,7 +12751,7 @@ lab_endgetargs:; /*_.LET___V19*/ meltfptr[17] = /*_.OBLOCK__V25*/ meltfptr[24];; - MELT_LOCATION ("warmelt-genobj.melt:4206:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4222:/ clear"); /*clear *//*_.CLASS_FIELDS__V20*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_#NBFLD__L6*/ meltfnum[0] = 0; @@ -12433,7 +12779,7 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V34*/ meltfptr[33] = 0; /*_.LET___V12*/ meltfptr[8] = /*_.LET___V19*/ meltfptr[17];; - MELT_LOCATION ("warmelt-genobj.melt:4200:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4216:/ clear"); /*clear *//*_.NLOC__V13*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.NCLA__V14*/ meltfptr[13] = 0; @@ -12445,14 +12791,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V17*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.LET___V19*/ meltfptr[17] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4196:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:4196:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4212:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -12550,7 +12908,7 @@ meltrout_127_warmelt_genobj_LAMBDA___38__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4226:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4242:/ getarg"); /*_.CFLA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -12568,7 +12926,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4227:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4243:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12580,7 +12938,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CFLA__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_FIELDASSIGN */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4227:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4243:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -12588,7 +12946,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4227:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4243:/ cond.else"); /*^block */ /*anyblock */ @@ -12602,7 +12960,7 @@ lab_endgetargs:; melt_assert_failed (("compilobj_nrep_makeinst check cfla"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4227) ? (4227) : __LINE__, __FUNCTION__); + (4243) ? (4243) : __LINE__, __FUNCTION__); ; } ; @@ -12617,7 +12975,7 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = /*_.IFELSE___V4*/ meltfptr[3];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4227:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4243:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V4*/ meltfptr[3] = 0; @@ -12628,7 +12986,7 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4228:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4244:/ quasiblock"); /*^getslot */ @@ -12639,7 +12997,7 @@ lab_endgetargs:; meltfptr[3] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4229:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4245:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CFLA__V2*/ meltfptr[1]), 1, "NFLA_FIELD"); @@ -12647,7 +13005,7 @@ lab_endgetargs:; meltfptr[5] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4230:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4246:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CFLA__V2*/ meltfptr[1]), 2, "NFLA_VAL"); @@ -12657,7 +13015,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4231:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4247:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12669,7 +13027,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CFIELD__V6*/ meltfptr[5]), (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout-> tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4231:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4247:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -12677,7 +13035,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4231:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4247:/ cond.else"); /*^block */ /*anyblock */ @@ -12691,7 +13049,7 @@ lab_endgetargs:; melt_assert_failed (("compilobj_nrep_makeinst check cfield"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4231) ? (4231) : __LINE__, __FUNCTION__); + (4247) ? (4247) : __LINE__, __FUNCTION__); ; } ; @@ -12706,7 +13064,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[7] = /*_.IFELSE___V9*/ meltfptr[8];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4231:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4247:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V9*/ meltfptr[8] = 0; @@ -12717,7 +13075,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[7] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4234:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4250:/ quasiblock"); /*^checksignal */ @@ -12740,7 +13098,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4235:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4251:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12756,7 +13114,7 @@ lab_endgetargs:; /*_#NOT__L5*/ meltfnum[4] = (!( /*_#IS_A__L4*/ meltfnum[1]));; - MELT_LOCATION ("warmelt-genobj.melt:4235:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4251:/ cond"); /*cond */ if ( /*_#NOT__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -12764,7 +13122,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4235:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4251:/ cond.else"); /*^block */ /*anyblock */ @@ -12775,7 +13133,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("compilobj_nrep_makeinst check oval not nrep"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4235) ? (4235) : __LINE__, __FUNCTION__); + melt_assert_failed (("compilobj_nrep_makeinst check oval not nrep"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4251) ? (4251) : __LINE__, __FUNCTION__); ; } ; @@ -12790,7 +13148,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4235:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4251:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#NOT__L5*/ meltfnum[4] = 0; @@ -12803,10 +13161,10 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4236:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4252:/ checksignal"); MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-genobj.melt:4237:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4253:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -12817,7 +13175,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4237:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4253:/ cond.else"); /*_.IFELSE___V14*/ meltfptr[12] = ( /*~NLOC */ meltfclos->tabval[2]);; } @@ -12832,7 +13190,7 @@ lab_endgetargs:; (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[5])), ( /*_#GET_INT__L6*/ meltfnum[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4236:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4252:/ quasiblock"); /*^rawallocobj */ @@ -12899,7 +13257,7 @@ lab_endgetargs:; /*_.LET___V10*/ meltfptr[8] = /*_.INST___V16*/ meltfptr[15];; - MELT_LOCATION ("warmelt-genobj.melt:4234:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4250:/ clear"); /*clear *//*_.OVAL__V11*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_.IFCPP___V12*/ meltfptr[11] = 0; @@ -12913,13 +13271,13 @@ lab_endgetargs:; /*clear *//*_.INST___V16*/ meltfptr[15] = 0; { - MELT_LOCATION ("warmelt-genobj.melt:4232:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4248:/ locexp"); meltgc_append_list ((melt_ptr_t) (( /*~OLIS */ meltfclos->tabval[0])), (melt_ptr_t) ( /*_.LET___V10*/ meltfptr[8])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4228:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4244:/ clear"); /*clear *//*_.CFLOC__V5*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.CFIELD__V6*/ meltfptr[5] = 0; @@ -12929,7 +13287,7 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.LET___V10*/ meltfptr[8] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4226:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4242:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -13023,7 +13381,7 @@ meltrout_128_warmelt_genobj_COMPILOBJ_ROUTPROC (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4253:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4269:/ getarg"); /*_.NPRO__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -13044,7 +13402,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4254:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4270:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13056,7 +13414,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4254:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4270:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -13064,7 +13422,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4254:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4270:/ cond.else"); /*^block */ /*anyblock */ @@ -13078,7 +13436,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4254) ? (4254) : __LINE__, __FUNCTION__); + (4270) ? (4270) : __LINE__, __FUNCTION__); ; } ; @@ -13093,7 +13451,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4254:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4270:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -13106,7 +13464,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4255:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4271:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13118,7 +13476,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NPRO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_ROUTPROC */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4255:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4271:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -13126,7 +13484,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4255:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4271:/ cond.else"); /*^block */ /*anyblock */ @@ -13140,7 +13498,7 @@ lab_endgetargs:; melt_assert_failed (("check npro"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4255) ? (4255) : __LINE__, __FUNCTION__); + (4271) ? (4271) : __LINE__, __FUNCTION__); ; } ; @@ -13155,7 +13513,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4255:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4271:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -13168,7 +13526,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4256:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4272:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13194,7 +13552,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4256:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4272:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -13209,7 +13567,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4256:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4272:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13222,7 +13580,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4256; + argtab[2].meltbp_long = 4272; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_routproc npro="; /*^apply.arg */ @@ -13248,7 +13606,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4256:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4272:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0; @@ -13261,7 +13619,7 @@ lab_endgetargs:; /*_.IF___V9*/ meltfptr[8] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4256:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4272:/ quasiblock"); /*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];; @@ -13270,7 +13628,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4256:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4272:/ clear"); /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V9*/ meltfptr[8] = 0; @@ -13285,7 +13643,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4257:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4273:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13301,7 +13659,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4257:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4273:/ cond.else"); /*^block */ /*anyblock */ @@ -13315,7 +13673,7 @@ lab_endgetargs:; melt_assert_failed (("UNEXPECTED CALL TO compilobj_routproc"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4257) ? (4257) : __LINE__, __FUNCTION__); + (4273) ? (4273) : __LINE__, __FUNCTION__); ; } ; @@ -13330,7 +13688,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[8] = /*_.IFELSE___V13*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4257:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4273:/ clear"); /*clear *//*_.IFELSE___V13*/ meltfptr[9] = 0; } @@ -13339,14 +13697,26 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[8] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4253:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4269:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:4253:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4269:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13446,7 +13816,7 @@ meltrout_129_warmelt_genobj_COMPILOBJ_PREDEF (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4262:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4278:/ getarg"); /*_.NPR__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -13467,7 +13837,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4263:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4279:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13479,7 +13849,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4263:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4279:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -13487,7 +13857,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4263:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4279:/ cond.else"); /*^block */ /*anyblock */ @@ -13501,7 +13871,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4263) ? (4263) : __LINE__, __FUNCTION__); + (4279) ? (4279) : __LINE__, __FUNCTION__); ; } ; @@ -13516,7 +13886,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4263:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4279:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -13527,13 +13897,13 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4264:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4280:/ quasiblock"); /*^checksignal */ MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-genobj.melt:4266:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4282:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NPR__V2*/ meltfptr[1]), 1, "NRPREDEF"); @@ -13541,7 +13911,7 @@ lab_endgetargs:; meltfptr[6] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4264:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4280:/ quasiblock"); /*^rawallocobj */ @@ -13580,18 +13950,30 @@ lab_endgetargs:; /*_.LET___V6*/ meltfptr[4] = /*_.OPR__V8*/ meltfptr[7];; - MELT_LOCATION ("warmelt-genobj.melt:4264:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4280:/ clear"); /*clear *//*_.NRPREDEF__V7*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_.OPR__V8*/ meltfptr[7] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4262:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4278:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V6*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:4262:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4278:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13692,7 +14074,7 @@ meltrout_130_warmelt_genobj_COMPIL_DATA_AND_SLOTS_FILL (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4278:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ getarg"); /*_.NDAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -13742,7 +14124,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4279:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4295:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13754,7 +14136,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NDAT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_BOUND_DATA */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4279:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4295:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -13762,7 +14144,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4279:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4295:/ cond.else"); /*^block */ /*anyblock */ @@ -13776,7 +14158,7 @@ lab_endgetargs:; melt_assert_failed (("compil_data_and_slots_fill check ndat"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4279) ? (4279) : __LINE__, __FUNCTION__); + (4295) ? (4295) : __LINE__, __FUNCTION__); ; } ; @@ -13791,7 +14173,7 @@ lab_endgetargs:; /*_.IFCPP___V7*/ meltfptr[6] = /*_.IFELSE___V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4279:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4295:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0; @@ -13804,7 +14186,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4280:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4296:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13816,7 +14198,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OBJ__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_OBJINITOBJECT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4280:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4296:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -13824,7 +14206,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4280:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4296:/ cond.else"); /*^block */ /*anyblock */ @@ -13838,7 +14220,7 @@ lab_endgetargs:; melt_assert_failed (("compil_data_and_slots_fill check obj"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4280) ? (4280) : __LINE__, __FUNCTION__); + (4296) ? (4296) : __LINE__, __FUNCTION__); ; } ; @@ -13853,7 +14235,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[7] = /*_.IFELSE___V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4280:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4296:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[9] = 0; @@ -13866,7 +14248,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4281:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4297:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13878,7 +14260,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.ODISCR__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_OBJVALUE */ meltfrout-> tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:4281:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4297:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -13886,7 +14268,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4281:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4297:/ cond.else"); /*^block */ /*anyblock */ @@ -13900,7 +14282,7 @@ lab_endgetargs:; melt_assert_failed (("compil_data_and_slots_fill check odiscr"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4281) ? (4281) : __LINE__, __FUNCTION__); + (4297) ? (4297) : __LINE__, __FUNCTION__); ; } ; @@ -13915,7 +14297,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[9] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4281:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4297:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -13928,7 +14310,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4282:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4298:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13940,7 +14322,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.IROUT__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:4282:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4298:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -13948,7 +14330,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4282:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4298:/ cond.else"); /*^block */ /*anyblock */ @@ -13962,7 +14344,7 @@ lab_endgetargs:; melt_assert_failed (("compil_data_and_slots_fill check irout"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4282) ? (4282) : __LINE__, __FUNCTION__); + (4298) ? (4298) : __LINE__, __FUNCTION__); ; } ; @@ -13977,7 +14359,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4282:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4298:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -13990,7 +14372,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4283:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4299:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14002,7 +14384,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V6*/ meltfptr[5]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[4])));; - MELT_LOCATION ("warmelt-genobj.melt:4283:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4299:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -14010,7 +14392,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4283:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4299:/ cond.else"); /*^block */ /*anyblock */ @@ -14024,7 +14406,7 @@ lab_endgetargs:; melt_assert_failed (("compil_data_and_slots_fill check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4283) ? (4283) : __LINE__, __FUNCTION__); + (4299) ? (4299) : __LINE__, __FUNCTION__); ; } ; @@ -14039,7 +14421,7 @@ lab_endgetargs:; /*_.IFCPP___V15*/ meltfptr[13] = /*_.IFELSE___V16*/ meltfptr[15];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4283:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4299:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0; @@ -14052,7 +14434,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4284:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4300:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14078,7 +14460,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4284:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4300:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -14093,7 +14475,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4284:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4300:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14106,7 +14488,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4284; + argtab[2].meltbp_long = 4300; /*^apply.arg */ argtab[3].meltbp_cstring = "compil_data_and_slots_fill start ndat="; @@ -14145,7 +14527,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4284:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4300:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] = 0; @@ -14158,7 +14540,7 @@ lab_endgetargs:; /*_.IF___V18*/ meltfptr[17] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4284:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4300:/ quasiblock"); /*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[17];; @@ -14167,7 +14549,7 @@ lab_endgetargs:; /*_.IFCPP___V17*/ meltfptr[15] = /*_.PROGN___V20*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4284:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4300:/ clear"); /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V18*/ meltfptr[17] = 0; @@ -14180,17 +14562,17 @@ lab_endgetargs:; /*_.IFCPP___V17*/ meltfptr[15] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4285:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4301:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:4286:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4302:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L8*/ meltfnum[6] = melt_is_instance_of ((melt_ptr_t) ( /*_.NDAT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_DATAINSTANCE */ meltfrout->tabval[6])));; - MELT_LOCATION ("warmelt-genobj.melt:4286:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4302:/ cond"); /*cond */ if ( /*_#IS_A__L8*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -14210,7 +14592,7 @@ lab_endgetargs:; /*_.NINST_PREDEF__V23*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4286:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4302:/ clear"); /*clear *//*_.NINST_PREDEF__V23*/ meltfptr[22] = 0; } ; @@ -14221,7 +14603,7 @@ lab_endgetargs:; /*_.IPREDEF__V22*/ meltfptr[18] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4287:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4303:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.IROUT__V5*/ meltfptr[4]), 3, "OBROUT_BODY"); @@ -14229,7 +14611,7 @@ lab_endgetargs:; meltfptr[22] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4288:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4304:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.IROUT__V5*/ meltfptr[4]), 12, "OIROUT_FILL"); @@ -14237,7 +14619,7 @@ lab_endgetargs:; meltfptr[24] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4289:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4305:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14256,7 +14638,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4290:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4306:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) (( /*!konst_9_VALUEDATA_ */ meltfrout->tabval[9])), 1, "NAMED_NAME"); @@ -14264,7 +14646,7 @@ lab_endgetargs:; meltfptr[26] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4291:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4307:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDAT__V2*/ meltfptr[1]), 0, "NREP_LOC"); @@ -14272,7 +14654,7 @@ lab_endgetargs:; meltfptr[27] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4292:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4308:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDAT__V2*/ meltfptr[1]), 3, "NDATA_LOCBIND"); @@ -14280,7 +14662,7 @@ lab_endgetargs:; meltfptr[28] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4293:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4309:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V6*/ meltfptr[5]), 1, "GNCX_LOCMAP"); @@ -14302,7 +14684,7 @@ lab_endgetargs:; ( /*_#MULTIPLE_LENGTH__L9*/ meltfnum[0])));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4298:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4314:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14313,7 +14695,7 @@ lab_endgetargs:; /*_#IS_LIST__L10*/ meltfnum[9] = (melt_magic_discr ((melt_ptr_t) ( /*_.IBODYLIS__V24*/ meltfptr[22])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-genobj.melt:4298:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4314:/ cond"); /*cond */ if ( /*_#IS_LIST__L10*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -14321,7 +14703,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4298:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4314:/ cond.else"); /*^block */ /*anyblock */ @@ -14332,7 +14714,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("compil_data_and_slots_fill check ibodylis"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4298) ? (4298) : __LINE__, __FUNCTION__); + melt_assert_failed (("compil_data_and_slots_fill check ibodylis"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4314) ? (4314) : __LINE__, __FUNCTION__); ; } ; @@ -14347,7 +14729,7 @@ lab_endgetargs:; /*_.IFCPP___V33*/ meltfptr[32] = /*_.IFELSE___V34*/ meltfptr[33];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4298:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4314:/ clear"); /*clear *//*_#IS_LIST__L10*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.IFELSE___V34*/ meltfptr[33] = 0; @@ -14360,7 +14742,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4299:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4315:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14378,7 +14760,7 @@ lab_endgetargs:; ; /*_#NULL__L11*/ meltfnum[9] = (( /*_.OIE_LOCVAR__V36*/ meltfptr[35]) == NULL);; - MELT_LOCATION ("warmelt-genobj.melt:4299:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4315:/ cond"); /*cond */ if ( /*_#NULL__L11*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -14386,7 +14768,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4299:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4315:/ cond.else"); /*^block */ /*anyblock */ @@ -14397,7 +14779,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("compil_data_and_slots_fill check fresh obj"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4299) ? (4299) : __LINE__, __FUNCTION__); + melt_assert_failed (("compil_data_and_slots_fill check fresh obj"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4315) ? (4315) : __LINE__, __FUNCTION__); ; } ; @@ -14412,7 +14794,7 @@ lab_endgetargs:; /*_.IFCPP___V35*/ meltfptr[33] = /*_.IFELSE___V37*/ meltfptr[36];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4299:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4315:/ clear"); /*clear *//*_.OIE_LOCVAR__V36*/ meltfptr[35] = 0; /*^clear */ /*clear *//*_#NULL__L11*/ meltfnum[9] = 0; @@ -14425,7 +14807,7 @@ lab_endgetargs:; /*_.IFCPP___V35*/ meltfptr[33] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4300:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4316:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -14446,7 +14828,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4301:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4317:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14457,7 +14839,7 @@ lab_endgetargs:; /*_#IS_LIST__L12*/ meltfnum[9] = (melt_magic_discr ((melt_ptr_t) ( /*_.IFILLLIS__V25*/ meltfptr[24])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-genobj.melt:4301:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4317:/ cond"); /*cond */ if ( /*_#IS_LIST__L12*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -14465,7 +14847,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4301:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4317:/ cond.else"); /*^block */ /*anyblock */ @@ -14476,7 +14858,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("compil_data_and_slots_fill check ifilllis"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4301) ? (4301) : __LINE__, __FUNCTION__); + melt_assert_failed (("compil_data_and_slots_fill check ifilllis"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4317) ? (4317) : __LINE__, __FUNCTION__); ; } ; @@ -14491,7 +14873,7 @@ lab_endgetargs:; /*_.IFCPP___V38*/ meltfptr[35] = /*_.IFELSE___V39*/ meltfptr[36];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4301:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4317:/ clear"); /*clear *//*_#IS_LIST__L12*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.IFELSE___V39*/ meltfptr[36] = 0; @@ -14504,7 +14886,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4302:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4318:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14515,7 +14897,7 @@ lab_endgetargs:; /*_#IS_LIST__L13*/ meltfnum[9] = (melt_magic_discr ((melt_ptr_t) ( /*_.IBODYLIS__V24*/ meltfptr[22])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-genobj.melt:4302:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4318:/ cond"); /*cond */ if ( /*_#IS_LIST__L13*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -14523,7 +14905,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4302:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4318:/ cond.else"); /*^block */ /*anyblock */ @@ -14534,7 +14916,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("compil_data_and_slots_fill check ibodylis"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4302) ? (4302) : __LINE__, __FUNCTION__); + melt_assert_failed (("compil_data_and_slots_fill check ibodylis"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4318) ? (4318) : __LINE__, __FUNCTION__); ; } ; @@ -14549,7 +14931,7 @@ lab_endgetargs:; /*_.IFCPP___V40*/ meltfptr[36] = /*_.IFELSE___V41*/ meltfptr[40];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4302:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4318:/ clear"); /*clear *//*_#IS_LIST__L13*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.IFELSE___V41*/ meltfptr[40] = 0; @@ -14560,7 +14942,7 @@ lab_endgetargs:; /*_.IFCPP___V40*/ meltfptr[36] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4304:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4320:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -14571,10 +14953,10 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4305:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4321:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:4308:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4324:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L14*/ meltfnum[9] = @@ -14582,7 +14964,7 @@ lab_endgetargs:; ( /*_.IPREDEF__V22*/ meltfptr[18]), (melt_ptr_t) (( /*!CLASS_SYMBOL */ meltfrout->tabval[11])));; - MELT_LOCATION ("warmelt-genobj.melt:4308:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4324:/ cond"); /*cond */ if ( /*_#IS_A__L14*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -14590,7 +14972,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4309:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4325:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_STRINGCONST__V43*/ meltfptr[42] = @@ -14598,7 +14980,7 @@ lab_endgetargs:; ((meltobject_ptr_t) (( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[13])), ("MELTPREDEFIX(predefinited,")));; - MELT_LOCATION ("warmelt-genobj.melt:4315:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4331:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.IPREDEF__V22*/ meltfptr[18]), 1, "NAMED_NAME"); @@ -14620,7 +15002,7 @@ lab_endgetargs:; ((meltobject_ptr_t) (( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[13])), (")")));; - MELT_LOCATION ("warmelt-genobj.melt:4311:/ blockmultialloc"); + MELT_LOCATION ("warmelt-genobj.melt:4327:/ blockmultialloc"); /*multiallocblock */ { struct meltletrec_1_st @@ -14643,12 +15025,12 @@ lab_endgetargs:; /*^putuple */ /*putupl#35 */ - melt_assertmsg ("putupl [:4311] #35 checktup", + melt_assertmsg ("putupl [:4327] #35 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.TUPLREC___V48*/ meltfptr[47])) == MELTOBMAG_MULTIPLE); - melt_assertmsg ("putupl [:4311] #35 checkoff", + melt_assertmsg ("putupl [:4327] #35 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) @@ -14660,12 +15042,12 @@ lab_endgetargs:; ; /*^putuple */ /*putupl#36 */ - melt_assertmsg ("putupl [:4311] #36 checktup", + melt_assertmsg ("putupl [:4327] #36 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.TUPLREC___V48*/ meltfptr[47])) == MELTOBMAG_MULTIPLE); - melt_assertmsg ("putupl [:4311] #36 checkoff", + melt_assertmsg ("putupl [:4327] #36 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) @@ -14677,12 +15059,12 @@ lab_endgetargs:; ; /*^putuple */ /*putupl#37 */ - melt_assertmsg ("putupl [:4311] #37 checktup", + melt_assertmsg ("putupl [:4327] #37 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.TUPLREC___V48*/ meltfptr[47])) == MELTOBMAG_MULTIPLE); - melt_assertmsg ("putupl [:4311] #37 checkoff", + melt_assertmsg ("putupl [:4327] #37 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) @@ -14699,13 +15081,13 @@ lab_endgetargs:; /*_.TUPLREC___V48*/ meltfptr[47];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4311:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4327:/ clear"); /*clear *//*_.TUPLREC___V48*/ meltfptr[47] = 0; /*^clear */ /*clear *//*_.TUPLREC___V48*/ meltfptr[47] = 0; } /*end multiallocblock */ ; - MELT_LOCATION ("warmelt-genobj.melt:4309:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4325:/ quasiblock"); /*^rawallocobj */ @@ -14739,7 +15121,7 @@ lab_endgetargs:; /*_.INST___V49*/ meltfptr[47];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4308:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4324:/ clear"); /*clear *//*_.MAKE_STRINGCONST__V43*/ meltfptr[42] = 0; /*^clear */ /*clear *//*_.NAMED_NAME__V44*/ meltfptr[43] = 0; @@ -14761,14 +15143,14 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4320:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4336:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_INTEGERBOX__L15*/ meltfnum[14] = (melt_magic_discr ((melt_ptr_t) ( /*_.IPREDEF__V22*/ meltfptr[18])) == MELTOBMAG_INT);; - MELT_LOCATION ("warmelt-genobj.melt:4320:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4336:/ cond"); /*cond */ if ( /*_#IS_INTEGERBOX__L15*/ meltfnum[14]) /*then */ { /*^cond.then */ @@ -14777,7 +15159,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-genobj.melt:4321:/ checksignal"); + ("warmelt-genobj.melt:4337:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_STRINGCONST__V52*/ meltfptr[43] = @@ -14793,7 +15175,7 @@ lab_endgetargs:; (( /*!DISCR_VERBATIM_STRING */ meltfrout-> tabval[13])), ("]")));; MELT_LOCATION - ("warmelt-genobj.melt:4323:/ blockmultialloc"); + ("warmelt-genobj.melt:4339:/ blockmultialloc"); /*multiallocblock */ { struct meltletrec_2_st @@ -14820,10 +15202,10 @@ lab_endgetargs:; /*^putuple */ /*putupl#38 */ - melt_assertmsg ("putupl [:4323] #38 checktup", + melt_assertmsg ("putupl [:4339] #38 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.TUPLREC___V55*/ meltfptr[46])) == MELTOBMAG_MULTIPLE); - melt_assertmsg ("putupl [:4323] #38 checkoff", + melt_assertmsg ("putupl [:4339] #38 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) @@ -14834,10 +15216,10 @@ lab_endgetargs:; ; /*^putuple */ /*putupl#39 */ - melt_assertmsg ("putupl [:4323] #39 checktup", + melt_assertmsg ("putupl [:4339] #39 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.TUPLREC___V55*/ meltfptr[46])) == MELTOBMAG_MULTIPLE); - melt_assertmsg ("putupl [:4323] #39 checkoff", + melt_assertmsg ("putupl [:4339] #39 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) @@ -14848,10 +15230,10 @@ lab_endgetargs:; ; /*^putuple */ /*putupl#40 */ - melt_assertmsg ("putupl [:4323] #40 checktup", + melt_assertmsg ("putupl [:4339] #40 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.TUPLREC___V55*/ meltfptr[46])) == MELTOBMAG_MULTIPLE); - melt_assertmsg ("putupl [:4323] #40 checkoff", + melt_assertmsg ("putupl [:4339] #40 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) @@ -14867,13 +15249,13 @@ lab_endgetargs:; /*_.TUPLREC___V55*/ meltfptr[46];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4323:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4339:/ clear"); /*clear *//*_.TUPLREC___V55*/ meltfptr[46] = 0; /*^clear */ /*clear *//*_.TUPLREC___V55*/ meltfptr[46] = 0; } /*end multiallocblock */ ; - MELT_LOCATION ("warmelt-genobj.melt:4321:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4337:/ quasiblock"); /*^rawallocobj */ @@ -14906,7 +15288,7 @@ lab_endgetargs:; /*_.INST___V56*/ meltfptr[47];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4320:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4336:/ clear"); /*clear *//*_.MAKE_STRINGCONST__V52*/ meltfptr[43] = 0; /*^clear */ /*clear *//*_.MAKE_STRINGCONST__V53*/ meltfptr[44] = 0; @@ -14929,7 +15311,7 @@ lab_endgetargs:; /*_.IFELSE___V51*/ meltfptr[42];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4308:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4324:/ clear"); /*clear *//*_#IS_INTEGERBOX__L15*/ meltfnum[14] = 0; /*^clear */ /*clear *//*_.IFELSE___V51*/ meltfptr[42] = 0; @@ -14941,7 +15323,7 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[14]))));; - MELT_LOCATION ("warmelt-genobj.melt:4333:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4349:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -14979,7 +15361,7 @@ lab_endgetargs:; ; /*_.OBLOCKPREDEF__V59*/ meltfptr[44] = /*_.INST__V60*/ meltfptr[45];; - MELT_LOCATION ("warmelt-genobj.melt:4337:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4353:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -15036,12 +15418,12 @@ lab_endgetargs:; "OBCOND_ELSE"); ; /*_.OCONDPREDEF__V61*/ meltfptr[47] = /*_.INST__V62*/ meltfptr[42];; - MELT_LOCATION ("warmelt-genobj.melt:4344:/ compute"); + MELT_LOCATION ("warmelt-genobj.melt:4360:/ compute"); /*_.ISTMTLIS__V31*/ meltfptr[30] = /*_.SETQ___V63*/ meltfptr[62] = /*_.INITLIS__V58*/ meltfptr[43];; { - MELT_LOCATION ("warmelt-genobj.melt:4345:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4361:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.IBODYLIS__V24*/ meltfptr[22]), (melt_ptr_t) ( /*_.OCONDPREDEF__V61*/ @@ -15049,7 +15431,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-genobj.melt:4305:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4321:/ clear"); /*clear *//*_#IS_A__L14*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.OTESTPREDEF__V42*/ meltfptr[40] = 0; @@ -15066,7 +15448,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-genobj.melt:4349:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4365:/ quasiblock"); /*^newclosure */ @@ -15130,7 +15512,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.TUPVAR__V32*/ meltfptr[31]); ; /*_.LAMBDA___V64*/ meltfptr[40] = /*_.LAMBDA___V65*/ meltfptr[43];; - MELT_LOCATION ("warmelt-genobj.melt:4347:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4363:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15149,7 +15531,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4366:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4382:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDAT__V2*/ meltfptr[1]), 8, "NINST_SLOTS"); @@ -15157,7 +15539,7 @@ lab_endgetargs:; meltfptr[47] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4367:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4383:/ quasiblock"); /*^newclosure */ @@ -15221,7 +15603,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.ISTMTLIS__V31*/ meltfptr[30]); ; /*_.LAMBDA___V68*/ meltfptr[62] = /*_.LAMBDA___V69*/ meltfptr[68];; - MELT_LOCATION ("warmelt-genobj.melt:4365:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4381:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15240,10 +15622,10 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4387:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4403:/ checksignal"); MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-genobj.melt:4388:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4404:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -15254,7 +15636,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4388:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4404:/ cond.else"); /*^block */ /*anyblock */ @@ -15271,13 +15653,13 @@ lab_endgetargs:; /*_.IFELSE___V71*/ meltfptr[70] = /*_.NREP_LOC__V72*/ meltfptr[71];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4388:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4404:/ clear"); /*clear *//*_.NREP_LOC__V72*/ meltfptr[71] = 0; } ; } ; - MELT_LOCATION ("warmelt-genobj.melt:4387:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4403:/ quasiblock"); /*^rawallocobj */ @@ -15322,12 +15704,12 @@ lab_endgetargs:; /*_.INST___V73*/ meltfptr[71] = /*_.INST__V74*/ meltfptr[73];; { - MELT_LOCATION ("warmelt-genobj.melt:4386:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4402:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.ISTMTLIS__V31*/ meltfptr[30]), (melt_ptr_t) ( /*_.INST___V73*/ meltfptr[71])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4394:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4410:/ quasiblock"); /*^newclosure */ @@ -15365,7 +15747,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.NLOC__V28*/ meltfptr[27]); ; /*_.LAMBDA___V75*/ meltfptr[74] = /*_.LAMBDA___V76*/ meltfptr[75];; - MELT_LOCATION ("warmelt-genobj.melt:4392:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4408:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15386,14 +15768,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4403:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4419:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.IBODYLIS__V24*/ meltfptr[22]), (melt_ptr_t) ( /*_.OBJ__V3*/ meltfptr[2])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4405:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4421:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15419,7 +15801,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4405:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4421:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[14]) /*then */ { /*^cond.then */ @@ -15434,7 +15816,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4405:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4421:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15448,7 +15830,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4405; + argtab[2].meltbp_long = 4421; /*^apply.arg */ argtab[3].meltbp_cstring = "compil_data_and_slots_fill final dlocbind="; @@ -15469,7 +15851,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V80*/ meltfptr[79];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4405:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4421:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V80*/ meltfptr[79] = 0; @@ -15482,7 +15864,7 @@ lab_endgetargs:; /*_.IF___V79*/ meltfptr[78] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4405:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4421:/ quasiblock"); /*_.PROGN___V81*/ meltfptr[79] = /*_.IF___V79*/ meltfptr[78];; @@ -15491,7 +15873,7 @@ lab_endgetargs:; /*_.IFCPP___V78*/ meltfptr[77] = /*_.PROGN___V81*/ meltfptr[79];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4405:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4421:/ clear"); /*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[14] = 0; /*^clear */ /*clear *//*_.IF___V79*/ meltfptr[78] = 0; @@ -15504,19 +15886,31 @@ lab_endgetargs:; /*_.IFCPP___V78*/ meltfptr[77] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4409:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4425:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.DLOCBIND__V29*/ meltfptr[28];; - MELT_LOCATION ("warmelt-genobj.melt:4409:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4425:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V21*/ meltfptr[17] = /*_.RETURN___V82*/ meltfptr[78];; - MELT_LOCATION ("warmelt-genobj.melt:4285:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4301:/ clear"); /*clear *//*_#IS_A__L8*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.IPREDEF__V22*/ meltfptr[18] = 0; @@ -15570,21 +15964,45 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V78*/ meltfptr[77] = 0; /*^clear */ /*clear *//*_.RETURN___V82*/ meltfptr[78] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4411:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4427:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-genobj.melt:4411:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4427:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-genobj.melt:4278:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V83*/ meltfptr[79];; - MELT_LOCATION ("warmelt-genobj.melt:4278:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4294:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15690,7 +16108,7 @@ meltrout_131_warmelt_genobj_LAMBDA___39__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4349:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4365:/ getarg"); /*_.LBIND__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -15708,7 +16126,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4350:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4366:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15720,7 +16138,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.LBIND__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMAL_LET_BINDING */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4350:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4366:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -15728,7 +16146,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4350:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4366:/ cond.else"); /*^block */ /*anyblock */ @@ -15742,7 +16160,7 @@ lab_endgetargs:; melt_assert_failed (("compil_data_and_slots_fill check lbind"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4350) ? (4350) : __LINE__, __FUNCTION__); + (4366) ? (4366) : __LINE__, __FUNCTION__); ; } ; @@ -15757,7 +16175,7 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = /*_.IFELSE___V4*/ meltfptr[3];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4350:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4366:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V4*/ meltfptr[3] = 0; @@ -15768,7 +16186,7 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4351:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4367:/ quasiblock"); /*^getslot */ @@ -15779,7 +16197,7 @@ lab_endgetargs:; meltfptr[3] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4352:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4368:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.LBIND__V2*/ meltfptr[1]), 1, "LETBIND_TYPE"); @@ -15787,7 +16205,7 @@ lab_endgetargs:; meltfptr[5] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4353:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4369:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.LBIND__V2*/ meltfptr[1]), 2, "LETBIND_EXPR"); @@ -15795,7 +16213,7 @@ lab_endgetargs:; meltfptr[6] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4354:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4370:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15815,7 +16233,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4355:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4371:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -15833,7 +16251,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4357:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4373:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -15860,7 +16278,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-genobj.melt:4358:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4374:/ quasiblock"); /*^checksignal */ @@ -15895,7 +16313,7 @@ lab_endgetargs:; /*_.OBMY__V10*/ meltfptr[9] = /*_.PUT_OBJDEST__V11*/ meltfptr[10];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4358:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4374:/ clear"); /*clear *//*_.PUT_OBJDEST__V11*/ meltfptr[10] = 0; } ; @@ -15908,16 +16326,16 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4360:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4376:/ locexp"); meltgc_append_list ((melt_ptr_t) (( /*~ISTMTLIS */ meltfclos->tabval[2])), (melt_ptr_t) ( /*_.OBMY__V10*/ meltfptr[9])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4358:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4374:/ clear"); /*clear *//*_.OBMY__V10*/ meltfptr[9] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4362:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4378:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -15944,7 +16362,7 @@ lab_endgetargs:; } /*noelse */ ; - MELT_LOCATION ("warmelt-genobj.melt:4351:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4367:/ clear"); /*clear *//*_.BDER__V5*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.CTY__V6*/ meltfptr[5] = 0; @@ -15954,7 +16372,7 @@ lab_endgetargs:; /*clear *//*_.OBVA__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.OBNX__V9*/ meltfptr[8] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4349:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4365:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -16046,7 +16464,7 @@ meltrout_132_warmelt_genobj_LAMBDA___40__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4367:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4383:/ getarg"); /*_.SLOVAL__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -16062,7 +16480,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-genobj.melt:4368:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4384:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -16073,7 +16491,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4370:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4386:/ quasiblock"); /*^checksignal */ @@ -16096,7 +16514,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4372:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4388:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16113,7 +16531,7 @@ lab_endgetargs:; /*_#NOT__L3*/ meltfnum[2] = (!( /*_#IS_A__L2*/ meltfnum[1]));; - MELT_LOCATION ("warmelt-genobj.melt:4372:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4388:/ cond"); /*cond */ if ( /*_#NOT__L3*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -16121,7 +16539,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4372:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4388:/ cond.else"); /*^block */ /*anyblock */ @@ -16132,7 +16550,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("compil_data_and_slots_fill check slobj not nrep"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4372) ? (4372) : __LINE__, __FUNCTION__); + melt_assert_failed (("compil_data_and_slots_fill check slobj not nrep"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4388) ? (4388) : __LINE__, __FUNCTION__); ; } ; @@ -16147,7 +16565,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4372:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4388:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#NOT__L3*/ meltfnum[2] = 0; @@ -16160,7 +16578,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4373:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4389:/ quasiblock"); /*_.OOFF__V6*/ meltfptr[4] = @@ -16168,7 +16586,7 @@ lab_endgetargs:; ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[2])), ( /*_#SLORK__L1*/ meltfnum[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4376:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4392:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -16229,19 +16647,19 @@ lab_endgetargs:; /*_.OPUT__V7*/ meltfptr[6] = /*_.INST__V8*/ meltfptr[7];; { - MELT_LOCATION ("warmelt-genobj.melt:4383:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4399:/ locexp"); meltgc_append_list ((melt_ptr_t) (( /*~ISTMTLIS */ meltfclos->tabval[3])), (melt_ptr_t) ( /*_.OPUT__V7*/ meltfptr[6])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4373:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4389:/ clear"); /*clear *//*_.OOFF__V6*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.OPUT__V7*/ meltfptr[6] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4370:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4386:/ clear"); /*clear *//*_.SLOBJ__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0; @@ -16336,7 +16754,7 @@ meltrout_133_warmelt_genobj_LAMBDA___41__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4394:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4410:/ getarg"); /*_.OBVA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -16352,7 +16770,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-genobj.melt:4395:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4411:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -16363,7 +16781,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4398:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4414:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -16403,18 +16821,18 @@ lab_endgetargs:; /*_.INST___V3*/ meltfptr[2] = /*_.INST__V4*/ meltfptr[3];; { - MELT_LOCATION ("warmelt-genobj.melt:4397:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4413:/ locexp"); meltgc_append_list ((melt_ptr_t) (( /*~IBODYLIS */ meltfclos->tabval[0])), (melt_ptr_t) ( /*_.INST___V3*/ meltfptr[2])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4396:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4412:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4395:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4411:/ clear"); /*clear *//*_.INST___V3*/ meltfptr[2] = 0; } ; @@ -16506,7 +16924,7 @@ meltrout_134_warmelt_genobj_DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4416:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4432:/ getarg"); /*_.DLOCBIND__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -16527,7 +16945,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4417:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4433:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16539,7 +16957,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4417:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4433:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -16547,7 +16965,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4417:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4433:/ cond.else"); /*^block */ /*anyblock */ @@ -16561,7 +16979,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4417) ? (4417) : __LINE__, __FUNCTION__); + (4433) ? (4433) : __LINE__, __FUNCTION__); ; } ; @@ -16576,7 +16994,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4417:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4433:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -16589,7 +17007,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4418:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4434:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16615,7 +17033,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4418:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4434:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -16630,7 +17048,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4418:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4434:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -16643,7 +17061,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4418; + argtab[2].meltbp_long = 4434; /*^apply.arg */ argtab[3].meltbp_cstring = "dispose_dlocbind_after_data_and_slots_fill dlocbind="; @@ -16663,7 +17081,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4418:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4434:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0; @@ -16676,7 +17094,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4418:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4434:/ quasiblock"); /*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];; @@ -16685,7 +17103,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.PROGN___V9*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4418:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4434:/ clear"); /*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V7*/ meltfptr[6] = 0; @@ -16698,7 +17116,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4421:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4437:/ quasiblock"); /*^newclosure */ @@ -16723,7 +17141,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]); ; /*_.LAMBDA___V10*/ meltfptr[6] = /*_.LAMBDA___V11*/ meltfptr[7];; - MELT_LOCATION ("warmelt-genobj.melt:4419:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4435:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -16741,14 +17159,26 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4416:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4432:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.MULTIPLE_EVERY__V12*/ meltfptr[11];; - MELT_LOCATION ("warmelt-genobj.melt:4416:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4432:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16847,7 +17277,7 @@ meltrout_135_warmelt_genobj_LAMBDA___42__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4421:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4437:/ getarg"); /*_.BND__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -16886,7 +17316,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.DISPOSE_BND_OBJ__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:4421:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4437:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16981,7 +17423,7 @@ meltrout_136_warmelt_genobj_COMPILOBJ_DATASYMBOL (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4424:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4440:/ getarg"); /*_.SYV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -17002,7 +17444,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4425:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4441:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17014,7 +17456,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4425:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4441:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -17022,7 +17464,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4425:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4441:/ cond.else"); /*^block */ /*anyblock */ @@ -17036,7 +17478,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4425) ? (4425) : __LINE__, __FUNCTION__); + (4441) ? (4441) : __LINE__, __FUNCTION__); ; } ; @@ -17051,7 +17493,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4425:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4441:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -17064,7 +17506,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4426:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4442:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17076,7 +17518,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.SYV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_DATASYMBOL */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4426:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4442:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -17084,7 +17526,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4426:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4442:/ cond.else"); /*^block */ /*anyblock */ @@ -17098,7 +17540,7 @@ lab_endgetargs:; melt_assert_failed (("check syv"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4426) ? (4426) : __LINE__, __FUNCTION__); + (4442) ? (4442) : __LINE__, __FUNCTION__); ; } ; @@ -17113,7 +17555,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4426:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4442:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -17126,7 +17568,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4427:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4443:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17152,7 +17594,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4427:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4443:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -17167,7 +17609,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4427:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4443:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17180,7 +17622,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4427; + argtab[2].meltbp_long = 4443; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_datasymbol syv="; /*^apply.arg */ @@ -17200,7 +17642,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4427:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4443:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0; @@ -17213,7 +17655,7 @@ lab_endgetargs:; /*_.IF___V9*/ meltfptr[8] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4427:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4443:/ quasiblock"); /*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];; @@ -17222,7 +17664,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4427:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4443:/ clear"); /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V9*/ meltfptr[8] = 0; @@ -17235,7 +17677,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4428:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4444:/ quasiblock"); /*^getslot */ @@ -17251,7 +17693,7 @@ lab_endgetargs:; melt_get_mapobjects ((meltmapobjects_ptr_t) ( /*_.COMPICACHE__V13*/ meltfptr[9]), (meltobject_ptr_t) ( /*_.SYV__V2*/ meltfptr[1]));; - MELT_LOCATION ("warmelt-genobj.melt:4430:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4446:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 0, "GNCX_OBJROUT"); @@ -17261,7 +17703,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4433:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4449:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17273,7 +17715,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.INIROUT__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:4433:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4449:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -17281,7 +17723,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4433:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4449:/ cond.else"); /*^block */ /*anyblock */ @@ -17295,7 +17737,7 @@ lab_endgetargs:; melt_assert_failed (("check inirout"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4433) ? (4433) : __LINE__, __FUNCTION__); + (4449) ? (4449) : __LINE__, __FUNCTION__); ; } ; @@ -17310,7 +17752,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[15] = /*_.IFELSE___V17*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4433:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4449:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0; @@ -17321,7 +17763,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[15] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4434:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4450:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -17334,7 +17776,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4436:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4452:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17360,7 +17802,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4436:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4452:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -17375,7 +17817,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4436:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4452:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17389,7 +17831,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4436; + argtab[2].meltbp_long = 4452; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_datasymbol found chobj="; @@ -17411,7 +17853,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V21*/ meltfptr[20];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4436:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4452:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] = 0; @@ -17424,7 +17866,7 @@ lab_endgetargs:; /*_.IF___V20*/ meltfptr[19] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4436:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4452:/ quasiblock"); /*_.PROGN___V22*/ meltfptr[20] = /*_.IF___V20*/ meltfptr[19];; @@ -17433,7 +17875,7 @@ lab_endgetargs:; /*_.IFCPP___V19*/ meltfptr[18] = /*_.PROGN___V22*/ meltfptr[20];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4436:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4452:/ clear"); /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V20*/ meltfptr[19] = 0; @@ -17446,17 +17888,29 @@ lab_endgetargs:; /*_.IFCPP___V19*/ meltfptr[18] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4437:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4453:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.CHOBJ__V14*/ meltfptr[13];; - MELT_LOCATION ("warmelt-genobj.melt:4437:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4453:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-genobj.melt:4435:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4451:/ quasiblock"); /*_.PROGN___V24*/ meltfptr[20] = /*_.RETURN___V23*/ meltfptr[19];; @@ -17465,7 +17919,7 @@ lab_endgetargs:; /*_.IF___V18*/ meltfptr[16] = /*_.PROGN___V24*/ meltfptr[20];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4434:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4450:/ clear"); /*clear *//*_.IFCPP___V19*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_.RETURN___V23*/ meltfptr[19] = 0; @@ -17480,10 +17934,10 @@ lab_endgetargs:; /*_.IF___V18*/ meltfptr[16] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4438:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4454:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:4439:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4455:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.SYV__V2*/ meltfptr[1]), 4, "NDATA_DISCRX"); @@ -17508,7 +17962,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4443:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4459:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -17566,14 +18020,14 @@ lab_endgetargs:; /*_.OBSYM__V28*/ meltfptr[27] = /*_.INST__V29*/ meltfptr[28];; { - MELT_LOCATION ("warmelt-genobj.melt:4450:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4466:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.COMPICACHE__V13*/ meltfptr[9]), (meltobject_ptr_t) ( /*_.SYV__V2*/ meltfptr[1]), (melt_ptr_t) ( /*_.OBSYM__V28*/ meltfptr[27])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4452:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4468:/ quasiblock"); /*_.NAMBUF__V30*/ meltfptr[29] = @@ -17581,7 +18035,7 @@ lab_endgetargs:; meltgc_new_strbuf ((meltobject_ptr_t) (( /*!DISCR_STRBUF */ meltfrout->tabval[7])), (const char *) 0);; - MELT_LOCATION ("warmelt-genobj.melt:4453:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4469:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.SYV__V2*/ meltfptr[1]), 2, "NDATA_RANK"); @@ -17593,7 +18047,7 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.NDATA_RANK__V31*/ meltfptr[30])));; { - MELT_LOCATION ("warmelt-genobj.melt:4455:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4471:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V30*/ meltfptr[29]), ("dsym_")); @@ -17601,20 +18055,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4456:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4472:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.NAMBUF__V30*/ meltfptr[29]), ( /*_#SYRK__L8*/ meltfnum[3])); } ; { - MELT_LOCATION ("warmelt-genobj.melt:4457:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4473:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V30*/ meltfptr[29]), ("__")); } ; - MELT_LOCATION ("warmelt-genobj.melt:4458:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4474:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.SYV__V2*/ meltfptr[1]), 9, "NDSY_NAMESTR"); @@ -17632,14 +18086,14 @@ lab_endgetargs:; meltfptr[31]))); } ; - MELT_LOCATION ("warmelt-genobj.melt:4459:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4475:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.STRBUF2STRING__V33*/ meltfptr[32] = (meltgc_new_stringdup ((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[8])), melt_strbuf_str ((melt_ptr_t) ( /*_.NAMBUF__V30*/ meltfptr[29]))));; - MELT_LOCATION ("warmelt-genobj.melt:4459:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4475:/ quasiblock"); /*^putslot */ @@ -17657,7 +18111,7 @@ lab_endgetargs:; ; - MELT_LOCATION ("warmelt-genobj.melt:4452:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4468:/ clear"); /*clear *//*_.NAMBUF__V30*/ meltfptr[29] = 0; /*^clear */ /*clear *//*_.NDATA_RANK__V31*/ meltfptr[30] = 0; @@ -17667,7 +18121,7 @@ lab_endgetargs:; /*clear *//*_.NDSY_NAMESTR__V32*/ meltfptr[31] = 0; /*^clear */ /*clear *//*_.STRBUF2STRING__V33*/ meltfptr[32] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4462:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4478:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.SYV__V2*/ meltfptr[1]), 8, "NINST_SLOTS"); @@ -17680,12 +18134,12 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.NINST_SLOTS__V34*/ meltfptr[29])));; { - MELT_LOCATION ("warmelt-genobj.melt:4462:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4478:/ locexp"); melt_put_int ((melt_ptr_t) ( /*_.OBSYM__V28*/ meltfptr[27]), ( /*_#MULTIPLE_LENGTH__L9*/ meltfnum[0])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4463:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4479:/ quasiblock"); /*^checksignal */ @@ -17716,7 +18170,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4464:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4480:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17742,7 +18196,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4464:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4480:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -17757,7 +18211,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4464:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4480:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17771,7 +18225,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4464; + argtab[2].meltbp_long = 4480; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_datasymbol dlocbind="; /*^apply.arg */ @@ -17791,7 +18245,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V39*/ meltfptr[38];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4464:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4480:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V39*/ meltfptr[38] = 0; @@ -17804,7 +18258,7 @@ lab_endgetargs:; /*_.IF___V38*/ meltfptr[37] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4464:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4480:/ quasiblock"); /*_.PROGN___V40*/ meltfptr[38] = /*_.IF___V38*/ meltfptr[37];; @@ -17813,7 +18267,7 @@ lab_endgetargs:; /*_.IFCPP___V37*/ meltfptr[32] = /*_.PROGN___V40*/ meltfptr[38];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4464:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4480:/ clear"); /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IF___V38*/ meltfptr[37] = 0; @@ -17830,13 +18284,13 @@ lab_endgetargs:; /*_.LET___V35*/ meltfptr[30] = /*_.IFCPP___V37*/ meltfptr[32];; - MELT_LOCATION ("warmelt-genobj.melt:4463:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4479:/ clear"); /*clear *//*_.DLOCBIND__V36*/ meltfptr[31] = 0; /*^clear */ /*clear *//*_.IFCPP___V37*/ meltfptr[32] = 0; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4467:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4483:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17862,7 +18316,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4467:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4483:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -17877,7 +18331,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4467:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4483:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17891,7 +18345,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4467; + argtab[2].meltbp_long = 4483; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_datasymbol final obsym="; /*^apply.arg */ @@ -17911,7 +18365,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V43*/ meltfptr[31];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4467:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4483:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V43*/ meltfptr[31] = 0; @@ -17924,7 +18378,7 @@ lab_endgetargs:; /*_.IF___V42*/ meltfptr[38] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4467:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4483:/ quasiblock"); /*_.PROGN___V44*/ meltfptr[32] = /*_.IF___V42*/ meltfptr[38];; @@ -17933,7 +18387,7 @@ lab_endgetargs:; /*_.IFCPP___V41*/ meltfptr[37] = /*_.PROGN___V44*/ meltfptr[32];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4467:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4483:/ clear"); /*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.IF___V42*/ meltfptr[38] = 0; @@ -17946,19 +18400,31 @@ lab_endgetargs:; /*_.IFCPP___V41*/ meltfptr[37] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4468:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4484:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBSYM__V28*/ meltfptr[27];; - MELT_LOCATION ("warmelt-genobj.melt:4468:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4484:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V25*/ meltfptr[18] = /*_.RETURN___V45*/ meltfptr[31];; - MELT_LOCATION ("warmelt-genobj.melt:4438:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4454:/ clear"); /*clear *//*_.NDATA_DISCRX__V26*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_.ODISCR__V27*/ meltfptr[20] = 0; @@ -17976,7 +18442,7 @@ lab_endgetargs:; /*clear *//*_.RETURN___V45*/ meltfptr[31] = 0; /*_.LET___V12*/ meltfptr[8] = /*_.LET___V25*/ meltfptr[18];; - MELT_LOCATION ("warmelt-genobj.melt:4428:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4444:/ clear"); /*clear *//*_.COMPICACHE__V13*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.CHOBJ__V14*/ meltfptr[13] = 0; @@ -17988,14 +18454,26 @@ lab_endgetargs:; /*clear *//*_.IF___V18*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.LET___V25*/ meltfptr[18] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4424:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4440:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:4424:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4440:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18096,7 +18574,7 @@ meltrout_137_warmelt_genobj_COMPILOBJ_DATAINSTANCE (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4475:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4491:/ getarg"); /*_.DAI__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -18117,7 +18595,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4476:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4492:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18129,7 +18607,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4476:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4492:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -18137,7 +18615,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4476:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4492:/ cond.else"); /*^block */ /*anyblock */ @@ -18151,7 +18629,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4476) ? (4476) : __LINE__, __FUNCTION__); + (4492) ? (4492) : __LINE__, __FUNCTION__); ; } ; @@ -18166,7 +18644,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4476:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4492:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -18179,7 +18657,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4477:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4493:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18205,7 +18683,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4477:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4493:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -18220,7 +18698,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4477:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4493:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -18233,7 +18711,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4477; + argtab[2].meltbp_long = 4493; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_datainstance dai="; /*^apply.arg */ @@ -18252,7 +18730,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4477:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4493:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0; @@ -18265,7 +18743,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4477:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4493:/ quasiblock"); /*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];; @@ -18274,7 +18752,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.PROGN___V9*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4477:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4493:/ clear"); /*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V7*/ meltfptr[6] = 0; @@ -18287,7 +18765,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4478:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4494:/ quasiblock"); /*^getslot */ @@ -18303,7 +18781,7 @@ lab_endgetargs:; melt_get_mapobjects ((meltmapobjects_ptr_t) ( /*_.COMPICACHE__V11*/ meltfptr[7]), (meltobject_ptr_t) ( /*_.DAI__V2*/ meltfptr[1]));; - MELT_LOCATION ("warmelt-genobj.melt:4480:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4496:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 0, "GNCX_OBJROUT"); @@ -18313,7 +18791,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4483:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4499:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18325,7 +18803,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.INIROUT__V13*/ meltfptr[12]), (melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:4483:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4499:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -18333,7 +18811,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4483:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4499:/ cond.else"); /*^block */ /*anyblock */ @@ -18347,7 +18825,7 @@ lab_endgetargs:; melt_assert_failed (("check inirout"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4483) ? (4483) : __LINE__, __FUNCTION__); + (4499) ? (4499) : __LINE__, __FUNCTION__); ; } ; @@ -18362,7 +18840,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[13] = /*_.IFELSE___V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4483:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4499:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0; @@ -18373,7 +18851,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[13] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4484:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4500:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -18386,7 +18864,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4486:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4502:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18412,7 +18890,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4486:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4502:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -18427,7 +18905,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4486:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4502:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -18441,7 +18919,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4486; + argtab[2].meltbp_long = 4502; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_datainstance return found chobj="; @@ -18463,7 +18941,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V19*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4486:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4502:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V19*/ meltfptr[18] = 0; @@ -18476,7 +18954,7 @@ lab_endgetargs:; /*_.IF___V18*/ meltfptr[17] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4486:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4502:/ quasiblock"); /*_.PROGN___V20*/ meltfptr[18] = /*_.IF___V18*/ meltfptr[17];; @@ -18485,7 +18963,7 @@ lab_endgetargs:; /*_.IFCPP___V17*/ meltfptr[16] = /*_.PROGN___V20*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4486:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4502:/ clear"); /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V18*/ meltfptr[17] = 0; @@ -18498,17 +18976,29 @@ lab_endgetargs:; /*_.IFCPP___V17*/ meltfptr[16] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4487:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4503:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.CHOBJ__V12*/ meltfptr[11];; - MELT_LOCATION ("warmelt-genobj.melt:4487:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4503:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-genobj.melt:4485:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4501:/ quasiblock"); /*_.PROGN___V22*/ meltfptr[18] = /*_.RETURN___V21*/ meltfptr[17];; @@ -18517,7 +19007,7 @@ lab_endgetargs:; /*_.IF___V16*/ meltfptr[14] = /*_.PROGN___V22*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4484:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4500:/ clear"); /*clear *//*_.IFCPP___V17*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.RETURN___V21*/ meltfptr[17] = 0; @@ -18532,7 +19022,7 @@ lab_endgetargs:; /*_.IF___V16*/ meltfptr[14] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4488:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4504:/ quasiblock"); /*^getslot */ @@ -18543,7 +19033,7 @@ lab_endgetargs:; meltfptr[17] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4489:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4505:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.DAI__V2*/ meltfptr[1]), 1, "NDATA_NAME"); @@ -18551,7 +19041,7 @@ lab_endgetargs:; meltfptr[18] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4491:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4507:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.DAI__V2*/ meltfptr[1]), 4, "NDATA_DISCRX"); @@ -18559,7 +19049,7 @@ lab_endgetargs:; meltfptr[25] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4492:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4508:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.DAI__V2*/ meltfptr[1]), 2, "NDATA_RANK"); @@ -18567,7 +19057,7 @@ lab_endgetargs:; meltfptr[26] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4493:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4509:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.DAI__V2*/ meltfptr[1]), 7, "NINST_HASH"); @@ -18575,7 +19065,7 @@ lab_endgetargs:; meltfptr[27] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4494:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4510:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.DAI__V2*/ meltfptr[1]), 6, "NINST_PREDEF"); @@ -18583,7 +19073,7 @@ lab_endgetargs:; meltfptr[28] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4495:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4511:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.DAI__V2*/ meltfptr[1]), 8, "NINST_SLOTS"); @@ -18591,7 +19081,7 @@ lab_endgetargs:; meltfptr[29] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4496:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4512:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.INIROUT__V13*/ meltfptr[12]), 2, "NINIT_TOPL"); @@ -18599,7 +19089,7 @@ lab_endgetargs:; meltfptr[30] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4497:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4513:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.INIROUT__V13*/ meltfptr[12]), 12, "OIROUT_FILL"); @@ -18609,7 +19099,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4501:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4517:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18620,7 +19110,7 @@ lab_endgetargs:; /*_#IS_INTEGERBOX__L7*/ meltfnum[2] = (melt_magic_discr ((melt_ptr_t) ( /*_.DRANK__V27*/ meltfptr[26])) == MELTOBMAG_INT);; - MELT_LOCATION ("warmelt-genobj.melt:4501:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4517:/ cond"); /*cond */ if ( /*_#IS_INTEGERBOX__L7*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -18628,7 +19118,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4501:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4517:/ cond.else"); /*^block */ /*anyblock */ @@ -18642,7 +19132,7 @@ lab_endgetargs:; melt_assert_failed (("compilobj_datainstance check drank"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4501) ? (4501) : __LINE__, __FUNCTION__); + (4517) ? (4517) : __LINE__, __FUNCTION__); ; } ; @@ -18657,7 +19147,7 @@ lab_endgetargs:; /*_.IFCPP___V33*/ meltfptr[32] = /*_.IFELSE___V34*/ meltfptr[33];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4501:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4517:/ clear"); /*clear *//*_#IS_INTEGERBOX__L7*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.IFELSE___V34*/ meltfptr[33] = 0; @@ -18668,7 +19158,7 @@ lab_endgetargs:; /*_.IFCPP___V33*/ meltfptr[32] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4502:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4518:/ quasiblock"); /*^checksignal */ @@ -18688,10 +19178,10 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4504:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4520:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:4506:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4522:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -18702,7 +19192,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4507:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4523:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -18772,7 +19262,7 @@ lab_endgetargs:; /*_.OINI__V38*/ meltfptr[37] = /*_.INST___V39*/ meltfptr[38];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4506:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4522:/ clear"); /*clear *//*_.INST___V39*/ meltfptr[38] = 0; } ; @@ -18784,7 +19274,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4515:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4531:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -18856,7 +19346,7 @@ lab_endgetargs:; /*_.OINI__V38*/ meltfptr[37] = /*_.INST___V41*/ meltfptr[38];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4506:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4522:/ clear"); /*clear *//*_.INST___V41*/ meltfptr[38] = 0; } ; @@ -18873,7 +19363,7 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.DRANK__V27*/ meltfptr[26])));; { - MELT_LOCATION ("warmelt-genobj.melt:4526:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4542:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.COMPICACHE__V11*/ meltfptr[7]), (meltobject_ptr_t) ( /*_.DAI__V2*/ meltfptr[1]), @@ -18882,7 +19372,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4527:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4543:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V43*/ meltfptr[38]), ("dobj_")); @@ -18890,12 +19380,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4528:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4544:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.NAMBUF__V43*/ meltfptr[38]), ( /*_#DRK__L8*/ meltfnum[0])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4529:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4545:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -18908,13 +19398,13 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-genobj.melt:4530:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4546:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V43*/ meltfptr[38]), ("__")); } ; - MELT_LOCATION ("warmelt-genobj.melt:4531:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4547:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NAM__V25*/ meltfptr[18]), 1, "NAMED_NAME"); @@ -18932,7 +19422,7 @@ lab_endgetargs:; meltfptr[43]))); } ; - MELT_LOCATION ("warmelt-genobj.melt:4529:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4545:/ quasiblock"); /*epilog */ @@ -18943,14 +19433,14 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-genobj.melt:4532:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4548:/ quasiblock"); /*_.CNAM__V45*/ meltfptr[43] = (meltgc_new_stringdup ((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[8])), melt_strbuf_str ((melt_ptr_t) ( /*_.NAMBUF__V43*/ meltfptr[38]))));; - MELT_LOCATION ("warmelt-genobj.melt:4533:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4549:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -18970,19 +19460,19 @@ lab_endgetargs:; ; - MELT_LOCATION ("warmelt-genobj.melt:4532:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4548:/ clear"); /*clear *//*_.CNAM__V45*/ meltfptr[43] = 0; /*_#MULTIPLE_LENGTH__L9*/ meltfnum[2] = (melt_multiple_length ((melt_ptr_t) ( /*_.DSLOTS__V30*/ meltfptr[29])));; { - MELT_LOCATION ("warmelt-genobj.melt:4535:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4551:/ locexp"); melt_put_int ((melt_ptr_t) ( /*_.OINI__V38*/ meltfptr[37]), ( /*_#MULTIPLE_LENGTH__L9*/ meltfnum[2])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4536:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4552:/ quasiblock"); /*^checksignal */ @@ -19013,7 +19503,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4537:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4553:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19039,7 +19529,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4537:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4553:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -19054,7 +19544,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4537:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4553:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19068,7 +19558,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4537; + argtab[2].meltbp_long = 4553; /*^apply.arg */ argtab[3].meltbp_cstring = "compil_data_and_slots_fill dlocbind="; @@ -19089,7 +19579,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V50*/ meltfptr[49];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4537:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4553:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V50*/ meltfptr[49] = 0; @@ -19102,7 +19592,7 @@ lab_endgetargs:; /*_.IF___V49*/ meltfptr[48] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4537:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4553:/ quasiblock"); /*_.PROGN___V51*/ meltfptr[49] = /*_.IF___V49*/ meltfptr[48];; @@ -19111,7 +19601,7 @@ lab_endgetargs:; /*_.IFCPP___V48*/ meltfptr[47] = /*_.PROGN___V51*/ meltfptr[49];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4537:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4553:/ clear"); /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.IF___V49*/ meltfptr[48] = 0; @@ -19128,13 +19618,13 @@ lab_endgetargs:; /*_.LET___V46*/ meltfptr[43] = /*_.IFCPP___V48*/ meltfptr[47];; - MELT_LOCATION ("warmelt-genobj.melt:4536:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4552:/ clear"); /*clear *//*_.DLOCBIND__V47*/ meltfptr[46] = 0; /*^clear */ /*clear *//*_.IFCPP___V48*/ meltfptr[47] = 0; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4540:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4556:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19160,7 +19650,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4540:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4556:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -19175,7 +19665,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4540:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4556:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19189,7 +19679,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4540; + argtab[2].meltbp_long = 4556; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_datainstance final oini="; /*^apply.arg */ @@ -19209,7 +19699,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V54*/ meltfptr[46];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4540:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4556:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V54*/ meltfptr[46] = 0; @@ -19222,7 +19712,7 @@ lab_endgetargs:; /*_.IF___V53*/ meltfptr[49] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4540:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4556:/ quasiblock"); /*_.PROGN___V55*/ meltfptr[47] = /*_.IF___V53*/ meltfptr[49];; @@ -19231,7 +19721,7 @@ lab_endgetargs:; /*_.IFCPP___V52*/ meltfptr[48] = /*_.PROGN___V55*/ meltfptr[47];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4540:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4556:/ clear"); /*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.IF___V53*/ meltfptr[49] = 0; @@ -19248,7 +19738,7 @@ lab_endgetargs:; /*_.LET___V37*/ meltfptr[36] = /*_.OINI__V38*/ meltfptr[37];; - MELT_LOCATION ("warmelt-genobj.melt:4504:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4520:/ clear"); /*clear *//*_.OINI__V38*/ meltfptr[37] = 0; /*^clear */ /*clear *//*_.NAMBUF__V43*/ meltfptr[38] = 0; @@ -19262,13 +19752,13 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V52*/ meltfptr[48] = 0; /*_.LET___V35*/ meltfptr[33] = /*_.LET___V37*/ meltfptr[36];; - MELT_LOCATION ("warmelt-genobj.melt:4502:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4518:/ clear"); /*clear *//*_.CDISX__V36*/ meltfptr[35] = 0; /*^clear */ /*clear *//*_.LET___V37*/ meltfptr[36] = 0; /*_.LET___V23*/ meltfptr[16] = /*_.LET___V35*/ meltfptr[33];; - MELT_LOCATION ("warmelt-genobj.melt:4488:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4504:/ clear"); /*clear *//*_.LOC__V24*/ meltfptr[17] = 0; /*^clear */ /*clear *//*_.NAM__V25*/ meltfptr[18] = 0; @@ -19292,7 +19782,7 @@ lab_endgetargs:; /*clear *//*_.LET___V35*/ meltfptr[33] = 0; /*_.LET___V10*/ meltfptr[6] = /*_.LET___V23*/ meltfptr[16];; - MELT_LOCATION ("warmelt-genobj.melt:4478:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4494:/ clear"); /*clear *//*_.COMPICACHE__V11*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.CHOBJ__V12*/ meltfptr[11] = 0; @@ -19304,14 +19794,26 @@ lab_endgetargs:; /*clear *//*_.IF___V16*/ meltfptr[14] = 0; /*^clear */ /*clear *//*_.LET___V23*/ meltfptr[16] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4475:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4491:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:4475:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4491:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19409,7 +19911,7 @@ meltrout_138_warmelt_genobj_COMPILOBJ_DATATUPLE (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4552:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ getarg"); /*_.NTI__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -19430,7 +19932,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4553:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4569:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19442,7 +19944,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NTI__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_DATATUPLE */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4553:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4569:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -19450,7 +19952,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4553:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4569:/ cond.else"); /*^block */ /*anyblock */ @@ -19464,7 +19966,7 @@ lab_endgetargs:; melt_assert_failed (("check nti"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4553) ? (4553) : __LINE__, __FUNCTION__); + (4569) ? (4569) : __LINE__, __FUNCTION__); ; } ; @@ -19479,7 +19981,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4553:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4569:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -19492,7 +19994,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4554:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4570:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19504,7 +20006,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4554:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4570:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -19512,7 +20014,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4554:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4570:/ cond.else"); /*^block */ /*anyblock */ @@ -19526,7 +20028,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4554) ? (4554) : __LINE__, __FUNCTION__); + (4570) ? (4570) : __LINE__, __FUNCTION__); ; } ; @@ -19541,7 +20043,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4554:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4570:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -19554,7 +20056,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4555:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4571:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19580,7 +20082,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4555:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4571:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -19595,7 +20097,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4555:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4571:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19608,7 +20110,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4555; + argtab[2].meltbp_long = 4571; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_datatuple nti="; /*^apply.arg */ @@ -19628,7 +20130,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4555:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4571:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0; @@ -19641,7 +20143,7 @@ lab_endgetargs:; /*_.IF___V9*/ meltfptr[8] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4555:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4571:/ quasiblock"); /*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];; @@ -19650,7 +20152,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4555:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4571:/ clear"); /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V9*/ meltfptr[8] = 0; @@ -19663,7 +20165,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4556:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4572:/ quasiblock"); /*^getslot */ @@ -19679,7 +20181,7 @@ lab_endgetargs:; melt_get_mapobjects ((meltmapobjects_ptr_t) ( /*_.COMPICACHE__V13*/ meltfptr[9]), (meltobject_ptr_t) ( /*_.NTI__V2*/ meltfptr[1]));; - MELT_LOCATION ("warmelt-genobj.melt:4558:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4574:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 0, "GNCX_OBJROUT"); @@ -19689,7 +20191,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4561:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4577:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19701,7 +20203,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.INIROUT__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:4561:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4577:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -19709,7 +20211,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4561:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4577:/ cond.else"); /*^block */ /*anyblock */ @@ -19723,7 +20225,7 @@ lab_endgetargs:; melt_assert_failed (("check inirout"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4561) ? (4561) : __LINE__, __FUNCTION__); + (4577) ? (4577) : __LINE__, __FUNCTION__); ; } ; @@ -19738,7 +20240,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[15] = /*_.IFELSE___V17*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4561:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4577:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0; @@ -19749,7 +20251,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[15] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4562:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4578:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -19762,7 +20264,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4564:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4580:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19788,7 +20290,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4564:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4580:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -19803,7 +20305,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4564:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4580:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19817,7 +20319,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4564; + argtab[2].meltbp_long = 4580; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_datatuple found chobj="; @@ -19839,7 +20341,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V21*/ meltfptr[20];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4564:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4580:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] = 0; @@ -19852,7 +20354,7 @@ lab_endgetargs:; /*_.IF___V20*/ meltfptr[19] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4564:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4580:/ quasiblock"); /*_.PROGN___V22*/ meltfptr[20] = /*_.IF___V20*/ meltfptr[19];; @@ -19861,7 +20363,7 @@ lab_endgetargs:; /*_.IFCPP___V19*/ meltfptr[18] = /*_.PROGN___V22*/ meltfptr[20];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4564:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4580:/ clear"); /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V20*/ meltfptr[19] = 0; @@ -19874,17 +20376,29 @@ lab_endgetargs:; /*_.IFCPP___V19*/ meltfptr[18] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4565:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4581:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.CHOBJ__V14*/ meltfptr[13];; - MELT_LOCATION ("warmelt-genobj.melt:4565:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4581:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-genobj.melt:4563:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4579:/ quasiblock"); /*_.PROGN___V24*/ meltfptr[20] = /*_.RETURN___V23*/ meltfptr[19];; @@ -19893,7 +20407,7 @@ lab_endgetargs:; /*_.IF___V18*/ meltfptr[16] = /*_.PROGN___V24*/ meltfptr[20];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4562:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4578:/ clear"); /*clear *//*_.IFCPP___V19*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_.RETURN___V23*/ meltfptr[19] = 0; @@ -19908,7 +20422,7 @@ lab_endgetargs:; /*_.IF___V18*/ meltfptr[16] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4566:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4582:/ quasiblock"); /*^getslot */ @@ -19919,7 +20433,7 @@ lab_endgetargs:; meltfptr[19] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4569:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4585:/ quasiblock"); /*^newclosure */ @@ -19944,7 +20458,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]); ; /*_.LAMBDA___V27*/ meltfptr[20] = /*_.LAMBDA___V28*/ meltfptr[27];; - MELT_LOCATION ("warmelt-genobj.melt:4567:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4583:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19963,7 +20477,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4570:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4586:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTI__V2*/ meltfptr[1]), 4, "NDATA_DISCRX"); @@ -19971,7 +20485,7 @@ lab_endgetargs:; meltfptr[29] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4571:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4587:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTI__V2*/ meltfptr[1]), 2, "NDATA_RANK"); @@ -19979,7 +20493,7 @@ lab_endgetargs:; meltfptr[30] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4572:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4588:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -19996,7 +20510,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4573:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4589:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTI__V2*/ meltfptr[1]), 1, "NDATA_NAME"); @@ -20009,7 +20523,7 @@ lab_endgetargs:; meltgc_new_strbuf ((meltobject_ptr_t) (( /*!DISCR_STRBUF */ meltfrout->tabval[8])), (const char *) 0);; - MELT_LOCATION ("warmelt-genobj.melt:4575:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4591:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -20030,7 +20544,7 @@ lab_endgetargs:; ; /*_#DRK__L8*/ meltfnum[3] = (melt_get_int ((melt_ptr_t) ( /*_.DRANK__V31*/ meltfptr[30])));; - MELT_LOCATION ("warmelt-genobj.melt:4577:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4593:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.INIROUT__V15*/ meltfptr[14]), 3, "OBROUT_BODY"); @@ -20038,7 +20552,7 @@ lab_endgetargs:; meltfptr[35] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4578:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4594:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) (( /*!konst_11_INITUP_ */ meltfrout->tabval[11])), 1, "NAMED_NAME"); @@ -20048,7 +20562,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4580:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4596:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V34*/ meltfptr[33]), ("dtup_")); @@ -20056,12 +20570,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4581:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4597:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.NAMBUF__V34*/ meltfptr[33]), ( /*_#DRK__L8*/ meltfnum[3])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4582:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4598:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -20074,13 +20588,13 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-genobj.melt:4583:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4599:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V34*/ meltfptr[33]), ("__")); } ; - MELT_LOCATION ("warmelt-genobj.melt:4584:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4600:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NAM__V33*/ meltfptr[32]), 1, "NAMED_NAME"); @@ -20098,7 +20612,7 @@ lab_endgetargs:; meltfptr[37]))); } ; - MELT_LOCATION ("warmelt-genobj.melt:4582:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4598:/ quasiblock"); /*epilog */ @@ -20109,7 +20623,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-genobj.melt:4585:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4601:/ quasiblock"); /*^checksignal */ @@ -20119,7 +20633,7 @@ lab_endgetargs:; (meltgc_new_stringdup ((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[14])), melt_strbuf_str ((melt_ptr_t) ( /*_.NAMBUF__V34*/ meltfptr[33]))));; - MELT_LOCATION ("warmelt-genobj.melt:4585:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4601:/ quasiblock"); /*^rawallocobj */ @@ -20184,7 +20698,7 @@ lab_endgetargs:; /*_.OTUP__V41*/ meltfptr[40] = /*_.INST__V42*/ meltfptr[41];; { - MELT_LOCATION ("warmelt-genobj.melt:4593:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4609:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.COMPICACHE__V13*/ meltfptr[9]), (meltobject_ptr_t) ( /*_.NTI__V2*/ meltfptr[1]), @@ -20196,12 +20710,12 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.NCOMPI__V26*/ meltfptr[19])));; { - MELT_LOCATION ("warmelt-genobj.melt:4594:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4610:/ locexp"); melt_put_int ((melt_ptr_t) ( /*_.OTUP__V41*/ meltfptr[40]), ( /*_#MULTIPLE_LENGTH__L9*/ meltfnum[0])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4597:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4613:/ quasiblock"); /*^newclosure */ @@ -20252,7 +20766,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.OTUP__V41*/ meltfptr[40]); ; /*_.LAMBDA___V43*/ meltfptr[42] = /*_.LAMBDA___V44*/ meltfptr[43];; - MELT_LOCATION ("warmelt-genobj.melt:4595:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4611:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -20271,7 +20785,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4607:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4623:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -20310,14 +20824,14 @@ lab_endgetargs:; /*_.INST___V46*/ meltfptr[45] = /*_.INST__V47*/ meltfptr[46];; { - MELT_LOCATION ("warmelt-genobj.melt:4606:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4622:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.INIBODY__V36*/ meltfptr[35]), (melt_ptr_t) ( /*_.INST___V46*/ meltfptr[45])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4610:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4626:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20343,7 +20857,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4610:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4626:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -20358,7 +20872,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4610:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4626:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -20372,7 +20886,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4610; + argtab[2].meltbp_long = 4626; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj datatuple otup="; /*^apply.arg */ @@ -20392,7 +20906,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V50*/ meltfptr[49];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4610:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4626:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V50*/ meltfptr[49] = 0; @@ -20405,7 +20919,7 @@ lab_endgetargs:; /*_.IF___V49*/ meltfptr[48] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4610:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4626:/ quasiblock"); /*_.PROGN___V51*/ meltfptr[49] = /*_.IF___V49*/ meltfptr[48];; @@ -20414,7 +20928,7 @@ lab_endgetargs:; /*_.IFCPP___V48*/ meltfptr[47] = /*_.PROGN___V51*/ meltfptr[49];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4610:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4626:/ clear"); /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.IF___V49*/ meltfptr[48] = 0; @@ -20427,19 +20941,31 @@ lab_endgetargs:; /*_.IFCPP___V48*/ meltfptr[47] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4611:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4627:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OTUP__V41*/ meltfptr[40];; - MELT_LOCATION ("warmelt-genobj.melt:4611:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4627:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V39*/ meltfptr[37] = /*_.RETURN___V52*/ meltfptr[48];; - MELT_LOCATION ("warmelt-genobj.melt:4585:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4601:/ clear"); /*clear *//*_.STRBUF2STRING__V40*/ meltfptr[39] = 0; /*^clear */ /*clear *//*_.OTUP__V41*/ meltfptr[40] = 0; @@ -20457,7 +20983,7 @@ lab_endgetargs:; /*clear *//*_.RETURN___V52*/ meltfptr[48] = 0; /*_.LET___V25*/ meltfptr[18] = /*_.LET___V39*/ meltfptr[37];; - MELT_LOCATION ("warmelt-genobj.melt:4566:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4582:/ clear"); /*clear *//*_.NCOMPI__V26*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_.LAMBDA___V27*/ meltfptr[20] = 0; @@ -20485,7 +21011,7 @@ lab_endgetargs:; /*clear *//*_.LET___V39*/ meltfptr[37] = 0; /*_.LET___V12*/ meltfptr[8] = /*_.LET___V25*/ meltfptr[18];; - MELT_LOCATION ("warmelt-genobj.melt:4556:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4572:/ clear"); /*clear *//*_.COMPICACHE__V13*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.CHOBJ__V14*/ meltfptr[13] = 0; @@ -20497,14 +21023,26 @@ lab_endgetargs:; /*clear *//*_.IF___V18*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.LET___V25*/ meltfptr[18] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4552:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:4552:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4568:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20602,7 +21140,7 @@ meltrout_139_warmelt_genobj_LAMBDA___43__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4569:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4585:/ getarg"); /*_.C__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -20650,7 +21188,7 @@ lab_endgetargs:; /*_.IF___V3*/ meltfptr[2] = /*_.COMPILE_OBJ__V4*/ meltfptr[3];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4569:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4585:/ clear"); /*clear *//*_.COMPILE_OBJ__V4*/ meltfptr[3] = 0; } ; @@ -20661,11 +21199,23 @@ lab_endgetargs:; /*_.IF___V3*/ meltfptr[2] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4569:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4585:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:4569:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4585:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20757,7 +21307,7 @@ meltrout_140_warmelt_genobj_LAMBDA___44__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4597:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4613:/ getarg"); /*_.SCOMP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -20773,7 +21323,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-genobj.melt:4598:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4614:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -20784,14 +21334,14 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4599:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4615:/ quasiblock"); /*_.OCOMP__V3*/ meltfptr[2] = (melt_multiple_nth ((melt_ptr_t) (( /*~OCOMPI */ meltfclos->tabval[0])), ( /*_#SRK__L1*/ meltfnum[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4601:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4617:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_INTEGERBOX__V4*/ meltfptr[3] = @@ -20799,7 +21349,7 @@ lab_endgetargs:; ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[1])), ( /*_#SRK__L1*/ meltfnum[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4601:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4617:/ quasiblock"); /*^rawallocobj */ @@ -20847,14 +21397,14 @@ lab_endgetargs:; /*_.INST___V5*/ meltfptr[4] = /*_.INST__V6*/ meltfptr[5];; { - MELT_LOCATION ("warmelt-genobj.melt:4600:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4616:/ locexp"); meltgc_append_list ((melt_ptr_t) (( /*~INIBODY */ meltfclos->tabval[1])), (melt_ptr_t) ( /*_.INST___V5*/ meltfptr[4])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4599:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4615:/ clear"); /*clear *//*_.OCOMP__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_.MAKE_INTEGERBOX__V4*/ meltfptr[3] = 0; @@ -20954,7 +21504,7 @@ meltrout_141_warmelt_genobj_COMPILOBJ_DATASTRING (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4622:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4638:/ getarg"); /*_.NDS__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -20975,7 +21525,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4623:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4639:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20987,7 +21537,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NDS__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_DATASTRING */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4623:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4639:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -20995,7 +21545,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4623:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4639:/ cond.else"); /*^block */ /*anyblock */ @@ -21009,7 +21559,7 @@ lab_endgetargs:; melt_assert_failed (("check nds"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4623) ? (4623) : __LINE__, __FUNCTION__); + (4639) ? (4639) : __LINE__, __FUNCTION__); ; } ; @@ -21024,7 +21574,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4623:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4639:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -21037,7 +21587,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4624:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4640:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21049,7 +21599,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4624:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4640:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -21057,7 +21607,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4624:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4640:/ cond.else"); /*^block */ /*anyblock */ @@ -21071,7 +21621,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4624) ? (4624) : __LINE__, __FUNCTION__); + (4640) ? (4640) : __LINE__, __FUNCTION__); ; } ; @@ -21086,7 +21636,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4624:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4640:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -21097,7 +21647,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4625:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4641:/ quasiblock"); /*^getslot */ @@ -21108,7 +21658,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4626:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4642:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 0, "GNCX_OBJROUT"); @@ -21123,7 +21673,7 @@ lab_endgetargs:; (meltobject_ptr_t) ( /*_.NDS__V2*/ meltfptr[1]));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4630:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4646:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21135,7 +21685,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.INIROUT__V10*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:4630:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4646:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -21143,7 +21693,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4630:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4646:/ cond.else"); /*^block */ /*anyblock */ @@ -21157,7 +21707,7 @@ lab_endgetargs:; melt_assert_failed (("check inirout"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4630) ? (4630) : __LINE__, __FUNCTION__); + (4646) ? (4646) : __LINE__, __FUNCTION__); ; } ; @@ -21172,7 +21722,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4630:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4646:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; @@ -21183,7 +21733,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4631:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4647:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -21194,17 +21744,29 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4633:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4649:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.CHOBJ__V11*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:4633:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4649:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-genobj.melt:4632:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4648:/ quasiblock"); /*_.PROGN___V16*/ meltfptr[15] = /*_.RETURN___V15*/ meltfptr[14];; @@ -21213,7 +21775,7 @@ lab_endgetargs:; /*_.IF___V14*/ meltfptr[12] = /*_.PROGN___V16*/ meltfptr[15];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4631:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4647:/ clear"); /*clear *//*_.RETURN___V15*/ meltfptr[14] = 0; /*^clear */ /*clear *//*_.PROGN___V16*/ meltfptr[15] = 0; @@ -21226,7 +21788,7 @@ lab_endgetargs:; /*_.IF___V14*/ meltfptr[12] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4634:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4650:/ quasiblock"); /*_.NAMBUF__V18*/ meltfptr[15] = @@ -21234,7 +21796,7 @@ lab_endgetargs:; meltgc_new_strbuf ((meltobject_ptr_t) (( /*!DISCR_STRBUF */ meltfrout->tabval[3])), (const char *) 0);; - MELT_LOCATION ("warmelt-genobj.melt:4636:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4652:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDS__V2*/ meltfptr[1]), 4, "NDATA_DISCRX"); @@ -21242,7 +21804,7 @@ lab_endgetargs:; meltfptr[18] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4637:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4653:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -21259,7 +21821,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4638:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4654:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDS__V2*/ meltfptr[1]), 5, "NSTR_STRING"); @@ -21267,7 +21829,7 @@ lab_endgetargs:; meltfptr[20] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4639:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4655:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDS__V2*/ meltfptr[1]), 2, "NDATA_RANK"); @@ -21275,7 +21837,7 @@ lab_endgetargs:; meltfptr[21] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4640:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4656:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDS__V2*/ meltfptr[1]), 1, "NDATA_NAME"); @@ -21283,7 +21845,7 @@ lab_endgetargs:; meltfptr[22] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4641:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4657:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21304,7 +21866,7 @@ lab_endgetargs:; ; /*_#DRK__L4*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) ( /*_.DRANK__V22*/ meltfptr[21])));; - MELT_LOCATION ("warmelt-genobj.melt:4643:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4659:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -21362,7 +21924,7 @@ lab_endgetargs:; /*_.OSTR__V25*/ meltfptr[24] = /*_.INST__V26*/ meltfptr[25];; { - MELT_LOCATION ("warmelt-genobj.melt:4650:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4666:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.COMPICACHE__V9*/ meltfptr[8]), (meltobject_ptr_t) ( /*_.NDS__V2*/ meltfptr[1]), @@ -21371,7 +21933,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4651:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4667:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]), ("dstr_")); @@ -21379,14 +21941,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4652:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4668:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]), ( /*_#DRK__L4*/ meltfnum[0])); } ; { - MELT_LOCATION ("warmelt-genobj.melt:4653:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4669:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]), ("__")); @@ -21394,7 +21956,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4654:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4670:/ locexp"); meltgc_add_strbuf_cidentprefix ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]), melt_string_str ((melt_ptr_t) @@ -21406,12 +21968,12 @@ lab_endgetargs:; melt_string_length ((melt_ptr_t) ( /*_.ODATA__V21*/ meltfptr[20]));; { - MELT_LOCATION ("warmelt-genobj.melt:4655:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4671:/ locexp"); melt_put_int ((melt_ptr_t) ( /*_.OSTR__V25*/ meltfptr[24]), ( /*_#STRING_LENGTH__L5*/ meltfnum[4])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4656:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4672:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -21424,13 +21986,13 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-genobj.melt:4658:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4674:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]), ("__")); } ; - MELT_LOCATION ("warmelt-genobj.melt:4659:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4675:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NAM__V23*/ meltfptr[22]), 1, "NAMED_NAME"); @@ -21448,25 +22010,25 @@ lab_endgetargs:; meltfptr[26]))); } ; - MELT_LOCATION ("warmelt-genobj.melt:4657:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4673:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4656:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4672:/ clear"); /*clear *//*_.NAMED_NAME__V27*/ meltfptr[26] = 0; } ; } /*noelse */ ; - MELT_LOCATION ("warmelt-genobj.melt:4660:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4676:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.STRBUF2STRING__V28*/ meltfptr[26] = (meltgc_new_stringdup ((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[9])), melt_strbuf_str ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]))));; - MELT_LOCATION ("warmelt-genobj.melt:4660:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4676:/ quasiblock"); /*^putslot */ @@ -21485,7 +22047,7 @@ lab_endgetargs:; /*_.LET___V17*/ meltfptr[14] = /*_.OSTR__V25*/ meltfptr[24];; - MELT_LOCATION ("warmelt-genobj.melt:4634:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4650:/ clear"); /*clear *//*_.NAMBUF__V18*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.NDISX__V19*/ meltfptr[18] = 0; @@ -21509,7 +22071,7 @@ lab_endgetargs:; /*clear *//*_.STRBUF2STRING__V28*/ meltfptr[26] = 0; /*_.LET___V8*/ meltfptr[6] = /*_.LET___V17*/ meltfptr[14];; - MELT_LOCATION ("warmelt-genobj.melt:4625:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4641:/ clear"); /*clear *//*_.COMPICACHE__V9*/ meltfptr[8] = 0; /*^clear */ /*clear *//*_.INIROUT__V10*/ meltfptr[9] = 0; @@ -21521,14 +22083,26 @@ lab_endgetargs:; /*clear *//*_.IF___V14*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.LET___V17*/ meltfptr[14] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4622:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4638:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:4622:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4638:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -21631,7 +22205,7 @@ meltrout_142_warmelt_genobj_COMPILOBJ_DATABOXEDINTEGER (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4667:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4683:/ getarg"); /*_.NDI__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -21652,7 +22226,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4668:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4684:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21664,7 +22238,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NDI__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_DATABOXEDINTEGER */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4668:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4684:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -21672,7 +22246,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4668:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4684:/ cond.else"); /*^block */ /*anyblock */ @@ -21686,7 +22260,7 @@ lab_endgetargs:; melt_assert_failed (("check ndi"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4668) ? (4668) : __LINE__, __FUNCTION__); + (4684) ? (4684) : __LINE__, __FUNCTION__); ; } ; @@ -21701,7 +22275,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4668:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4684:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -21714,7 +22288,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4669:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4685:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21726,7 +22300,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4669:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4685:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -21734,7 +22308,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4669:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4685:/ cond.else"); /*^block */ /*anyblock */ @@ -21748,7 +22322,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4669) ? (4669) : __LINE__, __FUNCTION__); + (4685) ? (4685) : __LINE__, __FUNCTION__); ; } ; @@ -21763,7 +22337,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4669:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4685:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -21774,7 +22348,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4670:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4686:/ quasiblock"); /*^getslot */ @@ -21785,7 +22359,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4671:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4687:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 0, "GNCX_OBJROUT"); @@ -21800,7 +22374,7 @@ lab_endgetargs:; (meltobject_ptr_t) ( /*_.NDI__V2*/ meltfptr[1]));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4675:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4691:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21812,7 +22386,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.INIROUT__V10*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:4675:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4691:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -21820,7 +22394,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4675:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4691:/ cond.else"); /*^block */ /*anyblock */ @@ -21834,7 +22408,7 @@ lab_endgetargs:; melt_assert_failed (("check inirout"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4675) ? (4675) : __LINE__, __FUNCTION__); + (4691) ? (4691) : __LINE__, __FUNCTION__); ; } ; @@ -21849,7 +22423,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4675:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4691:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; @@ -21860,7 +22434,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4676:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4692:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -21871,17 +22445,29 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4678:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4694:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.CHOBJ__V11*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:4678:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4694:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-genobj.melt:4677:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4693:/ quasiblock"); /*_.PROGN___V16*/ meltfptr[15] = /*_.RETURN___V15*/ meltfptr[14];; @@ -21890,7 +22476,7 @@ lab_endgetargs:; /*_.IF___V14*/ meltfptr[12] = /*_.PROGN___V16*/ meltfptr[15];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4676:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4692:/ clear"); /*clear *//*_.RETURN___V15*/ meltfptr[14] = 0; /*^clear */ /*clear *//*_.PROGN___V16*/ meltfptr[15] = 0; @@ -21903,7 +22489,7 @@ lab_endgetargs:; /*_.IF___V14*/ meltfptr[12] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4679:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4695:/ quasiblock"); /*_.NAMBUF__V18*/ meltfptr[15] = @@ -21911,7 +22497,7 @@ lab_endgetargs:; meltgc_new_strbuf ((meltobject_ptr_t) (( /*!DISCR_STRBUF */ meltfrout->tabval[3])), (const char *) 0);; - MELT_LOCATION ("warmelt-genobj.melt:4681:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4697:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDI__V2*/ meltfptr[1]), 4, "NDATA_DISCRX"); @@ -21919,7 +22505,7 @@ lab_endgetargs:; meltfptr[18] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4682:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4698:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -21936,7 +22522,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4683:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4699:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDI__V2*/ meltfptr[1]), 5, "NBOXINT_NUM"); @@ -21944,7 +22530,7 @@ lab_endgetargs:; meltfptr[20] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4684:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4700:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDI__V2*/ meltfptr[1]), 2, "NDATA_RANK"); @@ -21952,7 +22538,7 @@ lab_endgetargs:; meltfptr[21] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4685:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4701:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDI__V2*/ meltfptr[1]), 1, "NDATA_NAME"); @@ -21960,7 +22546,7 @@ lab_endgetargs:; meltfptr[22] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4686:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4702:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21981,7 +22567,7 @@ lab_endgetargs:; ; /*_#DRK__L4*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) ( /*_.DRANK__V22*/ meltfptr[21])));; - MELT_LOCATION ("warmelt-genobj.melt:4688:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4704:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -22039,7 +22625,7 @@ lab_endgetargs:; /*_.OINT__V25*/ meltfptr[24] = /*_.INST__V26*/ meltfptr[25];; { - MELT_LOCATION ("warmelt-genobj.melt:4695:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4711:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.COMPICACHE__V9*/ meltfptr[8]), (meltobject_ptr_t) ( /*_.NDI__V2*/ meltfptr[1]), @@ -22048,7 +22634,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4696:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4712:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]), ("dint_")); @@ -22056,14 +22642,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4697:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4713:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]), ( /*_#DRK__L4*/ meltfnum[0])); } ; { - MELT_LOCATION ("warmelt-genobj.melt:4698:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4714:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]), ("__")); @@ -22071,7 +22657,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4699:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4715:/ locexp"); meltgc_add_strbuf_cidentprefix ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]), melt_string_str ((melt_ptr_t) @@ -22079,7 +22665,7 @@ lab_endgetargs:; meltfptr[20])), (16)); } ; - MELT_LOCATION ("warmelt-genobj.melt:4700:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4716:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -22092,13 +22678,13 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-genobj.melt:4702:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4718:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]), ("__")); } ; - MELT_LOCATION ("warmelt-genobj.melt:4703:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4719:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NAM__V23*/ meltfptr[22]), 1, "NAMED_NAME"); @@ -22116,25 +22702,25 @@ lab_endgetargs:; meltfptr[26]))); } ; - MELT_LOCATION ("warmelt-genobj.melt:4701:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4717:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4700:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4716:/ clear"); /*clear *//*_.NAMED_NAME__V27*/ meltfptr[26] = 0; } ; } /*noelse */ ; - MELT_LOCATION ("warmelt-genobj.melt:4704:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4720:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.STRBUF2STRING__V28*/ meltfptr[26] = (meltgc_new_stringdup ((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[9])), melt_strbuf_str ((melt_ptr_t) ( /*_.NAMBUF__V18*/ meltfptr[15]))));; - MELT_LOCATION ("warmelt-genobj.melt:4704:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4720:/ quasiblock"); /*^putslot */ @@ -22153,7 +22739,7 @@ lab_endgetargs:; /*_.LET___V17*/ meltfptr[14] = /*_.OINT__V25*/ meltfptr[24];; - MELT_LOCATION ("warmelt-genobj.melt:4679:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4695:/ clear"); /*clear *//*_.NAMBUF__V18*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.NDISX__V19*/ meltfptr[18] = 0; @@ -22175,7 +22761,7 @@ lab_endgetargs:; /*clear *//*_.STRBUF2STRING__V28*/ meltfptr[26] = 0; /*_.LET___V8*/ meltfptr[6] = /*_.LET___V17*/ meltfptr[14];; - MELT_LOCATION ("warmelt-genobj.melt:4670:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4686:/ clear"); /*clear *//*_.COMPICACHE__V9*/ meltfptr[8] = 0; /*^clear */ /*clear *//*_.INIROUT__V10*/ meltfptr[9] = 0; @@ -22187,14 +22773,26 @@ lab_endgetargs:; /*clear *//*_.IF___V14*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.LET___V17*/ meltfptr[14] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4667:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4683:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:4667:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4683:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -22293,7 +22891,7 @@ meltrout_143_warmelt_genobj_COMPILOBJ_DATACLOSURE (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4712:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ getarg"); /*_.NCL__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -22314,7 +22912,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4713:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4729:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22326,7 +22924,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_DATACLOSURE */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4713:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4729:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -22334,7 +22932,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4713:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4729:/ cond.else"); /*^block */ /*anyblock */ @@ -22348,7 +22946,7 @@ lab_endgetargs:; melt_assert_failed (("check ncl"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4713) ? (4713) : __LINE__, __FUNCTION__); + (4729) ? (4729) : __LINE__, __FUNCTION__); ; } ; @@ -22363,7 +22961,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4713:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4729:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -22376,7 +22974,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4714:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4730:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22388,7 +22986,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4714:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4730:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -22396,7 +22994,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4714:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4730:/ cond.else"); /*^block */ /*anyblock */ @@ -22410,7 +23008,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4714) ? (4714) : __LINE__, __FUNCTION__); + (4730) ? (4730) : __LINE__, __FUNCTION__); ; } ; @@ -22425,7 +23023,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4714:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4730:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -22438,7 +23036,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4715:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4731:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22464,7 +23062,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4715:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4731:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -22479,7 +23077,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4715:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4731:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -22492,7 +23090,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4715; + argtab[2].meltbp_long = 4731; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_dataclosure ncl="; /*^apply.arg */ @@ -22512,7 +23110,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4715:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4731:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0; @@ -22525,7 +23123,7 @@ lab_endgetargs:; /*_.IF___V9*/ meltfptr[8] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4715:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4731:/ quasiblock"); /*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];; @@ -22534,7 +23132,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4715:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4731:/ clear"); /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V9*/ meltfptr[8] = 0; @@ -22547,7 +23145,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4716:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4732:/ quasiblock"); /*^getslot */ @@ -22558,7 +23156,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4717:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4733:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 0, "GNCX_OBJROUT"); @@ -22566,7 +23164,7 @@ lab_endgetargs:; meltfptr[13] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4718:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4734:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.INIROUT__V14*/ meltfptr[13]), 3, "OBROUT_BODY"); @@ -22581,7 +23179,7 @@ lab_endgetargs:; (meltobject_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4721:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4737:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22593,7 +23191,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.INIROUT__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:4721:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4737:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -22601,7 +23199,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4721:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4737:/ cond.else"); /*^block */ /*anyblock */ @@ -22615,7 +23213,7 @@ lab_endgetargs:; melt_assert_failed (("check inirout"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4721) ? (4721) : __LINE__, __FUNCTION__); + (4737) ? (4737) : __LINE__, __FUNCTION__); ; } ; @@ -22630,7 +23228,7 @@ lab_endgetargs:; /*_.IFCPP___V17*/ meltfptr[16] = /*_.IFELSE___V18*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4721:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4737:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V18*/ meltfptr[17] = 0; @@ -22641,7 +23239,7 @@ lab_endgetargs:; /*_.IFCPP___V17*/ meltfptr[16] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4722:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4738:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -22654,7 +23252,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4724:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4740:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22680,7 +23278,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4724:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4740:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -22695,7 +23293,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4724:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4740:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -22709,7 +23307,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4724; + argtab[2].meltbp_long = 4740; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_dataclosure found chobj="; @@ -22731,7 +23329,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V22*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4724:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4740:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V22*/ meltfptr[21] = 0; @@ -22744,7 +23342,7 @@ lab_endgetargs:; /*_.IF___V21*/ meltfptr[20] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4724:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4740:/ quasiblock"); /*_.PROGN___V23*/ meltfptr[21] = /*_.IF___V21*/ meltfptr[20];; @@ -22753,7 +23351,7 @@ lab_endgetargs:; /*_.IFCPP___V20*/ meltfptr[19] = /*_.PROGN___V23*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4724:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4740:/ clear"); /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V21*/ meltfptr[20] = 0; @@ -22766,17 +23364,29 @@ lab_endgetargs:; /*_.IFCPP___V20*/ meltfptr[19] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4725:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4741:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.CHOBJ__V16*/ meltfptr[15];; - MELT_LOCATION ("warmelt-genobj.melt:4725:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4741:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-genobj.melt:4723:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4739:/ quasiblock"); /*_.PROGN___V25*/ meltfptr[21] = /*_.RETURN___V24*/ meltfptr[20];; @@ -22785,7 +23395,7 @@ lab_endgetargs:; /*_.IF___V19*/ meltfptr[17] = /*_.PROGN___V25*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4722:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4738:/ clear"); /*clear *//*_.IFCPP___V20*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_.RETURN___V24*/ meltfptr[20] = 0; @@ -22800,10 +23410,10 @@ lab_endgetargs:; /*_.IF___V19*/ meltfptr[17] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4726:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4742:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:4727:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4743:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]), 1, "NDATA_NAME"); @@ -22811,7 +23421,7 @@ lab_endgetargs:; meltfptr[20] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4728:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4744:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]), 4, "NDATA_DISCRX"); @@ -22819,7 +23429,7 @@ lab_endgetargs:; meltfptr[21] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4729:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4745:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]), 2, "NDATA_RANK"); @@ -22827,7 +23437,7 @@ lab_endgetargs:; meltfptr[28] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4730:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4746:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]), 0, "NREP_LOC"); @@ -22835,7 +23445,7 @@ lab_endgetargs:; meltfptr[29] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4731:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4747:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]), 5, "NDCLO_PROC"); @@ -22843,7 +23453,7 @@ lab_endgetargs:; meltfptr[30] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4732:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4748:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]), 6, "NDCLO_CLOSV"); @@ -22860,7 +23470,7 @@ lab_endgetargs:; meltgc_new_strbuf ((meltobject_ptr_t) (( /*!DISCR_STRBUF */ meltfrout->tabval[4])), (const char *) 0);; - MELT_LOCATION ("warmelt-genobj.melt:4735:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4751:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -22877,7 +23487,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4736:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4752:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -22896,7 +23506,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4737:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4753:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) (( /*!konst_8_DATACLOSURE_ */ meltfrout->tabval[8])), 1, "NAMED_NAME"); @@ -22906,7 +23516,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4739:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4755:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22918,7 +23528,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NPRO__V31*/ meltfptr[30]), (melt_ptr_t) (( /*!CLASS_NREP_ROUTPROC */ meltfrout->tabval[9])));; - MELT_LOCATION ("warmelt-genobj.melt:4739:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4755:/ cond"); /*cond */ if ( /*_#IS_A__L9*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -22926,7 +23536,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4739:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4755:/ cond.else"); /*^block */ /*anyblock */ @@ -22940,7 +23550,7 @@ lab_endgetargs:; melt_assert_failed (("check npro"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4739) ? (4739) : __LINE__, __FUNCTION__); + (4755) ? (4755) : __LINE__, __FUNCTION__); ; } ; @@ -22955,7 +23565,7 @@ lab_endgetargs:; /*_.IFCPP___V37*/ meltfptr[36] = /*_.IFELSE___V38*/ meltfptr[37];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4739:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4755:/ clear"); /*clear *//*_#IS_A__L9*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V38*/ meltfptr[37] = 0; @@ -22968,7 +23578,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4740:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4756:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V33*/ meltfptr[32]), ("dclo_")); @@ -22978,12 +23588,12 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.NRANK__V29*/ meltfptr[28])));; { - MELT_LOCATION ("warmelt-genobj.melt:4741:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4757:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.NAMBUF__V33*/ meltfptr[32]), ( /*_#GET_INT__L10*/ meltfnum[0])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4742:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4758:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -22996,13 +23606,13 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-genobj.melt:4743:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4759:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V33*/ meltfptr[32]), ("__")); } ; - MELT_LOCATION ("warmelt-genobj.melt:4744:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4760:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NAM__V27*/ meltfptr[20]), 1, "NAMED_NAME"); @@ -23020,7 +23630,7 @@ lab_endgetargs:; meltfptr[37]))); } ; - MELT_LOCATION ("warmelt-genobj.melt:4742:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4758:/ quasiblock"); /*epilog */ @@ -23031,10 +23641,10 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-genobj.melt:4745:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4761:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:4746:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4762:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NPRO__V31*/ meltfptr[30]), 6, "NRPRO_DATAROUT"); @@ -23042,14 +23652,14 @@ lab_endgetargs:; meltfptr[40] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4748:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4764:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.STRBUF2STRING__V42*/ meltfptr[41] = (meltgc_new_stringdup ((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[12])), melt_strbuf_str ((melt_ptr_t) ( /*_.NAMBUF__V33*/ meltfptr[32]))));; - MELT_LOCATION ("warmelt-genobj.melt:4748:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4764:/ quasiblock"); /*^rawallocobj */ @@ -23114,14 +23724,14 @@ lab_endgetargs:; /*_.OICLO__V43*/ meltfptr[42] = /*_.INST__V44*/ meltfptr[43];; { - MELT_LOCATION ("warmelt-genobj.melt:4756:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4772:/ locexp"); melt_put_int ((melt_ptr_t) ( /*_.OICLO__V43*/ meltfptr[42]), ( /*_#NBCLOS__L8*/ meltfnum[3])); } ; { - MELT_LOCATION ("warmelt-genobj.melt:4757:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4773:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.COMPICACHE__V13*/ meltfptr[9]), (meltobject_ptr_t) ( /*_.NCL__V2*/ meltfptr[1]), @@ -23130,7 +23740,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4758:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4774:/ cppif.then"); /*^block */ /*anyblock */ { @@ -23142,7 +23752,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NDATAROU__V41*/ meltfptr[40]), (melt_ptr_t) (( /*!CLASS_NREP_DATAROUTINE */ meltfrout->tabval[13])));; - MELT_LOCATION ("warmelt-genobj.melt:4758:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4774:/ cond"); /*cond */ if ( /*_#IS_A__L11*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -23150,7 +23760,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4758:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4774:/ cond.else"); /*^block */ /*anyblock */ @@ -23164,7 +23774,7 @@ lab_endgetargs:; melt_assert_failed (("check ndatarou"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4758) ? (4758) : __LINE__, __FUNCTION__); + (4774) ? (4774) : __LINE__, __FUNCTION__); ; } ; @@ -23179,7 +23789,7 @@ lab_endgetargs:; /*_.IFCPP___V45*/ meltfptr[44] = /*_.IFELSE___V46*/ meltfptr[45];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4758:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4774:/ clear"); /*clear *//*_#IS_A__L11*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.IFELSE___V46*/ meltfptr[45] = 0; @@ -23190,7 +23800,7 @@ lab_endgetargs:; /*_.IFCPP___V45*/ meltfptr[44] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4759:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4775:/ quasiblock"); /*_.OCROUT__V48*/ meltfptr[47] = @@ -23199,7 +23809,7 @@ lab_endgetargs:; ( /*_.COMPICACHE__V13*/ meltfptr[9]), (meltobject_ptr_t) ( /*_.NPRO__V31*/ meltfptr[30]));; - MELT_LOCATION ("warmelt-genobj.melt:4762:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4778:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -23216,7 +23826,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4763:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4779:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -23270,7 +23880,7 @@ lab_endgetargs:; (0)));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4771:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4787:/ cppif.then"); /*^block */ /*anyblock */ { @@ -23282,7 +23892,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OCROUT__V48*/ meltfptr[47]), (melt_ptr_t) (( /*!CLASS_PROCROUTINEOBJ */ meltfrout->tabval[16])));; - MELT_LOCATION ("warmelt-genobj.melt:4771:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4787:/ cond"); /*cond */ if ( /*_#IS_A__L12*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -23290,7 +23900,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4771:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4787:/ cond.else"); /*^block */ /*anyblock */ @@ -23304,7 +23914,7 @@ lab_endgetargs:; melt_assert_failed (("check ocrout"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4771) ? (4771) : __LINE__, __FUNCTION__); + (4787) ? (4787) : __LINE__, __FUNCTION__); ; } ; @@ -23319,7 +23929,7 @@ lab_endgetargs:; /*_.IFCPP___V53*/ meltfptr[52] = /*_.IFELSE___V54*/ meltfptr[53];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4771:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4787:/ clear"); /*clear *//*_#IS_A__L12*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.IFELSE___V54*/ meltfptr[53] = 0; @@ -23332,12 +23942,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4772:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4788:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.INIBODY__V15*/ meltfptr[14]), (melt_ptr_t) ( /*_.OCPUTROUT__V50*/ meltfptr[49])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4775:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4791:/ quasiblock"); /*^newclosure */ @@ -23414,7 +24024,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.INIBODY__V15*/ meltfptr[14]); ; /*_.LAMBDA___V55*/ meltfptr[53] = /*_.LAMBDA___V56*/ meltfptr[55];; - MELT_LOCATION ("warmelt-genobj.melt:4773:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4789:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23433,7 +24043,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4786:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4802:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -23481,14 +24091,14 @@ lab_endgetargs:; /*_.INST___V58*/ meltfptr[57] = /*_.INST__V59*/ meltfptr[58];; { - MELT_LOCATION ("warmelt-genobj.melt:4786:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4802:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.INIBODY__V15*/ meltfptr[14]), (melt_ptr_t) ( /*_.INST___V58*/ meltfptr[57])); } ; /*_.LET___V47*/ meltfptr[45] = /*_.OICLO__V43*/ meltfptr[42];; - MELT_LOCATION ("warmelt-genobj.melt:4759:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4775:/ clear"); /*clear *//*_.OCROUT__V48*/ meltfptr[47] = 0; /*^clear */ /*clear *//*_.ODATROUT__V49*/ meltfptr[48] = 0; @@ -23506,7 +24116,7 @@ lab_endgetargs:; /*clear *//*_.INST___V58*/ meltfptr[57] = 0; /*_.LET___V40*/ meltfptr[37] = /*_.LET___V47*/ meltfptr[45];; - MELT_LOCATION ("warmelt-genobj.melt:4745:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4761:/ clear"); /*clear *//*_.NDATAROU__V41*/ meltfptr[40] = 0; /*^clear */ /*clear *//*_.STRBUF2STRING__V42*/ meltfptr[41] = 0; @@ -23518,7 +24128,7 @@ lab_endgetargs:; /*clear *//*_.LET___V47*/ meltfptr[45] = 0; /*_.LET___V26*/ meltfptr[19] = /*_.LET___V40*/ meltfptr[37];; - MELT_LOCATION ("warmelt-genobj.melt:4726:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4742:/ clear"); /*clear *//*_.NAM__V27*/ meltfptr[20] = 0; /*^clear */ /*clear *//*_.DISCX__V28*/ meltfptr[21] = 0; @@ -23548,7 +24158,7 @@ lab_endgetargs:; /*clear *//*_.LET___V40*/ meltfptr[37] = 0; /*_.LET___V12*/ meltfptr[8] = /*_.LET___V26*/ meltfptr[19];; - MELT_LOCATION ("warmelt-genobj.melt:4716:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4732:/ clear"); /*clear *//*_.COMPICACHE__V13*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.INIROUT__V14*/ meltfptr[13] = 0; @@ -23562,14 +24172,26 @@ lab_endgetargs:; /*clear *//*_.IF___V19*/ meltfptr[17] = 0; /*^clear */ /*clear *//*_.LET___V26*/ meltfptr[19] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4712:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:4712:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4728:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -23667,7 +24289,7 @@ meltrout_144_warmelt_genobj_LAMBDA___45__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4775:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4791:/ getarg"); /*_.CLOV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -23683,7 +24305,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-genobj.melt:4776:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4792:/ quasiblock"); /*^checksignal */ @@ -23704,7 +24326,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4777:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4793:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#GET_INT__L2*/ meltfnum[1] = @@ -23715,7 +24337,7 @@ lab_endgetargs:; (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[2])), ( /*_#GET_INT__L2*/ meltfnum[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4777:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4793:/ quasiblock"); /*^rawallocobj */ @@ -23771,14 +24393,14 @@ lab_endgetargs:; /*_.OCPUTCLOS__V5*/ meltfptr[4] = /*_.INST__V6*/ meltfptr[5];; { - MELT_LOCATION ("warmelt-genobj.melt:4783:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4799:/ locexp"); meltgc_append_list ((melt_ptr_t) (( /*~INIBODY */ meltfclos->tabval[4])), (melt_ptr_t) ( /*_.OCPUTCLOS__V5*/ meltfptr[4])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4776:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4792:/ clear"); /*clear *//*_.CLOVAL__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_#GET_INT__L2*/ meltfnum[1] = 0; @@ -23794,12 +24416,12 @@ lab_endgetargs:; (( /*_#GET_INT__L3*/ meltfnum[1]) + (1));; { - MELT_LOCATION ("warmelt-genobj.melt:4785:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4801:/ locexp"); melt_put_int ((melt_ptr_t) (( /*~BXOFF */ meltfclos->tabval[3])), ( /*_#I__L4*/ meltfnum[3])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4775:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4791:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -23896,7 +24518,7 @@ meltrout_145_warmelt_genobj_COMPILOBJ_DATAROUTINE (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4799:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ getarg"); /*_.NDROU__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -23917,7 +24539,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4800:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4816:/ cppif.then"); /*^block */ /*anyblock */ { @@ -23929,7 +24551,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NDROU__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_DATAROUTINE */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4800:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4816:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -23937,7 +24559,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4800:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4816:/ cond.else"); /*^block */ /*anyblock */ @@ -23951,7 +24573,7 @@ lab_endgetargs:; melt_assert_failed (("check ndrou"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4800) ? (4800) : __LINE__, __FUNCTION__); + (4816) ? (4816) : __LINE__, __FUNCTION__); ; } ; @@ -23966,7 +24588,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4800:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4816:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -23979,7 +24601,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4801:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4817:/ cppif.then"); /*^block */ /*anyblock */ { @@ -23991,7 +24613,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4801:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4817:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -23999,7 +24621,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4801:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4817:/ cond.else"); /*^block */ /*anyblock */ @@ -24013,7 +24635,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4801) ? (4801) : __LINE__, __FUNCTION__); + (4817) ? (4817) : __LINE__, __FUNCTION__); ; } ; @@ -24028,7 +24650,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4801:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4817:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -24039,7 +24661,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4802:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4818:/ quasiblock"); /*^getslot */ @@ -24050,7 +24672,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4803:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4819:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 0, "GNCX_OBJROUT"); @@ -24069,7 +24691,7 @@ lab_endgetargs:; /*_.UNUSED_STUFF__V12*/ meltfptr[11] = ( /*nil */ NULL);; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4808:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4824:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24081,7 +24703,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.INIROUT__V10*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:4808:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4824:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -24089,7 +24711,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4808:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4824:/ cond.else"); /*^block */ /*anyblock */ @@ -24103,7 +24725,7 @@ lab_endgetargs:; melt_assert_failed (("check inirout"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4808) ? (4808) : __LINE__, __FUNCTION__); + (4824) ? (4824) : __LINE__, __FUNCTION__); ; } ; @@ -24118,7 +24740,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4808:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4824:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -24129,7 +24751,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4809:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4825:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -24140,17 +24762,29 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4811:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4827:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.CHOBJ__V11*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:4811:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4827:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-genobj.melt:4810:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4826:/ quasiblock"); /*_.PROGN___V17*/ meltfptr[16] = /*_.RETURN___V16*/ meltfptr[15];; @@ -24159,7 +24793,7 @@ lab_endgetargs:; /*_.IF___V15*/ meltfptr[13] = /*_.PROGN___V17*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4809:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4825:/ clear"); /*clear *//*_.RETURN___V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.PROGN___V17*/ meltfptr[16] = 0; @@ -24172,7 +24806,7 @@ lab_endgetargs:; /*_.IF___V15*/ meltfptr[13] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4812:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4828:/ quasiblock"); /*^getslot */ @@ -24183,7 +24817,7 @@ lab_endgetargs:; meltfptr[16] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4813:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4829:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDROU__V2*/ meltfptr[1]), 4, "NDATA_DISCRX"); @@ -24191,7 +24825,7 @@ lab_endgetargs:; meltfptr[19] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4814:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4830:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDROU__V2*/ meltfptr[1]), 0, "NREP_LOC"); @@ -24199,7 +24833,7 @@ lab_endgetargs:; meltfptr[20] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4815:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4831:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDROU__V2*/ meltfptr[1]), 2, "NDATA_RANK"); @@ -24207,7 +24841,7 @@ lab_endgetargs:; meltfptr[21] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4816:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4832:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDROU__V2*/ meltfptr[1]), 1, "NDATA_NAME"); @@ -24215,7 +24849,7 @@ lab_endgetargs:; meltfptr[22] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4817:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4833:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NDROU__V2*/ meltfptr[1]), 5, "NDROU_PROC"); @@ -24223,7 +24857,7 @@ lab_endgetargs:; meltfptr[23] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4818:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4834:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.INIROUT__V10*/ meltfptr[9]), 3, "OBROUT_BODY"); @@ -24231,7 +24865,7 @@ lab_endgetargs:; meltfptr[24] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4819:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4835:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24250,12 +24884,12 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4821:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4837:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L4*/ meltfnum[0] = (( /*_.NLOC__V21*/ meltfptr[20]) == NULL);; - MELT_LOCATION ("warmelt-genobj.melt:4821:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4837:/ cond"); /*cond */ if ( /*_#NULL__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -24263,14 +24897,14 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4822:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4838:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L5*/ meltfnum[4] = melt_is_instance_of ((melt_ptr_t) ( /*_.NPRO__V24*/ meltfptr[23]), (melt_ptr_t) (( /*!CLASS_NREP */ meltfrout-> tabval[5])));; - MELT_LOCATION ("warmelt-genobj.melt:4822:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4838:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -24278,7 +24912,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4823:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4839:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NPRO__V24*/ meltfptr[23]), 0, "NREP_LOC"); @@ -24292,7 +24926,7 @@ lab_endgetargs:; /*_.IF___V28*/ meltfptr[27] = /*_.SETQ___V30*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4822:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4838:/ clear"); /*clear *//*_.NREP_LOC__V29*/ meltfptr[28] = 0; /*^clear */ /*clear *//*_.SETQ___V30*/ meltfptr[29] = 0; @@ -24310,7 +24944,7 @@ lab_endgetargs:; /*_.IF___V27*/ meltfptr[26] = /*_.IF___V28*/ meltfptr[27];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4821:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4837:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.IF___V28*/ meltfptr[27] = 0; @@ -24325,7 +24959,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4824:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4840:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24337,7 +24971,7 @@ lab_endgetargs:; /*is_mapobject: */ (melt_magic_discr ((melt_ptr_t) ( /*_.COMPICACHE__V9*/ meltfptr[8])) == MELTOBMAG_MAPOBJECTS);; - MELT_LOCATION ("warmelt-genobj.melt:4824:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4840:/ cond"); /*cond */ if ( /*_#IS_MAPOBJECT__L6*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -24345,7 +24979,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4824:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4840:/ cond.else"); /*^block */ /*anyblock */ @@ -24359,7 +24993,7 @@ lab_endgetargs:; melt_assert_failed (("check compicache"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4824) ? (4824) : __LINE__, __FUNCTION__); + (4840) ? (4840) : __LINE__, __FUNCTION__); ; } ; @@ -24374,7 +25008,7 @@ lab_endgetargs:; /*_.IFCPP___V31*/ meltfptr[28] = /*_.IFELSE___V32*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4824:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4840:/ clear"); /*clear *//*_#IS_MAPOBJECT__L6*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.IFELSE___V32*/ meltfptr[29] = 0; @@ -24385,7 +25019,7 @@ lab_endgetargs:; /*_.IFCPP___V31*/ meltfptr[28] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4825:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4841:/ quasiblock"); /*_.NAMBUF__V34*/ meltfptr[29] = @@ -24397,7 +25031,7 @@ lab_endgetargs:; /*_#DRK__L7*/ meltfnum[4] = (melt_get_int ((melt_ptr_t) ( /*_.DRANK__V22*/ meltfptr[21])));; - MELT_LOCATION ("warmelt-genobj.melt:4828:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4844:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -24416,7 +25050,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4830:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4846:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V34*/ meltfptr[29]), ("drout_")); @@ -24424,12 +25058,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4831:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4847:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.NAMBUF__V34*/ meltfptr[29]), ( /*_#DRK__L7*/ meltfnum[4])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4832:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4848:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -24442,13 +25076,13 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-genobj.melt:4833:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4849:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.NAMBUF__V34*/ meltfptr[29]), ("__")); } ; - MELT_LOCATION ("warmelt-genobj.melt:4834:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4850:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NAM__V23*/ meltfptr[22]), 1, "NAMED_NAME"); @@ -24466,7 +25100,7 @@ lab_endgetargs:; meltfptr[35]))); } ; - MELT_LOCATION ("warmelt-genobj.melt:4832:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4848:/ quasiblock"); /*epilog */ @@ -24477,10 +25111,10 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-genobj.melt:4835:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4851:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:4837:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4853:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.STRBUF2STRING__V38*/ meltfptr[37] = @@ -24495,7 +25129,7 @@ lab_endgetargs:; ( /*_.COMPICACHE__V9*/ meltfptr[8]), (meltobject_ptr_t) ( /*_.NPRO__V24*/ meltfptr[23]));; - MELT_LOCATION ("warmelt-genobj.melt:4837:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4853:/ quasiblock"); /*^rawallocobj */ @@ -24570,7 +25204,7 @@ lab_endgetargs:; /*_.OIROUT__V40*/ meltfptr[39] = /*_.INST__V41*/ meltfptr[40];; { - MELT_LOCATION ("warmelt-genobj.melt:4846:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4862:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.COMPICACHE__V9*/ meltfptr[8]), (meltobject_ptr_t) ( /*_.NDROU__V2*/ @@ -24578,14 +25212,14 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.OIROUT__V40*/ meltfptr[39])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4847:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4863:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L8*/ meltfnum[7] = melt_is_instance_of ((melt_ptr_t) ( /*_.NPRO__V24*/ meltfptr[23]), (melt_ptr_t) (( /*!CLASS_NREP_ROUTPROC */ meltfrout->tabval[11])));; - MELT_LOCATION ("warmelt-genobj.melt:4847:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4863:/ cond"); /*cond */ if ( /*_#IS_A__L8*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -24593,7 +25227,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4848:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4864:/ quasiblock"); /*^getslot */ @@ -24613,7 +25247,7 @@ lab_endgetargs:; (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[12])), (0)));; - MELT_LOCATION ("warmelt-genobj.melt:4851:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4867:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) (( /*!konst_13_IROUTVAL_ */ meltfrout->tabval[13])), 1, "NAMED_NAME"); @@ -24623,12 +25257,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4853:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4869:/ locexp"); melt_put_int ((melt_ptr_t) ( /*_.OIROUT__V40*/ meltfptr[39]), ( /*_#NBCONST__L9*/ meltfnum[8])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4856:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4872:/ quasiblock"); /*^newclosure */ @@ -24717,7 +25351,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.INIBODY__V25*/ meltfptr[24]); ; /*_.LAMBDA___V47*/ meltfptr[46] = /*_.LAMBDA___V48*/ meltfptr[47];; - MELT_LOCATION ("warmelt-genobj.melt:4854:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4870:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24736,7 +25370,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4903:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4919:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#GET_INT__L10*/ meltfnum[9] = @@ -24745,7 +25379,7 @@ lab_endgetargs:; /*_#I__L11*/ meltfnum[10] = (( /*_#GET_INT__L10*/ meltfnum[9]) > (0));; - MELT_LOCATION ("warmelt-genobj.melt:4903:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4919:/ cond"); /*cond */ if ( /*_#I__L11*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -24753,7 +25387,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4904:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4920:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -24808,7 +25442,7 @@ lab_endgetargs:; /*_.INST___V50*/ meltfptr[49] = /*_.INST__V51*/ meltfptr[50];; { - MELT_LOCATION ("warmelt-genobj.melt:4904:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4920:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.INIBODY__V25*/ meltfptr[24]), (melt_ptr_t) ( /*_.INST___V50*/ @@ -24817,7 +25451,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4903:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4919:/ clear"); /*clear *//*_.INST___V50*/ meltfptr[49] = 0; } ; @@ -24825,7 +25459,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4909:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4925:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24851,7 +25485,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4909:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4925:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -24866,7 +25500,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4909:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4925:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24880,7 +25514,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4909; + argtab[2].meltbp_long = 4925; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_dataroutine final oirout="; @@ -24902,7 +25536,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V54*/ meltfptr[53];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4909:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4925:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[12] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V54*/ meltfptr[53] = 0; @@ -24915,7 +25549,7 @@ lab_endgetargs:; /*_.IF___V53*/ meltfptr[52] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4909:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4925:/ quasiblock"); /*_.PROGN___V55*/ meltfptr[53] = /*_.IF___V53*/ meltfptr[52];; @@ -24924,7 +25558,7 @@ lab_endgetargs:; /*_.IFCPP___V52*/ meltfptr[49] = /*_.PROGN___V55*/ meltfptr[53];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4909:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4925:/ clear"); /*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.IF___V53*/ meltfptr[52] = 0; @@ -24941,7 +25575,7 @@ lab_endgetargs:; /*_.LET___V43*/ meltfptr[42] = /*_.OIROUT__V40*/ meltfptr[39];; - MELT_LOCATION ("warmelt-genobj.melt:4848:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4864:/ clear"); /*clear *//*_.PCONSTL__V44*/ meltfptr[43] = 0; /*^clear */ /*clear *//*_#NBCONST__L9*/ meltfnum[8] = 0; @@ -24962,7 +25596,7 @@ lab_endgetargs:; /*_.IF___V42*/ meltfptr[41] = /*_.LET___V43*/ meltfptr[42];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4847:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4863:/ clear"); /*clear *//*_.LET___V43*/ meltfptr[42] = 0; } ; @@ -24977,7 +25611,7 @@ lab_endgetargs:; /*_.LET___V37*/ meltfptr[35] = /*_.IF___V42*/ meltfptr[41];; - MELT_LOCATION ("warmelt-genobj.melt:4835:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4851:/ clear"); /*clear *//*_.STRBUF2STRING__V38*/ meltfptr[37] = 0; /*^clear */ /*clear *//*_.MAPOBJECT_GET__V39*/ meltfptr[38] = 0; @@ -24989,7 +25623,7 @@ lab_endgetargs:; /*clear *//*_.IF___V42*/ meltfptr[41] = 0; /*_.LET___V33*/ meltfptr[27] = /*_.LET___V37*/ meltfptr[35];; - MELT_LOCATION ("warmelt-genobj.melt:4825:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4841:/ clear"); /*clear *//*_.NAMBUF__V34*/ meltfptr[29] = 0; /*^clear */ /*clear *//*_#DRK__L7*/ meltfnum[4] = 0; @@ -24999,7 +25633,7 @@ lab_endgetargs:; /*clear *//*_.LET___V37*/ meltfptr[35] = 0; /*_.LET___V18*/ meltfptr[15] = /*_.LET___V33*/ meltfptr[27];; - MELT_LOCATION ("warmelt-genobj.melt:4812:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4828:/ clear"); /*clear *//*_.NAM__V19*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.DISX__V20*/ meltfptr[19] = 0; @@ -25025,7 +25659,7 @@ lab_endgetargs:; /*clear *//*_.LET___V33*/ meltfptr[27] = 0; /*_.LET___V8*/ meltfptr[6] = /*_.LET___V18*/ meltfptr[15];; - MELT_LOCATION ("warmelt-genobj.melt:4802:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4818:/ clear"); /*clear *//*_.COMPICACHE__V9*/ meltfptr[8] = 0; /*^clear */ /*clear *//*_.INIROUT__V10*/ meltfptr[9] = 0; @@ -25039,14 +25673,26 @@ lab_endgetargs:; /*clear *//*_.IF___V15*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.LET___V18*/ meltfptr[15] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4799:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:4799:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4815:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25142,7 +25788,7 @@ meltrout_146_warmelt_genobj_LAMBDA___46__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4856:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4872:/ getarg"); /*_.CONSTX__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -25152,14 +25798,14 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-genobj.melt:4858:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4874:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L1*/ meltfnum[0] = melt_is_instance_of ((melt_ptr_t) ( /*_.CONSTX__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_CONSTOCC */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4858:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4874:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -25167,7 +25813,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4859:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4875:/ quasiblock"); /*^getslot */ @@ -25180,7 +25826,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4860:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4876:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25193,7 +25839,7 @@ lab_endgetargs:; ( /*_.CNSTBIND__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_ANY_BINDING */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4860:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4876:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -25201,7 +25847,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4860:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4876:/ cond.else"); /*^block */ /*anyblock */ @@ -25212,7 +25858,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("compilobj_dataroutine check cnstbind"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4860) ? (4860) : __LINE__, __FUNCTION__); + melt_assert_failed (("compilobj_dataroutine check cnstbind"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4876) ? (4876) : __LINE__, __FUNCTION__); ; } ; @@ -25227,7 +25873,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4860:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4876:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -25238,10 +25884,10 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4861:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4877:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:4862:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4878:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -25262,7 +25908,7 @@ lab_endgetargs:; /*_#OFF__L3*/ meltfnum[1] = (melt_get_int ((melt_ptr_t) (( /*~BXOFF */ meltfclos->tabval[1]))));; - MELT_LOCATION ("warmelt-genobj.melt:4865:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4881:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -25273,17 +25919,17 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4866:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4882:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:4868:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4884:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L4*/ meltfnum[3] = melt_is_instance_of ((melt_ptr_t) ( /*_.CNSTBIND__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_FIXED_BINDING */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:4868:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4884:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -25292,7 +25938,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-genobj.melt:4869:/ checksignal"); + ("warmelt-genobj.melt:4885:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_INTEGERBOX__V9*/ meltfptr[8] = @@ -25300,7 +25946,7 @@ lab_endgetargs:; ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[5])), ( /*_#OFF__L3*/ meltfnum[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4869:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4885:/ quasiblock"); /*^rawallocobj */ @@ -25369,7 +26015,7 @@ lab_endgetargs:; /*_.INST___V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4868:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4884:/ clear"); /*clear *//*_.MAKE_INTEGERBOX__V9*/ meltfptr[8] = 0; /*^clear */ /*clear *//*_.INST___V10*/ meltfptr[9] = 0; @@ -25384,7 +26030,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-genobj.melt:4874:/ checksignal"); + ("warmelt-genobj.melt:4890:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_INTEGERBOX__V12*/ meltfptr[8] = @@ -25392,7 +26038,7 @@ lab_endgetargs:; ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[5])), ( /*_#OFF__L3*/ meltfnum[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4874:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4890:/ quasiblock"); /*^rawallocobj */ @@ -25461,7 +26107,7 @@ lab_endgetargs:; /*_.INST___V13*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4868:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4884:/ clear"); /*clear *//*_.MAKE_INTEGERBOX__V12*/ meltfptr[8] = 0; /*^clear */ /*clear *//*_.INST___V13*/ meltfptr[9] = 0; @@ -25471,7 +26117,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4881:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4897:/ locexp"); meltgc_append_list ((melt_ptr_t) (( /*~INIBODY */ meltfclos->tabval[4])), (melt_ptr_t) ( /*_.IPUT__V8*/ @@ -25482,14 +26128,14 @@ lab_endgetargs:; (( /*_#OFF__L3*/ meltfnum[1]) + (1));; { - MELT_LOCATION ("warmelt-genobj.melt:4882:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4898:/ locexp"); melt_put_int ((melt_ptr_t) (( /*~BXOFF */ meltfclos->tabval[1])), ( /*_#I__L5*/ meltfnum[4])); } ; - MELT_LOCATION ("warmelt-genobj.melt:4866:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4882:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IPUT__V8*/ meltfptr[7] = 0; @@ -25501,13 +26147,13 @@ lab_endgetargs:; } /*noelse */ ; - MELT_LOCATION ("warmelt-genobj.melt:4861:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4877:/ clear"); /*clear *//*_.OCONSTX__V7*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_#OFF__L3*/ meltfnum[1] = 0; /*_.IFELSE___V3*/ meltfptr[2] = /*_.IFCPP___V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:4859:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4875:/ clear"); /*clear *//*_.CNSTBIND__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.IFCPP___V5*/ meltfptr[4] = 0; @@ -25517,20 +26163,20 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4858:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4874:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4884:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4900:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L6*/ meltfnum[3] = melt_is_instance_of ((melt_ptr_t) ( /*_.CONSTX__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_QUASIDATA */ meltfrout->tabval[7])));; - MELT_LOCATION ("warmelt-genobj.melt:4884:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4900:/ cond"); /*cond */ if ( /*_#IS_A__L6*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -25538,10 +26184,10 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4885:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4901:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:4886:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4902:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -25563,7 +26209,7 @@ lab_endgetargs:; /*_#OFF__L7*/ meltfnum[4] = (melt_get_int ((melt_ptr_t) (( /*~BXOFF */ meltfclos->tabval[1]))));; - MELT_LOCATION ("warmelt-genobj.melt:4889:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4905:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -25574,7 +26220,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4890:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4906:/ quasiblock"); /*^checksignal */ @@ -25585,7 +26231,7 @@ lab_endgetargs:; ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[5])), ( /*_#OFF__L7*/ meltfnum[4])));; - MELT_LOCATION ("warmelt-genobj.melt:4890:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4906:/ quasiblock"); /*^rawallocobj */ @@ -25650,7 +26296,7 @@ lab_endgetargs:; /*_.INST__V19*/ meltfptr[3];; { - MELT_LOCATION ("warmelt-genobj.melt:4895:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4911:/ locexp"); meltgc_append_list ((melt_ptr_t) (( /*~INIBODY */ meltfclos-> tabval[4])), @@ -25664,7 +26310,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-genobj.melt:4896:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:4912:/ locexp"); melt_put_int ((melt_ptr_t) (( /*~BXOFF */ meltfclos->tabval[1])), ( /*_#I__L8*/ meltfnum[1])); @@ -25672,7 +26318,7 @@ lab_endgetargs:; ; /*clear *//*_.IFELSE___V15*/ meltfptr[8] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4890:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4906:/ clear"); /*clear *//*_.MAKE_INTEGERBOX__V17*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.IPUT__V18*/ meltfptr[5] = 0; @@ -25684,13 +26330,13 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4889:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4905:/ cond.else"); /*_.IFELSE___V15*/ meltfptr[8] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4885:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4901:/ clear"); /*clear *//*_.OCONSTX__V16*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_#OFF__L7*/ meltfnum[4] = 0; @@ -25700,7 +26346,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4884:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4900:/ cond.else"); /*^block */ /*anyblock */ @@ -25708,7 +26354,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4898:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4914:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25724,7 +26370,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4898:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4914:/ cond.else"); /*^block */ /*anyblock */ @@ -25735,7 +26381,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("compilobj_dataroutine unexepected constx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4898) ? (4898) : __LINE__, __FUNCTION__); + melt_assert_failed (("compilobj_dataroutine unexepected constx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4914) ? (4914) : __LINE__, __FUNCTION__); ; } ; @@ -25751,7 +26397,7 @@ lab_endgetargs:; /*_.IFELSE___V21*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4898:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4914:/ clear"); /*clear *//*_.IFELSE___V21*/ meltfptr[7] = 0; } @@ -25760,7 +26406,7 @@ lab_endgetargs:; /*_.IFCPP___V20*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4897:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4913:/ quasiblock"); /*_.PROGN___V22*/ meltfptr[5] = @@ -25771,7 +26417,7 @@ lab_endgetargs:; /*_.PROGN___V22*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4884:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4900:/ clear"); /*clear *//*_.IFCPP___V20*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.PROGN___V22*/ meltfptr[5] = 0; @@ -25782,7 +26428,7 @@ lab_endgetargs:; /*_.IFELSE___V3*/ meltfptr[2] = /*_.IFELSE___V15*/ meltfptr[8];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4858:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4874:/ clear"); /*clear *//*_#IS_A__L6*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V15*/ meltfptr[8] = 0; @@ -25790,11 +26436,23 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-genobj.melt:4856:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4872:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:4856:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4872:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25889,7 +26547,7 @@ meltrout_147_warmelt_genobj_COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTA /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4917:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4933:/ getarg"); /*_.QDCM__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -25910,7 +26568,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4918:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4934:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25921,7 +26579,7 @@ lab_endgetargs:; /*_#IS_A__L1*/ meltfnum[0] = melt_is_instance_of ((melt_ptr_t) ( /*_.QDCM__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4918:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4934:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -25929,7 +26587,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4918:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4934:/ cond.else"); /*^block */ /*anyblock */ @@ -25943,7 +26601,7 @@ lab_endgetargs:; melt_assert_failed (("check qdcm"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4918) ? (4918) : __LINE__, __FUNCTION__); + (4934) ? (4934) : __LINE__, __FUNCTION__); ; } ; @@ -25958,7 +26616,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4918:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4934:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -25971,7 +26629,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4919:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4935:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25982,7 +26640,7 @@ lab_endgetargs:; /*_#IS_A__L2*/ meltfnum[0] = melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_INITIAL_GENERATION_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4919:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4935:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -25990,7 +26648,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4919:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4935:/ cond.else"); /*^block */ /*anyblock */ @@ -26004,7 +26662,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4919) ? (4919) : __LINE__, __FUNCTION__); + (4935) ? (4935) : __LINE__, __FUNCTION__); ; } ; @@ -26019,7 +26677,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4919:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4935:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -26030,7 +26688,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4920:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4936:/ quasiblock"); /*^getslot */ @@ -26041,30 +26699,54 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4922:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4938:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LOCBOX__V9*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:4922:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4938:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V8*/ meltfptr[6] = /*_.RETURN___V10*/ meltfptr[9];; - MELT_LOCATION ("warmelt-genobj.melt:4920:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4936:/ clear"); /*clear *//*_.LOCBOX__V9*/ meltfptr[8] = 0; /*^clear */ /*clear *//*_.RETURN___V10*/ meltfptr[9] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4917:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4933:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:4917:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4933:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -26161,7 +26843,7 @@ meltrout_148_warmelt_genobj_COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4927:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4943:/ getarg"); /*_.QDPM__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -26182,7 +26864,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4928:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4944:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26193,7 +26875,7 @@ lab_endgetargs:; /*_#IS_A__L1*/ meltfnum[0] = melt_is_instance_of ((melt_ptr_t) ( /*_.QDPM__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4928:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4944:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -26201,7 +26883,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4928:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4944:/ cond.else"); /*^block */ /*anyblock */ @@ -26215,7 +26897,7 @@ lab_endgetargs:; melt_assert_failed (("check qdpm"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4928) ? (4928) : __LINE__, __FUNCTION__); + (4944) ? (4944) : __LINE__, __FUNCTION__); ; } ; @@ -26230,7 +26912,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4928:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4944:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -26243,7 +26925,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4929:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4945:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26254,7 +26936,7 @@ lab_endgetargs:; /*_#IS_A__L2*/ meltfnum[0] = melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_INITIAL_GENERATION_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4929:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4945:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -26262,7 +26944,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4929:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4945:/ cond.else"); /*^block */ /*anyblock */ @@ -26276,7 +26958,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4929) ? (4929) : __LINE__, __FUNCTION__); + (4945) ? (4945) : __LINE__, __FUNCTION__); ; } ; @@ -26291,7 +26973,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4929:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4945:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -26302,7 +26984,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4930:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4946:/ quasiblock"); /*^getslot */ @@ -26313,30 +26995,54 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4932:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4948:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.PREVENVLOC__V9*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:4932:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4948:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V8*/ meltfptr[6] = /*_.RETURN___V10*/ meltfptr[9];; - MELT_LOCATION ("warmelt-genobj.melt:4930:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4946:/ clear"); /*clear *//*_.PREVENVLOC__V9*/ meltfptr[8] = 0; /*^clear */ /*clear *//*_.RETURN___V10*/ meltfptr[9] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4927:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4943:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:4927:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4943:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -26442,7 +27148,7 @@ meltrout_149_warmelt_genobj_COMPILOBJ_NREP_STORE_PREDEFINED (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4937:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4953:/ getarg"); /*_.NSPR__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -26463,7 +27169,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4938:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4954:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26475,7 +27181,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NSPR__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_STORE_PREDEFINED */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4938:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4954:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -26483,7 +27189,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4938:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4954:/ cond.else"); /*^block */ /*anyblock */ @@ -26497,7 +27203,7 @@ lab_endgetargs:; melt_assert_failed (("check nspr"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4938) ? (4938) : __LINE__, __FUNCTION__); + (4954) ? (4954) : __LINE__, __FUNCTION__); ; } ; @@ -26512,7 +27218,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4938:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4954:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -26525,7 +27231,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4939:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4955:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26537,7 +27243,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4939:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4955:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -26545,7 +27251,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4939:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4955:/ cond.else"); /*^block */ /*anyblock */ @@ -26559,7 +27265,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4939) ? (4939) : __LINE__, __FUNCTION__); + (4955) ? (4955) : __LINE__, __FUNCTION__); ; } ; @@ -26574,7 +27280,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4939:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4955:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -26587,7 +27293,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4940:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4956:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26613,7 +27319,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4940:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4956:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -26628,7 +27334,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4940:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4956:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -26641,7 +27347,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4940; + argtab[2].meltbp_long = 4956; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_store_predefined start nspr="; @@ -26662,7 +27368,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4940:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4956:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0; @@ -26675,7 +27381,7 @@ lab_endgetargs:; /*_.IF___V9*/ meltfptr[8] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4940:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4956:/ quasiblock"); /*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];; @@ -26684,7 +27390,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4940:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4956:/ clear"); /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V9*/ meltfptr[8] = 0; @@ -26697,7 +27403,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4941:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4957:/ quasiblock"); /*^getslot */ @@ -26708,7 +27414,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4942:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4958:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NSPR__V2*/ meltfptr[1]), 1, "NSTPD_PREDEF"); @@ -26716,7 +27422,7 @@ lab_endgetargs:; meltfptr[13] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4943:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4959:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NSPR__V2*/ meltfptr[1]), 2, "NSTPD_VALUE"); @@ -26724,7 +27430,7 @@ lab_endgetargs:; meltfptr[14] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4944:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4960:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -26742,14 +27448,14 @@ lab_endgetargs:; } ; /*_.RES__V17*/ meltfptr[16] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-genobj.melt:4948:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4964:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L5*/ meltfnum[3] = melt_is_instance_of ((melt_ptr_t) ( /*_.NPRED__V14*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_SYMBOL */ meltfrout-> tabval[4])));; - MELT_LOCATION ("warmelt-genobj.melt:4948:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4964:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -26757,7 +27463,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4949:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4965:/ quasiblock"); /*^cond */ @@ -26793,7 +27499,7 @@ lab_endgetargs:; (( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[5])), melt_string_str ((melt_ptr_t) ( /*_.NAMED_NAME__V20*/ meltfptr[19]))));; - MELT_LOCATION ("warmelt-genobj.melt:4951:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4967:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -26826,12 +27532,12 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4950:/ compute"); + MELT_LOCATION ("warmelt-genobj.melt:4966:/ compute"); /*_.RES__V17*/ meltfptr[16] = /*_.SETQ___V23*/ meltfptr[22] = /*_.MAKE_OBJCOMPUTE__V22*/ meltfptr[21];; /*_.LET___V19*/ meltfptr[18] = /*_.SETQ___V23*/ meltfptr[22];; - MELT_LOCATION ("warmelt-genobj.melt:4949:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4965:/ clear"); /*clear *//*_.NAMED_NAME__V20*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_.NAMEPRED__V21*/ meltfptr[20] = 0; @@ -26842,7 +27548,7 @@ lab_endgetargs:; /*_.IFELSE___V18*/ meltfptr[17] = /*_.LET___V19*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4948:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4964:/ clear"); /*clear *//*_.LET___V19*/ meltfptr[18] = 0; } ; @@ -26854,13 +27560,13 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4956:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4972:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_INTEGERBOX__L6*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.NPRED__V14*/ meltfptr[13])) == MELTOBMAG_INT);; - MELT_LOCATION ("warmelt-genobj.melt:4956:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4972:/ cond"); /*cond */ if ( /*_#IS_INTEGERBOX__L6*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -26868,7 +27574,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4958:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4974:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -26902,14 +27608,14 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:4957:/ compute"); + MELT_LOCATION ("warmelt-genobj.melt:4973:/ compute"); /*_.RES__V17*/ meltfptr[16] = /*_.SETQ___V26*/ meltfptr[21] = /*_.MAKE_OBJCOMPUTE__V25*/ meltfptr[20];; /*_.IFELSE___V24*/ meltfptr[19] = /*_.SETQ___V26*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4956:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4972:/ clear"); /*clear *//*_.MAKE_OBJCOMPUTE__V25*/ meltfptr[20] = 0; /*^clear */ /*clear *//*_.SETQ___V26*/ meltfptr[21] = 0; @@ -26925,7 +27631,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4964:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4980:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26951,7 +27657,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4964:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4980:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -26967,7 +27673,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-genobj.melt:4964:/ checksignal"); + ("warmelt-genobj.melt:4980:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -26981,7 +27687,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4964; + argtab[2].meltbp_long = 4980; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_store_predefined bad npred="; @@ -27003,7 +27709,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V29*/ meltfptr[20];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4964:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4980:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V29*/ meltfptr[20] = 0; @@ -27016,7 +27722,7 @@ lab_endgetargs:; /*_.IF___V28*/ meltfptr[18] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4964:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4980:/ quasiblock"); /*_.PROGN___V30*/ meltfptr[21] = @@ -27027,7 +27733,7 @@ lab_endgetargs:; /*_.PROGN___V30*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4964:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4980:/ clear"); /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.IF___V28*/ meltfptr[18] = 0; @@ -27042,7 +27748,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4965:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4981:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27058,7 +27764,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4965:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4981:/ cond.else"); /*^block */ /*anyblock */ @@ -27069,7 +27775,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("compilobj_nrep_store_predefined invalid npred"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4965) ? (4965) : __LINE__, __FUNCTION__); + melt_assert_failed (("compilobj_nrep_store_predefined invalid npred"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (4981) ? (4981) : __LINE__, __FUNCTION__); ; } ; @@ -27085,7 +27791,7 @@ lab_endgetargs:; /*_.IFELSE___V32*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4965:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4981:/ clear"); /*clear *//*_.IFELSE___V32*/ meltfptr[18] = 0; } @@ -27094,14 +27800,26 @@ lab_endgetargs:; /*_.IFCPP___V31*/ meltfptr[20] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4966:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4982:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-genobj.melt:4966:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4982:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-genobj.melt:4963:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4979:/ quasiblock"); /*_.PROGN___V34*/ meltfptr[18] = @@ -27112,7 +27830,7 @@ lab_endgetargs:; /*_.PROGN___V34*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4956:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4972:/ clear"); /*clear *//*_.IFCPP___V27*/ meltfptr[22] = 0; /*^clear */ /*clear *//*_.IFCPP___V31*/ meltfptr[20] = 0; @@ -27127,7 +27845,7 @@ lab_endgetargs:; /*_.IFELSE___V18*/ meltfptr[17] = /*_.IFELSE___V24*/ meltfptr[19];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4948:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4964:/ clear"); /*clear *//*_#IS_INTEGERBOX__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V24*/ meltfptr[19] = 0; @@ -27137,7 +27855,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4968:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4984:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27163,7 +27881,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4968:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4984:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -27178,7 +27896,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4968:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4984:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -27192,7 +27910,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4968; + argtab[2].meltbp_long = 4984; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_store_predefined result res="; @@ -27213,7 +27931,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V37*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4968:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4984:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V37*/ meltfptr[21] = 0; @@ -27226,7 +27944,7 @@ lab_endgetargs:; /*_.IF___V36*/ meltfptr[20] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4968:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4984:/ quasiblock"); /*_.PROGN___V38*/ meltfptr[18] = /*_.IF___V36*/ meltfptr[20];; @@ -27235,7 +27953,7 @@ lab_endgetargs:; /*_.IFCPP___V35*/ meltfptr[22] = /*_.PROGN___V38*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4968:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4984:/ clear"); /*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IF___V36*/ meltfptr[20] = 0; @@ -27252,7 +27970,7 @@ lab_endgetargs:; /*_.LET___V12*/ meltfptr[8] = /*_.RES__V17*/ meltfptr[16];; - MELT_LOCATION ("warmelt-genobj.melt:4941:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4957:/ clear"); /*clear *//*_.NLOC__V13*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.NPRED__V14*/ meltfptr[13] = 0; @@ -27268,14 +27986,26 @@ lab_endgetargs:; /*clear *//*_.IFELSE___V18*/ meltfptr[17] = 0; /*^clear */ /*clear *//*_.IFCPP___V35*/ meltfptr[22] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4937:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4953:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:4937:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4953:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -27374,7 +28104,7 @@ meltrout_150_warmelt_genobj_COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CON /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:4976:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ getarg"); /*_.NUCMEB__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -27395,7 +28125,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4977:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4993:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27406,7 +28136,7 @@ lab_endgetargs:; /*_#IS_A__L1*/ meltfnum[0] = melt_is_instance_of ((melt_ptr_t) ( /*_.NUCMEB__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:4977:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4993:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -27414,7 +28144,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4977:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4993:/ cond.else"); /*^block */ /*anyblock */ @@ -27428,7 +28158,7 @@ lab_endgetargs:; melt_assert_failed (("check nucmeb"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4977) ? (4977) : __LINE__, __FUNCTION__); + (4993) ? (4993) : __LINE__, __FUNCTION__); ; } ; @@ -27443,7 +28173,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4977:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4993:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -27456,7 +28186,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4978:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4994:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27467,7 +28197,7 @@ lab_endgetargs:; /*_#IS_A__L2*/ meltfnum[0] = melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_INITIAL_GENERATION_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:4978:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4994:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -27475,7 +28205,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:4978:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:4994:/ cond.else"); /*^block */ /*anyblock */ @@ -27489,7 +28219,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (4978) ? (4978) : __LINE__, __FUNCTION__); + (4994) ? (4994) : __LINE__, __FUNCTION__); ; } ; @@ -27504,7 +28234,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4978:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4994:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -27517,7 +28247,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:4979:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:4995:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27543,7 +28273,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4979:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:4995:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -27558,7 +28288,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:4979:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4995:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -27571,7 +28301,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4979; + argtab[2].meltbp_long = 4995; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_update_current_module_environment_container nucmeb="; @@ -27592,7 +28322,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4979:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4995:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0; @@ -27605,7 +28335,7 @@ lab_endgetargs:; /*_.IF___V9*/ meltfptr[8] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:4979:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4995:/ quasiblock"); /*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];; @@ -27614,7 +28344,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:4979:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4995:/ clear"); /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V9*/ meltfptr[8] = 0; @@ -27627,7 +28357,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:4980:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4996:/ quasiblock"); /*^getslot */ @@ -27638,7 +28368,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4981:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4997:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NUCMEB__V2*/ meltfptr[1]), 2, "NCUMEB_COMMENT"); @@ -27646,7 +28376,7 @@ lab_endgetargs:; meltfptr[13] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4982:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4998:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NUCMEB__V2*/ meltfptr[1]), 1, "NUCMEB_EXPR"); @@ -27654,7 +28384,7 @@ lab_endgetargs:; meltfptr[14] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4983:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:4999:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 12, "IGNCX_PROCURMODENVLIST"); @@ -27662,7 +28392,7 @@ lab_endgetargs:; meltfptr[15] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4984:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5000:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 11, "IGNCX_CONTENVLOC"); @@ -27670,7 +28400,7 @@ lab_endgetargs:; meltfptr[16] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:4985:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5001:/ quasiblock"); /*_.SB__V19*/ meltfptr[18] = @@ -27680,19 +28410,19 @@ lab_endgetargs:; (const char *) 0);; { - MELT_LOCATION ("warmelt-genobj.melt:4987:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5003:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SB__V19*/ meltfptr[18]), ("upd.cur.mod.env.cont")); } ; - MELT_LOCATION ("warmelt-genobj.melt:4988:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5004:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_STRING__L5*/ meltfnum[3] = (melt_magic_discr ((melt_ptr_t) ( /*_.NCOMM__V14*/ meltfptr[13])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-genobj.melt:4988:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5004:/ cond"); /*cond */ if ( /*_#IS_STRING__L5*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -27702,7 +28432,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-genobj.melt:4990:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5006:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SB__V19*/ meltfptr[18]), (" : ")); @@ -27710,7 +28440,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:4991:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5007:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SB__V19*/ meltfptr[18]), melt_string_str ((melt_ptr_t) @@ -27718,7 +28448,7 @@ lab_endgetargs:; meltfptr[13]))); } ; - MELT_LOCATION ("warmelt-genobj.melt:4989:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5005:/ quasiblock"); /*epilog */ @@ -27728,7 +28458,7 @@ lab_endgetargs:; ; /*_.LET___V18*/ meltfptr[17] = /*_.SB__V19*/ meltfptr[18];; - MELT_LOCATION ("warmelt-genobj.melt:4985:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5001:/ clear"); /*clear *//*_.SB__V19*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_#IS_STRING__L5*/ meltfnum[3] = 0; @@ -27738,14 +28468,14 @@ lab_endgetargs:; /*_.OBODL__V21*/ meltfptr[20] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));; - MELT_LOCATION ("warmelt-genobj.melt:4995:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5011:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.STRBUF2STRING__V22*/ meltfptr[21] = (meltgc_new_stringdup ((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[6])), melt_strbuf_str ((melt_ptr_t) ( /*_.CSBUF__V20*/ meltfptr[18]))));; - MELT_LOCATION ("warmelt-genobj.melt:4995:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5011:/ quasiblock"); /*^rawallocobj */ @@ -27789,7 +28519,7 @@ lab_endgetargs:; "OCOMBLO_COMMENT"); ; /*_.OCBLO__V23*/ meltfptr[22] = /*_.INST__V24*/ meltfptr[23];; - MELT_LOCATION ("warmelt-genobj.melt:5000:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5016:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -27806,7 +28536,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5007:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5023:/ quasiblock"); /*^newclosure */ @@ -27883,7 +28613,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.OBODL__V21*/ meltfptr[20]); ; /*_.LAMBDA___V26*/ meltfptr[25] = /*_.LAMBDA___V27*/ meltfptr[26];; - MELT_LOCATION ("warmelt-genobj.melt:5005:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5021:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -27904,7 +28634,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5055:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5071:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27930,7 +28660,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5055:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5071:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -27945,7 +28675,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5055:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5071:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -27958,7 +28688,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5055; + argtab[2].meltbp_long = 5071; /*^apply.arg */ argtab[3].meltbp_cstring = "compobj.upd.mod.env.box result ocblo="; @@ -27979,7 +28709,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V31*/ meltfptr[30];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5055:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5071:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V31*/ meltfptr[30] = 0; @@ -27992,7 +28722,7 @@ lab_endgetargs:; /*_.IF___V30*/ meltfptr[29] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5055:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5071:/ quasiblock"); /*_.PROGN___V32*/ meltfptr[30] = /*_.IF___V30*/ meltfptr[29];; @@ -28001,7 +28731,7 @@ lab_endgetargs:; /*_.IFCPP___V29*/ meltfptr[28] = /*_.PROGN___V32*/ meltfptr[30];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5055:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5071:/ clear"); /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V30*/ meltfptr[29] = 0; @@ -28014,19 +28744,31 @@ lab_endgetargs:; /*_.IFCPP___V29*/ meltfptr[28] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5056:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5072:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OCBLO__V23*/ meltfptr[22];; - MELT_LOCATION ("warmelt-genobj.melt:5056:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5072:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[8] = /*_.RETURN___V33*/ meltfptr[29];; - MELT_LOCATION ("warmelt-genobj.melt:4980:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:4996:/ clear"); /*clear *//*_.NLOC__V13*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.NCOMM__V14*/ meltfptr[13] = 0; @@ -28056,14 +28798,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V29*/ meltfptr[28] = 0; /*^clear */ /*clear *//*_.RETURN___V33*/ meltfptr[29] = 0; - MELT_LOCATION ("warmelt-genobj.melt:4976:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:4976:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:4992:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-genobj+05.c b/gcc/melt/generated/warmelt-genobj+05.c index da0a964efeb..24bc9812e98 100644 --- a/gcc/melt/generated/warmelt-genobj+05.c +++ b/gcc/melt/generated/warmelt-genobj+05.c @@ -3079,7 +3079,7 @@ meltrout_151_warmelt_genobj_LAMBDA___47__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5007:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5023:/ getarg"); /*_.CUROUT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -3089,14 +3089,14 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-genobj.melt:5008:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5024:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L1*/ meltfnum[0] = melt_is_instance_of ((melt_ptr_t) ( /*_.CUROUT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_PROCROUTINEOBJ */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:5008:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5024:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -3104,10 +3104,10 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5009:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5025:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5010:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5026:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CUROUT__V2*/ meltfptr[1]), 2, "OBROUT_PROC"); @@ -3115,7 +3115,7 @@ lab_endgetargs:; meltfptr[2] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5011:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5027:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURPROC__V3*/ meltfptr[2]), 5, "NRPRO_CONST"); @@ -3123,7 +3123,7 @@ lab_endgetargs:; meltfptr[3] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5012:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5028:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURPROC__V3*/ meltfptr[2]), 6, "NRPRO_DATAROUT"); @@ -3131,7 +3131,7 @@ lab_endgetargs:; meltfptr[4] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5013:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5029:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -3153,7 +3153,7 @@ lab_endgetargs:; (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[2])), (0)));; - MELT_LOCATION ("warmelt-genobj.melt:5015:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5031:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.ODATAROUT__V6*/ meltfptr[5]), 4, "OIE_LOCVAR"); @@ -3163,7 +3163,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5017:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5033:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3176,7 +3176,7 @@ lab_endgetargs:; ( /*_.ODATAROUT__V6*/ meltfptr[5]), (melt_ptr_t) (( /*!CLASS_OBJINITROUTINE */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:5017:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5033:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -3184,7 +3184,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5017:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5033:/ cond.else"); /*^block */ /*anyblock */ @@ -3198,7 +3198,7 @@ lab_endgetargs:; melt_assert_failed (("check odatarout"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5017) ? (5017) : __LINE__, + (5033) ? (5033) : __LINE__, __FUNCTION__); ; } @@ -3214,7 +3214,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[8] = /*_.IFELSE___V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5017:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5033:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[9] = 0; @@ -3225,7 +3225,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[8] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5020:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5036:/ quasiblock"); /*^newclosure */ @@ -3329,7 +3329,7 @@ lab_endgetargs:; (melt_ptr_t) (( /*~OBODL */ meltfclos->tabval[4])); ; /*_.LAMBDA___V11*/ meltfptr[9] = /*_.LAMBDA___V12*/ meltfptr[11];; - MELT_LOCATION ("warmelt-genobj.melt:5018:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5034:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3356,13 +3356,13 @@ lab_endgetargs:; (( /*_#GET_INT__L3*/ meltfnum[1]) + (1));; { - MELT_LOCATION ("warmelt-genobj.melt:5053:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5069:/ locexp"); melt_put_int ((melt_ptr_t) ( /*_.BOXCOUNT__V7*/ meltfptr[6]), ( /*_#I__L4*/ meltfnum[3])); } ; - MELT_LOCATION ("warmelt-genobj.melt:5009:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5025:/ clear"); /*clear *//*_.CURPROC__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_.CNSLIS__V4*/ meltfptr[3] = 0; @@ -3391,7 +3391,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5007:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5023:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; } @@ -3478,7 +3478,7 @@ meltrout_152_warmelt_genobj_LAMBDA___48__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5020:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5036:/ getarg"); /*_.CURCONST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -3488,18 +3488,18 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-genobj.melt:5021:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5037:/ quasiblock"); /*_#CURCOUNT__L1*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) (( /*~BOXCOUNT */ meltfclos->tabval[0]))));; - MELT_LOCATION ("warmelt-genobj.melt:5024:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5040:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L2*/ meltfnum[1] = melt_is_instance_of ((melt_ptr_t) ( /*_.CURCONST__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:5024:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5040:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -3507,10 +3507,10 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5027:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5043:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5028:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5044:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_INTEGERBOX__V3*/ meltfptr[2] = @@ -3518,7 +3518,7 @@ lab_endgetargs:; ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[2])), ( /*_#CURCOUNT__L1*/ meltfnum[0])));; - MELT_LOCATION ("warmelt-genobj.melt:5028:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5044:/ quasiblock"); /*^rawallocobj */ @@ -3572,7 +3572,7 @@ lab_endgetargs:; "OPRCONST_CVAL"); ; /*_.OPUTROUT__V4*/ meltfptr[3] = /*_.INST__V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:5034:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5050:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -3621,10 +3621,10 @@ lab_endgetargs:; "OTOUCH_COMMENT"); ; /*_.OTOUCHROUT__V6*/ meltfptr[5] = /*_.INST__V7*/ meltfptr[6];; - MELT_LOCATION ("warmelt-genobj.melt:5039:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5055:/ checksignal"); MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-genobj.melt:5041:/ blockmultialloc"); + MELT_LOCATION ("warmelt-genobj.melt:5057:/ blockmultialloc"); /*multiallocblock */ { struct meltletrec_1_st @@ -3681,7 +3681,7 @@ lab_endgetargs:; /*_.LIST___V8*/ meltfptr[7] = /*_.LIST___V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5041:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5057:/ clear"); /*clear *//*_.OCONTENVLOC__V9*/ meltfptr[8] = 0; /*^clear */ /*clear *//*_.LIST___V10*/ meltfptr[9] = 0; @@ -3691,7 +3691,7 @@ lab_endgetargs:; /*clear *//*_.LIST___V10*/ meltfptr[9] = 0; } /*end multiallocblock */ ; - MELT_LOCATION ("warmelt-genobj.melt:5039:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5055:/ quasiblock"); /*^rawallocobj */ @@ -3749,7 +3749,7 @@ lab_endgetargs:; /*_.OCOPY__V11*/ meltfptr[8] = /*_.INST__V12*/ meltfptr[9];; { - MELT_LOCATION ("warmelt-genobj.melt:5046:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5062:/ locexp"); meltgc_append_list ((melt_ptr_t) (( /*~OBODL */ meltfclos->tabval[5])), (melt_ptr_t) ( /*_.OPUTROUT__V4*/ @@ -3758,7 +3758,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5047:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5063:/ locexp"); meltgc_append_list ((melt_ptr_t) (( /*~OBODL */ meltfclos->tabval[5])), (melt_ptr_t) ( /*_.OTOUCHROUT__V6*/ @@ -3767,14 +3767,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5048:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5064:/ locexp"); meltgc_append_list ((melt_ptr_t) (( /*~OBODL */ meltfclos->tabval[5])), (melt_ptr_t) ( /*_.OCOPY__V11*/ meltfptr[8])); } ; - MELT_LOCATION ("warmelt-genobj.melt:5027:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5043:/ clear"); /*clear *//*_.MAKE_INTEGERBOX__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_.OPUTROUT__V4*/ meltfptr[3] = 0; @@ -3790,7 +3790,7 @@ lab_endgetargs:; } /*noelse */ ; - MELT_LOCATION ("warmelt-genobj.melt:5021:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5037:/ clear"); /*clear *//*_#CURCOUNT__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; @@ -3882,7 +3882,7 @@ meltrout_153_warmelt_genobj_COMPILTST_ANYTESTER (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5108:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5124:/ getarg"); /*_.NTESTER__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -3912,7 +3912,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5109:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5125:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3924,7 +3924,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NTESTER__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:5109:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5125:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -3932,7 +3932,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5109:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5125:/ cond.else"); /*^block */ /*anyblock */ @@ -3946,7 +3946,7 @@ lab_endgetargs:; melt_assert_failed (("check ntester"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5109) ? (5109) : __LINE__, __FUNCTION__); + (5125) ? (5125) : __LINE__, __FUNCTION__); ; } ; @@ -3961,7 +3961,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5109:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5125:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -3974,7 +3974,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5110:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5126:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3986,7 +3986,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5110:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5126:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -3994,7 +3994,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5110:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5126:/ cond.else"); /*^block */ /*anyblock */ @@ -4008,7 +4008,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5110) ? (5110) : __LINE__, __FUNCTION__); + (5126) ? (5126) : __LINE__, __FUNCTION__); ; } ; @@ -4023,7 +4023,7 @@ lab_endgetargs:; /*_.IFCPP___V7*/ meltfptr[5] = /*_.IFELSE___V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5110:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5126:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0; @@ -4036,7 +4036,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5111:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5127:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4048,7 +4048,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:5111:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5127:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -4056,7 +4056,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5111:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5127:/ cond.else"); /*^block */ /*anyblock */ @@ -4070,7 +4070,7 @@ lab_endgetargs:; melt_assert_failed (("check tcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5111) ? (5111) : __LINE__, __FUNCTION__); + (5127) ? (5127) : __LINE__, __FUNCTION__); ; } ; @@ -4085,7 +4085,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[7] = /*_.IFELSE___V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5111:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5127:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[9] = 0; @@ -4098,7 +4098,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5112:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5128:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4124,7 +4124,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5112:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5128:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -4139,7 +4139,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5112:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5128:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -4152,7 +4152,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5112; + argtab[2].meltbp_long = 5128; /*^apply.arg */ argtab[3].meltbp_aptr = (melt_ptr_t *) & /*_.NTESTER__V2*/ meltfptr[1]; @@ -4175,7 +4175,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5112:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5128:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V13*/ meltfptr[12] = 0; @@ -4188,7 +4188,7 @@ lab_endgetargs:; /*_.IF___V12*/ meltfptr[11] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5112:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5128:/ quasiblock"); /*_.PROGN___V14*/ meltfptr[12] = /*_.IF___V12*/ meltfptr[11];; @@ -4197,7 +4197,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[9] = /*_.PROGN___V14*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5112:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5128:/ clear"); /*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V12*/ meltfptr[11] = 0; @@ -4212,17 +4212,17 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5113:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5129:/ locexp"); melt_puts (stderr, ("* compiltst unimplemented receiver class ")); } ; - MELT_LOCATION ("warmelt-genobj.melt:5114:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5130:/ quasiblock"); /*_.DISCR__V15*/ meltfptr[11] = ((melt_ptr_t) (melt_discr ((melt_ptr_t) ( /*_.NTESTER__V2*/ meltfptr[1]))));; - MELT_LOCATION ("warmelt-genobj.melt:5114:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5130:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.DISCR__V15*/ meltfptr[11]), 1, "NAMED_NAME"); @@ -4244,13 +4244,13 @@ lab_endgetargs:; /*clear *//*_.NAMED_NAME__V16*/ meltfptr[12] = 0; { - MELT_LOCATION ("warmelt-genobj.melt:5115:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5131:/ locexp"); melt_newlineflush (stderr); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5116:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5132:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4266,7 +4266,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5116:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5132:/ cond.else"); /*^block */ /*anyblock */ @@ -4277,7 +4277,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("@@compile_tester should be implemented in normtesters-s subclasses"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (5116) ? (5116) : __LINE__, __FUNCTION__); + melt_assert_failed (("@@compile_tester should be implemented in normtesters-s subclasses"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (5132) ? (5132) : __LINE__, __FUNCTION__); ; } ; @@ -4292,7 +4292,7 @@ lab_endgetargs:; /*_.IFCPP___V17*/ meltfptr[11] = /*_.IFELSE___V18*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5116:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5132:/ clear"); /*clear *//*_.IFELSE___V18*/ meltfptr[12] = 0; } @@ -4301,14 +4301,26 @@ lab_endgetargs:; /*_.IFCPP___V17*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5108:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5124:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V17*/ meltfptr[11];; - MELT_LOCATION ("warmelt-genobj.melt:5108:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5124:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4411,7 +4423,7 @@ meltrout_154_warmelt_genobj_COMPILOBJ_NREP_MATCH (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5122:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ getarg"); /*_.NMAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -4432,7 +4444,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5123:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5139:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4444,7 +4456,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_MATCH */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:5123:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5139:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -4452,7 +4464,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5123:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5139:/ cond.else"); /*^block */ /*anyblock */ @@ -4466,7 +4478,7 @@ lab_endgetargs:; melt_assert_failed (("check nmat"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5123) ? (5123) : __LINE__, __FUNCTION__); + (5139) ? (5139) : __LINE__, __FUNCTION__); ; } ; @@ -4481,7 +4493,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5123:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5139:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -4494,7 +4506,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5124:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5140:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4506,7 +4518,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5124:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5140:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -4514,7 +4526,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5124:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5140:/ cond.else"); /*^block */ /*anyblock */ @@ -4528,7 +4540,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5124) ? (5124) : __LINE__, __FUNCTION__); + (5140) ? (5140) : __LINE__, __FUNCTION__); ; } ; @@ -4543,7 +4555,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5124:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5140:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -4556,7 +4568,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5125:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5141:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4582,7 +4594,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5125:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5141:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -4597,7 +4609,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5125:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5141:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -4610,7 +4622,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5125; + argtab[2].meltbp_long = 5141; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match nmat="; /*^apply.arg */ @@ -4630,7 +4642,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5125:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5141:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0; @@ -4643,7 +4655,7 @@ lab_endgetargs:; /*_.IF___V9*/ meltfptr[8] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5125:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5141:/ quasiblock"); /*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];; @@ -4652,7 +4664,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5125:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5141:/ clear"); /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V9*/ meltfptr[8] = 0; @@ -4665,10 +4677,10 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5126:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5142:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5127:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5143:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 0, "NREP_LOC"); @@ -4676,7 +4688,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5128:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5144:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 1, "NEXPR_CTYP"); @@ -4684,7 +4696,7 @@ lab_endgetargs:; meltfptr[13] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5129:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5145:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 2, "NMATCH_TESTS"); @@ -4692,7 +4704,7 @@ lab_endgetargs:; meltfptr[14] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5130:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5146:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 3, "NMATCH_STUFFMAP"); @@ -4700,7 +4712,7 @@ lab_endgetargs:; meltfptr[15] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5131:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5147:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -4725,7 +4737,7 @@ lab_endgetargs:; /*_.NMATCHED__V17*/ meltfptr[16] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5132:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5148:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 8, "GNCX_MATCHMAP"); @@ -4733,7 +4745,7 @@ lab_endgetargs:; meltfptr[17] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5133:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5149:/ quasiblock"); /*_#NBMAT__L5*/ meltfnum[3] = @@ -4748,7 +4760,7 @@ lab_endgetargs:; (const char *) 0);; { - MELT_LOCATION ("warmelt-genobj.melt:5136:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5152:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V20*/ meltfptr[19]), ("mtch")); @@ -4758,20 +4770,20 @@ lab_endgetargs:; (( /*_#NBMAT__L5*/ meltfnum[3]) + (1));; { - MELT_LOCATION ("warmelt-genobj.melt:5137:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5153:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.LABUF__V20*/ meltfptr[19]), ( /*_#I__L6*/ meltfnum[0])); } ; { - MELT_LOCATION ("warmelt-genobj.melt:5138:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5154:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V20*/ meltfptr[19]), ("_")); } ; - MELT_LOCATION ("warmelt-genobj.melt:5139:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5155:/ quasiblock"); /*_.LABSTR__V22*/ meltfptr[21] = @@ -4781,7 +4793,7 @@ lab_endgetargs:; melt_strbuf_str ((melt_ptr_t) ( /*_.LABUF__V20*/ meltfptr[19]))));; { - MELT_LOCATION ("warmelt-genobj.melt:5140:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5156:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.MATMAP__V18*/ meltfptr[17]), (meltobject_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), @@ -4790,7 +4802,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5141:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5157:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4816,7 +4828,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5141:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5157:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -4831,7 +4843,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5141:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5157:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -4844,7 +4856,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5141; + argtab[2].meltbp_long = 5157; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match matlabel labstr="; @@ -4865,7 +4877,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V25*/ meltfptr[24];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5141:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5157:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] = 0; @@ -4878,7 +4890,7 @@ lab_endgetargs:; /*_.IF___V24*/ meltfptr[23] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5141:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5157:/ quasiblock"); /*_.PROGN___V26*/ meltfptr[24] = /*_.IF___V24*/ meltfptr[23];; @@ -4887,7 +4899,7 @@ lab_endgetargs:; /*_.IFCPP___V23*/ meltfptr[22] = /*_.PROGN___V26*/ meltfptr[24];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5141:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5157:/ clear"); /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.IF___V24*/ meltfptr[23] = 0; @@ -4904,13 +4916,13 @@ lab_endgetargs:; /*_.LET___V21*/ meltfptr[20] = /*_.LABSTR__V22*/ meltfptr[21];; - MELT_LOCATION ("warmelt-genobj.melt:5139:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5155:/ clear"); /*clear *//*_.LABSTR__V22*/ meltfptr[21] = 0; /*^clear */ /*clear *//*_.IFCPP___V23*/ meltfptr[22] = 0; /*_.LET___V19*/ meltfptr[18] = /*_.LET___V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-genobj.melt:5133:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5149:/ clear"); /*clear *//*_#NBMAT__L5*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.LABUF__V20*/ meltfptr[19] = 0; @@ -4919,7 +4931,7 @@ lab_endgetargs:; /*^clear */ /*clear *//*_.LET___V21*/ meltfptr[20] = 0; /*_.MATLABEL__V27*/ meltfptr[23] = /*_.LET___V19*/ meltfptr[18];; - MELT_LOCATION ("warmelt-genobj.melt:5144:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5160:/ quasiblock"); /*_.LABUF__V29*/ meltfptr[21] = @@ -4929,7 +4941,7 @@ lab_endgetargs:; (const char *) 0);; { - MELT_LOCATION ("warmelt-genobj.melt:5147:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5163:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V29*/ meltfptr[21]), melt_string_str ((melt_ptr_t) @@ -4939,7 +4951,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5148:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5164:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V29*/ meltfptr[21]), ("_end")); @@ -4954,7 +4966,7 @@ lab_endgetargs:; /*_.LET___V28*/ meltfptr[24] = /*_.STRBUF2STRING__V30*/ meltfptr[22];; - MELT_LOCATION ("warmelt-genobj.melt:5144:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5160:/ clear"); /*clear *//*_.LABUF__V29*/ meltfptr[21] = 0; /*^clear */ /*clear *//*_.STRBUF2STRING__V30*/ meltfptr[22] = 0; @@ -4969,7 +4981,7 @@ lab_endgetargs:; /*_.OBODYL__V33*/ meltfptr[21] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));; - MELT_LOCATION ("warmelt-genobj.melt:5154:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5170:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -5015,14 +5027,14 @@ lab_endgetargs:; (( /*nil */ NULL)), "OMULBLO_SUBCOMP"); ; /*_.OMBLOC__V34*/ meltfptr[22] = /*_.INST__V35*/ meltfptr[34];; - MELT_LOCATION ("warmelt-genobj.melt:5159:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5175:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_INTEGERBOX__V36*/ meltfptr[35] = (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[8])), (0)));; - MELT_LOCATION ("warmelt-genobj.melt:5159:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5175:/ quasiblock"); /*^rawallocobj */ @@ -5067,7 +5079,7 @@ lab_endgetargs:; "OBGOTO_RANK"); ; /*_.OFIRSTGOTO__V37*/ meltfptr[36] = /*_.INST__V38*/ meltfptr[37];; - MELT_LOCATION ("warmelt-genobj.melt:5164:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5180:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -5114,13 +5126,13 @@ lab_endgetargs:; (( /*nil */ NULL)), "OBLAB_RANK"); ; /*_.OENDLABEL__V39*/ meltfptr[38] = /*_.INST__V40*/ meltfptr[39];; - MELT_LOCATION ("warmelt-genobj.melt:5168:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5184:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_LIST__V41*/ meltfptr[40] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));; - MELT_LOCATION ("warmelt-genobj.melt:5168:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5184:/ quasiblock"); /*^rawallocobj */ @@ -5171,7 +5183,7 @@ lab_endgetargs:; ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5176:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5192:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5197,7 +5209,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5176:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5192:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -5212,7 +5224,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5176:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5192:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -5226,7 +5238,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5176; + argtab[2].meltbp_long = 5192; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match nmatched="; /*^apply.arg */ @@ -5246,7 +5258,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V47*/ meltfptr[46];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5176:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5192:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V47*/ meltfptr[46] = 0; @@ -5259,7 +5271,7 @@ lab_endgetargs:; /*_.IF___V46*/ meltfptr[45] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5176:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5192:/ quasiblock"); /*_.PROGN___V48*/ meltfptr[46] = /*_.IF___V46*/ meltfptr[45];; @@ -5268,7 +5280,7 @@ lab_endgetargs:; /*_.IFCPP___V45*/ meltfptr[44] = /*_.PROGN___V48*/ meltfptr[46];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5176:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5192:/ clear"); /*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IF___V46*/ meltfptr[45] = 0; @@ -5281,7 +5293,7 @@ lab_endgetargs:; /*_.IFCPP___V45*/ meltfptr[44] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5177:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5193:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -5298,20 +5310,20 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5175:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5191:/ quasiblock"); /*_.OMATCHED__V50*/ meltfptr[46] = /*_.COMPILE_OBJ__V49*/ meltfptr[45];; { - MELT_LOCATION ("warmelt-genobj.melt:5179:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5195:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OBODYL__V33*/ meltfptr[21]), (melt_ptr_t) ( /*_.OFIRSTGOTO__V37*/ meltfptr[36])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5180:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5196:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5337,7 +5349,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5180:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5196:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -5352,7 +5364,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5180:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5196:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -5366,7 +5378,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5180; + argtab[2].meltbp_long = 5196; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match ntests="; /*^apply.arg */ @@ -5398,7 +5410,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V53*/ meltfptr[52];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5180:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5196:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V53*/ meltfptr[52] = 0; @@ -5411,7 +5423,7 @@ lab_endgetargs:; /*_.IF___V52*/ meltfptr[51] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5180:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5196:/ quasiblock"); /*_.PROGN___V54*/ meltfptr[52] = /*_.IF___V52*/ meltfptr[51];; @@ -5420,7 +5432,7 @@ lab_endgetargs:; /*_.IFCPP___V51*/ meltfptr[50] = /*_.PROGN___V54*/ meltfptr[52];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5180:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5196:/ clear"); /*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IF___V52*/ meltfptr[51] = 0; @@ -5451,7 +5463,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5184:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5200:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5477,7 +5489,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5184:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5200:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -5492,7 +5504,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5184:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5200:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -5506,7 +5518,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5184; + argtab[2].meltbp_long = 5200; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match curotest="; @@ -5533,7 +5545,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V58*/ meltfptr[57];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5184:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5200:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V58*/ meltfptr[57] = 0; @@ -5546,7 +5558,7 @@ lab_endgetargs:; /*_.IF___V57*/ meltfptr[56] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5184:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5200:/ quasiblock"); /*_.PROGN___V59*/ meltfptr[57] = /*_.IF___V57*/ meltfptr[56];; @@ -5555,7 +5567,7 @@ lab_endgetargs:; /*_.IFCPP___V56*/ meltfptr[52] = /*_.PROGN___V59*/ meltfptr[57];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5184:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5200:/ clear"); /*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IF___V57*/ meltfptr[56] = 0; @@ -5570,7 +5582,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5185:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5201:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5583,7 +5595,7 @@ lab_endgetargs:; ( /*_.CUROTEST__V55*/ meltfptr[51]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[12])));; - MELT_LOCATION ("warmelt-genobj.melt:5185:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5201:/ cond"); /*cond */ if ( /*_#IS_A__L16*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -5591,7 +5603,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5185:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5201:/ cond.else"); /*^block */ /*anyblock */ @@ -5605,7 +5617,7 @@ lab_endgetargs:; melt_assert_failed (("check curotest"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5185) ? (5185) : __LINE__, + (5201) ? (5201) : __LINE__, __FUNCTION__); ; } @@ -5621,7 +5633,7 @@ lab_endgetargs:; /*_.IFCPP___V60*/ meltfptr[56] = /*_.IFELSE___V61*/ meltfptr[57];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5185:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5201:/ clear"); /*clear *//*_#IS_A__L16*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V61*/ meltfptr[57] = 0; @@ -5634,7 +5646,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5186:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5202:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5650,7 +5662,7 @@ lab_endgetargs:; /*_#I__L18*/ meltfnum[7] = (( /*_#GET_INT__L17*/ meltfnum[0]) == ( /*_#TESTIX__L13*/ meltfnum[6]));; - MELT_LOCATION ("warmelt-genobj.melt:5186:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5202:/ cond"); /*cond */ if ( /*_#I__L18*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -5658,7 +5670,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5186:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5202:/ cond.else"); /*^block */ /*anyblock */ @@ -5672,7 +5684,7 @@ lab_endgetargs:; melt_assert_failed (("check curotest rank"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5186) ? (5186) : __LINE__, + (5202) ? (5202) : __LINE__, __FUNCTION__); ; } @@ -5688,7 +5700,7 @@ lab_endgetargs:; /*_.IFCPP___V62*/ meltfptr[57] = /*_.IFELSE___V63*/ meltfptr[62];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5186:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5202:/ clear"); /*clear *//*_#GET_INT__L17*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_#I__L18*/ meltfnum[7] = 0; @@ -5701,14 +5713,14 @@ lab_endgetargs:; /*_.IFCPP___V62*/ meltfptr[57] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5192:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5208:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L19*/ meltfnum[3] = melt_is_instance_of ((melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANYTESTER */ meltfrout->tabval[13])));; - MELT_LOCATION ("warmelt-genobj.melt:5192:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5208:/ cond"); /*cond */ if ( /*_#IS_A__L19*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -5716,7 +5728,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5193:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5209:/ quasiblock"); /*^cond */ @@ -5744,7 +5756,7 @@ lab_endgetargs:; /*_.CURNTHEN__V66*/ meltfptr[65] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5194:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5210:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -5769,12 +5781,12 @@ lab_endgetargs:; /*_.CURNELSE__V67*/ meltfptr[66] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5197:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5213:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L20*/ meltfnum[0] = (( /*_.CURNTHEN__V66*/ meltfptr[65]) == NULL);; - MELT_LOCATION ("warmelt-genobj.melt:5197:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5213:/ cond"); /*cond */ if ( /*_#NULL__L20*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -5784,7 +5796,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5198:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5214:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5810,7 +5822,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5198:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5214:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -5826,7 +5838,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-genobj.melt:5198:/ checksignal"); + ("warmelt-genobj.melt:5214:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -5841,7 +5853,7 @@ lab_endgetargs:; argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5198; + argtab[2].meltbp_long = 5214; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match with null then curotest="; @@ -5867,7 +5879,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-genobj.melt:5198:/ clear"); + ("warmelt-genobj.melt:5214:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[21] = 0; /*^clear */ @@ -5883,7 +5895,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-genobj.melt:5198:/ quasiblock"); + ("warmelt-genobj.melt:5214:/ quasiblock"); /*_.PROGN___V72*/ meltfptr[70] = @@ -5894,7 +5906,7 @@ lab_endgetargs:; /*_.PROGN___V72*/ meltfptr[70];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5198:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5214:/ clear"); /*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IF___V70*/ meltfptr[69] = 0; @@ -5909,7 +5921,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5199:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5215:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -5918,7 +5930,7 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-genobj.melt:5197:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5213:/ quasiblock"); /*epilog */ @@ -5936,12 +5948,12 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-genobj.melt:5201:/ checksignal"); + ("warmelt-genobj.melt:5217:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L23*/ meltfnum[21] = (( /*_.CURNELSE__V67*/ meltfptr[66]) == NULL);; - MELT_LOCATION ("warmelt-genobj.melt:5201:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5217:/ cond"); /*cond */ if ( /*_#NULL__L23*/ meltfnum[21]) /*then */ { /*^cond.then */ @@ -5952,7 +5964,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG MELT_LOCATION - ("warmelt-genobj.melt:5202:/ cppif.then"); + ("warmelt-genobj.melt:5218:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5980,7 +5992,7 @@ lab_endgetargs:; #endif /*MELT_HAVE_DEBUG */ ;; MELT_LOCATION - ("warmelt-genobj.melt:5202:/ cond"); + ("warmelt-genobj.melt:5218:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -5997,7 +6009,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-genobj.melt:5202:/ checksignal"); + ("warmelt-genobj.melt:5218:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -6013,7 +6025,7 @@ lab_endgetargs:; argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5202; + argtab[2].meltbp_long = 5218; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match with null else curotest="; @@ -6041,7 +6053,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-genobj.melt:5202:/ clear"); + ("warmelt-genobj.melt:5218:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L25*/ meltfnum[24] = 0; /*^clear */ @@ -6057,7 +6069,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-genobj.melt:5202:/ quasiblock"); + ("warmelt-genobj.melt:5218:/ quasiblock"); /*_.PROGN___V77*/ meltfptr[75] = @@ -6069,7 +6081,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-genobj.melt:5202:/ clear"); + ("warmelt-genobj.melt:5218:/ clear"); /*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[7] = 0; /*^clear */ @@ -6086,7 +6098,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-genobj.melt:5203:/ locexp"); + ("warmelt-genobj.melt:5219:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -6096,7 +6108,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-genobj.melt:5201:/ quasiblock"); + ("warmelt-genobj.melt:5217:/ quasiblock"); /*epilog */ @@ -6118,7 +6130,7 @@ lab_endgetargs:; /*_.IFELSE___V73*/ meltfptr[69];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5197:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5213:/ clear"); /*clear *//*_#NULL__L23*/ meltfnum[21] = 0; /*^clear */ /*clear *//*_.IFELSE___V73*/ meltfptr[69] = 0; @@ -6129,7 +6141,7 @@ lab_endgetargs:; /*_.LET___V65*/ meltfptr[64] = /*_.IFELSE___V68*/ meltfptr[67];; - MELT_LOCATION ("warmelt-genobj.melt:5193:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5209:/ clear"); /*clear *//*_.CURNTHEN__V66*/ meltfptr[65] = 0; /*^clear */ /*clear *//*_.CURNELSE__V67*/ meltfptr[66] = 0; @@ -6140,7 +6152,7 @@ lab_endgetargs:; /*_.IF___V64*/ meltfptr[62] = /*_.LET___V65*/ meltfptr[64];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5192:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5208:/ clear"); /*clear *//*_.LET___V65*/ meltfptr[64] = 0; } ; @@ -6151,10 +6163,10 @@ lab_endgetargs:; /*_.IF___V64*/ meltfptr[62] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5206:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5222:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5207:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5223:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -6174,7 +6186,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5208:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5224:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -6201,7 +6213,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5210:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5226:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6227,7 +6239,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5210:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5226:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[24]) /*then */ { /*^cond.then */ @@ -6242,7 +6254,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5210:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5226:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -6256,7 +6268,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5210; + argtab[2].meltbp_long = 5226; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match labins="; /*^apply.arg */ @@ -6277,7 +6289,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V82*/ meltfptr[65];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5210:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5226:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V82*/ meltfptr[65] = 0; @@ -6290,7 +6302,7 @@ lab_endgetargs:; /*_.IF___V81*/ meltfptr[69] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5210:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5226:/ quasiblock"); /*_.PROGN___V83*/ meltfptr[66] = /*_.IF___V81*/ meltfptr[69];; @@ -6299,7 +6311,7 @@ lab_endgetargs:; /*_.IFCPP___V80*/ meltfptr[70] = /*_.PROGN___V83*/ meltfptr[66];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5210:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5226:/ clear"); /*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[24] = 0; /*^clear */ /*clear *//*_.IF___V81*/ meltfptr[69] = 0; @@ -6312,7 +6324,7 @@ lab_endgetargs:; /*_.IFCPP___V80*/ meltfptr[70] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5211:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5227:/ quasiblock"); /*_#I__L28*/ meltfnum[21] = @@ -6323,7 +6335,7 @@ lab_endgetargs:; (melt_multiple_nth ((melt_ptr_t) ( /*_.NTESTS__V15*/ meltfptr[14]), ( /*_#I__L28*/ meltfnum[21])));; - MELT_LOCATION ("warmelt-genobj.melt:5212:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5228:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -6360,7 +6372,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5213:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5229:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6386,7 +6398,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5213:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5229:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -6401,7 +6413,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5213:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5229:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -6415,7 +6427,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5213; + argtab[2].meltbp_long = 5229; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match nextest="; @@ -6443,7 +6455,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V88*/ meltfptr[66];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5213:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5229:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L30*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V88*/ meltfptr[66] = 0; @@ -6456,7 +6468,7 @@ lab_endgetargs:; /*_.IF___V87*/ meltfptr[69] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5213:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5229:/ quasiblock"); /*_.PROGN___V89*/ meltfptr[66] = /*_.IF___V87*/ meltfptr[69];; @@ -6465,7 +6477,7 @@ lab_endgetargs:; /*_.IFCPP___V86*/ meltfptr[65] = /*_.PROGN___V89*/ meltfptr[66];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5213:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5229:/ clear"); /*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V87*/ meltfptr[69] = 0; @@ -6482,16 +6494,16 @@ lab_endgetargs:; /*_.LET___V84*/ meltfptr[67] = /*_.IFCPP___V86*/ meltfptr[65];; - MELT_LOCATION ("warmelt-genobj.melt:5211:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5227:/ clear"); /*clear *//*_#I__L28*/ meltfnum[21] = 0; /*^clear */ /*clear *//*_.NEXTEST__V85*/ meltfptr[64] = 0; /*^clear */ /*clear *//*_.IFCPP___V86*/ meltfptr[65] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5216:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5232:/ checksignal"); MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-genobj.melt:5214:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5230:/ quasiblock"); /*^multimsend */ @@ -6520,7 +6532,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5217:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5233:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6546,7 +6558,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5217:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5233:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L31*/ meltfnum[24]) /*then */ { /*^cond.then */ @@ -6561,7 +6573,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5217:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5233:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -6575,7 +6587,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5217; + argtab[2].meltbp_long = 5233; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match curcomp="; @@ -6603,7 +6615,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V94*/ meltfptr[93];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5217:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5233:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L32*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V94*/ meltfptr[93] = 0; @@ -6616,7 +6628,7 @@ lab_endgetargs:; /*_.IF___V93*/ meltfptr[65] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5217:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5233:/ quasiblock"); /*_.PROGN___V95*/ meltfptr[93] = /*_.IF___V93*/ meltfptr[65];; @@ -6625,7 +6637,7 @@ lab_endgetargs:; /*_.IFCPP___V92*/ meltfptr[64] = /*_.PROGN___V95*/ meltfptr[93];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5217:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5233:/ clear"); /*clear *//*_#MELT_NEED_DBG__L31*/ meltfnum[24] = 0; /*^clear */ /*clear *//*_.IF___V93*/ meltfptr[65] = 0; @@ -6640,7 +6652,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5218:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5234:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6656,7 +6668,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5218:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5234:/ cond.else"); /*^block */ /*anyblock */ @@ -6670,7 +6682,7 @@ lab_endgetargs:; melt_assert_failed (("check curcomp"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5218) ? (5218) : __LINE__, + (5234) ? (5234) : __LINE__, __FUNCTION__); ; } @@ -6686,7 +6698,7 @@ lab_endgetargs:; /*_.IFCPP___V96*/ meltfptr[65] = /*_.IFELSE___V97*/ meltfptr[93];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5218:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5234:/ clear"); /*clear *//*_.IFELSE___V97*/ meltfptr[93] = 0; } @@ -6697,21 +6709,21 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5220:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5236:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OBODYL__V33*/ meltfptr[21]), (melt_ptr_t) ( /*_.LABINS__V78*/ meltfptr[68])); } ; - MELT_LOCATION ("warmelt-genobj.melt:5222:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5238:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L33*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.CURCOMP__V90*/ meltfptr[69])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-genobj.melt:5222:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5238:/ cond"); /*cond */ if ( /*_#IS_LIST__L33*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -6719,7 +6731,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5223:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5239:/ quasiblock"); /*_.LIST_LAST__V100*/ meltfptr[99] = @@ -6732,7 +6744,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.LIST_LAST__V100*/ meltfptr[99])));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5224:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5240:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6758,7 +6770,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5224:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5240:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L34*/ meltfnum[21]) /*then */ { /*^cond.then */ @@ -6774,7 +6786,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-genobj.melt:5224:/ checksignal"); + ("warmelt-genobj.melt:5240:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -6788,7 +6800,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5224; + argtab[2].meltbp_long = 5240; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match lastlicomp="; @@ -6811,7 +6823,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V104*/ meltfptr[103];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5224:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5240:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L35*/ meltfnum[7] = 0; /*^clear */ @@ -6826,7 +6838,7 @@ lab_endgetargs:; /*_.IF___V103*/ meltfptr[102] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5224:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5240:/ quasiblock"); /*_.PROGN___V105*/ meltfptr[103] = @@ -6837,7 +6849,7 @@ lab_endgetargs:; /*_.PROGN___V105*/ meltfptr[103];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5224:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5240:/ clear"); /*clear *//*_#MELT_NEED_DBG__L34*/ meltfnum[21] = 0; /*^clear */ /*clear *//*_.IF___V103*/ meltfptr[102] = 0; @@ -6850,7 +6862,7 @@ lab_endgetargs:; /*_.IFCPP___V102*/ meltfptr[101] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5225:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5241:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -6874,7 +6886,7 @@ lab_endgetargs:; /*_.LET___V99*/ meltfptr[98] = /*_.LIST_APPEND2LIST__V106*/ meltfptr[102];; - MELT_LOCATION ("warmelt-genobj.melt:5223:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5239:/ clear"); /*clear *//*_.LIST_LAST__V100*/ meltfptr[99] = 0; /*^clear */ /*clear *//*_.LASTLICOMP__V101*/ meltfptr[100] = 0; @@ -6886,7 +6898,7 @@ lab_endgetargs:; /*_.LET___V99*/ meltfptr[98];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5222:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5238:/ clear"); /*clear *//*_.LET___V99*/ meltfptr[98] = 0; } ; @@ -6898,14 +6910,14 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5227:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5243:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_MULTIPLE__L36*/ meltfnum[24] = (melt_magic_discr ((melt_ptr_t) ( /*_.CURCOMP__V90*/ meltfptr[69])) == MELTOBMAG_MULTIPLE);; - MELT_LOCATION ("warmelt-genobj.melt:5227:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5243:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE__L36*/ meltfnum[24]) /*then */ { /*^cond.then */ @@ -6913,7 +6925,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5228:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5244:/ quasiblock"); /*_.LASTUPCOMP__V108*/ meltfptr[99] = @@ -6922,7 +6934,7 @@ lab_endgetargs:; (-1)));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5229:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5245:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6948,7 +6960,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5229:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5245:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L37*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -6964,7 +6976,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-genobj.melt:5229:/ checksignal"); + ("warmelt-genobj.melt:5245:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -6979,7 +6991,7 @@ lab_endgetargs:; argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5229; + argtab[2].meltbp_long = 5245; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match lastupcomp="; @@ -7005,7 +7017,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-genobj.melt:5229:/ clear"); + ("warmelt-genobj.melt:5245:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L38*/ meltfnum[21] = 0; /*^clear */ @@ -7021,7 +7033,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-genobj.melt:5229:/ quasiblock"); + ("warmelt-genobj.melt:5245:/ quasiblock"); /*_.PROGN___V112*/ meltfptr[98] = @@ -7032,7 +7044,7 @@ lab_endgetargs:; /*_.PROGN___V112*/ meltfptr[98];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5229:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5245:/ clear"); /*clear *//*_#MELT_NEED_DBG__L37*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IF___V110*/ meltfptr[101] = 0; @@ -7070,7 +7082,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-genobj.melt:5233:/ locexp"); + ("warmelt-genobj.melt:5249:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OBODYL__V33*/ meltfptr[21]), @@ -7083,7 +7095,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-genobj.melt:5230:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5246:/ clear"); /*clear *//*_.SUBTEST__V113*/ meltfptr[102] = 0; /*^clear */ /*clear *//*_#SUBIX__L39*/ meltfnum[21] = 0; @@ -7092,7 +7104,7 @@ lab_endgetargs:; /*_.IFELSE___V107*/ meltfptr[103] = /*_.IFCPP___V109*/ meltfptr[100];; - MELT_LOCATION ("warmelt-genobj.melt:5228:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5244:/ clear"); /*clear *//*_.LASTUPCOMP__V108*/ meltfptr[99] = 0; /*^clear */ /*clear *//*_.IFCPP___V109*/ meltfptr[100] = 0; @@ -7102,21 +7114,21 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5227:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5243:/ cond.else"); /*^block */ /*anyblock */ { MELT_LOCATION - ("warmelt-genobj.melt:5235:/ checksignal"); + ("warmelt-genobj.melt:5251:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_OBJECT__L40*/ meltfnum[7] = (melt_magic_discr ((melt_ptr_t) ( /*_.CURCOMP__V90*/ meltfptr[69])) == MELTOBMAG_OBJECT);; - MELT_LOCATION ("warmelt-genobj.melt:5235:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5251:/ cond"); /*cond */ if ( /*_#IS_OBJECT__L40*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -7127,7 +7139,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG MELT_LOCATION - ("warmelt-genobj.melt:5236:/ cppif.then"); + ("warmelt-genobj.melt:5252:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7155,7 +7167,7 @@ lab_endgetargs:; #endif /*MELT_HAVE_DEBUG */ ;; MELT_LOCATION - ("warmelt-genobj.melt:5236:/ cond"); + ("warmelt-genobj.melt:5252:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L41*/ meltfnum[40]) /*then */ { /*^cond.then */ @@ -7172,7 +7184,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-genobj.melt:5236:/ checksignal"); + ("warmelt-genobj.melt:5252:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7188,7 +7200,7 @@ lab_endgetargs:; argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5236; + argtab[2].meltbp_long = 5252; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match obj curcomp="; @@ -7218,7 +7230,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-genobj.melt:5236:/ clear"); + ("warmelt-genobj.melt:5252:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L42*/ meltfnum[41] = 0; /*^clear */ @@ -7234,7 +7246,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-genobj.melt:5236:/ quasiblock"); + ("warmelt-genobj.melt:5252:/ quasiblock"); /*_.PROGN___V118*/ meltfptr[100] = @@ -7246,7 +7258,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-genobj.melt:5236:/ clear"); + ("warmelt-genobj.melt:5252:/ clear"); /*clear *//*_#MELT_NEED_DBG__L41*/ meltfnum[40] = 0; /*^clear */ @@ -7264,7 +7276,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-genobj.melt:5237:/ locexp"); + ("warmelt-genobj.melt:5253:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OBODYL__V33*/ meltfptr[21]), @@ -7272,7 +7284,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-genobj.melt:5235:/ quasiblock"); + ("warmelt-genobj.melt:5251:/ quasiblock"); /*epilog */ @@ -7292,7 +7304,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG MELT_LOCATION - ("warmelt-genobj.melt:5240:/ cppif.then"); + ("warmelt-genobj.melt:5256:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7310,7 +7322,7 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-genobj.melt:5240:/ cond.else"); + ("warmelt-genobj.melt:5256:/ cond.else"); /*^block */ /*anyblock */ @@ -7321,7 +7333,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("unexpected curcomp"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (5240) ? (5240) : __LINE__, __FUNCTION__); + melt_assert_failed (("unexpected curcomp"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (5256) ? (5256) : __LINE__, __FUNCTION__); ; } ; @@ -7339,7 +7351,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-genobj.melt:5240:/ clear"); + ("warmelt-genobj.melt:5256:/ clear"); /*clear *//*_.IFELSE___V120*/ meltfptr[100] = 0; } @@ -7350,7 +7362,7 @@ lab_endgetargs:; #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION - ("warmelt-genobj.melt:5239:/ quasiblock"); + ("warmelt-genobj.melt:5255:/ quasiblock"); /*_.PROGN___V121*/ meltfptr[98] = @@ -7362,7 +7374,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-genobj.melt:5235:/ clear"); + ("warmelt-genobj.melt:5251:/ clear"); /*clear *//*_.IFCPP___V119*/ meltfptr[99] = 0; /*^clear */ /*clear *//*_.PROGN___V121*/ meltfptr[98] = 0; @@ -7374,7 +7386,7 @@ lab_endgetargs:; /*_.IFELSE___V114*/ meltfptr[101];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5227:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5243:/ clear"); /*clear *//*_#IS_OBJECT__L40*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IFELSE___V114*/ meltfptr[101] = 0; @@ -7386,7 +7398,7 @@ lab_endgetargs:; /*_.IFELSE___V107*/ meltfptr[103];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5222:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5238:/ clear"); /*clear *//*_#IS_MULTIPLE__L36*/ meltfnum[24] = 0; /*^clear */ /*clear *//*_.IFELSE___V107*/ meltfptr[103] = 0; @@ -7394,7 +7406,7 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-genobj.melt:5243:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5259:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -7421,14 +7433,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5245:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5261:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.DONETESTS__V44*/ meltfptr[43]), (melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51])); } ; - MELT_LOCATION ("warmelt-genobj.melt:5247:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5263:/ quasiblock"); /*_.DISPOSABLIST__V122*/ meltfptr[100] = @@ -7437,7 +7449,7 @@ lab_endgetargs:; (( /*!DISCR_LIST */ meltfrout->tabval[5]))));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5248:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5264:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7463,7 +7475,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5248:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5264:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L43*/ meltfnum[41]) /*then */ { /*^cond.then */ @@ -7478,7 +7490,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5248:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5264:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7492,7 +7504,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5248; + argtab[2].meltbp_long = 5264; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match disposing curotest="; @@ -7514,7 +7526,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V125*/ meltfptr[101];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5248:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5264:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L44*/ meltfnum[40] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V125*/ meltfptr[101] = 0; @@ -7527,7 +7539,7 @@ lab_endgetargs:; /*_.IF___V124*/ meltfptr[98] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5248:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5264:/ quasiblock"); /*_.PROGN___V126*/ meltfptr[103] = /*_.IF___V124*/ meltfptr[98];; @@ -7537,7 +7549,7 @@ lab_endgetargs:; /*_.PROGN___V126*/ meltfptr[103];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5248:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5264:/ clear"); /*clear *//*_#MELT_NEED_DBG__L43*/ meltfnum[41] = 0; /*^clear */ /*clear *//*_.IF___V124*/ meltfptr[98] = 0; @@ -7550,14 +7562,14 @@ lab_endgetargs:; /*_.IFCPP___V123*/ meltfptr[99] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5252:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5268:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L45*/ meltfnum[7] = melt_is_instance_of ((melt_ptr_t) ( /*_.CUROTEST__V55*/ meltfptr[51]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_SUCCESS */ meltfrout->tabval[17])));; - MELT_LOCATION ("warmelt-genobj.melt:5252:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5268:/ cond"); /*cond */ if ( /*_#IS_A__L45*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -7565,7 +7577,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5255:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5271:/ quasiblock"); /*^newclosure */ @@ -7629,7 +7641,7 @@ lab_endgetargs:; ; /*_.LAMBDA___V128*/ meltfptr[98] = /*_.LAMBDA___V129*/ meltfptr[103];; - MELT_LOCATION ("warmelt-genobj.melt:5253:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5269:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7654,7 +7666,7 @@ lab_endgetargs:; /*_.MAPOBJECT_EVERY__V130*/ meltfptr[129];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5252:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5268:/ clear"); /*clear *//*_.LAMBDA___V128*/ meltfptr[98] = 0; /*^clear */ /*clear *//*_.MAPOBJECT_EVERY__V130*/ meltfptr[129] = 0; @@ -7668,13 +7680,13 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5270:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5286:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L46*/ meltfnum[24] = (( /*_.CURNMATCHED__V79*/ meltfptr[75]) == ( /*_.NMATCHED__V17*/ meltfptr[16]));; - MELT_LOCATION ("warmelt-genobj.melt:5270:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5286:/ cond"); /*cond */ if ( /*_#__L46*/ meltfnum[24]) /*then */ { /*^cond.then */ @@ -7684,7 +7696,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5271:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5287:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7710,7 +7722,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5271:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5287:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L47*/ meltfnum[40]) /*then */ { /*^cond.then */ @@ -7726,7 +7738,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-genobj.melt:5271:/ checksignal"); + ("warmelt-genobj.melt:5287:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7741,7 +7753,7 @@ lab_endgetargs:; argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5271; + argtab[2].meltbp_long = 5287; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match curnmatched == nmatched="; @@ -7767,7 +7779,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-genobj.melt:5271:/ clear"); + ("warmelt-genobj.melt:5287:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L48*/ meltfnum[41] = 0; /*^clear */ @@ -7783,7 +7795,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-genobj.melt:5271:/ quasiblock"); + ("warmelt-genobj.melt:5287:/ quasiblock"); /*_.PROGN___V135*/ meltfptr[133] = @@ -7794,7 +7806,7 @@ lab_endgetargs:; /*_.PROGN___V135*/ meltfptr[133];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5271:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5287:/ clear"); /*clear *//*_#MELT_NEED_DBG__L47*/ meltfnum[40] = 0; /*^clear */ /*clear *//*_.IF___V133*/ meltfptr[132] = 0; @@ -7813,7 +7825,7 @@ lab_endgetargs:; /*_.IFCPP___V132*/ meltfptr[129];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5270:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5286:/ clear"); /*clear *//*_.IFCPP___V132*/ meltfptr[129] = 0; } ; @@ -7826,14 +7838,14 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-genobj.melt:5276:/ checksignal"); + ("warmelt-genobj.melt:5292:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_OBJECT__L49*/ meltfnum[41] = (melt_magic_discr ((melt_ptr_t) ( /*_.CURNMATCHED__V79*/ meltfptr[75])) == MELTOBMAG_OBJECT);; - MELT_LOCATION ("warmelt-genobj.melt:5276:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5292:/ cond"); /*cond */ if ( /*_#IS_OBJECT__L49*/ meltfnum[41]) /*then */ { /*^cond.then */ @@ -7844,7 +7856,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG MELT_LOCATION - ("warmelt-genobj.melt:5277:/ cppif.then"); + ("warmelt-genobj.melt:5293:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7872,7 +7884,7 @@ lab_endgetargs:; #endif /*MELT_HAVE_DEBUG */ ;; MELT_LOCATION - ("warmelt-genobj.melt:5277:/ cond"); + ("warmelt-genobj.melt:5293:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L50*/ meltfnum[40]) /*then */ { /*^cond.then */ @@ -7889,7 +7901,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-genobj.melt:5277:/ checksignal"); + ("warmelt-genobj.melt:5293:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7905,7 +7917,7 @@ lab_endgetargs:; argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5277; + argtab[2].meltbp_long = 5293; /*^apply.arg */ argtab[3].meltbp_aptr = (melt_ptr_t *) & @@ -7948,7 +7960,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-genobj.melt:5277:/ clear"); + ("warmelt-genobj.melt:5293:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L51*/ meltfnum[50] = 0; /*^clear */ @@ -7964,7 +7976,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-genobj.melt:5277:/ quasiblock"); + ("warmelt-genobj.melt:5293:/ quasiblock"); /*_.PROGN___V140*/ meltfptr[138] = @@ -7976,7 +7988,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-genobj.melt:5277:/ clear"); + ("warmelt-genobj.melt:5293:/ clear"); /*clear *//*_#MELT_NEED_DBG__L50*/ meltfnum[40] = 0; /*^clear */ @@ -7992,7 +8004,7 @@ lab_endgetargs:; #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION - ("warmelt-genobj.melt:5279:/ quasiblock"); + ("warmelt-genobj.melt:5295:/ quasiblock"); /*_.STUTESTS__V141*/ meltfptr[129] = @@ -8002,7 +8014,7 @@ lab_endgetargs:; meltfptr[15]), (meltobject_ptr_t) ( /*_.CURNMATCHED__V79*/ meltfptr[75]));; MELT_LOCATION - ("warmelt-genobj.melt:5280:/ quasiblock"); + ("warmelt-genobj.melt:5296:/ quasiblock"); /*_.REMSTUFF__V142*/ meltfptr[138] = @@ -8030,7 +8042,7 @@ lab_endgetargs:; MELT_LOCATION - ("warmelt-genobj.melt:5284:/ checksignal"); + ("warmelt-genobj.melt:5300:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^checksignal */ @@ -8061,7 +8073,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-genobj.melt:5285:/ compute"); + ("warmelt-genobj.melt:5301:/ compute"); /*_.TESTPAIR__V143*/ meltfptr[142] = /*_.SETQ___V147*/ meltfptr[146] = ( /*nil */ NULL);; @@ -8070,7 +8082,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-genobj.melt:5284:/ clear"); + ("warmelt-genobj.melt:5300:/ clear"); /*clear *//*_.SETQ___V147*/ meltfptr[146] = 0; } @@ -8084,7 +8096,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-genobj.melt:5286:/ compute"); + ("warmelt-genobj.melt:5302:/ compute"); /*_.REMSTUFF__V142*/ meltfptr[138] = /*_.SETQ___V148*/ meltfptr[146] = ( /*nil */ NULL);; @@ -8093,7 +8105,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-genobj.melt:5284:/ clear"); + ("warmelt-genobj.melt:5300:/ clear"); /*clear *//*_.SETQ___V148*/ meltfptr[146] = 0; } @@ -8108,7 +8120,7 @@ lab_endgetargs:; /*citerepilog */ MELT_LOCATION - ("warmelt-genobj.melt:5281:/ clear"); + ("warmelt-genobj.melt:5297:/ clear"); /*clear *//*_.TESTPAIR__V143*/ meltfptr[142] = 0; /*^clear */ @@ -8121,7 +8133,7 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_LIST */ ; MELT_LOCATION - ("warmelt-genobj.melt:5288:/ checksignal"); + ("warmelt-genobj.melt:5304:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -8135,7 +8147,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-genobj.melt:5289:/ locexp"); + ("warmelt-genobj.melt:5305:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.DISPOSABLIST__V122*/ meltfptr[100]), (melt_ptr_t) ( /*_.REMSTUFF__V142*/ meltfptr[138])); } @@ -8147,14 +8159,14 @@ lab_endgetargs:; ; MELT_LOCATION - ("warmelt-genobj.melt:5280:/ clear"); + ("warmelt-genobj.melt:5296:/ clear"); /*clear *//*_.REMSTUFF__V142*/ meltfptr[138] = 0; MELT_LOCATION - ("warmelt-genobj.melt:5279:/ clear"); + ("warmelt-genobj.melt:5295:/ clear"); /*clear *//*_.STUTESTS__V141*/ meltfptr[129] = 0; MELT_LOCATION - ("warmelt-genobj.melt:5276:/ quasiblock"); + ("warmelt-genobj.melt:5292:/ quasiblock"); /*epilog */ @@ -8176,7 +8188,7 @@ lab_endgetargs:; /*_.IFELSE___V136*/ meltfptr[132];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5270:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5286:/ clear"); /*clear *//*_#IS_OBJECT__L49*/ meltfnum[41] = 0; /*^clear */ /*clear *//*_.IFELSE___V136*/ meltfptr[132] = 0; @@ -8188,7 +8200,7 @@ lab_endgetargs:; /*_.IFELSE___V131*/ meltfptr[98];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5252:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5268:/ clear"); /*clear *//*_#__L46*/ meltfnum[24] = 0; /*^clear */ /*clear *//*_.IFELSE___V131*/ meltfptr[98] = 0; @@ -8198,7 +8210,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5292:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5308:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8224,7 +8236,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5292:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5308:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L52*/ meltfnum[50]) /*then */ { /*^cond.then */ @@ -8239,7 +8251,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5292:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5308:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -8253,7 +8265,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5292; + argtab[2].meltbp_long = 5308; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match disposablist="; @@ -8275,7 +8287,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V151*/ meltfptr[129];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5292:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5308:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L53*/ meltfnum[40] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V151*/ meltfptr[129] = 0; @@ -8288,7 +8300,7 @@ lab_endgetargs:; /*_.IF___V150*/ meltfptr[138] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5292:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5308:/ quasiblock"); /*_.PROGN___V152*/ meltfptr[133] = /*_.IF___V150*/ meltfptr[138];; @@ -8298,7 +8310,7 @@ lab_endgetargs:; /*_.PROGN___V152*/ meltfptr[133];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5292:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5308:/ clear"); /*clear *//*_#MELT_NEED_DBG__L52*/ meltfnum[50] = 0; /*^clear */ /*clear *//*_.IF___V150*/ meltfptr[138] = 0; @@ -8330,7 +8342,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-genobj.melt:5296:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5312:/ locexp"); meltgc_remove_mapobjects ((meltmapobjects_ptr_t) ( /*_.STUFFMAP__V16*/ meltfptr[15]), @@ -8339,7 +8351,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5297:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5313:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8365,7 +8377,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5297:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5313:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L54*/ meltfnum[41]) /*then */ { /*^cond.then */ @@ -8381,7 +8393,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-genobj.melt:5297:/ checksignal"); + ("warmelt-genobj.melt:5313:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -8395,7 +8407,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5297; + argtab[2].meltbp_long = 5313; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match dispstuff="; @@ -8418,7 +8430,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V157*/ meltfptr[133];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5297:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5313:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L55*/ meltfnum[24] = 0; /*^clear */ @@ -8433,7 +8445,7 @@ lab_endgetargs:; /*_.IF___V156*/ meltfptr[138] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5297:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5313:/ quasiblock"); /*_.PROGN___V158*/ meltfptr[133] = @@ -8444,7 +8456,7 @@ lab_endgetargs:; /*_.PROGN___V158*/ meltfptr[133];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5297:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5313:/ clear"); /*clear *//*_#MELT_NEED_DBG__L54*/ meltfnum[41] = 0; /*^clear */ /*clear *//*_.IF___V156*/ meltfptr[138] = 0; @@ -8457,7 +8469,7 @@ lab_endgetargs:; /*_.IFCPP___V155*/ meltfptr[129] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5298:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5314:/ quasiblock"); /*^checksignal */ @@ -8482,7 +8494,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5299:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5315:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8508,7 +8520,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5299:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5315:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L56*/ meltfnum[40]) /*then */ { /*^cond.then */ @@ -8524,7 +8536,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-genobj.melt:5299:/ checksignal"); + ("warmelt-genobj.melt:5315:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -8538,7 +8550,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5299; + argtab[2].meltbp_long = 5315; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match dispobj="; @@ -8561,7 +8573,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V163*/ meltfptr[162];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5299:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5315:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L57*/ meltfnum[50] = 0; /*^clear */ @@ -8576,7 +8588,7 @@ lab_endgetargs:; /*_.IF___V162*/ meltfptr[161] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5299:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5315:/ quasiblock"); /*_.PROGN___V164*/ meltfptr[162] = @@ -8587,7 +8599,7 @@ lab_endgetargs:; /*_.PROGN___V164*/ meltfptr[162];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5299:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5315:/ clear"); /*clear *//*_#MELT_NEED_DBG__L56*/ meltfnum[40] = 0; /*^clear */ /*clear *//*_.IF___V162*/ meltfptr[161] = 0; @@ -8602,7 +8614,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5300:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5316:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8616,7 +8628,7 @@ lab_endgetargs:; (melt_ptr_t) (( /*!CLASS_OBJLOCV */ meltfrout-> tabval[22])));; - MELT_LOCATION ("warmelt-genobj.melt:5300:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5316:/ cond"); /*cond */ if ( /*_#IS_A__L58*/ meltfnum[24]) /*then */ { /*^cond.then */ @@ -8624,7 +8636,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5300:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5316:/ cond.else"); /*^block */ /*anyblock */ @@ -8639,7 +8651,7 @@ lab_endgetargs:; ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5300) ? (5300) : __LINE__, + (5316) ? (5316) : __LINE__, __FUNCTION__); ; } @@ -8656,7 +8668,7 @@ lab_endgetargs:; /*_.IFELSE___V166*/ meltfptr[162];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5300:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5316:/ clear"); /*clear *//*_#IS_A__L58*/ meltfnum[24] = 0; /*^clear */ /*clear *//*_.IFELSE___V166*/ meltfptr[162] = 0; @@ -8667,13 +8679,13 @@ lab_endgetargs:; /*_.IFCPP___V165*/ meltfptr[161] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5302:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5318:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L59*/ meltfnum[41] = (( /*_.DISPOBJ__V160*/ meltfptr[133]) != ( /*_.OMATCHED__V50*/ meltfptr[46]));; - MELT_LOCATION ("warmelt-genobj.melt:5302:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5318:/ cond"); /*cond */ if ( /*_#__L59*/ meltfnum[41]) /*then */ { /*^cond.then */ @@ -8682,7 +8694,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-genobj.melt:5303:/ checksignal"); + ("warmelt-genobj.melt:5319:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -8707,7 +8719,7 @@ lab_endgetargs:; /*_.DISPOSE_OBJLOC__V168*/ meltfptr[167];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5302:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5318:/ clear"); /*clear *//*_.DISPOSE_OBJLOC__V168*/ meltfptr[167] = 0; } ; @@ -8721,7 +8733,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5304:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5320:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8747,7 +8759,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5304:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5320:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L60*/ meltfnum[50]) /*then */ { /*^cond.then */ @@ -8763,7 +8775,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-genobj.melt:5304:/ checksignal"); + ("warmelt-genobj.melt:5320:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -8778,7 +8790,7 @@ lab_endgetargs:; argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5304; + argtab[2].meltbp_long = 5320; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match dont dispose omatched="; @@ -8804,7 +8816,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-genobj.melt:5304:/ clear"); + ("warmelt-genobj.melt:5320:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L61*/ meltfnum[40] = 0; /*^clear */ @@ -8820,7 +8832,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-genobj.melt:5304:/ quasiblock"); + ("warmelt-genobj.melt:5320:/ quasiblock"); /*_.PROGN___V172*/ meltfptr[170] = @@ -8831,7 +8843,7 @@ lab_endgetargs:; /*_.PROGN___V172*/ meltfptr[170];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5304:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5320:/ clear"); /*clear *//*_#MELT_NEED_DBG__L60*/ meltfnum[50] = 0; /*^clear */ /*clear *//*_.IF___V170*/ meltfptr[169] = 0; @@ -8850,7 +8862,7 @@ lab_endgetargs:; /*_.IFCPP___V169*/ meltfptr[167];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5302:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5318:/ clear"); /*clear *//*_.IFCPP___V169*/ meltfptr[167] = 0; } ; @@ -8859,7 +8871,7 @@ lab_endgetargs:; /*_.LET___V159*/ meltfptr[138] = /*_.IFELSE___V167*/ meltfptr[162];; - MELT_LOCATION ("warmelt-genobj.melt:5298:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5314:/ clear"); /*clear *//*_.DISPOBJ__V160*/ meltfptr[133] = 0; /*^clear */ /*clear *//*_.IFCPP___V161*/ meltfptr[160] = 0; @@ -8876,7 +8888,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-genobj.melt:5293:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5309:/ clear"); /*clear *//*_.DISPAIR__V153*/ meltfptr[132] = 0; /*^clear */ /*clear *//*_.DISPSTUFF__V154*/ meltfptr[98] = 0; @@ -8887,7 +8899,7 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-genobj.melt:5247:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5263:/ clear"); /*clear *//*_.DISPOSABLIST__V122*/ meltfptr[100] = 0; /*^clear */ /*clear *//*_.IFCPP___V123*/ meltfptr[99] = 0; @@ -8897,7 +8909,7 @@ lab_endgetargs:; /*clear *//*_.IFELSE___V127*/ meltfptr[101] = 0; /*^clear */ /*clear *//*_.IFCPP___V149*/ meltfptr[146] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5214:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5230:/ checksignal"); MELT_CHECK_SIGNAL (); ; @@ -8913,7 +8925,7 @@ lab_endgetargs:; /*^clear */ /*clear *//*_.CUROBDEST__V91*/ meltfptr[66] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5206:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5222:/ clear"); /*clear *//*_.LABINS__V78*/ meltfptr[68] = 0; /*^clear */ /*clear *//*_.CURNMATCHED__V79*/ meltfptr[75] = 0; @@ -8927,7 +8939,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-genobj.melt:5181:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5197:/ clear"); /*clear *//*_.CUROTEST__V55*/ meltfptr[51] = 0; /*^clear */ /*clear *//*_#TESTIX__L13*/ meltfnum[6] = 0; @@ -8945,15 +8957,15 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5306:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5322:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OBODYL__V33*/ meltfptr[21]), (melt_ptr_t) ( /*_.OENDLABEL__V39*/ meltfptr[38])); } ; - MELT_LOCATION ("warmelt-genobj.melt:5307:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5323:/ checksignal"); MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-genobj.melt:5308:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5324:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -8972,7 +8984,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5307:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5323:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -9005,7 +9017,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5309:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5325:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9031,7 +9043,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5309:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5325:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L62*/ meltfnum[24]) /*then */ { /*^cond.then */ @@ -9046,7 +9058,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5309:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5325:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -9060,7 +9072,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5309; + argtab[2].meltbp_long = 5325; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_match return ombloc="; @@ -9081,7 +9093,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V176*/ meltfptr[133];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5309:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5325:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L63*/ meltfnum[40] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V176*/ meltfptr[133] = 0; @@ -9094,7 +9106,7 @@ lab_endgetargs:; /*_.IF___V175*/ meltfptr[167] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5309:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5325:/ quasiblock"); /*_.PROGN___V177*/ meltfptr[160] = /*_.IF___V175*/ meltfptr[167];; @@ -9103,7 +9115,7 @@ lab_endgetargs:; /*_.IFCPP___V174*/ meltfptr[170] = /*_.PROGN___V177*/ meltfptr[160];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5309:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5325:/ clear"); /*clear *//*_#MELT_NEED_DBG__L62*/ meltfnum[24] = 0; /*^clear */ /*clear *//*_.IF___V175*/ meltfptr[167] = 0; @@ -9116,19 +9128,31 @@ lab_endgetargs:; /*_.IFCPP___V174*/ meltfptr[170] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5310:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5326:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OMBLOC__V34*/ meltfptr[22];; - MELT_LOCATION ("warmelt-genobj.melt:5310:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5326:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[8] = /*_.RETURN___V178*/ meltfptr[161];; - MELT_LOCATION ("warmelt-genobj.melt:5126:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5142:/ clear"); /*clear *//*_.NLOC__V13*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.NCTYP__V14*/ meltfptr[13] = 0; @@ -9180,14 +9204,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V174*/ meltfptr[170] = 0; /*^clear */ /*clear *//*_.RETURN___V178*/ meltfptr[161] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5122:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:5122:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5138:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9285,7 +9321,7 @@ meltrout_155_warmelt_genobj_LAMBDA___49__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5255:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5271:/ getarg"); /*_.STUFF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -9305,13 +9341,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-genobj.melt:5256:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5272:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L1*/ meltfnum[0] = (( /*_.STUFF__V2*/ meltfptr[1]) != (( /*~OMATCHED */ meltfclos->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:5256:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5272:/ cond"); /*cond */ if ( /*_#__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -9319,7 +9355,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5257:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5273:/ quasiblock"); /*_.REMSTUFF__V4*/ meltfptr[3] = /*_.STUFF__V2*/ meltfptr[1];; @@ -9339,7 +9375,7 @@ lab_endgetargs:; meltfptr[4]); - MELT_LOCATION ("warmelt-genobj.melt:5261:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5277:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^checksignal */ @@ -9370,14 +9406,14 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5262:/ compute"); + MELT_LOCATION ("warmelt-genobj.melt:5278:/ compute"); /*_.TESTPAIR__V5*/ meltfptr[4] = /*_.SETQ___V9*/ meltfptr[8] = ( /*nil */ NULL);; /*_.IFELSE___V8*/ meltfptr[7] = /*_.SETQ___V9*/ meltfptr[8];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5261:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5277:/ clear"); /*clear *//*_.SETQ___V9*/ meltfptr[8] = 0; } ; @@ -9389,14 +9425,14 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5263:/ compute"); + MELT_LOCATION ("warmelt-genobj.melt:5279:/ compute"); /*_.REMSTUFF__V4*/ meltfptr[3] = /*_.SETQ___V10*/ meltfptr[8] = ( /*nil */ NULL);; /*_.IFELSE___V8*/ meltfptr[7] = /*_.SETQ___V10*/ meltfptr[8];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5261:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5277:/ clear"); /*clear *//*_.SETQ___V10*/ meltfptr[8] = 0; } ; @@ -9409,7 +9445,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-genobj.melt:5258:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5274:/ clear"); /*clear *//*_.TESTPAIR__V5*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.CURTEST__V6*/ meltfptr[5] = 0; @@ -9419,7 +9455,7 @@ lab_endgetargs:; /*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-genobj.melt:5265:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5281:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -9432,7 +9468,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-genobj.melt:5266:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5282:/ locexp"); meltgc_append_list ((melt_ptr_t) (( /*~DISPOSABLIST */ meltfclos-> tabval[2])), @@ -9446,7 +9482,7 @@ lab_endgetargs:; } /*noelse */ ; - MELT_LOCATION ("warmelt-genobj.melt:5257:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5273:/ clear"); /*clear *//*_.REMSTUFF__V4*/ meltfptr[3] = 0; /*epilog */ } @@ -9455,7 +9491,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5255:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5271:/ clear"); /*clear *//*_#__L1*/ meltfnum[0] = 0; } @@ -9548,7 +9584,7 @@ meltrout_156_warmelt_genobj_COMPILOBJ_NREP_ALTMATCH (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5331:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ getarg"); /*_.NMAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -9569,7 +9605,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5332:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5348:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9581,7 +9617,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_ALTMATCH */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:5332:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5348:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -9589,7 +9625,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5332:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5348:/ cond.else"); /*^block */ /*anyblock */ @@ -9603,7 +9639,7 @@ lab_endgetargs:; melt_assert_failed (("check nmat"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5332) ? (5332) : __LINE__, __FUNCTION__); + (5348) ? (5348) : __LINE__, __FUNCTION__); ; } ; @@ -9618,7 +9654,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5332:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5348:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -9631,7 +9667,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5333:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5349:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9643,7 +9679,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5333:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5349:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -9651,7 +9687,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5333:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5349:/ cond.else"); /*^block */ /*anyblock */ @@ -9665,7 +9701,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5333) ? (5333) : __LINE__, __FUNCTION__); + (5349) ? (5349) : __LINE__, __FUNCTION__); ; } ; @@ -9680,7 +9716,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5333:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5349:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -9693,7 +9729,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5334:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5350:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9719,7 +9755,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5334:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5350:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -9734,7 +9770,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5334:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5350:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -9747,7 +9783,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5334; + argtab[2].meltbp_long = 5350; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_altmatch nmat="; /*^apply.arg */ @@ -9782,7 +9818,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5334:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5350:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0; @@ -9795,7 +9831,7 @@ lab_endgetargs:; /*_.IF___V9*/ meltfptr[8] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5334:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5350:/ quasiblock"); /*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];; @@ -9804,7 +9840,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5334:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5350:/ clear"); /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V9*/ meltfptr[8] = 0; @@ -9817,10 +9853,10 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5336:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5352:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5337:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5353:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 0, "NREP_LOC"); @@ -9828,7 +9864,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5338:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5354:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 1, "NEXPR_CTYP"); @@ -9836,7 +9872,7 @@ lab_endgetargs:; meltfptr[13] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5339:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5355:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 2, "NAMATCH_MATCHED"); @@ -9844,7 +9880,7 @@ lab_endgetargs:; meltfptr[14] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5340:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5356:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 3, "NAMATCH_RESULT"); @@ -9852,7 +9888,7 @@ lab_endgetargs:; meltfptr[15] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5341:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5357:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 4, "NAMATCH_BODY"); @@ -9860,7 +9896,7 @@ lab_endgetargs:; meltfptr[16] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5342:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5358:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 5, "NAMATCH_FLAGS"); @@ -9868,7 +9904,7 @@ lab_endgetargs:; meltfptr[17] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5343:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5359:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMAT__V2*/ meltfptr[1]), 6, "NAMATCH_MDATAS"); @@ -9879,7 +9915,7 @@ lab_endgetargs:; /*_.OBODYL__V20*/ meltfptr[19] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));; - MELT_LOCATION ("warmelt-genobj.melt:5345:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5361:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -9941,7 +9977,7 @@ lab_endgetargs:; (meltgc_new_mapobjects ((meltobject_ptr_t) (( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[5])), ( /*_#I__L10*/ meltfnum[9])));; - MELT_LOCATION ("warmelt-genobj.melt:5350:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5366:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -9999,7 +10035,7 @@ lab_endgetargs:; /*_.ALTMATCH__V24*/ meltfptr[23] = /*_.INST__V25*/ meltfptr[24];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5357:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5373:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10025,7 +10061,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5357:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5373:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -10040,7 +10076,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5357:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5373:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10054,7 +10090,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5357; + argtab[2].meltbp_long = 5373; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_altmatch nmatched="; /*^apply.arg */ @@ -10104,7 +10140,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V28*/ meltfptr[27];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5357:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5373:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V28*/ meltfptr[27] = 0; @@ -10117,7 +10153,7 @@ lab_endgetargs:; /*_.IF___V27*/ meltfptr[26] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5357:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5373:/ quasiblock"); /*_.PROGN___V29*/ meltfptr[27] = /*_.IF___V27*/ meltfptr[26];; @@ -10126,7 +10162,7 @@ lab_endgetargs:; /*_.IFCPP___V26*/ meltfptr[25] = /*_.PROGN___V29*/ meltfptr[27];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5357:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5373:/ clear"); /*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.IF___V27*/ meltfptr[26] = 0; @@ -10139,7 +10175,7 @@ lab_endgetargs:; /*_.IFCPP___V26*/ meltfptr[25] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5360:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5376:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -10173,10 +10209,10 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-genobj.melt:5361:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5377:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5362:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5378:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -10200,7 +10236,7 @@ lab_endgetargs:; /*_.NSYMBRES__V31*/ meltfptr[27] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5363:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5379:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10221,7 +10257,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5364:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5380:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -10260,14 +10296,14 @@ lab_endgetargs:; /*_.OCLEARES__V33*/ meltfptr[32] = /*_.INST__V34*/ meltfptr[33];; { - MELT_LOCATION ("warmelt-genobj.melt:5368:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5384:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OBODYL__V20*/ meltfptr[19]), (melt_ptr_t) ( /*_.OCLEARES__V33*/ meltfptr[32])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5370:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5386:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10293,7 +10329,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5370:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5386:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -10308,7 +10344,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5370:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5386:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10322,7 +10358,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5370; + argtab[2].meltbp_long = 5386; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_altmatch nflags="; /*^apply.arg */ @@ -10342,7 +10378,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V37*/ meltfptr[36];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5370:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5386:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V37*/ meltfptr[36] = 0; @@ -10355,7 +10391,7 @@ lab_endgetargs:; /*_.IF___V36*/ meltfptr[35] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5370:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5386:/ quasiblock"); /*_.PROGN___V38*/ meltfptr[36] = /*_.IF___V36*/ meltfptr[35];; @@ -10364,7 +10400,7 @@ lab_endgetargs:; /*_.IFCPP___V35*/ meltfptr[34] = /*_.PROGN___V38*/ meltfptr[36];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5370:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5386:/ clear"); /*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.IF___V36*/ meltfptr[35] = 0; @@ -10377,10 +10413,10 @@ lab_endgetargs:; /*_.IFCPP___V35*/ meltfptr[34] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5371:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5387:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5374:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5390:/ quasiblock"); /*^newclosure */ @@ -10405,7 +10441,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]); ; /*_.LAMBDA___V40*/ meltfptr[36] = /*_.LAMBDA___V41*/ meltfptr[40];; - MELT_LOCATION ("warmelt-genobj.melt:5372:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5388:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10426,7 +10462,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5382:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5398:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10452,7 +10488,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5382:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5398:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -10467,7 +10503,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5382:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5398:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10481,7 +10517,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5382; + argtab[2].meltbp_long = 5398; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_altmatch oflags="; /*^apply.arg */ @@ -10501,7 +10537,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V45*/ meltfptr[44];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5382:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5398:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V45*/ meltfptr[44] = 0; @@ -10514,7 +10550,7 @@ lab_endgetargs:; /*_.IF___V44*/ meltfptr[43] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5382:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5398:/ quasiblock"); /*_.PROGN___V46*/ meltfptr[44] = /*_.IF___V44*/ meltfptr[43];; @@ -10523,7 +10559,7 @@ lab_endgetargs:; /*_.IFCPP___V43*/ meltfptr[42] = /*_.PROGN___V46*/ meltfptr[44];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5382:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5398:/ clear"); /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.IF___V44*/ meltfptr[43] = 0; @@ -10538,7 +10574,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5384:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5400:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10564,7 +10600,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5384:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5400:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -10579,7 +10615,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5384:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5400:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10593,7 +10629,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5384; + argtab[2].meltbp_long = 5400; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_altmatch nbody="; /*^apply.arg */ @@ -10613,7 +10649,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V49*/ meltfptr[48];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5384:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5400:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V49*/ meltfptr[48] = 0; @@ -10626,7 +10662,7 @@ lab_endgetargs:; /*_.IF___V48*/ meltfptr[44] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5384:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5400:/ quasiblock"); /*_.PROGN___V50*/ meltfptr[48] = /*_.IF___V48*/ meltfptr[44];; @@ -10635,7 +10671,7 @@ lab_endgetargs:; /*_.IFCPP___V47*/ meltfptr[43] = /*_.PROGN___V50*/ meltfptr[48];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5384:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5400:/ clear"); /*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.IF___V48*/ meltfptr[44] = 0; @@ -10666,7 +10702,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5388:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5404:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10692,7 +10728,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5388:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5404:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L20*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -10707,7 +10743,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5388:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5404:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10721,7 +10757,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5388; + argtab[2].meltbp_long = 5404; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_altmatch curncomp="; @@ -10748,7 +10784,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V54*/ meltfptr[53];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5388:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5404:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L21*/ meltfnum[20] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V54*/ meltfptr[53] = 0; @@ -10761,7 +10797,7 @@ lab_endgetargs:; /*_.IF___V53*/ meltfptr[52] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5388:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5404:/ quasiblock"); /*_.PROGN___V55*/ meltfptr[53] = /*_.IF___V53*/ meltfptr[52];; @@ -10770,7 +10806,7 @@ lab_endgetargs:; /*_.IFCPP___V52*/ meltfptr[48] = /*_.PROGN___V55*/ meltfptr[53];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5388:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5404:/ clear"); /*clear *//*_#MELT_NEED_DBG__L20*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.IF___V53*/ meltfptr[52] = 0; @@ -10783,7 +10819,7 @@ lab_endgetargs:; /*_.IFCPP___V52*/ meltfptr[48] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5389:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5405:/ quasiblock"); /*^checksignal */ @@ -10806,7 +10842,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5391:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5407:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10832,7 +10868,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5391:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5407:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L22*/ meltfnum[20]) /*then */ { /*^cond.then */ @@ -10847,7 +10883,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5391:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5407:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10861,7 +10897,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5391; + argtab[2].meltbp_long = 5407; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_altmatch curocomp="; @@ -10883,7 +10919,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V59*/ meltfptr[58];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5391:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5407:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L23*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V59*/ meltfptr[58] = 0; @@ -10896,7 +10932,7 @@ lab_endgetargs:; /*_.IF___V58*/ meltfptr[57] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5391:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5407:/ quasiblock"); /*_.PROGN___V60*/ meltfptr[58] = /*_.IF___V58*/ meltfptr[57];; @@ -10905,7 +10941,7 @@ lab_endgetargs:; /*_.IFCPP___V57*/ meltfptr[53] = /*_.PROGN___V60*/ meltfptr[58];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5391:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5407:/ clear"); /*clear *//*_#MELT_NEED_DBG__L22*/ meltfnum[20] = 0; /*^clear */ /*clear *//*_.IF___V58*/ meltfptr[57] = 0; @@ -10920,7 +10956,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5392:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5408:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10932,7 +10968,7 @@ lab_endgetargs:; (melt_magic_discr ((melt_ptr_t) ( /*_.CUROCOMP__V56*/ meltfptr[52])) == MELTOBMAG_OBJECT);; - MELT_LOCATION ("warmelt-genobj.melt:5392:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5408:/ cond"); /*cond */ if ( /*_#IS_OBJECT__L24*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -10940,7 +10976,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5392:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5408:/ cond.else"); /*^block */ /*anyblock */ @@ -10954,7 +10990,7 @@ lab_endgetargs:; melt_assert_failed (("check curocomp object"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5392) ? (5392) : __LINE__, + (5408) ? (5408) : __LINE__, __FUNCTION__); ; } @@ -10970,7 +11006,7 @@ lab_endgetargs:; /*_.IFCPP___V61*/ meltfptr[57] = /*_.IFELSE___V62*/ meltfptr[58];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5392:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5408:/ clear"); /*clear *//*_#IS_OBJECT__L24*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.IFELSE___V62*/ meltfptr[58] = 0; @@ -10983,7 +11019,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5393:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5409:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OBODYL__V20*/ meltfptr[19]), (melt_ptr_t) ( /*_.CUROCOMP__V56*/ @@ -10991,7 +11027,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-genobj.melt:5389:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5405:/ clear"); /*clear *//*_.CUROCOMP__V56*/ meltfptr[52] = 0; /*^clear */ /*clear *//*_.IFCPP___V57*/ meltfptr[53] = 0; @@ -11003,7 +11039,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-genobj.melt:5385:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5401:/ clear"); /*clear *//*_.CURNCOMP__V51*/ meltfptr[44] = 0; /*^clear */ /*clear *//*_#BODIX__L19*/ meltfnum[10] = 0; @@ -11013,7 +11049,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5395:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5411:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11039,7 +11075,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5395:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5411:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[20]) /*then */ { /*^cond.then */ @@ -11054,7 +11090,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5395:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5411:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11068,7 +11104,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5395; + argtab[2].meltbp_long = 5411; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_altmatch obodyl="; /*^apply.arg */ @@ -11088,7 +11124,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V65*/ meltfptr[53];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5395:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5411:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V65*/ meltfptr[53] = 0; @@ -11101,7 +11137,7 @@ lab_endgetargs:; /*_.IF___V64*/ meltfptr[52] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5395:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5411:/ quasiblock"); /*_.PROGN___V66*/ meltfptr[57] = /*_.IF___V64*/ meltfptr[52];; @@ -11110,7 +11146,7 @@ lab_endgetargs:; /*_.IFCPP___V63*/ meltfptr[58] = /*_.PROGN___V66*/ meltfptr[57];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5395:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5411:/ clear"); /*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[20] = 0; /*^clear */ /*clear *//*_.IF___V64*/ meltfptr[52] = 0; @@ -11123,7 +11159,7 @@ lab_endgetargs:; /*_.IFCPP___V63*/ meltfptr[58] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5396:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5412:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11141,7 +11177,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5397:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5413:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -11177,7 +11213,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5398:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5414:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11193,7 +11229,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5398:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5414:/ cond.else"); /*^block */ /*anyblock */ @@ -11207,7 +11243,7 @@ lab_endgetargs:; melt_assert_failed (("@@unimplemented compilobj_nrep_altmatch"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5398) ? (5398) : __LINE__, __FUNCTION__); + (5414) ? (5414) : __LINE__, __FUNCTION__); ; } ; @@ -11222,7 +11258,7 @@ lab_endgetargs:; /*_.IFCPP___V68*/ meltfptr[52] = /*_.IFELSE___V69*/ meltfptr[57];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5398:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5414:/ clear"); /*clear *//*_.IFELSE___V69*/ meltfptr[57] = 0; } @@ -11235,7 +11271,7 @@ lab_endgetargs:; /*_.LET___V39*/ meltfptr[35] = /*_.IFCPP___V68*/ meltfptr[52];; - MELT_LOCATION ("warmelt-genobj.melt:5371:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5387:/ clear"); /*clear *//*_.LAMBDA___V40*/ meltfptr[36] = 0; /*^clear */ /*clear *//*_.OFLAGS__V42*/ meltfptr[41] = 0; @@ -11251,7 +11287,7 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V68*/ meltfptr[52] = 0; /*_.LET___V30*/ meltfptr[26] = /*_.LET___V39*/ meltfptr[35];; - MELT_LOCATION ("warmelt-genobj.melt:5361:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5377:/ clear"); /*clear *//*_.NSYMBRES__V31*/ meltfptr[27] = 0; /*^clear */ /*clear *//*_.OBVARES__V32*/ meltfptr[31] = 0; @@ -11263,7 +11299,7 @@ lab_endgetargs:; /*clear *//*_.LET___V39*/ meltfptr[35] = 0; /*_.LET___V12*/ meltfptr[8] = /*_.LET___V30*/ meltfptr[26];; - MELT_LOCATION ("warmelt-genobj.melt:5336:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5352:/ clear"); /*clear *//*_.NLOC__V13*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.NCTYP__V14*/ meltfptr[13] = 0; @@ -11303,14 +11339,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V26*/ meltfptr[25] = 0; /*^clear */ /*clear *//*_.LET___V30*/ meltfptr[26] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5331:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:5331:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5347:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11408,7 +11456,7 @@ meltrout_157_warmelt_genobj_LAMBDA___50__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5374:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5390:/ getarg"); /*_.CURNFLAG__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -11426,7 +11474,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5375:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5391:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11452,7 +11500,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5375:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5391:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -11467,7 +11515,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5375:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5391:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11480,7 +11528,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5375; + argtab[2].meltbp_long = 5391; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_altmatch/lambda curnflag="; @@ -11505,7 +11553,7 @@ lab_endgetargs:; /*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5375:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5391:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0; @@ -11518,7 +11566,7 @@ lab_endgetargs:; /*_.IF___V4*/ meltfptr[3] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5375:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5391:/ quasiblock"); /*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];; @@ -11527,7 +11575,7 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5375:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5391:/ clear"); /*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V4*/ meltfptr[3] = 0; @@ -11540,7 +11588,7 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5376:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5392:/ quasiblock"); /*^checksignal */ @@ -11563,7 +11611,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5378:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5394:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11589,7 +11637,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5378:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5394:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -11604,7 +11652,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5378:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5394:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11617,7 +11665,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5378; + argtab[2].meltbp_long = 5394; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_altmatch/lambda curoflag="; @@ -11638,7 +11686,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V11*/ meltfptr[10];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5378:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5394:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] = 0; @@ -11651,7 +11699,7 @@ lab_endgetargs:; /*_.IF___V10*/ meltfptr[9] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5378:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5394:/ quasiblock"); /*_.PROGN___V12*/ meltfptr[10] = /*_.IF___V10*/ meltfptr[9];; @@ -11660,7 +11708,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[8] = /*_.PROGN___V12*/ meltfptr[10];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5378:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5394:/ clear"); /*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.IF___V10*/ meltfptr[9] = 0; @@ -11673,32 +11721,56 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[8] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5379:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5395:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.CUROFLAG__V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:5379:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5395:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V7*/ meltfptr[3] = /*_.RETURN___V13*/ meltfptr[9];; - MELT_LOCATION ("warmelt-genobj.melt:5376:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5392:/ clear"); /*clear *//*_.CUROFLAG__V8*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.IFCPP___V9*/ meltfptr[8] = 0; /*^clear */ /*clear *//*_.RETURN___V13*/ meltfptr[9] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5374:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5390:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[3];; - MELT_LOCATION ("warmelt-genobj.melt:5374:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5390:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11798,7 +11870,7 @@ meltrout_158_warmelt_genobj_COMPILOBJ_NREP_MATCHLABEL (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5404:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5420:/ getarg"); /*_.NMLAB__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -11819,7 +11891,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5405:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5421:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11831,7 +11903,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NMLAB__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_MATCH_LABEL */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:5405:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5421:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -11839,7 +11911,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5405:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5421:/ cond.else"); /*^block */ /*anyblock */ @@ -11853,7 +11925,7 @@ lab_endgetargs:; melt_assert_failed (("check nmlab"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5405) ? (5405) : __LINE__, __FUNCTION__); + (5421) ? (5421) : __LINE__, __FUNCTION__); ; } ; @@ -11868,7 +11940,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5405:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5421:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -11881,7 +11953,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5406:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5422:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11893,7 +11965,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5406:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5422:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -11901,7 +11973,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5406:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5422:/ cond.else"); /*^block */ /*anyblock */ @@ -11915,7 +11987,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5406) ? (5406) : __LINE__, __FUNCTION__); + (5422) ? (5422) : __LINE__, __FUNCTION__); ; } ; @@ -11930,7 +12002,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5406:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5422:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -11943,7 +12015,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5407:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5423:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11969,7 +12041,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5407:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5423:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -11984,7 +12056,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5407:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5423:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11997,7 +12069,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5407; + argtab[2].meltbp_long = 5423; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_matchlabel nmlab="; /*^apply.arg */ @@ -12023,7 +12095,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5407:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5423:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0; @@ -12036,7 +12108,7 @@ lab_endgetargs:; /*_.IF___V9*/ meltfptr[8] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5407:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5423:/ quasiblock"); /*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];; @@ -12045,7 +12117,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = /*_.PROGN___V11*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5407:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5423:/ clear"); /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V9*/ meltfptr[8] = 0; @@ -12058,10 +12130,10 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5408:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5424:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5409:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5425:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -12086,7 +12158,7 @@ lab_endgetargs:; /*_.NLOC__V13*/ meltfptr[9] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5410:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5426:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -12110,7 +12182,7 @@ lab_endgetargs:; /*_.NSTEP__V14*/ meltfptr[13] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5411:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5427:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -12136,7 +12208,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5413:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5429:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12162,7 +12234,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5413:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5429:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -12177,7 +12249,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5413:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5429:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12190,7 +12262,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5413; + argtab[2].meltbp_long = 5429; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_matchlabel stepixv="; /*^apply.arg */ @@ -12216,7 +12288,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V18*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5413:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5429:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V18*/ meltfptr[17] = 0; @@ -12229,7 +12301,7 @@ lab_endgetargs:; /*_.IF___V17*/ meltfptr[16] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5413:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5429:/ quasiblock"); /*_.PROGN___V19*/ meltfptr[17] = /*_.IF___V17*/ meltfptr[16];; @@ -12238,7 +12310,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[15] = /*_.PROGN___V19*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5413:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5429:/ clear"); /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IF___V17*/ meltfptr[16] = 0; @@ -12253,7 +12325,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5414:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5430:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -12262,7 +12334,7 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-genobj.melt:5415:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5431:/ quasiblock"); /*^checksignal */ @@ -12299,7 +12371,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5421:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5437:/ locexp"); /* error_plain */ melt_error_str ((melt_ptr_t) ( /*_.NLOC__V13*/ meltfptr[9]), ("not fully implemented compilobj_nrep_matchlabel"), @@ -12308,7 +12380,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5422:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5438:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12334,7 +12406,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5422:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5438:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -12349,7 +12421,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5422:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5438:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12362,7 +12434,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5422; + argtab[2].meltbp_long = 5438; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_matchlabel objm="; /*^apply.arg */ @@ -12382,7 +12454,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V24*/ meltfptr[23];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5422:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5438:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] = 0; @@ -12395,7 +12467,7 @@ lab_endgetargs:; /*_.IF___V23*/ meltfptr[22] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5422:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5438:/ quasiblock"); /*_.PROGN___V25*/ meltfptr[23] = /*_.IF___V23*/ meltfptr[22];; @@ -12404,7 +12476,7 @@ lab_endgetargs:; /*_.IFCPP___V22*/ meltfptr[21] = /*_.PROGN___V25*/ meltfptr[23];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5422:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5438:/ clear"); /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V23*/ meltfptr[22] = 0; @@ -12417,19 +12489,31 @@ lab_endgetargs:; /*_.IFCPP___V22*/ meltfptr[21] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5423:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5439:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBJM__V21*/ meltfptr[17];; - MELT_LOCATION ("warmelt-genobj.melt:5423:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5439:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V20*/ meltfptr[16] = /*_.RETURN___V26*/ meltfptr[22];; - MELT_LOCATION ("warmelt-genobj.melt:5415:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5431:/ clear"); /*clear *//*_.OBJM__V21*/ meltfptr[17] = 0; /*^clear */ /*clear *//*_.IFCPP___V22*/ meltfptr[21] = 0; @@ -12437,7 +12521,7 @@ lab_endgetargs:; /*clear *//*_.RETURN___V26*/ meltfptr[22] = 0; /*_.LET___V12*/ meltfptr[8] = /*_.LET___V20*/ meltfptr[16];; - MELT_LOCATION ("warmelt-genobj.melt:5408:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5424:/ clear"); /*clear *//*_.NLOC__V13*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.NSTEP__V14*/ meltfptr[13] = 0; @@ -12447,14 +12531,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.LET___V20*/ meltfptr[16] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5404:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5420:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-genobj.melt:5404:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5420:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -12558,7 +12654,7 @@ meltrout_159_warmelt_genobj_COMPILOBJ_NREP_MATCHFLAG (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5431:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5447:/ getarg"); /*_.NMFLAG__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -12579,7 +12675,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5432:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5448:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12605,7 +12701,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5432:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5448:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -12625,7 +12721,7 @@ lab_endgetargs:; /*_.DISCRIM__V6*/ meltfptr[5] = ((melt_ptr_t) (melt_discr ((melt_ptr_t) ( /*_.NMFLAG__V2*/ meltfptr[1]))));; - MELT_LOCATION ("warmelt-genobj.melt:5432:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5448:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12638,7 +12734,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5432; + argtab[2].meltbp_long = 5448; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_matchflag nmflag="; /*^apply.arg */ @@ -12669,7 +12765,7 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5432:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5448:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.DISCRIM__V6*/ meltfptr[5] = 0; @@ -12684,7 +12780,7 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5432:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5448:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];; @@ -12693,7 +12789,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V8*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5432:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5448:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V5*/ meltfptr[4] = 0; @@ -12708,7 +12804,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5434:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5450:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12720,7 +12816,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NMFLAG__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_MATCH_FLAG */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5434:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5450:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -12728,7 +12824,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5434:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5450:/ cond.else"); /*^block */ /*anyblock */ @@ -12742,7 +12838,7 @@ lab_endgetargs:; melt_assert_failed (("check nmflag"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5434) ? (5434) : __LINE__, __FUNCTION__); + (5450) ? (5450) : __LINE__, __FUNCTION__); ; } ; @@ -12757,7 +12853,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[6] = /*_.IFELSE___V10*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5434:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5450:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[4] = 0; @@ -12770,7 +12866,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5435:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5451:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12782,7 +12878,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:5435:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5451:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -12790,7 +12886,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5435:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5451:/ cond.else"); /*^block */ /*anyblock */ @@ -12804,7 +12900,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5435) ? (5435) : __LINE__, __FUNCTION__); + (5451) ? (5451) : __LINE__, __FUNCTION__); ; } ; @@ -12819,7 +12915,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[5] = /*_.IFELSE___V12*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5435:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5451:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[4] = 0; @@ -12830,7 +12926,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[5] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5436:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5452:/ quasiblock"); /*^getslot */ @@ -12841,7 +12937,7 @@ lab_endgetargs:; meltfptr[13] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5437:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5453:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMFLAG__V2*/ meltfptr[1]), 1, "NRPFLA_FLAG"); @@ -12849,7 +12945,7 @@ lab_endgetargs:; meltfptr[14] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5438:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5454:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMFLAG__V2*/ meltfptr[1]), 2, "NRPFLA_NMATCH"); @@ -12857,7 +12953,7 @@ lab_endgetargs:; meltfptr[15] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5439:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5455:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -12881,7 +12977,7 @@ lab_endgetargs:; /*_.ALTMATCHDATA__V17*/ meltfptr[16] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5440:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5456:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -12908,7 +13004,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5442:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5458:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12934,7 +13030,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5442:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5458:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -12949,7 +13045,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5442:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5458:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12962,7 +13058,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5442; + argtab[2].meltbp_long = 5458; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_matchflag nrfla="; /*^apply.arg */ @@ -12994,7 +13090,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V21*/ meltfptr[20];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5442:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5458:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V21*/ meltfptr[20] = 0; @@ -13007,7 +13103,7 @@ lab_endgetargs:; /*_.IF___V20*/ meltfptr[19] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5442:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5458:/ quasiblock"); /*_.PROGN___V22*/ meltfptr[20] = /*_.IF___V20*/ meltfptr[19];; @@ -13016,7 +13112,7 @@ lab_endgetargs:; /*_.IFCPP___V19*/ meltfptr[18] = /*_.PROGN___V22*/ meltfptr[20];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5442:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5458:/ clear"); /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V20*/ meltfptr[19] = 0; @@ -13031,7 +13127,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5443:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5459:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13043,7 +13139,7 @@ lab_endgetargs:; /*is_mapobject: */ (melt_magic_discr ((melt_ptr_t) ( /*_.OFLAGMAP__V18*/ meltfptr[17])) == MELTOBMAG_MAPOBJECTS);; - MELT_LOCATION ("warmelt-genobj.melt:5443:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5459:/ cond"); /*cond */ if ( /*_#IS_MAPOBJECT__L7*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -13051,7 +13147,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5443:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5459:/ cond.else"); /*^block */ /*anyblock */ @@ -13065,7 +13161,7 @@ lab_endgetargs:; melt_assert_failed (("check oflagmap"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5443) ? (5443) : __LINE__, __FUNCTION__); + (5459) ? (5459) : __LINE__, __FUNCTION__); ; } ; @@ -13080,7 +13176,7 @@ lab_endgetargs:; /*_.IFCPP___V23*/ meltfptr[19] = /*_.IFELSE___V24*/ meltfptr[20];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5443:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5459:/ clear"); /*clear *//*_#IS_MAPOBJECT__L7*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V24*/ meltfptr[20] = 0; @@ -13091,7 +13187,7 @@ lab_endgetargs:; /*_.IFCPP___V23*/ meltfptr[19] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5444:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5460:/ quasiblock"); /*_.OBJMF__V26*/ meltfptr[25] = @@ -13100,7 +13196,7 @@ lab_endgetargs:; ( /*_.OFLAGMAP__V18*/ meltfptr[17]), (meltobject_ptr_t) ( /*_.NMFLAG__V2*/ meltfptr[1]));; - MELT_LOCATION ("warmelt-genobj.melt:5446:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5462:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -13113,7 +13209,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5448:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5464:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13139,7 +13235,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5448:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5464:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -13154,7 +13250,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5448:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5464:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13168,7 +13264,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5448; + argtab[2].meltbp_long = 5464; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_matchflag found & returning objmf="; @@ -13190,7 +13286,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V30*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5448:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5464:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V30*/ meltfptr[29] = 0; @@ -13203,7 +13299,7 @@ lab_endgetargs:; /*_.IF___V29*/ meltfptr[28] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5448:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5464:/ quasiblock"); /*_.PROGN___V31*/ meltfptr[29] = /*_.IF___V29*/ meltfptr[28];; @@ -13212,7 +13308,7 @@ lab_endgetargs:; /*_.IFCPP___V28*/ meltfptr[27] = /*_.PROGN___V31*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5448:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5464:/ clear"); /*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V29*/ meltfptr[28] = 0; @@ -13227,7 +13323,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5449:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5465:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13240,7 +13336,7 @@ lab_endgetargs:; ( /*_.OBJMF__V26*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_OBJFLAG */ meltfrout->tabval[4])));; - MELT_LOCATION ("warmelt-genobj.melt:5449:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5465:/ cond"); /*cond */ if ( /*_#IS_A__L10*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -13248,7 +13344,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5449:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5465:/ cond.else"); /*^block */ /*anyblock */ @@ -13262,7 +13358,7 @@ lab_endgetargs:; melt_assert_failed (("check ojbmf"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5449) ? (5449) : __LINE__, + (5465) ? (5465) : __LINE__, __FUNCTION__); ; } @@ -13278,7 +13374,7 @@ lab_endgetargs:; /*_.IFCPP___V32*/ meltfptr[28] = /*_.IFELSE___V33*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5449:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5465:/ clear"); /*clear *//*_#IS_A__L10*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V33*/ meltfptr[29] = 0; @@ -13289,17 +13385,29 @@ lab_endgetargs:; /*_.IFCPP___V32*/ meltfptr[28] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5450:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5466:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBJMF__V26*/ meltfptr[25];; - MELT_LOCATION ("warmelt-genobj.melt:5450:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5466:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-genobj.melt:5447:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5463:/ quasiblock"); /*_.PROGN___V35*/ meltfptr[34] = /*_.RETURN___V34*/ meltfptr[29];; @@ -13308,7 +13416,7 @@ lab_endgetargs:; /*_.IF___V27*/ meltfptr[26] = /*_.PROGN___V35*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5446:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5462:/ clear"); /*clear *//*_.IFCPP___V28*/ meltfptr[27] = 0; /*^clear */ /*clear *//*_.IFCPP___V32*/ meltfptr[28] = 0; @@ -13325,10 +13433,10 @@ lab_endgetargs:; /*_.IF___V27*/ meltfptr[26] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5451:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5467:/ checksignal"); MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-genobj.melt:5454:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5470:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -13353,7 +13461,7 @@ lab_endgetargs:; /*_.MFLAG_STRING__V36*/ meltfptr[27] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5455:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5471:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -13378,7 +13486,7 @@ lab_endgetargs:; /*_.MFLAG_RANK__V37*/ meltfptr[28] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5451:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5467:/ quasiblock"); /*^rawallocobj */ @@ -13434,12 +13542,12 @@ lab_endgetargs:; "OBFLAG_RANK"); ; /*_.INST___V38*/ meltfptr[29] = /*_.INST__V39*/ meltfptr[34];; - MELT_LOCATION ("warmelt-genobj.melt:5451:/ compute"); + MELT_LOCATION ("warmelt-genobj.melt:5467:/ compute"); /*_.OBJMF__V26*/ meltfptr[25] = /*_.SETQ___V40*/ meltfptr[39] = /*_.INST___V38*/ meltfptr[29];; { - MELT_LOCATION ("warmelt-genobj.melt:5456:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5472:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.OFLAGMAP__V18*/ meltfptr[17]), (meltobject_ptr_t) ( /*_.NMFLAG__V2*/ @@ -13449,7 +13557,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5457:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5473:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13475,7 +13583,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5457:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5473:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -13490,7 +13598,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5457:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5473:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13504,7 +13612,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5457; + argtab[2].meltbp_long = 5473; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_matchflag new objmf="; @@ -13531,7 +13639,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V43*/ meltfptr[42];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5457:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5473:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V43*/ meltfptr[42] = 0; @@ -13544,7 +13652,7 @@ lab_endgetargs:; /*_.IF___V42*/ meltfptr[41] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5457:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5473:/ quasiblock"); /*_.PROGN___V44*/ meltfptr[42] = /*_.IF___V42*/ meltfptr[41];; @@ -13553,7 +13661,7 @@ lab_endgetargs:; /*_.IFCPP___V41*/ meltfptr[40] = /*_.PROGN___V44*/ meltfptr[42];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5457:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5473:/ clear"); /*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V42*/ meltfptr[41] = 0; @@ -13566,19 +13674,31 @@ lab_endgetargs:; /*_.IFCPP___V41*/ meltfptr[40] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5458:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5474:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBJMF__V26*/ meltfptr[25];; - MELT_LOCATION ("warmelt-genobj.melt:5458:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5474:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V25*/ meltfptr[20] = /*_.RETURN___V45*/ meltfptr[41];; - MELT_LOCATION ("warmelt-genobj.melt:5444:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5460:/ clear"); /*clear *//*_.OBJMF__V26*/ meltfptr[25] = 0; /*^clear */ /*clear *//*_.IF___V27*/ meltfptr[26] = 0; @@ -13596,7 +13716,7 @@ lab_endgetargs:; /*clear *//*_.RETURN___V45*/ meltfptr[41] = 0; /*_.LET___V13*/ meltfptr[4] = /*_.LET___V25*/ meltfptr[20];; - MELT_LOCATION ("warmelt-genobj.melt:5436:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5452:/ clear"); /*clear *//*_.NLOC__V14*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.NRFLA__V15*/ meltfptr[14] = 0; @@ -13612,14 +13732,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V23*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_.LET___V25*/ meltfptr[20] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5431:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5447:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:5431:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5447:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13724,7 +13856,7 @@ meltrout_160_warmelt_genobj_COMPILOBJ_NREP_MATCHDATAINIT (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5464:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5480:/ getarg"); /*_.NMDAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -13745,7 +13877,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5465:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5481:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13771,7 +13903,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5465:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5481:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -13791,7 +13923,7 @@ lab_endgetargs:; /*_.DISCRIM__V6*/ meltfptr[5] = ((melt_ptr_t) (melt_discr ((melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1]))));; - MELT_LOCATION ("warmelt-genobj.melt:5465:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5481:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13804,7 +13936,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5465; + argtab[2].meltbp_long = 5481; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_matchdatainit nmdat="; @@ -13836,7 +13968,7 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5465:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5481:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.DISCRIM__V6*/ meltfptr[5] = 0; @@ -13851,7 +13983,7 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5465:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5481:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];; @@ -13860,7 +13992,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V8*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5465:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5481:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V5*/ meltfptr[4] = 0; @@ -13875,7 +14007,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5467:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5483:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13886,7 +14018,7 @@ lab_endgetargs:; /*_#IS_A__L3*/ meltfnum[1] = melt_is_instance_of ((melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_MATCH_DATA_INITIALIZER */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5467:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5483:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -13894,7 +14026,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5467:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5483:/ cond.else"); /*^block */ /*anyblock */ @@ -13908,7 +14040,7 @@ lab_endgetargs:; melt_assert_failed (("check nmdat"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5467) ? (5467) : __LINE__, __FUNCTION__); + (5483) ? (5483) : __LINE__, __FUNCTION__); ; } ; @@ -13923,7 +14055,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[6] = /*_.IFELSE___V10*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5467:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5483:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[4] = 0; @@ -13936,7 +14068,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5468:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5484:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13948,7 +14080,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:5468:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5484:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -13956,7 +14088,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5468:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5484:/ cond.else"); /*^block */ /*anyblock */ @@ -13970,7 +14102,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5468) ? (5468) : __LINE__, __FUNCTION__); + (5484) ? (5484) : __LINE__, __FUNCTION__); ; } ; @@ -13985,7 +14117,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[5] = /*_.IFELSE___V12*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5468:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5484:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[4] = 0; @@ -13996,10 +14128,10 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[5] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5469:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5485:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5470:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5486:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1]), 0, "NREP_LOC"); @@ -14007,7 +14139,7 @@ lab_endgetargs:; meltfptr[13] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5471:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5487:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -14031,7 +14163,7 @@ lab_endgetargs:; /*_.NDATA__V15*/ meltfptr[14] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5472:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5488:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -14055,7 +14187,7 @@ lab_endgetargs:; /*_.NDATATYPE__V16*/ meltfptr[15] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5473:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5489:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -14079,7 +14211,7 @@ lab_endgetargs:; /*_.NDATARANK__V17*/ meltfptr[16] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5474:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5490:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -14103,7 +14235,7 @@ lab_endgetargs:; /*_.MATDATA__V18*/ meltfptr[17] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5475:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5491:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -14127,7 +14259,7 @@ lab_endgetargs:; /*_.ALTMATCH__V19*/ meltfptr[18] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5476:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5492:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -14151,7 +14283,7 @@ lab_endgetargs:; /*_.MDATA_SYMB__V20*/ meltfptr[19] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5476:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5492:/ cond"); /*cond */ if ( /*_.MDATA_SYMB__V20*/ meltfptr[19]) /*then */ { /*^cond.then */ @@ -14159,7 +14291,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5476:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5492:/ cond.else"); /*^block */ /*anyblock */ @@ -14184,7 +14316,7 @@ lab_endgetargs:; /*_.CLONE_SYMBOL__V22*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5476:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5492:/ clear"); /*clear *//*_.CLONE_SYMBOL__V22*/ meltfptr[21] = 0; } ; @@ -14192,7 +14324,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5478:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5494:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -14203,7 +14335,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5479:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5495:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14229,7 +14361,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5479:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5495:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -14244,7 +14376,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5479:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5495:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14257,7 +14389,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5479; + argtab[2].meltbp_long = 5495; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_matchdatainit ndata="; @@ -14308,7 +14440,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V25*/ meltfptr[24];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5479:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5495:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V25*/ meltfptr[24] = 0; @@ -14321,7 +14453,7 @@ lab_endgetargs:; /*_.IF___V24*/ meltfptr[23] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5479:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5495:/ quasiblock"); /*_.PROGN___V26*/ meltfptr[24] = /*_.IF___V24*/ meltfptr[23];; @@ -14330,7 +14462,7 @@ lab_endgetargs:; /*_.IFCPP___V23*/ meltfptr[21] = /*_.PROGN___V26*/ meltfptr[24];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5479:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5495:/ clear"); /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V24*/ meltfptr[23] = 0; @@ -14343,10 +14475,10 @@ lab_endgetargs:; /*_.IFCPP___V23*/ meltfptr[21] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5483:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5499:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5484:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5500:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14367,7 +14499,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5485:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5501:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -14391,7 +14523,7 @@ lab_endgetargs:; /*_.ALDATAMAP__V29*/ meltfptr[28] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5486:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5502:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -14430,7 +14562,7 @@ lab_endgetargs:; /*_.OBCL__V30*/ meltfptr[29] = /*_.INST__V31*/ meltfptr[30];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5490:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5506:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14456,7 +14588,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5490:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5506:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -14471,7 +14603,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5490:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5506:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14484,7 +14616,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5490; + argtab[2].meltbp_long = 5506; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_matchdatainit obvloc="; @@ -14517,7 +14649,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V34*/ meltfptr[33];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5490:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5506:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V34*/ meltfptr[33] = 0; @@ -14530,7 +14662,7 @@ lab_endgetargs:; /*_.IF___V33*/ meltfptr[32] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5490:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5506:/ quasiblock"); /*_.PROGN___V35*/ meltfptr[33] = /*_.IF___V33*/ meltfptr[32];; @@ -14539,7 +14671,7 @@ lab_endgetargs:; /*_.IFCPP___V32*/ meltfptr[31] = /*_.PROGN___V35*/ meltfptr[33];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5490:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5506:/ clear"); /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V33*/ meltfptr[32] = 0; @@ -14554,7 +14686,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5493:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5509:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14572,7 +14704,7 @@ lab_endgetargs:; /*_#NULL__L9*/ meltfnum[1] = (( /*_.MAPOBJECT_GET__V37*/ meltfptr[33]) == NULL);; - MELT_LOCATION ("warmelt-genobj.melt:5493:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5509:/ cond"); /*cond */ if ( /*_#NULL__L9*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -14580,7 +14712,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5493:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5509:/ cond.else"); /*^block */ /*anyblock */ @@ -14594,7 +14726,7 @@ lab_endgetargs:; melt_assert_failed (("unknown ndata in aldatamap"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5493) ? (5493) : __LINE__, __FUNCTION__); + (5509) ? (5509) : __LINE__, __FUNCTION__); ; } ; @@ -14609,7 +14741,7 @@ lab_endgetargs:; /*_.IFCPP___V36*/ meltfptr[32] = /*_.IFELSE___V38*/ meltfptr[37];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5493:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5509:/ clear"); /*clear *//*_.MAPOBJECT_GET__V37*/ meltfptr[33] = 0; /*^clear */ /*clear *//*_#NULL__L9*/ meltfnum[1] = 0; @@ -14624,7 +14756,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5494:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5510:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.ALDATAMAP__V29*/ meltfptr[28]), (meltobject_ptr_t) ( /*_.NDATA__V15*/ @@ -14634,7 +14766,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5495:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5511:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14660,7 +14792,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5495:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5511:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -14675,7 +14807,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5495:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5511:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14689,7 +14821,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5495; + argtab[2].meltbp_long = 5511; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_matchdatainit updated aldatamap="; @@ -14716,7 +14848,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V41*/ meltfptr[40];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5495:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5511:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V41*/ meltfptr[40] = 0; @@ -14729,7 +14861,7 @@ lab_endgetargs:; /*_.IF___V40*/ meltfptr[37] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5495:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5511:/ quasiblock"); /*_.PROGN___V42*/ meltfptr[40] = /*_.IF___V40*/ meltfptr[37];; @@ -14738,7 +14870,7 @@ lab_endgetargs:; /*_.IFCPP___V39*/ meltfptr[33] = /*_.PROGN___V42*/ meltfptr[40];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5495:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5511:/ clear"); /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V40*/ meltfptr[37] = 0; @@ -14751,19 +14883,31 @@ lab_endgetargs:; /*_.IFCPP___V39*/ meltfptr[33] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5497:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5513:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBCL__V30*/ meltfptr[29];; - MELT_LOCATION ("warmelt-genobj.melt:5497:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5513:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V27*/ meltfptr[23] = /*_.RETURN___V43*/ meltfptr[37];; - MELT_LOCATION ("warmelt-genobj.melt:5483:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5499:/ clear"); /*clear *//*_.OBVLOC__V28*/ meltfptr[24] = 0; /*^clear */ /*clear *//*_.ALDATAMAP__V29*/ meltfptr[28] = 0; @@ -14779,7 +14923,7 @@ lab_endgetargs:; /*clear *//*_.RETURN___V43*/ meltfptr[37] = 0; /*_.LET___V13*/ meltfptr[4] = /*_.LET___V27*/ meltfptr[23];; - MELT_LOCATION ("warmelt-genobj.melt:5469:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5485:/ clear"); /*clear *//*_.NLOC__V14*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.NDATA__V15*/ meltfptr[14] = 0; @@ -14799,14 +14943,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V23*/ meltfptr[21] = 0; /*^clear */ /*clear *//*_.LET___V27*/ meltfptr[23] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5464:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5480:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:5464:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5480:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14910,7 +15066,7 @@ meltrout_161_warmelt_genobj_COMPILOBJ_NREP_MATCHEDATA (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5505:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5521:/ getarg"); /*_.NMDAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -14931,7 +15087,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5506:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5522:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14957,7 +15113,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5506:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5522:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -14977,7 +15133,7 @@ lab_endgetargs:; /*_.DISCRIM__V6*/ meltfptr[5] = ((melt_ptr_t) (melt_discr ((melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1]))));; - MELT_LOCATION ("warmelt-genobj.melt:5506:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5522:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14990,7 +15146,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5506; + argtab[2].meltbp_long = 5522; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_matchedata nmdat="; /*^apply.arg */ @@ -15021,7 +15177,7 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5506:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5522:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.DISCRIM__V6*/ meltfptr[5] = 0; @@ -15036,7 +15192,7 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5506:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5522:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];; @@ -15045,7 +15201,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V8*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5506:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5522:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V5*/ meltfptr[4] = 0; @@ -15060,7 +15216,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5508:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5524:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15072,7 +15228,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_MATCHED_DATA */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5508:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5524:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -15080,7 +15236,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5508:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5524:/ cond.else"); /*^block */ /*anyblock */ @@ -15094,7 +15250,7 @@ lab_endgetargs:; melt_assert_failed (("check nmdat"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5508) ? (5508) : __LINE__, __FUNCTION__); + (5524) ? (5524) : __LINE__, __FUNCTION__); ; } ; @@ -15109,7 +15265,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[6] = /*_.IFELSE___V10*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5508:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5524:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[4] = 0; @@ -15122,7 +15278,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5509:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5525:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15134,7 +15290,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:5509:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5525:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -15142,7 +15298,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5509:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5525:/ cond.else"); /*^block */ /*anyblock */ @@ -15156,7 +15312,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5509) ? (5509) : __LINE__, __FUNCTION__); + (5525) ? (5525) : __LINE__, __FUNCTION__); ; } ; @@ -15171,7 +15327,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[5] = /*_.IFELSE___V12*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5509:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5525:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[4] = 0; @@ -15182,10 +15338,10 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[5] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5510:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5526:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5511:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5527:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1]), 0, "NREP_LOC"); @@ -15193,7 +15349,7 @@ lab_endgetargs:; meltfptr[13] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5512:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5528:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMDAT__V2*/ meltfptr[1]), 1, "NRMATD_CTYPE"); @@ -15201,7 +15357,7 @@ lab_endgetargs:; meltfptr[14] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5513:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5529:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -15225,7 +15381,7 @@ lab_endgetargs:; /*_.NRMDATA__V16*/ meltfptr[15] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5514:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5530:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -15249,7 +15405,7 @@ lab_endgetargs:; /*_.NRMRANK__V17*/ meltfptr[16] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5515:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5531:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -15273,7 +15429,7 @@ lab_endgetargs:; /*_.ALTMATCH__V18*/ meltfptr[17] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5516:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5532:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -15307,7 +15463,7 @@ lab_endgetargs:; meltfptr[1]));; { - MELT_LOCATION ("warmelt-genobj.melt:5519:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5535:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -15318,7 +15474,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5520:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5536:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15344,7 +15500,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5520:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5536:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -15365,7 +15521,7 @@ lab_endgetargs:; ((melt_ptr_t) (melt_discr ((melt_ptr_t) ( /*_.OBMDAT__V20*/ meltfptr[19]))));; - MELT_LOCATION ("warmelt-genobj.melt:5520:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5536:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15378,7 +15534,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5520; + argtab[2].meltbp_long = 5536; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_matchedata altmatch="; @@ -15417,7 +15573,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V24*/ meltfptr[23];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5520:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5536:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.DISCRIM__V23*/ meltfptr[22] = 0; @@ -15432,7 +15588,7 @@ lab_endgetargs:; /*_.IF___V22*/ meltfptr[21] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5520:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5536:/ quasiblock"); /*_.PROGN___V25*/ meltfptr[22] = /*_.IF___V22*/ meltfptr[21];; @@ -15441,7 +15597,7 @@ lab_endgetargs:; /*_.IFCPP___V21*/ meltfptr[20] = /*_.PROGN___V25*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5520:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5536:/ clear"); /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V22*/ meltfptr[21] = 0; @@ -15456,7 +15612,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5522:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5538:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15468,7 +15624,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OBMDAT__V20*/ meltfptr[19]), (melt_ptr_t) (( /*!CLASS_OBJVALUE */ meltfrout-> tabval[4])));; - MELT_LOCATION ("warmelt-genobj.melt:5522:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5538:/ cond"); /*cond */ if ( /*_#IS_A__L7*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -15476,7 +15632,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5522:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5538:/ cond.else"); /*^block */ /*anyblock */ @@ -15490,7 +15646,7 @@ lab_endgetargs:; melt_assert_failed (("check obmdat"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5522) ? (5522) : __LINE__, __FUNCTION__); + (5538) ? (5538) : __LINE__, __FUNCTION__); ; } ; @@ -15505,7 +15661,7 @@ lab_endgetargs:; /*_.IFCPP___V26*/ meltfptr[23] = /*_.IFELSE___V27*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5522:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5538:/ clear"); /*clear *//*_#IS_A__L7*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V27*/ meltfptr[21] = 0; @@ -15516,19 +15672,31 @@ lab_endgetargs:; /*_.IFCPP___V26*/ meltfptr[23] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5523:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5539:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBMDAT__V20*/ meltfptr[19];; - MELT_LOCATION ("warmelt-genobj.melt:5523:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5539:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V13*/ meltfptr[4] = /*_.RETURN___V28*/ meltfptr[22];; - MELT_LOCATION ("warmelt-genobj.melt:5510:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5526:/ clear"); /*clear *//*_.NLOC__V14*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.NCTYPE__V15*/ meltfptr[14] = 0; @@ -15548,14 +15716,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V26*/ meltfptr[23] = 0; /*^clear */ /*clear *//*_.RETURN___V28*/ meltfptr[22] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5505:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5521:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:5505:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5521:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15659,7 +15839,7 @@ meltrout_162_warmelt_genobj_COMPILOBJ_NREP_MATCHJUMP (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5531:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5547:/ getarg"); /*_.NMJUMP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -15680,7 +15860,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5532:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5548:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15706,7 +15886,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5532:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5548:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -15726,7 +15906,7 @@ lab_endgetargs:; /*_.DISCRIM__V6*/ meltfptr[5] = ((melt_ptr_t) (melt_discr ((melt_ptr_t) ( /*_.NMJUMP__V2*/ meltfptr[1]))));; - MELT_LOCATION ("warmelt-genobj.melt:5532:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5548:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15739,7 +15919,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5532; + argtab[2].meltbp_long = 5548; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_matchedata nmjump="; /*^apply.arg */ @@ -15770,7 +15950,7 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5532:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5548:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.DISCRIM__V6*/ meltfptr[5] = 0; @@ -15785,7 +15965,7 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5532:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5548:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];; @@ -15794,7 +15974,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V8*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5532:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5548:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V5*/ meltfptr[4] = 0; @@ -15809,7 +15989,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5534:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5550:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15821,7 +16001,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NMJUMP__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_MATCH_JUMP */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5534:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5550:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -15829,7 +16009,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5534:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5550:/ cond.else"); /*^block */ /*anyblock */ @@ -15843,7 +16023,7 @@ lab_endgetargs:; melt_assert_failed (("check nmjump"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5534) ? (5534) : __LINE__, __FUNCTION__); + (5550) ? (5550) : __LINE__, __FUNCTION__); ; } ; @@ -15858,7 +16038,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[6] = /*_.IFELSE___V10*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5534:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5550:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[4] = 0; @@ -15871,7 +16051,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5535:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5551:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15883,7 +16063,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:5535:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5551:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -15891,7 +16071,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5535:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5551:/ cond.else"); /*^block */ /*anyblock */ @@ -15905,7 +16085,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5535) ? (5535) : __LINE__, __FUNCTION__); + (5551) ? (5551) : __LINE__, __FUNCTION__); ; } ; @@ -15920,7 +16100,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[5] = /*_.IFELSE___V12*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5535:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5551:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[4] = 0; @@ -15931,10 +16111,10 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[5] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5536:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5552:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5537:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5553:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NMJUMP__V2*/ meltfptr[1]), 0, "NREP_LOC"); @@ -15942,7 +16122,7 @@ lab_endgetargs:; meltfptr[13] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5538:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5554:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -15968,7 +16148,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5540:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5556:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15994,7 +16174,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5540:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5556:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -16009,7 +16189,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5540:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5556:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -16022,7 +16202,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5540; + argtab[2].meltbp_long = 5556; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_matchjump altmatch="; @@ -16043,7 +16223,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V18*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5540:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5556:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V18*/ meltfptr[17] = 0; @@ -16056,7 +16236,7 @@ lab_endgetargs:; /*_.IF___V17*/ meltfptr[16] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5540:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5556:/ quasiblock"); /*_.PROGN___V19*/ meltfptr[17] = /*_.IF___V17*/ meltfptr[16];; @@ -16065,7 +16245,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[15] = /*_.PROGN___V19*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5540:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5556:/ clear"); /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V17*/ meltfptr[16] = 0; @@ -16078,7 +16258,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[15] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5541:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5557:/ quasiblock"); /*^checksignal */ @@ -16105,7 +16285,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5545:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5561:/ locexp"); /* error_plain */ melt_error_str ((melt_ptr_t) ( /*_.NLOC__V14*/ meltfptr[13]), ("not fully implemented compilobj_nrep_matchjump"), @@ -16114,7 +16294,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5546:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5562:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16140,7 +16320,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5546:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5562:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -16155,7 +16335,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5546:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5562:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -16168,7 +16348,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5546; + argtab[2].meltbp_long = 5562; /*^apply.arg */ argtab[3].meltbp_cstring = "compilobj_nrep_matchjump objc="; /*^apply.arg */ @@ -16188,7 +16368,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V24*/ meltfptr[23];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5546:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5562:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] = 0; @@ -16201,7 +16381,7 @@ lab_endgetargs:; /*_.IF___V23*/ meltfptr[22] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5546:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5562:/ quasiblock"); /*_.PROGN___V25*/ meltfptr[23] = /*_.IF___V23*/ meltfptr[22];; @@ -16210,7 +16390,7 @@ lab_endgetargs:; /*_.IFCPP___V22*/ meltfptr[21] = /*_.PROGN___V25*/ meltfptr[23];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5546:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5562:/ clear"); /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V23*/ meltfptr[22] = 0; @@ -16223,19 +16403,31 @@ lab_endgetargs:; /*_.IFCPP___V22*/ meltfptr[21] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5547:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5563:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OBJC__V21*/ meltfptr[17];; - MELT_LOCATION ("warmelt-genobj.melt:5547:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5563:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V20*/ meltfptr[16] = /*_.RETURN___V26*/ meltfptr[22];; - MELT_LOCATION ("warmelt-genobj.melt:5541:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5557:/ clear"); /*clear *//*_.OBJC__V21*/ meltfptr[17] = 0; /*^clear */ /*clear *//*_.IFCPP___V22*/ meltfptr[21] = 0; @@ -16243,7 +16435,7 @@ lab_endgetargs:; /*clear *//*_.RETURN___V26*/ meltfptr[22] = 0; /*_.LET___V13*/ meltfptr[4] = /*_.LET___V20*/ meltfptr[16];; - MELT_LOCATION ("warmelt-genobj.melt:5536:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5552:/ clear"); /*clear *//*_.NLOC__V14*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.ALTMATCH__V15*/ meltfptr[14] = 0; @@ -16251,14 +16443,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.LET___V20*/ meltfptr[16] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5531:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5547:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:5531:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5547:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16359,7 +16563,7 @@ meltrout_163_warmelt_genobj_NORMTESTER_LABELINSTR (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5560:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5576:/ getarg"); /*_.NT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -16380,7 +16584,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5561:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5577:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16406,7 +16610,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5561:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5577:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -16421,7 +16625,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5561:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5577:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -16434,7 +16638,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5561; + argtab[2].meltbp_long = 5577; /*^apply.arg */ argtab[3].meltbp_cstring = "normtester_labelinstr start nt="; /*^apply.arg */ @@ -16453,7 +16657,7 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5561:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5577:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0; @@ -16466,7 +16670,7 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5561:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5577:/ quasiblock"); /*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];; @@ -16475,7 +16679,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5561:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5577:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V5*/ meltfptr[4] = 0; @@ -16490,7 +16694,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5562:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5578:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16502,7 +16706,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5562:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5578:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -16510,7 +16714,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5562:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5578:/ cond.else"); /*^block */ /*anyblock */ @@ -16524,7 +16728,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5562) ? (5562) : __LINE__, __FUNCTION__); + (5578) ? (5578) : __LINE__, __FUNCTION__); ; } ; @@ -16539,7 +16743,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5562:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5578:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0; @@ -16550,14 +16754,14 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5563:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5579:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_NOT_A__L4*/ meltfnum[0] = !melt_is_instance_of ((melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:5563:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5579:/ cond"); /*cond */ if ( /*_#IS_NOT_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -16567,7 +16771,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5565:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5581:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16593,7 +16797,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5565:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5581:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -16608,7 +16812,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5565:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5581:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -16622,7 +16826,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5565; + argtab[2].meltbp_long = 5581; /*^apply.arg */ argtab[3].meltbp_cstring = "normtester_labelinstr return nil"; @@ -16640,7 +16844,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5565:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5581:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V13*/ meltfptr[12] = 0; @@ -16653,7 +16857,7 @@ lab_endgetargs:; /*_.IF___V12*/ meltfptr[11] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5565:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5581:/ quasiblock"); /*_.PROGN___V14*/ meltfptr[12] = /*_.IF___V12*/ meltfptr[11];; @@ -16662,7 +16866,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[10] = /*_.PROGN___V14*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5565:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5581:/ clear"); /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V12*/ meltfptr[11] = 0; @@ -16675,14 +16879,26 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[10] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5566:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5582:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-genobj.melt:5566:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5582:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-genobj.melt:5564:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5580:/ quasiblock"); /*_.PROGN___V16*/ meltfptr[12] = /*_.RETURN___V15*/ meltfptr[11];; @@ -16691,7 +16907,7 @@ lab_endgetargs:; /*_.IF___V10*/ meltfptr[5] = /*_.PROGN___V16*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5563:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5579:/ clear"); /*clear *//*_.IFCPP___V11*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_.RETURN___V15*/ meltfptr[11] = 0; @@ -16706,10 +16922,10 @@ lab_endgetargs:; /*_.IF___V10*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5567:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5583:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5568:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5584:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1]), 0, "NREP_LOC"); @@ -16719,7 +16935,7 @@ lab_endgetargs:; ; /*_#NTESTIX__L7*/ meltfnum[5] = (melt_get_int ((melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5570:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5586:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH"); @@ -16727,7 +16943,7 @@ lab_endgetargs:; meltfptr[12] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5571:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5587:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 8, "GNCX_MATCHMAP"); @@ -16737,7 +16953,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5573:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5589:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16749,7 +16965,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NORMATCH__V19*/ meltfptr[12]), (melt_ptr_t) (( /*!CLASS_NREP_MATCH */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:5573:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5589:/ cond"); /*cond */ if ( /*_#IS_A__L8*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -16757,7 +16973,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5573:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5589:/ cond.else"); /*^block */ /*anyblock */ @@ -16771,7 +16987,7 @@ lab_endgetargs:; melt_assert_failed (("check normatch"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5573) ? (5573) : __LINE__, __FUNCTION__); + (5589) ? (5589) : __LINE__, __FUNCTION__); ; } ; @@ -16786,7 +17002,7 @@ lab_endgetargs:; /*_.IFCPP___V21*/ meltfptr[20] = /*_.IFELSE___V22*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5573:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5589:/ clear"); /*clear *//*_#IS_A__L8*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V22*/ meltfptr[21] = 0; @@ -16799,7 +17015,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5574:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5590:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16807,7 +17023,7 @@ lab_endgetargs:; /*^checksignal */ MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-genobj.melt:5575:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5591:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -16842,7 +17058,7 @@ lab_endgetargs:; /*_#__L9*/ meltfnum[1] = (( /*_.MULTIPLE_NTH__V25*/ meltfptr[24]) == ( /*_.NT__V2*/ meltfptr[1]));; - MELT_LOCATION ("warmelt-genobj.melt:5574:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5590:/ cond"); /*cond */ if ( /*_#__L9*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -16850,7 +17066,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5574:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5590:/ cond.else"); /*^block */ /*anyblock */ @@ -16864,7 +17080,7 @@ lab_endgetargs:; melt_assert_failed (("check valid normatch"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5574) ? (5574) : __LINE__, __FUNCTION__); + (5590) ? (5590) : __LINE__, __FUNCTION__); ; } ; @@ -16879,7 +17095,7 @@ lab_endgetargs:; /*_.IFCPP___V23*/ meltfptr[21] = /*_.IFELSE___V26*/ meltfptr[25];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5574:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5590:/ clear"); /*clear *//*_.NMATCH_TESTS__V24*/ meltfptr[23] = 0; /*^clear */ /*clear *//*_.MULTIPLE_NTH__V25*/ meltfptr[24] = 0; @@ -16894,7 +17110,7 @@ lab_endgetargs:; /*_.IFCPP___V23*/ meltfptr[21] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5578:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5594:/ quasiblock"); /*_.PREFIX__V28*/ meltfptr[24] = @@ -16903,7 +17119,7 @@ lab_endgetargs:; ( /*_.MATCHMAP__V20*/ meltfptr[19]), (meltobject_ptr_t) ( /*_.NORMATCH__V19*/ meltfptr[12]));; - MELT_LOCATION ("warmelt-genobj.melt:5580:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5596:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -16951,7 +17167,7 @@ lab_endgetargs:; /*_.LABINS__V29*/ meltfptr[25] = /*_.INST__V30*/ meltfptr[29];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5585:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5601:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16977,7 +17193,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5585:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5601:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -16992,7 +17208,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5585:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5601:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17006,7 +17222,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5585; + argtab[2].meltbp_long = 5601; /*^apply.arg */ argtab[3].meltbp_cstring = "normtester_labelinstr result labins="; @@ -17027,7 +17243,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V33*/ meltfptr[32];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5585:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5601:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] = 0; @@ -17040,7 +17256,7 @@ lab_endgetargs:; /*_.IF___V32*/ meltfptr[31] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5585:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5601:/ quasiblock"); /*_.PROGN___V34*/ meltfptr[32] = /*_.IF___V32*/ meltfptr[31];; @@ -17049,7 +17265,7 @@ lab_endgetargs:; /*_.IFCPP___V31*/ meltfptr[30] = /*_.PROGN___V34*/ meltfptr[32];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5585:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5601:/ clear"); /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V32*/ meltfptr[31] = 0; @@ -17064,7 +17280,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5586:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5602:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17075,7 +17291,7 @@ lab_endgetargs:; /*_#IS_STRING__L12*/ meltfnum[10] = (melt_magic_discr ((melt_ptr_t) ( /*_.PREFIX__V28*/ meltfptr[24])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-genobj.melt:5586:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5602:/ cond"); /*cond */ if ( /*_#IS_STRING__L12*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -17083,7 +17299,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5586:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5602:/ cond.else"); /*^block */ /*anyblock */ @@ -17097,7 +17313,7 @@ lab_endgetargs:; melt_assert_failed (("check prefix"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5586) ? (5586) : __LINE__, __FUNCTION__); + (5602) ? (5602) : __LINE__, __FUNCTION__); ; } ; @@ -17112,7 +17328,7 @@ lab_endgetargs:; /*_.IFCPP___V35*/ meltfptr[31] = /*_.IFELSE___V36*/ meltfptr[32];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5586:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5602:/ clear"); /*clear *//*_#IS_STRING__L12*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.IFELSE___V36*/ meltfptr[32] = 0; @@ -17123,19 +17339,31 @@ lab_endgetargs:; /*_.IFCPP___V35*/ meltfptr[31] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5587:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5603:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LABINS__V29*/ meltfptr[25];; - MELT_LOCATION ("warmelt-genobj.melt:5587:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5603:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V27*/ meltfptr[23] = /*_.RETURN___V37*/ meltfptr[32];; - MELT_LOCATION ("warmelt-genobj.melt:5578:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5594:/ clear"); /*clear *//*_.PREFIX__V28*/ meltfptr[24] = 0; /*^clear */ /*clear *//*_.LABINS__V29*/ meltfptr[25] = 0; @@ -17147,7 +17375,7 @@ lab_endgetargs:; /*clear *//*_.RETURN___V37*/ meltfptr[32] = 0; /*_.LET___V17*/ meltfptr[10] = /*_.LET___V27*/ meltfptr[23];; - MELT_LOCATION ("warmelt-genobj.melt:5567:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5583:/ clear"); /*clear *//*_.NLOC__V18*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_#NTESTIX__L7*/ meltfnum[5] = 0; @@ -17161,14 +17389,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V23*/ meltfptr[21] = 0; /*^clear */ /*clear *//*_.LET___V27*/ meltfptr[23] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5560:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5576:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:5560:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5576:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17271,7 +17511,7 @@ meltrout_164_warmelt_genobj_NORMTESTER_GOTOINSTR (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5592:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5608:/ getarg"); /*_.NT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -17292,7 +17532,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5593:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5609:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17318,7 +17558,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5593:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5609:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -17333,7 +17573,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5593:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5609:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17346,7 +17586,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5593; + argtab[2].meltbp_long = 5609; /*^apply.arg */ argtab[3].meltbp_cstring = "normtester_gotoinstr start nt="; /*^apply.arg */ @@ -17365,7 +17605,7 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5593:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5609:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0; @@ -17378,7 +17618,7 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5593:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5609:/ quasiblock"); /*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];; @@ -17387,7 +17627,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5593:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5609:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V5*/ meltfptr[4] = 0; @@ -17402,7 +17642,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5594:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5610:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17414,7 +17654,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5594:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5610:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -17422,7 +17662,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5594:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5610:/ cond.else"); /*^block */ /*anyblock */ @@ -17436,7 +17676,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5594) ? (5594) : __LINE__, __FUNCTION__); + (5610) ? (5610) : __LINE__, __FUNCTION__); ; } ; @@ -17451,7 +17691,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5594:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5610:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0; @@ -17462,14 +17702,14 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5595:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5611:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_NOT_A__L4*/ meltfnum[0] = !melt_is_instance_of ((melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:5595:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5611:/ cond"); /*cond */ if ( /*_#IS_NOT_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -17479,7 +17719,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5597:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5613:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17505,7 +17745,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5597:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5613:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -17520,7 +17760,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5597:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5613:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17534,7 +17774,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5597; + argtab[2].meltbp_long = 5613; /*^apply.arg */ argtab[3].meltbp_cstring = "normtester_gotoinstr return nil"; @@ -17552,7 +17792,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5597:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5613:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V13*/ meltfptr[12] = 0; @@ -17565,7 +17805,7 @@ lab_endgetargs:; /*_.IF___V12*/ meltfptr[11] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5597:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5613:/ quasiblock"); /*_.PROGN___V14*/ meltfptr[12] = /*_.IF___V12*/ meltfptr[11];; @@ -17574,7 +17814,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[10] = /*_.PROGN___V14*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5597:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5613:/ clear"); /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V12*/ meltfptr[11] = 0; @@ -17587,14 +17827,26 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[10] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5598:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5614:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-genobj.melt:5598:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5614:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-genobj.melt:5596:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5612:/ quasiblock"); /*_.PROGN___V16*/ meltfptr[12] = /*_.RETURN___V15*/ meltfptr[11];; @@ -17603,7 +17855,7 @@ lab_endgetargs:; /*_.IF___V10*/ meltfptr[5] = /*_.PROGN___V16*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5595:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5611:/ clear"); /*clear *//*_.IFCPP___V11*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_.RETURN___V15*/ meltfptr[11] = 0; @@ -17618,10 +17870,10 @@ lab_endgetargs:; /*_.IF___V10*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5599:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5615:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5600:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5616:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1]), 0, "NREP_LOC"); @@ -17631,7 +17883,7 @@ lab_endgetargs:; ; /*_#NTESTIX__L7*/ meltfnum[5] = (melt_get_int ((melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5602:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5618:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH"); @@ -17639,7 +17891,7 @@ lab_endgetargs:; meltfptr[12] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5603:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5619:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 8, "GNCX_MATCHMAP"); @@ -17649,7 +17901,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5605:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5621:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17675,7 +17927,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5605:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5621:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -17690,7 +17942,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5605:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5621:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17703,7 +17955,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5605; + argtab[2].meltbp_long = 5621; /*^apply.arg */ argtab[3].meltbp_cstring = "normtester_gotoinstr normatch="; /*^apply.arg */ @@ -17723,7 +17975,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V23*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5605:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5621:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V23*/ meltfptr[22] = 0; @@ -17736,7 +17988,7 @@ lab_endgetargs:; /*_.IF___V22*/ meltfptr[21] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5605:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5621:/ quasiblock"); /*_.PROGN___V24*/ meltfptr[22] = /*_.IF___V22*/ meltfptr[21];; @@ -17745,7 +17997,7 @@ lab_endgetargs:; /*_.IFCPP___V21*/ meltfptr[20] = /*_.PROGN___V24*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5605:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5621:/ clear"); /*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V22*/ meltfptr[21] = 0; @@ -17760,7 +18012,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5606:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5622:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17772,7 +18024,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NORMATCH__V19*/ meltfptr[12]), (melt_ptr_t) (( /*!CLASS_NREP_MATCH */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:5606:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5622:/ cond"); /*cond */ if ( /*_#IS_A__L10*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -17780,7 +18032,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5606:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5622:/ cond.else"); /*^block */ /*anyblock */ @@ -17794,7 +18046,7 @@ lab_endgetargs:; melt_assert_failed (("check normatch"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5606) ? (5606) : __LINE__, __FUNCTION__); + (5622) ? (5622) : __LINE__, __FUNCTION__); ; } ; @@ -17809,7 +18061,7 @@ lab_endgetargs:; /*_.IFCPP___V25*/ meltfptr[21] = /*_.IFELSE___V26*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5606:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5622:/ clear"); /*clear *//*_#IS_A__L10*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.IFELSE___V26*/ meltfptr[22] = 0; @@ -17822,7 +18074,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5607:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5623:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17830,7 +18082,7 @@ lab_endgetargs:; /*^checksignal */ MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-genobj.melt:5608:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5624:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -17865,7 +18117,7 @@ lab_endgetargs:; /*_#__L11*/ meltfnum[1] = (( /*_.MULTIPLE_NTH__V29*/ meltfptr[28]) == ( /*_.NT__V2*/ meltfptr[1]));; - MELT_LOCATION ("warmelt-genobj.melt:5607:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5623:/ cond"); /*cond */ if ( /*_#__L11*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -17873,7 +18125,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5607:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5623:/ cond.else"); /*^block */ /*anyblock */ @@ -17887,7 +18139,7 @@ lab_endgetargs:; melt_assert_failed (("check valid normatch"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5607) ? (5607) : __LINE__, __FUNCTION__); + (5623) ? (5623) : __LINE__, __FUNCTION__); ; } ; @@ -17902,7 +18154,7 @@ lab_endgetargs:; /*_.IFCPP___V27*/ meltfptr[22] = /*_.IFELSE___V30*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5607:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5623:/ clear"); /*clear *//*_.NMATCH_TESTS__V28*/ meltfptr[27] = 0; /*^clear */ /*clear *//*_.MULTIPLE_NTH__V29*/ meltfptr[28] = 0; @@ -17917,7 +18169,7 @@ lab_endgetargs:; /*_.IFCPP___V27*/ meltfptr[22] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5611:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5627:/ quasiblock"); /*_.PREFIX__V32*/ meltfptr[28] = @@ -17926,7 +18178,7 @@ lab_endgetargs:; ( /*_.MATCHMAP__V20*/ meltfptr[19]), (meltobject_ptr_t) ( /*_.NORMATCH__V19*/ meltfptr[12]));; - MELT_LOCATION ("warmelt-genobj.melt:5613:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5629:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -17974,7 +18226,7 @@ lab_endgetargs:; /*_.GOINS__V33*/ meltfptr[29] = /*_.INST__V34*/ meltfptr[33];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5618:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5634:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18000,7 +18252,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5618:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5634:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -18015,7 +18267,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5618:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5634:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -18029,7 +18281,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5618; + argtab[2].meltbp_long = 5634; /*^apply.arg */ argtab[3].meltbp_cstring = "normtester_gotoinstr result goins="; /*^apply.arg */ @@ -18049,7 +18301,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V37*/ meltfptr[36];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5618:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5634:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V37*/ meltfptr[36] = 0; @@ -18062,7 +18314,7 @@ lab_endgetargs:; /*_.IF___V36*/ meltfptr[35] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5618:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5634:/ quasiblock"); /*_.PROGN___V38*/ meltfptr[36] = /*_.IF___V36*/ meltfptr[35];; @@ -18071,7 +18323,7 @@ lab_endgetargs:; /*_.IFCPP___V35*/ meltfptr[34] = /*_.PROGN___V38*/ meltfptr[36];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5618:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5634:/ clear"); /*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.IF___V36*/ meltfptr[35] = 0; @@ -18086,7 +18338,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5619:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5635:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18097,7 +18349,7 @@ lab_endgetargs:; /*_#IS_STRING__L14*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.PREFIX__V32*/ meltfptr[28])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-genobj.melt:5619:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5635:/ cond"); /*cond */ if ( /*_#IS_STRING__L14*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -18105,7 +18357,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5619:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5635:/ cond.else"); /*^block */ /*anyblock */ @@ -18119,7 +18371,7 @@ lab_endgetargs:; melt_assert_failed (("check prefix"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5619) ? (5619) : __LINE__, __FUNCTION__); + (5635) ? (5635) : __LINE__, __FUNCTION__); ; } ; @@ -18134,7 +18386,7 @@ lab_endgetargs:; /*_.IFCPP___V39*/ meltfptr[35] = /*_.IFELSE___V40*/ meltfptr[36];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5619:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5635:/ clear"); /*clear *//*_#IS_STRING__L14*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V40*/ meltfptr[36] = 0; @@ -18145,19 +18397,31 @@ lab_endgetargs:; /*_.IFCPP___V39*/ meltfptr[35] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5620:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5636:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.GOINS__V33*/ meltfptr[29];; - MELT_LOCATION ("warmelt-genobj.melt:5620:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5636:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V31*/ meltfptr[27] = /*_.RETURN___V41*/ meltfptr[36];; - MELT_LOCATION ("warmelt-genobj.melt:5611:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5627:/ clear"); /*clear *//*_.PREFIX__V32*/ meltfptr[28] = 0; /*^clear */ /*clear *//*_.GOINS__V33*/ meltfptr[29] = 0; @@ -18169,7 +18433,7 @@ lab_endgetargs:; /*clear *//*_.RETURN___V41*/ meltfptr[36] = 0; /*_.LET___V17*/ meltfptr[10] = /*_.LET___V31*/ meltfptr[27];; - MELT_LOCATION ("warmelt-genobj.melt:5599:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5615:/ clear"); /*clear *//*_.NLOC__V18*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_#NTESTIX__L7*/ meltfnum[5] = 0; @@ -18185,14 +18449,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V27*/ meltfptr[22] = 0; /*^clear */ /*clear *//*_.LET___V31*/ meltfptr[27] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5592:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5608:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:5592:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5608:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18294,7 +18570,7 @@ meltrout_165_warmelt_genobj_ENDMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5625:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5641:/ getarg"); /*_.NMA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -18325,7 +18601,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5626:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5642:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18337,7 +18613,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NMA__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_MATCH */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:5626:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5642:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -18345,7 +18621,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5626:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5642:/ cond.else"); /*^block */ /*anyblock */ @@ -18359,7 +18635,7 @@ lab_endgetargs:; melt_assert_failed (("check nma"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5626) ? (5626) : __LINE__, __FUNCTION__); + (5642) ? (5642) : __LINE__, __FUNCTION__); ; } ; @@ -18374,7 +18650,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5626:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5642:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -18387,7 +18663,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5627:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5643:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18399,7 +18675,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5627:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5643:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -18407,7 +18683,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5627:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5643:/ cond.else"); /*^block */ /*anyblock */ @@ -18421,7 +18697,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5627) ? (5627) : __LINE__, __FUNCTION__); + (5643) ? (5643) : __LINE__, __FUNCTION__); ; } ; @@ -18436,7 +18712,7 @@ lab_endgetargs:; /*_.IFCPP___V7*/ meltfptr[5] = /*_.IFELSE___V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5627:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5643:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0; @@ -18449,7 +18725,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5628:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5644:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18475,7 +18751,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5628:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5644:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -18490,7 +18766,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5628:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5644:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -18503,7 +18779,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5628; + argtab[2].meltbp_long = 5644; /*^apply.arg */ argtab[3].meltbp_cstring = "endmatch_gotoinstr nma="; /*^apply.arg */ @@ -18523,7 +18799,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V11*/ meltfptr[10];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5628:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5644:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V11*/ meltfptr[10] = 0; @@ -18536,7 +18812,7 @@ lab_endgetargs:; /*_.IF___V10*/ meltfptr[9] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5628:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5644:/ quasiblock"); /*_.PROGN___V12*/ meltfptr[10] = /*_.IF___V10*/ meltfptr[9];; @@ -18545,7 +18821,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[7] = /*_.PROGN___V12*/ meltfptr[10];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5628:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5644:/ clear"); /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V10*/ meltfptr[9] = 0; @@ -18560,7 +18836,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5629:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5645:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -18569,10 +18845,10 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-genobj.melt:5630:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5646:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5631:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5647:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 8, "GNCX_MATCHMAP"); @@ -18594,7 +18870,7 @@ lab_endgetargs:; (const char *) 0);; { - MELT_LOCATION ("warmelt-genobj.melt:5635:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5651:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V16*/ meltfptr[15]), melt_string_str ((melt_ptr_t) @@ -18604,16 +18880,16 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5636:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5652:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V16*/ meltfptr[15]), ("_end /*endmatch*/")); } ; - MELT_LOCATION ("warmelt-genobj.melt:5637:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5653:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5638:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5654:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.STRBUF2STRING__V18*/ meltfptr[17] = @@ -18621,7 +18897,7 @@ lab_endgetargs:; ((meltobject_ptr_t) (( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[5])), melt_strbuf_str ((melt_ptr_t) ( /*_.LABUF__V16*/ meltfptr[15]))));; - MELT_LOCATION ("warmelt-genobj.melt:5638:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5654:/ quasiblock"); /*^rawallocobj */ @@ -18667,7 +18943,7 @@ lab_endgetargs:; /*_.GOINS__V19*/ meltfptr[18] = /*_.INST__V20*/ meltfptr[19];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5644:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5660:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18693,7 +18969,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5644:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5660:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -18708,7 +18984,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5644:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5660:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -18721,7 +18997,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5644; + argtab[2].meltbp_long = 5660; /*^apply.arg */ argtab[3].meltbp_cstring = "endmatch_gotoinstr goins="; /*^apply.arg */ @@ -18741,7 +19017,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V23*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5644:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5660:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V23*/ meltfptr[22] = 0; @@ -18754,7 +19030,7 @@ lab_endgetargs:; /*_.IF___V22*/ meltfptr[21] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5644:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5660:/ quasiblock"); /*_.PROGN___V24*/ meltfptr[22] = /*_.IF___V22*/ meltfptr[21];; @@ -18763,7 +19039,7 @@ lab_endgetargs:; /*_.IFCPP___V21*/ meltfptr[20] = /*_.PROGN___V24*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5644:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5660:/ clear"); /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IF___V22*/ meltfptr[21] = 0; @@ -18776,19 +19052,31 @@ lab_endgetargs:; /*_.IFCPP___V21*/ meltfptr[20] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5645:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5661:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.GOINS__V19*/ meltfptr[18];; - MELT_LOCATION ("warmelt-genobj.melt:5645:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5661:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V17*/ meltfptr[16] = /*_.RETURN___V25*/ meltfptr[21];; - MELT_LOCATION ("warmelt-genobj.melt:5637:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5653:/ clear"); /*clear *//*_.STRBUF2STRING__V18*/ meltfptr[17] = 0; /*^clear */ /*clear *//*_.GOINS__V19*/ meltfptr[18] = 0; @@ -18798,7 +19086,7 @@ lab_endgetargs:; /*clear *//*_.RETURN___V25*/ meltfptr[21] = 0; /*_.LET___V13*/ meltfptr[9] = /*_.LET___V17*/ meltfptr[16];; - MELT_LOCATION ("warmelt-genobj.melt:5630:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5646:/ clear"); /*clear *//*_.MATCHMAP__V14*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_.PREFIX__V15*/ meltfptr[14] = 0; @@ -18806,14 +19094,26 @@ lab_endgetargs:; /*clear *//*_.LABUF__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.LET___V17*/ meltfptr[16] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5625:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5641:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[9];; - MELT_LOCATION ("warmelt-genobj.melt:5625:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5641:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18913,7 +19213,7 @@ meltrout_166_warmelt_genobj_TESTMATCH_GOTOINSTR (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5649:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5665:/ getarg"); /*_.NTEST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -18953,7 +19253,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5650:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5666:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18979,7 +19279,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5650:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5666:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -18994,7 +19294,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5650:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5666:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19007,7 +19307,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5650; + argtab[2].meltbp_long = 5666; /*^apply.arg */ argtab[3].meltbp_cstring = "testmatch_gotoinstr ntest="; /*^apply.arg */ @@ -19026,7 +19326,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5650:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5666:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0; @@ -19039,7 +19339,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5650:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5666:/ quasiblock"); /*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];; @@ -19048,7 +19348,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5650:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5666:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V7*/ meltfptr[6] = 0; @@ -19063,7 +19363,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5651:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5667:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19075,7 +19375,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5651:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5667:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -19083,7 +19383,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5651:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5667:/ cond.else"); /*^block */ /*anyblock */ @@ -19097,7 +19397,7 @@ lab_endgetargs:; melt_assert_failed (("check ntest"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5651) ? (5651) : __LINE__, __FUNCTION__); + (5667) ? (5667) : __LINE__, __FUNCTION__); ; } ; @@ -19112,7 +19412,7 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5651:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5667:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0; @@ -19125,7 +19425,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5652:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5668:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19137,7 +19437,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NMA__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_NREP_MATCH */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:5652:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5668:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -19145,7 +19445,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5652:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5668:/ cond.else"); /*^block */ /*anyblock */ @@ -19159,7 +19459,7 @@ lab_endgetargs:; melt_assert_failed (("check nma"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5652) ? (5652) : __LINE__, __FUNCTION__); + (5668) ? (5668) : __LINE__, __FUNCTION__); ; } ; @@ -19174,7 +19474,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5652:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5668:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; @@ -19187,7 +19487,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5653:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5669:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19199,7 +19499,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:5653:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5669:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -19207,7 +19507,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5653:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5669:/ cond.else"); /*^block */ /*anyblock */ @@ -19221,7 +19521,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5653) ? (5653) : __LINE__, __FUNCTION__); + (5669) ? (5669) : __LINE__, __FUNCTION__); ; } ; @@ -19236,7 +19536,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[12] = /*_.IFELSE___V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5653:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5669:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0; @@ -19249,7 +19549,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5654:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5670:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -19258,10 +19558,10 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-genobj.melt:5655:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5671:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5656:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5672:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V4*/ meltfptr[3]), 8, "GNCX_MATCHMAP"); @@ -19283,7 +19583,7 @@ lab_endgetargs:; (const char *) 0);; { - MELT_LOCATION ("warmelt-genobj.melt:5660:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5676:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V19*/ meltfptr[18]), melt_string_str ((melt_ptr_t) @@ -19295,23 +19595,23 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.NTEST__V2*/ meltfptr[1])));; { - MELT_LOCATION ("warmelt-genobj.melt:5661:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5677:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.LABUF__V19*/ meltfptr[18]), ( /*_#GET_INT__L6*/ meltfnum[0])); } ; { - MELT_LOCATION ("warmelt-genobj.melt:5662:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5678:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.LABUF__V19*/ meltfptr[18]), (" /*testmatch*/")); } ; - MELT_LOCATION ("warmelt-genobj.melt:5663:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5679:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5664:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5680:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.STRBUF2STRING__V21*/ meltfptr[20] = @@ -19319,7 +19619,7 @@ lab_endgetargs:; ((meltobject_ptr_t) (( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[6])), melt_strbuf_str ((melt_ptr_t) ( /*_.LABUF__V19*/ meltfptr[18]))));; - MELT_LOCATION ("warmelt-genobj.melt:5664:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5680:/ quasiblock"); /*^rawallocobj */ @@ -19365,7 +19665,7 @@ lab_endgetargs:; /*_.GOINS__V22*/ meltfptr[21] = /*_.INST__V23*/ meltfptr[22];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5670:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5686:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19391,7 +19691,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5670:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5686:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -19406,7 +19706,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5670:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5686:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19419,7 +19719,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5670; + argtab[2].meltbp_long = 5686; /*^apply.arg */ argtab[3].meltbp_cstring = "testmatch_gotoinstr goins="; /*^apply.arg */ @@ -19439,7 +19739,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V26*/ meltfptr[25];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5670:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5686:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V26*/ meltfptr[25] = 0; @@ -19452,7 +19752,7 @@ lab_endgetargs:; /*_.IF___V25*/ meltfptr[24] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5670:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5686:/ quasiblock"); /*_.PROGN___V27*/ meltfptr[25] = /*_.IF___V25*/ meltfptr[24];; @@ -19461,7 +19761,7 @@ lab_endgetargs:; /*_.IFCPP___V24*/ meltfptr[23] = /*_.PROGN___V27*/ meltfptr[25];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5670:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5686:/ clear"); /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V25*/ meltfptr[24] = 0; @@ -19474,19 +19774,31 @@ lab_endgetargs:; /*_.IFCPP___V24*/ meltfptr[23] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5671:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5687:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.GOINS__V22*/ meltfptr[21];; - MELT_LOCATION ("warmelt-genobj.melt:5671:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5687:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V20*/ meltfptr[19] = /*_.RETURN___V28*/ meltfptr[24];; - MELT_LOCATION ("warmelt-genobj.melt:5663:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5679:/ clear"); /*clear *//*_.STRBUF2STRING__V21*/ meltfptr[20] = 0; /*^clear */ /*clear *//*_.GOINS__V22*/ meltfptr[21] = 0; @@ -19496,7 +19808,7 @@ lab_endgetargs:; /*clear *//*_.RETURN___V28*/ meltfptr[24] = 0; /*_.LET___V16*/ meltfptr[14] = /*_.LET___V20*/ meltfptr[19];; - MELT_LOCATION ("warmelt-genobj.melt:5655:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5671:/ clear"); /*clear *//*_.MATCHMAP__V17*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.PREFIX__V18*/ meltfptr[17] = 0; @@ -19506,14 +19818,26 @@ lab_endgetargs:; /*clear *//*_#GET_INT__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.LET___V20*/ meltfptr[19] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5649:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5665:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-genobj.melt:5649:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5665:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19620,7 +19944,7 @@ meltrout_167_warmelt_genobj_NORMTESTER_FREE_OBJLOC_LIST (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5675:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5691:/ getarg"); /*_.NT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -19650,7 +19974,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5676:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5692:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19676,7 +20000,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5676:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5692:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -19691,7 +20015,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5676:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5692:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19704,7 +20028,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5676; + argtab[2].meltbp_long = 5692; /*^apply.arg */ argtab[3].meltbp_cstring = "normtester_free_objloc_list nt="; /*^apply.arg */ @@ -19723,7 +20047,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5676:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5692:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0; @@ -19736,7 +20060,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5676:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5692:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -19745,7 +20069,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5676:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5692:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -19760,7 +20084,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5677:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5693:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19772,7 +20096,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_ANY */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5677:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5693:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -19780,7 +20104,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5677:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5693:/ cond.else"); /*^block */ /*anyblock */ @@ -19794,7 +20118,7 @@ lab_endgetargs:; melt_assert_failed (("check nt"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5677) ? (5677) : __LINE__, __FUNCTION__); + (5693) ? (5693) : __LINE__, __FUNCTION__); ; } ; @@ -19809,7 +20133,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5677:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5693:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; @@ -19822,7 +20146,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5678:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5694:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19834,7 +20158,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:5678:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5694:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -19842,7 +20166,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5678:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5694:/ cond.else"); /*^block */ /*anyblock */ @@ -19856,7 +20180,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5678) ? (5678) : __LINE__, __FUNCTION__); + (5694) ? (5694) : __LINE__, __FUNCTION__); ; } ; @@ -19871,7 +20195,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5678:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5694:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -19884,7 +20208,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5679:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5695:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19896,7 +20220,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:5679:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5695:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -19904,7 +20228,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5679:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5695:/ cond.else"); /*^block */ /*anyblock */ @@ -19918,7 +20242,7 @@ lab_endgetargs:; melt_assert_failed (("check tcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5679) ? (5679) : __LINE__, __FUNCTION__); + (5695) ? (5695) : __LINE__, __FUNCTION__); ; } ; @@ -19933,7 +20257,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5679:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5695:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -19944,10 +20268,10 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5680:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5696:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5681:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5697:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NT__V2*/ meltfptr[1]), 5, "NTEST_LOCCLIST"); @@ -19955,7 +20279,7 @@ lab_endgetargs:; meltfptr[15] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5682:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5698:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 1, "GNCX_LOCMAP"); @@ -19965,7 +20289,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5684:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5700:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19991,7 +20315,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5684:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5700:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -20006,7 +20330,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5684:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5700:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -20019,7 +20343,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5684; + argtab[2].meltbp_long = 5700; /*^apply.arg */ argtab[3].meltbp_cstring = "normtester_free_objloc_list nloclist="; @@ -20040,7 +20364,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V20*/ meltfptr[19];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5684:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5700:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V20*/ meltfptr[19] = 0; @@ -20053,7 +20377,7 @@ lab_endgetargs:; /*_.IF___V19*/ meltfptr[18] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5684:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5700:/ quasiblock"); /*_.PROGN___V21*/ meltfptr[19] = /*_.IF___V19*/ meltfptr[18];; @@ -20062,7 +20386,7 @@ lab_endgetargs:; /*_.IFCPP___V18*/ meltfptr[17] = /*_.PROGN___V21*/ meltfptr[19];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5684:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5700:/ clear"); /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V19*/ meltfptr[18] = 0; @@ -20077,7 +20401,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5685:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5701:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -20086,10 +20410,10 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-genobj.melt:5686:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5702:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5689:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5705:/ quasiblock"); /*^newclosure */ @@ -20127,7 +20451,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.LOCMAP__V17*/ meltfptr[16]); ; /*_.LAMBDA___V23*/ meltfptr[19] = /*_.LAMBDA___V24*/ meltfptr[23];; - MELT_LOCATION ("warmelt-genobj.melt:5687:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5703:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -20146,7 +20470,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5700:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5716:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20170,7 +20494,7 @@ lab_endgetargs:; /*_.TCX_FREELIST__V26*/ meltfptr[25] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5700:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5716:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -20191,7 +20515,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5701:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5717:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20217,7 +20541,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5701:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5717:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -20232,7 +20556,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5701:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5717:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -20245,7 +20569,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5701; + argtab[2].meltbp_long = 5717; /*^apply.arg */ argtab[3].meltbp_cstring = "normtester_free_objloc_list result freelist="; @@ -20266,7 +20590,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V30*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5701:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5717:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V30*/ meltfptr[29] = 0; @@ -20279,7 +20603,7 @@ lab_endgetargs:; /*_.IF___V29*/ meltfptr[28] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5701:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5717:/ quasiblock"); /*_.PROGN___V31*/ meltfptr[29] = /*_.IF___V29*/ meltfptr[28];; @@ -20288,7 +20612,7 @@ lab_endgetargs:; /*_.IFCPP___V28*/ meltfptr[27] = /*_.PROGN___V31*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5701:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5717:/ clear"); /*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V29*/ meltfptr[28] = 0; @@ -20301,19 +20625,31 @@ lab_endgetargs:; /*_.IFCPP___V28*/ meltfptr[27] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5702:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5718:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.FREELIST__V25*/ meltfptr[24];; - MELT_LOCATION ("warmelt-genobj.melt:5702:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5718:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V22*/ meltfptr[18] = /*_.RETURN___V32*/ meltfptr[28];; - MELT_LOCATION ("warmelt-genobj.melt:5686:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5702:/ clear"); /*clear *//*_.LAMBDA___V23*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_.FREELIST__V25*/ meltfptr[24] = 0; @@ -20327,7 +20663,7 @@ lab_endgetargs:; /*clear *//*_.RETURN___V32*/ meltfptr[28] = 0; /*_.LET___V15*/ meltfptr[13] = /*_.LET___V22*/ meltfptr[18];; - MELT_LOCATION ("warmelt-genobj.melt:5680:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5696:/ clear"); /*clear *//*_.NLOCLIST__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.LOCMAP__V17*/ meltfptr[16] = 0; @@ -20335,14 +20671,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V18*/ meltfptr[17] = 0; /*^clear */ /*clear *//*_.LET___V22*/ meltfptr[18] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5675:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5691:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];; - MELT_LOCATION ("warmelt-genobj.melt:5675:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5691:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20442,7 +20790,7 @@ meltrout_168_warmelt_genobj_LAMBDA___51__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5689:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5705:/ getarg"); /*_.NLOC__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -20454,7 +20802,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5690:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5706:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20466,7 +20814,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NLOC__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:5690:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5706:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -20474,7 +20822,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5690:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5706:/ cond.else"); /*^block */ /*anyblock */ @@ -20488,7 +20836,7 @@ lab_endgetargs:; melt_assert_failed (("check nloc"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5690) ? (5690) : __LINE__, __FUNCTION__); + (5706) ? (5706) : __LINE__, __FUNCTION__); ; } ; @@ -20503,7 +20851,7 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = /*_.IFELSE___V4*/ meltfptr[3];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5690:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5706:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V4*/ meltfptr[3] = 0; @@ -20514,10 +20862,10 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5691:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5707:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5693:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5709:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20541,7 +20889,7 @@ lab_endgetargs:; /*_.NOCC_SYMB__V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5694:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5710:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20565,7 +20913,7 @@ lab_endgetargs:; /*_.NOCC_CTYP__V7*/ meltfptr[6] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5692:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5708:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -20587,7 +20935,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5696:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5712:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20613,7 +20961,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5696:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5712:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) (( /*~LOCMAP */ meltfclos->tabval[1])), (meltobject_ptr_t) ( /*_.NOCC_BIND__V9*/ @@ -20623,7 +20971,7 @@ lab_endgetargs:; ; /*_.LET___V5*/ meltfptr[3] = /*_.OBLO__V8*/ meltfptr[7];; - MELT_LOCATION ("warmelt-genobj.melt:5691:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5707:/ clear"); /*clear *//*_.NOCC_SYMB__V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.NOCC_CTYP__V7*/ meltfptr[6] = 0; @@ -20631,14 +20979,26 @@ lab_endgetargs:; /*clear *//*_.OBLO__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.NOCC_BIND__V9*/ meltfptr[8] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5689:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5705:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-genobj.melt:5689:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5705:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20738,7 +21098,7 @@ meltrout_169_warmelt_genobj_COMPILTST_NORMTESTER_ANY (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5707:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5723:/ getarg"); /*_.NTA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -20768,7 +21128,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5708:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5724:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20794,7 +21154,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5708:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5724:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -20814,7 +21174,7 @@ lab_endgetargs:; /*_.DISCRIM__V7*/ meltfptr[6] = ((melt_ptr_t) (melt_discr ((melt_ptr_t) ( /*_.NTA__V2*/ meltfptr[1]))));; - MELT_LOCATION ("warmelt-genobj.melt:5708:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5724:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -20827,7 +21187,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5708; + argtab[2].meltbp_long = 5724; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_any nta="; /*^apply.arg */ @@ -20864,7 +21224,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5708:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5724:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.DISCRIM__V7*/ meltfptr[6] = 0; @@ -20879,7 +21239,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5708:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5724:/ quasiblock"); /*_.PROGN___V9*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -20888,7 +21248,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V9*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5708:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5724:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -20901,7 +21261,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5711:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5727:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20931,7 +21291,7 @@ lab_endgetargs:; /*_.DISCRIM__V11*/ meltfptr[5] = ((melt_ptr_t) (melt_discr ((melt_ptr_t) ( /*_.NTA__V2*/ meltfptr[1]))));; - MELT_LOCATION ("warmelt-genobj.melt:5713:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5729:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20958,7 +21318,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5711:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5727:/ locexp"); melt_error_str ((melt_ptr_t) ( /*_.NREP_LOC__V10*/ meltfptr[7]), ("**UNIMPLEMENTED normal tester compilation "), (melt_ptr_t) ( /*_.NAMED_NAME__V12*/ meltfptr[6])); @@ -20966,7 +21326,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5714:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5730:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20982,7 +21342,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5714:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5730:/ cond.else"); /*^block */ /*anyblock */ @@ -20993,7 +21353,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("@$@UNIMPLEMENTED normal tester compilation"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (5714) ? (5714) : __LINE__, __FUNCTION__); + melt_assert_failed (("@$@UNIMPLEMENTED normal tester compilation"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, (5730) ? (5730) : __LINE__, __FUNCTION__); ; } ; @@ -21008,7 +21368,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5714:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5730:/ clear"); /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; } @@ -21017,14 +21377,26 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5707:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5723:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V13*/ meltfptr[12];; - MELT_LOCATION ("warmelt-genobj.melt:5707:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5723:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -21131,7 +21503,7 @@ meltrout_170_warmelt_genobj_COMPILTST_NORMTESTER_MATCHER (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5719:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5735:/ getarg"); /*_.NTMA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -21161,7 +21533,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5720:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5736:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21187,7 +21559,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5720:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5736:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -21202,7 +21574,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5720:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5736:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21215,7 +21587,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5720; + argtab[2].meltbp_long = 5736; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_matcher ntma="; /*^apply.arg */ @@ -21234,7 +21606,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5720:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5736:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0; @@ -21247,7 +21619,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5720:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5736:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -21256,7 +21628,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5720:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5736:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -21271,7 +21643,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5721:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5737:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21283,7 +21655,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5721:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5737:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -21291,7 +21663,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5721:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5737:/ cond.else"); /*^block */ /*anyblock */ @@ -21305,7 +21677,7 @@ lab_endgetargs:; melt_assert_failed (("check ntma"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5721) ? (5721) : __LINE__, __FUNCTION__); + (5737) ? (5737) : __LINE__, __FUNCTION__); ; } ; @@ -21320,7 +21692,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5721:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5737:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; @@ -21333,7 +21705,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5722:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5738:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21345,7 +21717,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:5722:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5738:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -21353,7 +21725,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5722:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5738:/ cond.else"); /*^block */ /*anyblock */ @@ -21367,7 +21739,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5722) ? (5722) : __LINE__, __FUNCTION__); + (5738) ? (5738) : __LINE__, __FUNCTION__); ; } ; @@ -21382,7 +21754,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5722:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5738:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -21395,7 +21767,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5723:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5739:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21407,7 +21779,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:5723:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5739:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -21415,7 +21787,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5723:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5739:/ cond.else"); /*^block */ /*anyblock */ @@ -21429,7 +21801,7 @@ lab_endgetargs:; melt_assert_failed (("check tcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5723) ? (5723) : __LINE__, __FUNCTION__); + (5739) ? (5739) : __LINE__, __FUNCTION__); ; } ; @@ -21444,7 +21816,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5723:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5739:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -21455,10 +21827,10 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5724:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5740:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5725:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5741:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]), 0, "NREP_LOC"); @@ -21466,7 +21838,7 @@ lab_endgetargs:; meltfptr[15] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5726:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5742:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]), 1, "NTEST_MATCHED"); @@ -21474,7 +21846,7 @@ lab_endgetargs:; meltfptr[16] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5727:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5743:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]), 2, "NTEST_THEN"); @@ -21482,7 +21854,7 @@ lab_endgetargs:; meltfptr[17] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5728:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5744:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]), 3, "NTEST_ELSE"); @@ -21490,7 +21862,7 @@ lab_endgetargs:; meltfptr[18] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5729:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5745:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]), 7, "NTMATCH_MATCHER"); @@ -21498,7 +21870,7 @@ lab_endgetargs:; meltfptr[19] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5730:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5746:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]), 9, "NTMATCH_INARGS"); @@ -21506,7 +21878,7 @@ lab_endgetargs:; meltfptr[20] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5731:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5747:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]), 10, "NTMATCH_OUTLOCS"); @@ -21514,7 +21886,7 @@ lab_endgetargs:; meltfptr[21] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5732:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5748:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMA__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH"); @@ -21522,7 +21894,7 @@ lab_endgetargs:; meltfptr[22] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5733:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5749:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21540,7 +21912,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5734:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5750:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21561,7 +21933,7 @@ lab_endgetargs:; /*_.OLIST__V26*/ meltfptr[25] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[5]))));; - MELT_LOCATION ("warmelt-genobj.melt:5736:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5752:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 8, "GNCX_MATCHMAP"); @@ -21575,7 +21947,7 @@ lab_endgetargs:; ( /*_.MATCHMAP__V27*/ meltfptr[26]), (meltobject_ptr_t) ( /*_.NORMATCH__V23*/ meltfptr[22]));; - MELT_LOCATION ("warmelt-genobj.melt:5738:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5754:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21595,7 +21967,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5739:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5755:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -21621,7 +21993,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5741:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5757:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21647,7 +22019,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5741:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5757:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -21662,7 +22034,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5741:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5757:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21675,7 +22047,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5741; + argtab[2].meltbp_long = 5757; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_matcher matchmap="; @@ -21708,7 +22080,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V33*/ meltfptr[32];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5741:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5757:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] = 0; @@ -21721,7 +22093,7 @@ lab_endgetargs:; /*_.IF___V32*/ meltfptr[31] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5741:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5757:/ quasiblock"); /*_.PROGN___V34*/ meltfptr[32] = /*_.IF___V32*/ meltfptr[31];; @@ -21730,7 +22102,7 @@ lab_endgetargs:; /*_.IFCPP___V31*/ meltfptr[30] = /*_.PROGN___V34*/ meltfptr[32];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5741:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5757:/ clear"); /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V32*/ meltfptr[31] = 0; @@ -21743,12 +22115,12 @@ lab_endgetargs:; /*_.IFCPP___V31*/ meltfptr[30] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5743:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5759:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L8*/ meltfnum[1] = (( /*_.GOTOTHEN__V24*/ meltfptr[23]) == NULL);; - MELT_LOCATION ("warmelt-genobj.melt:5743:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5759:/ cond"); /*cond */ if ( /*_#NULL__L8*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -21758,7 +22130,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-genobj.melt:5744:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5760:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -21767,7 +22139,7 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-genobj.melt:5746:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5762:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -21778,7 +22150,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5747:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5763:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21810,7 +22182,7 @@ lab_endgetargs:; /*_.TESTMATCH_GOTOINSTR__V37*/ meltfptr[36];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5746:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5762:/ clear"); /*clear *//*_.TESTMATCH_GOTOINSTR__V37*/ meltfptr[36] = 0; } ; @@ -21822,7 +22194,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5748:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5764:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21850,18 +22222,18 @@ lab_endgetargs:; /*_.ENDMATCH_GOTOINSTR__V38*/ meltfptr[36];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5746:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5762:/ clear"); /*clear *//*_.ENDMATCH_GOTOINSTR__V38*/ meltfptr[36] = 0; } ; } ; - MELT_LOCATION ("warmelt-genobj.melt:5745:/ compute"); + MELT_LOCATION ("warmelt-genobj.melt:5761:/ compute"); /*_.GOTOTHEN__V24*/ meltfptr[23] = /*_.SETQ___V39*/ meltfptr[36] = /*_.IFELSE___V36*/ meltfptr[32];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5749:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5765:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21887,7 +22259,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5749:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5765:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -21902,7 +22274,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5749:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5765:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21916,7 +22288,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5749; + argtab[2].meltbp_long = 5765; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_matcher fixed gotothen="; @@ -21938,7 +22310,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V42*/ meltfptr[41];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5749:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5765:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V42*/ meltfptr[41] = 0; @@ -21951,7 +22323,7 @@ lab_endgetargs:; /*_.IF___V41*/ meltfptr[40] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5749:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5765:/ quasiblock"); /*_.PROGN___V43*/ meltfptr[41] = /*_.IF___V41*/ meltfptr[40];; @@ -21960,7 +22332,7 @@ lab_endgetargs:; /*_.IFCPP___V40*/ meltfptr[39] = /*_.PROGN___V43*/ meltfptr[41];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5749:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5765:/ clear"); /*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V41*/ meltfptr[40] = 0; @@ -21973,7 +22345,7 @@ lab_endgetargs:; /*_.IFCPP___V40*/ meltfptr[39] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5743:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5759:/ quasiblock"); /*_.PROGN___V44*/ meltfptr[40] = /*_.IFCPP___V40*/ meltfptr[39];; @@ -21982,7 +22354,7 @@ lab_endgetargs:; /*_.IFELSE___V35*/ meltfptr[31] = /*_.PROGN___V44*/ meltfptr[40];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5743:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5759:/ clear"); /*clear *//*_.IFELSE___V36*/ meltfptr[32] = 0; /*^clear */ /*clear *//*_.SETQ___V39*/ meltfptr[36] = 0; @@ -22001,7 +22373,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5751:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5767:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22027,7 +22399,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5751:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5767:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -22042,7 +22414,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5751:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5767:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -22056,7 +22428,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5751; + argtab[2].meltbp_long = 5767; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_matcher unfixed gotoelse="; @@ -22077,7 +22449,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V47*/ meltfptr[36];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5751:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5767:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V47*/ meltfptr[36] = 0; @@ -22090,7 +22462,7 @@ lab_endgetargs:; /*_.IF___V46*/ meltfptr[32] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5751:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5767:/ quasiblock"); /*_.PROGN___V48*/ meltfptr[39] = /*_.IF___V46*/ meltfptr[32];; @@ -22099,7 +22471,7 @@ lab_endgetargs:; /*_.IFCPP___V45*/ meltfptr[41] = /*_.PROGN___V48*/ meltfptr[39];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5751:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5767:/ clear"); /*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.IF___V46*/ meltfptr[32] = 0; @@ -22112,12 +22484,12 @@ lab_endgetargs:; /*_.IFCPP___V45*/ meltfptr[41] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5752:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5768:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L13*/ meltfnum[0] = (( /*_.GOTOELSE__V25*/ meltfptr[24]) == NULL);; - MELT_LOCATION ("warmelt-genobj.melt:5752:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5768:/ cond"); /*cond */ if ( /*_#NULL__L13*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -22127,7 +22499,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-genobj.melt:5753:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5769:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -22136,7 +22508,7 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-genobj.melt:5755:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5771:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -22147,7 +22519,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5756:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5772:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -22179,7 +22551,7 @@ lab_endgetargs:; /*_.TESTMATCH_GOTOINSTR__V51*/ meltfptr[32];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5755:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5771:/ clear"); /*clear *//*_.TESTMATCH_GOTOINSTR__V51*/ meltfptr[32] = 0; } ; @@ -22191,7 +22563,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5757:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5773:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -22219,18 +22591,18 @@ lab_endgetargs:; /*_.ENDMATCH_GOTOINSTR__V52*/ meltfptr[39];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5755:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5771:/ clear"); /*clear *//*_.ENDMATCH_GOTOINSTR__V52*/ meltfptr[39] = 0; } ; } ; - MELT_LOCATION ("warmelt-genobj.melt:5754:/ compute"); + MELT_LOCATION ("warmelt-genobj.melt:5770:/ compute"); /*_.GOTOELSE__V25*/ meltfptr[24] = /*_.SETQ___V53*/ meltfptr[32] = /*_.IFELSE___V50*/ meltfptr[36];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5758:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5774:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22256,7 +22628,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5758:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5774:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -22271,7 +22643,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5758:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5774:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -22285,7 +22657,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5758; + argtab[2].meltbp_long = 5774; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_matcher fixed gotoelse="; @@ -22307,7 +22679,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V56*/ meltfptr[55];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5758:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5774:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[14] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V56*/ meltfptr[55] = 0; @@ -22320,7 +22692,7 @@ lab_endgetargs:; /*_.IF___V55*/ meltfptr[54] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5758:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5774:/ quasiblock"); /*_.PROGN___V57*/ meltfptr[55] = /*_.IF___V55*/ meltfptr[54];; @@ -22329,7 +22701,7 @@ lab_endgetargs:; /*_.IFCPP___V54*/ meltfptr[39] = /*_.PROGN___V57*/ meltfptr[55];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5758:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5774:/ clear"); /*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.IF___V55*/ meltfptr[54] = 0; @@ -22342,7 +22714,7 @@ lab_endgetargs:; /*_.IFCPP___V54*/ meltfptr[39] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5752:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5768:/ quasiblock"); /*_.PROGN___V58*/ meltfptr[54] = /*_.IFCPP___V54*/ meltfptr[39];; @@ -22351,7 +22723,7 @@ lab_endgetargs:; /*_.IFELSE___V49*/ meltfptr[40] = /*_.PROGN___V58*/ meltfptr[54];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5752:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5768:/ clear"); /*clear *//*_.IFELSE___V50*/ meltfptr[36] = 0; /*^clear */ /*clear *//*_.SETQ___V53*/ meltfptr[32] = 0; @@ -22370,7 +22742,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5760:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5776:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22396,7 +22768,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5760:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5776:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[14]) /*then */ { /*^cond.then */ @@ -22411,7 +22783,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5760:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5776:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -22425,7 +22797,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5760; + argtab[2].meltbp_long = 5776; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_matcher freelist="; @@ -22452,7 +22824,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V61*/ meltfptr[32];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5760:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5776:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V61*/ meltfptr[32] = 0; @@ -22465,7 +22837,7 @@ lab_endgetargs:; /*_.IF___V60*/ meltfptr[36] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5760:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5776:/ quasiblock"); /*_.PROGN___V62*/ meltfptr[39] = /*_.IF___V60*/ meltfptr[36];; @@ -22474,7 +22846,7 @@ lab_endgetargs:; /*_.IFCPP___V59*/ meltfptr[55] = /*_.PROGN___V62*/ meltfptr[39];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5760:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5776:/ clear"); /*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[14] = 0; /*^clear */ /*clear *//*_.IF___V60*/ meltfptr[36] = 0; @@ -22489,7 +22861,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5761:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5777:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22500,7 +22872,7 @@ lab_endgetargs:; /*_#IS_STRING__L18*/ meltfnum[9] = (melt_magic_discr ((melt_ptr_t) ( /*_.PREFIX__V28*/ meltfptr[27])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-genobj.melt:5761:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5777:/ cond"); /*cond */ if ( /*_#IS_STRING__L18*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -22508,7 +22880,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5761:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5777:/ cond.else"); /*^block */ /*anyblock */ @@ -22522,7 +22894,7 @@ lab_endgetargs:; melt_assert_failed (("check prefix"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5761) ? (5761) : __LINE__, __FUNCTION__); + (5777) ? (5777) : __LINE__, __FUNCTION__); ; } ; @@ -22537,7 +22909,7 @@ lab_endgetargs:; /*_.IFCPP___V63*/ meltfptr[54] = /*_.IFELSE___V64*/ meltfptr[32];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5761:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5777:/ clear"); /*clear *//*_#IS_STRING__L18*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.IFELSE___V64*/ meltfptr[32] = 0; @@ -22564,7 +22936,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5766:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5782:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22577,7 +22949,7 @@ lab_endgetargs:; ( /*_.OBLOC__V66*/ meltfptr[39]), (melt_ptr_t) (( /*!CLASS_OBJLOCV */ meltfrout->tabval[9])));; - MELT_LOCATION ("warmelt-genobj.melt:5766:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5782:/ cond"); /*cond */ if ( /*_#IS_A__L19*/ meltfnum[14]) /*then */ { /*^cond.then */ @@ -22585,7 +22957,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5766:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5782:/ cond.else"); /*^block */ /*anyblock */ @@ -22599,7 +22971,7 @@ lab_endgetargs:; melt_assert_failed (("check obloc"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5766) ? (5766) : __LINE__, + (5782) ? (5782) : __LINE__, __FUNCTION__); ; } @@ -22615,7 +22987,7 @@ lab_endgetargs:; /*_.IFCPP___V67*/ meltfptr[32] = /*_.IFELSE___V68*/ meltfptr[67];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5766:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5782:/ clear"); /*clear *//*_#IS_A__L19*/ meltfnum[14] = 0; /*^clear */ /*clear *//*_.IFELSE___V68*/ meltfptr[67] = 0; @@ -22626,7 +22998,7 @@ lab_endgetargs:; /*_.IFCPP___V67*/ meltfptr[32] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5767:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5783:/ quasiblock"); /*^checksignal */ @@ -22669,14 +23041,14 @@ lab_endgetargs:; /*_.OCLEAROB__V69*/ meltfptr[67] = /*_.INST__V70*/ meltfptr[69];; { - MELT_LOCATION ("warmelt-genobj.melt:5771:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5787:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V26*/ meltfptr[25]), (melt_ptr_t) ( /*_.OCLEAROB__V69*/ meltfptr[67])); } ; - MELT_LOCATION ("warmelt-genobj.melt:5767:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5783:/ clear"); /*clear *//*_.OCLEAROB__V69*/ meltfptr[67] = 0; } /* end foreach_in_list meltcit1__EACHLIST */ /*_.LOCPAIR__V65*/ meltfptr[36] = NULL; @@ -22685,7 +23057,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-genobj.melt:5763:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5779:/ clear"); /*clear *//*_.LOCPAIR__V65*/ meltfptr[36] = 0; /*^clear */ /*clear *//*_.OBLOC__V66*/ meltfptr[39] = 0; @@ -22695,7 +23067,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5773:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5789:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22721,7 +23093,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5773:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5789:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L20*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -22736,7 +23108,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5773:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5789:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -22750,7 +23122,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5773; + argtab[2].meltbp_long = 5789; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_matcher before nmatcher="; @@ -22771,7 +23143,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V73*/ meltfptr[72];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5773:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5789:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L21*/ meltfnum[14] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V73*/ meltfptr[72] = 0; @@ -22784,7 +23156,7 @@ lab_endgetargs:; /*_.IF___V72*/ meltfptr[71] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5773:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5789:/ quasiblock"); /*_.PROGN___V74*/ meltfptr[72] = /*_.IF___V72*/ meltfptr[71];; @@ -22793,7 +23165,7 @@ lab_endgetargs:; /*_.IFCPP___V71*/ meltfptr[67] = /*_.PROGN___V74*/ meltfptr[72];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5773:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5789:/ clear"); /*clear *//*_#MELT_NEED_DBG__L20*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.IF___V72*/ meltfptr[71] = 0; @@ -22806,7 +23178,7 @@ lab_endgetargs:; /*_.IFCPP___V71*/ meltfptr[67] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5774:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5790:/ quasiblock"); /*^checksignal */ @@ -22816,7 +23188,7 @@ lab_endgetargs:; (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[12])), (0)));; - MELT_LOCATION ("warmelt-genobj.melt:5774:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5790:/ quasiblock"); /*^rawallocobj */ @@ -22900,7 +23272,7 @@ lab_endgetargs:; /*_.MATCX__V77*/ meltfptr[76] = /*_.INST__V78*/ meltfptr[77];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5783:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5799:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22926,7 +23298,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5783:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5799:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L22*/ meltfnum[14]) /*then */ { /*^cond.then */ @@ -22941,7 +23313,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5783:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5799:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -22955,7 +23327,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5783; + argtab[2].meltbp_long = 5799; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_matcher matcx="; @@ -22976,7 +23348,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V81*/ meltfptr[80];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5783:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5799:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L23*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V81*/ meltfptr[80] = 0; @@ -22989,7 +23361,7 @@ lab_endgetargs:; /*_.IF___V80*/ meltfptr[79] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5783:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5799:/ quasiblock"); /*_.PROGN___V82*/ meltfptr[80] = /*_.IF___V80*/ meltfptr[79];; @@ -22998,7 +23370,7 @@ lab_endgetargs:; /*_.IFCPP___V79*/ meltfptr[78] = /*_.PROGN___V82*/ meltfptr[80];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5783:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5799:/ clear"); /*clear *//*_#MELT_NEED_DBG__L22*/ meltfnum[14] = 0; /*^clear */ /*clear *//*_.IF___V80*/ meltfptr[79] = 0; @@ -23011,7 +23383,7 @@ lab_endgetargs:; /*_.IFCPP___V79*/ meltfptr[78] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5784:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5800:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -23033,7 +23405,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5785:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5801:/ cppif.then"); /*^block */ /*anyblock */ { @@ -23059,7 +23431,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5785:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5801:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -23074,7 +23446,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5785:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5801:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23088,7 +23460,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5785; + argtab[2].meltbp_long = 5801; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_matcher return olist="; @@ -23109,7 +23481,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V86*/ meltfptr[85];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5785:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5801:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L25*/ meltfnum[14] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V86*/ meltfptr[85] = 0; @@ -23122,7 +23494,7 @@ lab_endgetargs:; /*_.IF___V85*/ meltfptr[84] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5785:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5801:/ quasiblock"); /*_.PROGN___V87*/ meltfptr[85] = /*_.IF___V85*/ meltfptr[84];; @@ -23131,7 +23503,7 @@ lab_endgetargs:; /*_.IFCPP___V84*/ meltfptr[80] = /*_.PROGN___V87*/ meltfptr[85];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5785:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5801:/ clear"); /*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.IF___V85*/ meltfptr[84] = 0; @@ -23144,19 +23516,31 @@ lab_endgetargs:; /*_.IFCPP___V84*/ meltfptr[80] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5786:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5802:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OLIST__V26*/ meltfptr[25];; - MELT_LOCATION ("warmelt-genobj.melt:5786:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5802:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V75*/ meltfptr[71] = /*_.RETURN___V88*/ meltfptr[84];; - MELT_LOCATION ("warmelt-genobj.melt:5774:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5790:/ clear"); /*clear *//*_.MAKE_INTEGERBOX__V76*/ meltfptr[72] = 0; /*^clear */ /*clear *//*_.MATCX__V77*/ meltfptr[76] = 0; @@ -23170,7 +23554,7 @@ lab_endgetargs:; /*clear *//*_.RETURN___V88*/ meltfptr[84] = 0; /*_.LET___V15*/ meltfptr[13] = /*_.LET___V75*/ meltfptr[71];; - MELT_LOCATION ("warmelt-genobj.melt:5724:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5740:/ clear"); /*clear *//*_.NLOC__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.NMATCHED__V17*/ meltfptr[16] = 0; @@ -23220,14 +23604,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V71*/ meltfptr[67] = 0; /*^clear */ /*clear *//*_.LET___V75*/ meltfptr[71] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5719:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5735:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];; - MELT_LOCATION ("warmelt-genobj.melt:5719:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5735:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -23334,7 +23730,7 @@ meltrout_171_warmelt_genobj_COMPILTST_NORMTESTER_INSTANCE (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5792:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ getarg"); /*_.NTMI__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -23364,7 +23760,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5793:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5809:/ cppif.then"); /*^block */ /*anyblock */ { @@ -23390,7 +23786,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5793:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5809:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -23405,7 +23801,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5793:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5809:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23418,7 +23814,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5793; + argtab[2].meltbp_long = 5809; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_instance ntmi="; @@ -23438,7 +23834,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5793:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5809:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0; @@ -23451,7 +23847,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5793:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5809:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -23460,7 +23856,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5793:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5809:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -23475,7 +23871,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5794:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5810:/ cppif.then"); /*^block */ /*anyblock */ { @@ -23487,7 +23883,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_INSTANCE */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5794:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5810:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -23495,7 +23891,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5794:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5810:/ cond.else"); /*^block */ /*anyblock */ @@ -23509,7 +23905,7 @@ lab_endgetargs:; melt_assert_failed (("check ntmi"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5794) ? (5794) : __LINE__, __FUNCTION__); + (5810) ? (5810) : __LINE__, __FUNCTION__); ; } ; @@ -23524,7 +23920,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5794:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5810:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; @@ -23537,7 +23933,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5795:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5811:/ cppif.then"); /*^block */ /*anyblock */ { @@ -23549,7 +23945,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:5795:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5811:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -23557,7 +23953,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5795:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5811:/ cond.else"); /*^block */ /*anyblock */ @@ -23571,7 +23967,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5795) ? (5795) : __LINE__, __FUNCTION__); + (5811) ? (5811) : __LINE__, __FUNCTION__); ; } ; @@ -23586,7 +23982,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5795:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5811:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -23599,7 +23995,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5796:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5812:/ cppif.then"); /*^block */ /*anyblock */ { @@ -23611,7 +24007,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:5796:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5812:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -23619,7 +24015,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5796:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5812:/ cond.else"); /*^block */ /*anyblock */ @@ -23633,7 +24029,7 @@ lab_endgetargs:; melt_assert_failed (("check tcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5796) ? (5796) : __LINE__, __FUNCTION__); + (5812) ? (5812) : __LINE__, __FUNCTION__); ; } ; @@ -23648,7 +24044,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5796:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5812:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -23659,10 +24055,10 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5797:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5813:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5798:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5814:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]), 0, "NREP_LOC"); @@ -23670,7 +24066,7 @@ lab_endgetargs:; meltfptr[15] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5799:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5815:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]), 1, "NTEST_MATCHED"); @@ -23678,7 +24074,7 @@ lab_endgetargs:; meltfptr[16] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5800:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5816:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]), 2, "NTEST_THEN"); @@ -23686,7 +24082,7 @@ lab_endgetargs:; meltfptr[17] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5801:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5817:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]), 3, "NTEST_ELSE"); @@ -23694,7 +24090,7 @@ lab_endgetargs:; meltfptr[18] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5802:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5818:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH"); @@ -23702,7 +24098,7 @@ lab_endgetargs:; meltfptr[19] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5803:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5819:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]), 5, "NTEST_LOCCLIST"); @@ -23717,7 +24113,7 @@ lab_endgetargs:; /*_#NTESTIX__L6*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5806:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5822:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]), 7, "NTINST_CLASS"); @@ -23725,7 +24121,7 @@ lab_endgetargs:; meltfptr[22] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5807:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5823:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTMI__V2*/ meltfptr[1]), 8, "NTINST_FIELDLOCS"); @@ -23733,7 +24129,7 @@ lab_endgetargs:; meltfptr[23] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5808:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5824:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23760,13 +24156,13 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5808:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5824:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5809:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5825:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23792,13 +24188,13 @@ lab_endgetargs:; /*_.ENDMATCH_GOTOINSTR__V27*/ meltfptr[26];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5808:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5824:/ clear"); /*clear *//*_.ENDMATCH_GOTOINSTR__V27*/ meltfptr[26] = 0; } ; } ; - MELT_LOCATION ("warmelt-genobj.melt:5810:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5826:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23825,13 +24221,13 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5810:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5826:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5811:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5827:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23857,13 +24253,13 @@ lab_endgetargs:; /*_.ENDMATCH_GOTOINSTR__V30*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5810:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5826:/ clear"); /*clear *//*_.ENDMATCH_GOTOINSTR__V30*/ meltfptr[29] = 0; } ; } ; - MELT_LOCATION ("warmelt-genobj.melt:5812:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5828:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -23880,7 +24276,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5813:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5829:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -23897,7 +24293,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5814:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5830:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23925,7 +24321,7 @@ lab_endgetargs:; /*_.OELSELIST__V35*/ meltfptr[34] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));; - MELT_LOCATION ("warmelt-genobj.melt:5817:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5833:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -23962,7 +24358,7 @@ lab_endgetargs:; ( /*_.OTHENLIST__V34*/ meltfptr[33]), "OBLO_BODYL"); ; /*_.OTHENBLOCK__V36*/ meltfptr[35] = /*_.INST__V37*/ meltfptr[36];; - MELT_LOCATION ("warmelt-genobj.melt:5821:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5837:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -23999,7 +24395,7 @@ lab_endgetargs:; ( /*_.OELSELIST__V35*/ meltfptr[34]), "OBLO_BODYL"); ; /*_.OELSEBLOCK__V38*/ meltfptr[37] = /*_.INST__V39*/ meltfptr[38];; - MELT_LOCATION ("warmelt-genobj.melt:5825:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5841:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24031,7 +24427,7 @@ lab_endgetargs:; ""), argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5829:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5845:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -24090,7 +24486,7 @@ lab_endgetargs:; /*_.OCOND__V41*/ meltfptr[40] = /*_.INST__V42*/ meltfptr[41];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5835:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5851:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24116,7 +24512,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5835:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5851:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -24131,7 +24527,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5835:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5851:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24144,7 +24540,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5835; + argtab[2].meltbp_long = 5851; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_instance otest="; @@ -24183,7 +24579,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V45*/ meltfptr[44];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5835:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5851:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V45*/ meltfptr[44] = 0; @@ -24196,7 +24592,7 @@ lab_endgetargs:; /*_.IF___V44*/ meltfptr[43] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5835:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5851:/ quasiblock"); /*_.PROGN___V46*/ meltfptr[44] = /*_.IF___V44*/ meltfptr[43];; @@ -24205,7 +24601,7 @@ lab_endgetargs:; /*_.IFCPP___V43*/ meltfptr[42] = /*_.PROGN___V46*/ meltfptr[44];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5835:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5851:/ clear"); /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V44*/ meltfptr[43] = 0; @@ -24220,7 +24616,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5838:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5854:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24231,7 +24627,7 @@ lab_endgetargs:; /*_#IS_OBJECT__L9*/ meltfnum[7] = (melt_magic_discr ((melt_ptr_t) ( /*_.OCLASS__V31*/ meltfptr[29])) == MELTOBMAG_OBJECT);; - MELT_LOCATION ("warmelt-genobj.melt:5838:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5854:/ cond"); /*cond */ if ( /*_#IS_OBJECT__L9*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -24239,7 +24635,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5838:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5854:/ cond.else"); /*^block */ /*anyblock */ @@ -24253,7 +24649,7 @@ lab_endgetargs:; melt_assert_failed (("check oclass"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5838) ? (5838) : __LINE__, __FUNCTION__); + (5854) ? (5854) : __LINE__, __FUNCTION__); ; } ; @@ -24268,7 +24664,7 @@ lab_endgetargs:; /*_.IFCPP___V47*/ meltfptr[43] = /*_.IFELSE___V48*/ meltfptr[44];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5838:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5854:/ clear"); /*clear *//*_#IS_OBJECT__L9*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IFELSE___V48*/ meltfptr[44] = 0; @@ -24295,7 +24691,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5843:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5859:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24321,7 +24717,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5843:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5859:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -24336,7 +24732,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5843:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5859:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24350,7 +24746,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5843; + argtab[2].meltbp_long = 5859; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_instance obloc="; @@ -24372,7 +24768,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V53*/ meltfptr[52];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5843:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5859:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V53*/ meltfptr[52] = 0; @@ -24385,7 +24781,7 @@ lab_endgetargs:; /*_.IF___V52*/ meltfptr[51] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5843:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5859:/ quasiblock"); /*_.PROGN___V54*/ meltfptr[52] = /*_.IF___V52*/ meltfptr[51];; @@ -24394,7 +24790,7 @@ lab_endgetargs:; /*_.IFCPP___V51*/ meltfptr[50] = /*_.PROGN___V54*/ meltfptr[52];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5843:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5859:/ clear"); /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V52*/ meltfptr[51] = 0; @@ -24409,7 +24805,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5844:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5860:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24422,7 +24818,7 @@ lab_endgetargs:; ( /*_.OBLOC__V50*/ meltfptr[49]), (melt_ptr_t) (( /*!CLASS_OBJLOCV */ meltfrout->tabval[13])));; - MELT_LOCATION ("warmelt-genobj.melt:5844:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5860:/ cond"); /*cond */ if ( /*_#IS_A__L12*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -24430,7 +24826,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5844:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5860:/ cond.else"); /*^block */ /*anyblock */ @@ -24444,7 +24840,7 @@ lab_endgetargs:; melt_assert_failed (("check obloc"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5844) ? (5844) : __LINE__, + (5860) ? (5860) : __LINE__, __FUNCTION__); ; } @@ -24460,7 +24856,7 @@ lab_endgetargs:; /*_.IFCPP___V55*/ meltfptr[51] = /*_.IFELSE___V56*/ meltfptr[52];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5844:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5860:/ clear"); /*clear *//*_#IS_A__L12*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IFELSE___V56*/ meltfptr[52] = 0; @@ -24471,7 +24867,7 @@ lab_endgetargs:; /*_.IFCPP___V55*/ meltfptr[51] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5845:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5861:/ quasiblock"); /*^checksignal */ @@ -24514,14 +24910,14 @@ lab_endgetargs:; /*_.OCLEAROB__V57*/ meltfptr[52] = /*_.INST__V58*/ meltfptr[57];; { - MELT_LOCATION ("warmelt-genobj.melt:5849:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5865:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V22*/ meltfptr[21]), (melt_ptr_t) ( /*_.OCLEAROB__V57*/ meltfptr[52])); } ; - MELT_LOCATION ("warmelt-genobj.melt:5845:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5861:/ clear"); /*clear *//*_.OCLEAROB__V57*/ meltfptr[52] = 0; } /* end foreach_in_list meltcit1__EACHLIST */ /*_.LOCPAIR__V49*/ meltfptr[44] = NULL; @@ -24530,7 +24926,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-genobj.melt:5840:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5856:/ clear"); /*clear *//*_.LOCPAIR__V49*/ meltfptr[44] = 0; /*^clear */ /*clear *//*_.OBLOC__V50*/ meltfptr[49] = 0; @@ -24542,14 +24938,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5852:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5868:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V22*/ meltfptr[21]), (melt_ptr_t) ( /*_.OCOND__V41*/ meltfptr[40])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5855:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5871:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24575,7 +24971,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5855:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5871:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -24590,7 +24986,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5855:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5871:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24604,7 +25000,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5855; + argtab[2].meltbp_long = 5871; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_instance ntflds="; @@ -24631,7 +25027,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V61*/ meltfptr[60];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5855:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5871:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V61*/ meltfptr[60] = 0; @@ -24644,7 +25040,7 @@ lab_endgetargs:; /*_.IF___V60*/ meltfptr[59] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5855:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5871:/ quasiblock"); /*_.PROGN___V62*/ meltfptr[60] = /*_.IF___V60*/ meltfptr[59];; @@ -24653,7 +25049,7 @@ lab_endgetargs:; /*_.IFCPP___V59*/ meltfptr[52] = /*_.PROGN___V62*/ meltfptr[60];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5855:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5871:/ clear"); /*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V60*/ meltfptr[59] = 0; @@ -24682,7 +25078,7 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-genobj.melt:5859:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5875:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -24695,7 +25091,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5861:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5877:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24721,7 +25117,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5861:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5877:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -24737,7 +25133,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-genobj.melt:5861:/ checksignal"); + ("warmelt-genobj.melt:5877:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24751,7 +25147,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5861; + argtab[2].meltbp_long = 5877; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_instance fldoc="; @@ -24779,7 +25175,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V66*/ meltfptr[65];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5861:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5877:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] = 0; /*^clear */ @@ -24793,7 +25189,7 @@ lab_endgetargs:; /*_.IF___V65*/ meltfptr[64] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5861:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5877:/ quasiblock"); /*_.PROGN___V67*/ meltfptr[65] = @@ -24804,7 +25200,7 @@ lab_endgetargs:; /*_.PROGN___V67*/ meltfptr[65];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5861:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5877:/ clear"); /*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V65*/ meltfptr[64] = 0; @@ -24819,7 +25215,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5862:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5878:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24831,7 +25227,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.FLDOC__V63*/ meltfptr[59]), (melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */ meltfrout->tabval[15])));; - MELT_LOCATION ("warmelt-genobj.melt:5862:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5878:/ cond"); /*cond */ if ( /*_#IS_A__L18*/ meltfnum[16]) /*then */ { /*^cond.then */ @@ -24839,7 +25235,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5862:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5878:/ cond.else"); /*^block */ /*anyblock */ @@ -24854,7 +25250,7 @@ lab_endgetargs:; ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5862) ? (5862) : __LINE__, + (5878) ? (5878) : __LINE__, __FUNCTION__); ; } @@ -24871,7 +25267,7 @@ lab_endgetargs:; /*_.IFELSE___V69*/ meltfptr[65];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5862:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5878:/ clear"); /*clear *//*_#IS_A__L18*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.IFELSE___V69*/ meltfptr[65] = 0; @@ -24882,7 +25278,7 @@ lab_endgetargs:; /*_.IFCPP___V68*/ meltfptr[64] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5863:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5879:/ quasiblock"); /*^checksignal */ @@ -24905,7 +25301,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5864:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5880:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.FLDOC__V63*/ meltfptr[59]), 3, "NOCC_BIND"); @@ -24913,7 +25309,7 @@ lab_endgetargs:; meltfptr[70] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5865:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5881:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.FLBIND__V71*/ meltfptr[70]), 2, "LETBIND_EXPR"); @@ -24921,7 +25317,7 @@ lab_endgetargs:; meltfptr[71] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5866:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5882:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -24943,7 +25339,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5868:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5884:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24955,7 +25351,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.FLBIND__V71*/ meltfptr[70]), (melt_ptr_t) (( /*!CLASS_NORMAL_LET_BINDING */ meltfrout->tabval[16])));; - MELT_LOCATION ("warmelt-genobj.melt:5868:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5884:/ cond"); /*cond */ if ( /*_#IS_A__L19*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -24963,7 +25359,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5868:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5884:/ cond.else"); /*^block */ /*anyblock */ @@ -24978,7 +25374,7 @@ lab_endgetargs:; ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5868) ? (5868) : __LINE__, + (5884) ? (5884) : __LINE__, __FUNCTION__); ; } @@ -24995,7 +25391,7 @@ lab_endgetargs:; /*_.IFELSE___V75*/ meltfptr[74];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5868:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5884:/ clear"); /*clear *//*_#IS_A__L19*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V75*/ meltfptr[74] = 0; @@ -25008,7 +25404,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5869:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5885:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25020,7 +25416,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.FLDGET__V72*/ meltfptr[71]), (melt_ptr_t) (( /*!CLASS_NREP_UNSAFE_GET_FIELD */ meltfrout->tabval[17])));; - MELT_LOCATION ("warmelt-genobj.melt:5869:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5885:/ cond"); /*cond */ if ( /*_#IS_A__L20*/ meltfnum[16]) /*then */ { /*^cond.then */ @@ -25028,7 +25424,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5869:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5885:/ cond.else"); /*^block */ /*anyblock */ @@ -25043,7 +25439,7 @@ lab_endgetargs:; ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5869) ? (5869) : __LINE__, + (5885) ? (5885) : __LINE__, __FUNCTION__); ; } @@ -25060,7 +25456,7 @@ lab_endgetargs:; /*_.IFELSE___V77*/ meltfptr[76];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5869:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5885:/ clear"); /*clear *//*_#IS_A__L20*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.IFELSE___V77*/ meltfptr[76] = 0; @@ -25071,7 +25467,7 @@ lab_endgetargs:; /*_.IFCPP___V76*/ meltfptr[74] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5870:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5886:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -25093,7 +25489,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5871:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5887:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25119,7 +25515,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5871:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5887:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -25135,7 +25531,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-genobj.melt:5871:/ checksignal"); + ("warmelt-genobj.melt:5887:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -25149,7 +25545,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5871; + argtab[2].meltbp_long = 5887; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_instance ofget="; @@ -25171,7 +25567,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V81*/ meltfptr[80];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5871:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5887:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[16] = 0; /*^clear */ @@ -25185,7 +25581,7 @@ lab_endgetargs:; /*_.IF___V80*/ meltfptr[79] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5871:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5887:/ quasiblock"); /*_.PROGN___V82*/ meltfptr[80] = @@ -25196,7 +25592,7 @@ lab_endgetargs:; /*_.PROGN___V82*/ meltfptr[80];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5871:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5887:/ clear"); /*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V80*/ meltfptr[79] = 0; @@ -25211,7 +25607,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5872:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5888:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25223,7 +25619,7 @@ lab_endgetargs:; (melt_magic_discr ((melt_ptr_t) ( /*_.OFGET__V73*/ meltfptr[72])) == MELTOBMAG_OBJECT);; - MELT_LOCATION ("warmelt-genobj.melt:5872:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5888:/ cond"); /*cond */ if ( /*_#IS_OBJECT__L23*/ meltfnum[16]) /*then */ { /*^cond.then */ @@ -25231,7 +25627,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5872:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5888:/ cond.else"); /*^block */ /*anyblock */ @@ -25246,7 +25642,7 @@ lab_endgetargs:; ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5872) ? (5872) : __LINE__, + (5888) ? (5888) : __LINE__, __FUNCTION__); ; } @@ -25263,7 +25659,7 @@ lab_endgetargs:; /*_.IFELSE___V84*/ meltfptr[80];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5872:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5888:/ clear"); /*clear *//*_#IS_OBJECT__L23*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.IFELSE___V84*/ meltfptr[80] = 0; @@ -25276,7 +25672,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5873:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5889:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OTHENLIST__V34*/ meltfptr[33]), (melt_ptr_t) ( /*_.OFGET__V73*/ @@ -25284,7 +25680,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-genobj.melt:5863:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5879:/ clear"); /*clear *//*_.FLOVAR__V70*/ meltfptr[65] = 0; /*^clear */ /*clear *//*_.FLBIND__V71*/ meltfptr[70] = 0; @@ -25302,12 +25698,12 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V79*/ meltfptr[78] = 0; /*^clear */ /*clear *//*_.IFCPP___V83*/ meltfptr[79] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5860:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5876:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5859:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5875:/ clear"); /*clear *//*_.IFCPP___V64*/ meltfptr[60] = 0; /*^clear */ /*clear *//*_.IFCPP___V68*/ meltfptr[64] = 0; @@ -25321,7 +25717,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-genobj.melt:5856:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5872:/ clear"); /*clear *//*_.FLDOC__V63*/ meltfptr[59] = 0; /*^clear */ /*clear *//*_#FLDIX__L15*/ meltfnum[7] = 0; @@ -25329,7 +25725,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5876:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5892:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25340,7 +25736,7 @@ lab_endgetargs:; /*_#IS_OBJECT__L24*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.GOTOTHEN__V26*/ meltfptr[25])) == MELTOBMAG_OBJECT);; - MELT_LOCATION ("warmelt-genobj.melt:5876:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5892:/ cond"); /*cond */ if ( /*_#IS_OBJECT__L24*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -25348,7 +25744,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5876:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5892:/ cond.else"); /*^block */ /*anyblock */ @@ -25362,7 +25758,7 @@ lab_endgetargs:; melt_assert_failed (("check gotothen"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5876) ? (5876) : __LINE__, __FUNCTION__); + (5892) ? (5892) : __LINE__, __FUNCTION__); ; } ; @@ -25377,7 +25773,7 @@ lab_endgetargs:; /*_.IFCPP___V85*/ meltfptr[80] = /*_.IFELSE___V86*/ meltfptr[65];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5876:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5892:/ clear"); /*clear *//*_#IS_OBJECT__L24*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V86*/ meltfptr[65] = 0; @@ -25390,14 +25786,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5877:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5893:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OTHENLIST__V34*/ meltfptr[33]), (melt_ptr_t) ( /*_.GOTOTHEN__V26*/ meltfptr[25])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5880:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5896:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25408,7 +25804,7 @@ lab_endgetargs:; /*_#IS_OBJECT__L25*/ meltfnum[16] = (melt_magic_discr ((melt_ptr_t) ( /*_.GOTOELSE__V29*/ meltfptr[28])) == MELTOBMAG_OBJECT);; - MELT_LOCATION ("warmelt-genobj.melt:5880:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5896:/ cond"); /*cond */ if ( /*_#IS_OBJECT__L25*/ meltfnum[16]) /*then */ { /*^cond.then */ @@ -25416,7 +25812,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5880:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5896:/ cond.else"); /*^block */ /*anyblock */ @@ -25430,7 +25826,7 @@ lab_endgetargs:; melt_assert_failed (("check gotoelse"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5880) ? (5880) : __LINE__, __FUNCTION__); + (5896) ? (5896) : __LINE__, __FUNCTION__); ; } ; @@ -25445,7 +25841,7 @@ lab_endgetargs:; /*_.IFCPP___V87*/ meltfptr[70] = /*_.IFELSE___V88*/ meltfptr[71];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5880:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5896:/ clear"); /*clear *//*_#IS_OBJECT__L25*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.IFELSE___V88*/ meltfptr[71] = 0; @@ -25458,14 +25854,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5881:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5897:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OELSELIST__V35*/ meltfptr[34]), (melt_ptr_t) ( /*_.GOTOELSE__V29*/ meltfptr[28])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5882:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5898:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25491,7 +25887,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5882:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5898:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -25506,7 +25902,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5882:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5898:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -25520,7 +25916,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5882; + argtab[2].meltbp_long = 5898; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_instance final olist="; @@ -25541,7 +25937,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V91*/ meltfptr[74];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5882:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5898:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V91*/ meltfptr[74] = 0; @@ -25554,7 +25950,7 @@ lab_endgetargs:; /*_.IF___V90*/ meltfptr[73] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5882:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5898:/ quasiblock"); /*_.PROGN___V92*/ meltfptr[76] = /*_.IF___V90*/ meltfptr[73];; @@ -25563,7 +25959,7 @@ lab_endgetargs:; /*_.IFCPP___V89*/ meltfptr[72] = /*_.PROGN___V92*/ meltfptr[76];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5882:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5898:/ clear"); /*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V90*/ meltfptr[73] = 0; @@ -25576,19 +25972,31 @@ lab_endgetargs:; /*_.IFCPP___V89*/ meltfptr[72] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5883:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5899:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OLIST__V22*/ meltfptr[21];; - MELT_LOCATION ("warmelt-genobj.melt:5883:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5899:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V15*/ meltfptr[13] = /*_.RETURN___V93*/ meltfptr[78];; - MELT_LOCATION ("warmelt-genobj.melt:5797:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5813:/ clear"); /*clear *//*_.NLOC__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.NMATCHED__V17*/ meltfptr[16] = 0; @@ -25648,14 +26056,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V89*/ meltfptr[72] = 0; /*^clear */ /*clear *//*_.RETURN___V93*/ meltfptr[78] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5792:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];; - MELT_LOCATION ("warmelt-genobj.melt:5792:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5808:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25762,7 +26182,7 @@ meltrout_172_warmelt_genobj_COMPILTST_NORMTESTER_TUPLE (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5892:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ getarg"); /*_.NTUP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -25792,7 +26212,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5893:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5909:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25818,7 +26238,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5893:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5909:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -25838,7 +26258,7 @@ lab_endgetargs:; /*_.DISCRIM__V7*/ meltfptr[6] = ((melt_ptr_t) (melt_discr ((melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1]))));; - MELT_LOCATION ("warmelt-genobj.melt:5893:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5909:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -25851,7 +26271,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5893; + argtab[2].meltbp_long = 5909; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_tuple ntup="; /*^apply.arg */ @@ -25876,7 +26296,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5893:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5909:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.DISCRIM__V7*/ meltfptr[6] = 0; @@ -25891,7 +26311,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5893:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5909:/ quasiblock"); /*_.PROGN___V9*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -25900,7 +26320,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V9*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5893:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5909:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -25915,7 +26335,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5894:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5910:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25927,7 +26347,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_TUPLE */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5894:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5910:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -25935,7 +26355,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5894:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5910:/ cond.else"); /*^block */ /*anyblock */ @@ -25949,7 +26369,7 @@ lab_endgetargs:; melt_assert_failed (("check ntup"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5894) ? (5894) : __LINE__, __FUNCTION__); + (5910) ? (5910) : __LINE__, __FUNCTION__); ; } ; @@ -25964,7 +26384,7 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[7] = /*_.IFELSE___V11*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5894:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5910:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V11*/ meltfptr[5] = 0; @@ -25977,7 +26397,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5895:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5911:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25989,7 +26409,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:5895:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5911:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -25997,7 +26417,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5895:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5911:/ cond.else"); /*^block */ /*anyblock */ @@ -26011,7 +26431,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5895) ? (5895) : __LINE__, __FUNCTION__); + (5911) ? (5911) : __LINE__, __FUNCTION__); ; } ; @@ -26026,7 +26446,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[6] = /*_.IFELSE___V13*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5895:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5911:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[5] = 0; @@ -26039,7 +26459,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5896:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5912:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26051,7 +26471,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:5896:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5912:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -26059,7 +26479,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5896:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5912:/ cond.else"); /*^block */ /*anyblock */ @@ -26073,7 +26493,7 @@ lab_endgetargs:; melt_assert_failed (("check tcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5896) ? (5896) : __LINE__, __FUNCTION__); + (5912) ? (5912) : __LINE__, __FUNCTION__); ; } ; @@ -26088,7 +26508,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[5] = /*_.IFELSE___V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5896:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5912:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0; @@ -26099,7 +26519,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[5] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5897:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5913:/ quasiblock"); /*^getslot */ @@ -26110,7 +26530,7 @@ lab_endgetargs:; meltfptr[16] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5898:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5914:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1]), 1, "NTEST_MATCHED"); @@ -26118,7 +26538,7 @@ lab_endgetargs:; meltfptr[17] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5899:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5915:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1]), 2, "NTEST_THEN"); @@ -26126,7 +26546,7 @@ lab_endgetargs:; meltfptr[18] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5900:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5916:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1]), 3, "NTEST_ELSE"); @@ -26134,7 +26554,7 @@ lab_endgetargs:; meltfptr[19] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5901:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5917:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH"); @@ -26142,7 +26562,7 @@ lab_endgetargs:; meltfptr[20] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5902:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5918:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1]), 5, "NTEST_LOCCLIST"); @@ -26150,7 +26570,7 @@ lab_endgetargs:; meltfptr[21] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5903:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:5919:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1]), 7, "NTTUPLE_COMPONENTS"); @@ -26170,7 +26590,7 @@ lab_endgetargs:; /*_#NTESTIX__L7*/ meltfnum[1] = (melt_get_int ((melt_ptr_t) ( /*_.NTUP__V2*/ meltfptr[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5907:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5923:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -26197,13 +26617,13 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5907:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5923:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5908:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5924:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -26229,13 +26649,13 @@ lab_endgetargs:; /*_.ENDMATCH_GOTOINSTR__V27*/ meltfptr[26];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5907:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5923:/ clear"); /*clear *//*_.ENDMATCH_GOTOINSTR__V27*/ meltfptr[26] = 0; } ; } ; - MELT_LOCATION ("warmelt-genobj.melt:5909:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5925:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -26262,13 +26682,13 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5909:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5925:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5910:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5926:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -26294,13 +26714,13 @@ lab_endgetargs:; /*_.ENDMATCH_GOTOINSTR__V30*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5909:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5925:/ clear"); /*clear *//*_.ENDMATCH_GOTOINSTR__V30*/ meltfptr[29] = 0; } ; } ; - MELT_LOCATION ("warmelt-genobj.melt:5911:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5927:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -26317,7 +26737,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5912:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5928:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -26345,7 +26765,7 @@ lab_endgetargs:; /*_.OELSELIST__V34*/ meltfptr[33] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));; - MELT_LOCATION ("warmelt-genobj.melt:5915:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5931:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -26382,7 +26802,7 @@ lab_endgetargs:; ( /*_.OTHENLIST__V33*/ meltfptr[32]), "OBLO_BODYL"); ; /*_.OTHENBLOCK__V35*/ meltfptr[34] = /*_.INST__V36*/ meltfptr[35];; - MELT_LOCATION ("warmelt-genobj.melt:5919:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5935:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -26419,7 +26839,7 @@ lab_endgetargs:; ( /*_.OELSELIST__V34*/ meltfptr[33]), "OBLO_BODYL"); ; /*_.OELSEBLOCK__V37*/ meltfptr[36] = /*_.INST__V38*/ meltfptr[37];; - MELT_LOCATION ("warmelt-genobj.melt:5923:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5939:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -26458,7 +26878,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5927:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5943:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -26517,7 +26937,7 @@ lab_endgetargs:; /*_.OCOND__V40*/ meltfptr[39] = /*_.INST__V41*/ meltfptr[40];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5933:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5949:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26543,7 +26963,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5933:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5949:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -26558,7 +26978,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5933:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5949:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -26571,7 +26991,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5933; + argtab[2].meltbp_long = 5949; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_tuple omatched="; @@ -26610,7 +27030,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V44*/ meltfptr[43];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5933:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5949:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V44*/ meltfptr[43] = 0; @@ -26623,7 +27043,7 @@ lab_endgetargs:; /*_.IF___V43*/ meltfptr[42] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5933:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5949:/ quasiblock"); /*_.PROGN___V45*/ meltfptr[43] = /*_.IF___V43*/ meltfptr[42];; @@ -26632,7 +27052,7 @@ lab_endgetargs:; /*_.IFCPP___V42*/ meltfptr[41] = /*_.PROGN___V45*/ meltfptr[43];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5933:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5949:/ clear"); /*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IF___V43*/ meltfptr[42] = 0; @@ -26661,7 +27081,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5940:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5956:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26687,7 +27107,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5940:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5956:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -26702,7 +27122,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5940:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5956:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -26716,7 +27136,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5940; + argtab[2].meltbp_long = 5956; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_tuple obloc="; @@ -26738,7 +27158,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V50*/ meltfptr[49];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5940:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5956:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V50*/ meltfptr[49] = 0; @@ -26751,7 +27171,7 @@ lab_endgetargs:; /*_.IF___V49*/ meltfptr[48] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5940:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5956:/ quasiblock"); /*_.PROGN___V51*/ meltfptr[49] = /*_.IF___V49*/ meltfptr[48];; @@ -26760,7 +27180,7 @@ lab_endgetargs:; /*_.IFCPP___V48*/ meltfptr[47] = /*_.PROGN___V51*/ meltfptr[49];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5940:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5956:/ clear"); /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.IF___V49*/ meltfptr[48] = 0; @@ -26775,7 +27195,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5941:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5957:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26788,7 +27208,7 @@ lab_endgetargs:; ( /*_.OBLOC__V47*/ meltfptr[43]), (melt_ptr_t) (( /*!CLASS_OBJLOCV */ meltfrout->tabval[13])));; - MELT_LOCATION ("warmelt-genobj.melt:5941:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5957:/ cond"); /*cond */ if ( /*_#IS_A__L12*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -26796,7 +27216,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5941:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5957:/ cond.else"); /*^block */ /*anyblock */ @@ -26810,7 +27230,7 @@ lab_endgetargs:; melt_assert_failed (("check obloc"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5941) ? (5941) : __LINE__, + (5957) ? (5957) : __LINE__, __FUNCTION__); ; } @@ -26826,7 +27246,7 @@ lab_endgetargs:; /*_.IFCPP___V52*/ meltfptr[48] = /*_.IFELSE___V53*/ meltfptr[49];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5941:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5957:/ clear"); /*clear *//*_#IS_A__L12*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IFELSE___V53*/ meltfptr[49] = 0; @@ -26837,7 +27257,7 @@ lab_endgetargs:; /*_.IFCPP___V52*/ meltfptr[48] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5942:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5958:/ quasiblock"); /*^checksignal */ @@ -26880,14 +27300,14 @@ lab_endgetargs:; /*_.OCLEAROB__V54*/ meltfptr[49] = /*_.INST__V55*/ meltfptr[54];; { - MELT_LOCATION ("warmelt-genobj.melt:5946:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5962:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V24*/ meltfptr[23]), (melt_ptr_t) ( /*_.OCLEAROB__V54*/ meltfptr[49])); } ; - MELT_LOCATION ("warmelt-genobj.melt:5942:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5958:/ clear"); /*clear *//*_.OCLEAROB__V54*/ meltfptr[49] = 0; } /* end foreach_in_list meltcit1__EACHLIST */ /*_.LOCPAIR__V46*/ meltfptr[42] = NULL; @@ -26896,7 +27316,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-genobj.melt:5937:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5953:/ clear"); /*clear *//*_.LOCPAIR__V46*/ meltfptr[42] = 0; /*^clear */ /*clear *//*_.OBLOC__V47*/ meltfptr[43] = 0; @@ -26908,14 +27328,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5949:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5965:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V24*/ meltfptr[23]), (melt_ptr_t) ( /*_.OCOND__V40*/ meltfptr[39])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5952:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5968:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26941,7 +27361,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5952:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5968:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -26956,7 +27376,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5952:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5968:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -26970,7 +27390,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5952; + argtab[2].meltbp_long = 5968; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_tuple ntupcomp="; @@ -26991,7 +27411,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V58*/ meltfptr[57];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5952:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5968:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V58*/ meltfptr[57] = 0; @@ -27004,7 +27424,7 @@ lab_endgetargs:; /*_.IF___V57*/ meltfptr[56] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5952:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5968:/ quasiblock"); /*_.PROGN___V59*/ meltfptr[57] = /*_.IF___V57*/ meltfptr[56];; @@ -27013,7 +27433,7 @@ lab_endgetargs:; /*_.IFCPP___V56*/ meltfptr[49] = /*_.PROGN___V59*/ meltfptr[57];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5952:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5968:/ clear"); /*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.IF___V57*/ meltfptr[56] = 0; @@ -27045,7 +27465,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5956:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5972:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27071,7 +27491,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5956:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5972:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -27086,7 +27506,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5956:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5972:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -27100,7 +27520,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5956; + argtab[2].meltbp_long = 5972; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_tuple curntup="; @@ -27127,7 +27547,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V63*/ meltfptr[62];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5956:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5972:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V63*/ meltfptr[62] = 0; @@ -27140,7 +27560,7 @@ lab_endgetargs:; /*_.IF___V62*/ meltfptr[61] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5956:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5972:/ quasiblock"); /*_.PROGN___V64*/ meltfptr[62] = /*_.IF___V62*/ meltfptr[61];; @@ -27149,7 +27569,7 @@ lab_endgetargs:; /*_.IFCPP___V61*/ meltfptr[57] = /*_.PROGN___V64*/ meltfptr[62];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5956:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5972:/ clear"); /*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.IF___V62*/ meltfptr[61] = 0; @@ -27162,7 +27582,7 @@ lab_endgetargs:; /*_.IFCPP___V61*/ meltfptr[57] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5957:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5973:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -27173,7 +27593,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:5958:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5974:/ quasiblock"); /*^checksignal */ @@ -27196,7 +27616,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:5959:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5975:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -27221,7 +27641,7 @@ lab_endgetargs:; /*_.CNBIND__V66*/ meltfptr[62] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5960:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5976:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -27246,7 +27666,7 @@ lab_endgetargs:; /*_.CURBEXP__V67*/ meltfptr[66] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5961:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5977:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -27268,7 +27688,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5963:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5979:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27294,7 +27714,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5963:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5979:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[16]) /*then */ { /*^cond.then */ @@ -27310,7 +27730,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-genobj.melt:5963:/ checksignal"); + ("warmelt-genobj.melt:5979:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -27324,7 +27744,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5963; + argtab[2].meltbp_long = 5979; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_tuple curovar="; @@ -27370,7 +27790,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V71*/ meltfptr[70];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5963:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5979:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[8] = 0; /*^clear */ @@ -27384,7 +27804,7 @@ lab_endgetargs:; /*_.IF___V70*/ meltfptr[69] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5963:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5979:/ quasiblock"); /*_.PROGN___V72*/ meltfptr[70] = @@ -27395,7 +27815,7 @@ lab_endgetargs:; /*_.PROGN___V72*/ meltfptr[70];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5963:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5979:/ clear"); /*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.IF___V70*/ meltfptr[69] = 0; @@ -27410,7 +27830,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5966:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5982:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27424,7 +27844,7 @@ lab_endgetargs:; (melt_ptr_t) (( /*!CLASS_OBJLOCV */ meltfrout-> tabval[13])));; - MELT_LOCATION ("warmelt-genobj.melt:5966:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5982:/ cond"); /*cond */ if ( /*_#IS_A__L20*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -27432,7 +27852,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5966:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5982:/ cond.else"); /*^block */ /*anyblock */ @@ -27447,7 +27867,7 @@ lab_endgetargs:; ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5966) ? (5966) : __LINE__, + (5982) ? (5982) : __LINE__, __FUNCTION__); ; } @@ -27464,7 +27884,7 @@ lab_endgetargs:; /*_.IFELSE___V74*/ meltfptr[70];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5966:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5982:/ clear"); /*clear *//*_#IS_A__L20*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.IFELSE___V74*/ meltfptr[70] = 0; @@ -27477,7 +27897,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5967:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5983:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27489,7 +27909,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CNBIND__V66*/ meltfptr[62]), (melt_ptr_t) (( /*!CLASS_NORMAL_LET_BINDING */ meltfrout->tabval[17])));; - MELT_LOCATION ("warmelt-genobj.melt:5967:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5983:/ cond"); /*cond */ if ( /*_#IS_A__L21*/ meltfnum[16]) /*then */ { /*^cond.then */ @@ -27497,7 +27917,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5967:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5983:/ cond.else"); /*^block */ /*anyblock */ @@ -27512,7 +27932,7 @@ lab_endgetargs:; ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5967) ? (5967) : __LINE__, + (5983) ? (5983) : __LINE__, __FUNCTION__); ; } @@ -27529,7 +27949,7 @@ lab_endgetargs:; /*_.IFELSE___V76*/ meltfptr[75];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5967:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5983:/ clear"); /*clear *//*_#IS_A__L21*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.IFELSE___V76*/ meltfptr[75] = 0; @@ -27542,7 +27962,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5968:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5984:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27554,7 +27974,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CURBEXP__V67*/ meltfptr[66]), (melt_ptr_t) (( /*!CLASS_NREP_UNSAFE_NTH_COMPONENT */ meltfrout->tabval[18])));; - MELT_LOCATION ("warmelt-genobj.melt:5968:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5984:/ cond"); /*cond */ if ( /*_#IS_A__L22*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -27562,7 +27982,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5968:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5984:/ cond.else"); /*^block */ /*anyblock */ @@ -27577,7 +27997,7 @@ lab_endgetargs:; ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5968) ? (5968) : __LINE__, + (5984) ? (5984) : __LINE__, __FUNCTION__); ; } @@ -27594,7 +28014,7 @@ lab_endgetargs:; /*_.IFELSE___V78*/ meltfptr[77];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5968:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5984:/ clear"); /*clear *//*_#IS_A__L22*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.IFELSE___V78*/ meltfptr[77] = 0; @@ -27607,7 +28027,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5969:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5985:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27650,7 +28070,7 @@ lab_endgetargs:; /*_#I__L24*/ meltfnum[8] = (( /*_#GET_INT__L23*/ meltfnum[16]) == ( /*_#TUPIX__L15*/ meltfnum[7]));; - MELT_LOCATION ("warmelt-genobj.melt:5969:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5985:/ cond"); /*cond */ if ( /*_#I__L24*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -27658,7 +28078,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5969:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5985:/ cond.else"); /*^block */ /*anyblock */ @@ -27673,7 +28093,7 @@ lab_endgetargs:; ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5969) ? (5969) : __LINE__, + (5985) ? (5985) : __LINE__, __FUNCTION__); ; } @@ -27690,7 +28110,7 @@ lab_endgetargs:; /*_.IFELSE___V81*/ meltfptr[80];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5969:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5985:/ clear"); /*clear *//*_.NUNTH_INDEX__V80*/ meltfptr[79] = 0; /*^clear */ /*clear *//*_#GET_INT__L23*/ meltfnum[16] = 0; @@ -27705,7 +28125,7 @@ lab_endgetargs:; /*_.IFCPP___V79*/ meltfptr[77] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5970:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5986:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -27727,7 +28147,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5971:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5987:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27753,7 +28173,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5971:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5987:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[16]) /*then */ { /*^cond.then */ @@ -27769,7 +28189,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-genobj.melt:5971:/ checksignal"); + ("warmelt-genobj.melt:5987:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -27783,7 +28203,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5971; + argtab[2].meltbp_long = 5987; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_tuple updated curoexp="; @@ -27805,7 +28225,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V85*/ meltfptr[84];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5971:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5987:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[8] = 0; /*^clear */ @@ -27819,7 +28239,7 @@ lab_endgetargs:; /*_.IF___V84*/ meltfptr[83] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5971:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5987:/ quasiblock"); /*_.PROGN___V86*/ meltfptr[84] = @@ -27830,7 +28250,7 @@ lab_endgetargs:; /*_.PROGN___V86*/ meltfptr[84];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5971:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5987:/ clear"); /*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.IF___V84*/ meltfptr[83] = 0; @@ -27845,7 +28265,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5972:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5988:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OTHENLIST__V33*/ meltfptr[32]), (melt_ptr_t) ( /*_.CUROEXP__V68*/ @@ -27853,7 +28273,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-genobj.melt:5958:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5974:/ clear"); /*clear *//*_.CUROVAR__V65*/ meltfptr[61] = 0; /*^clear */ /*clear *//*_.CNBIND__V66*/ meltfptr[62] = 0; @@ -27886,7 +28306,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-genobj.melt:5953:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5969:/ clear"); /*clear *//*_.CURNTUP__V60*/ meltfptr[56] = 0; /*^clear */ /*clear *//*_#TUPIX__L15*/ meltfnum[7] = 0; @@ -27896,7 +28316,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5976:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5992:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27907,7 +28327,7 @@ lab_endgetargs:; /*_#IS_OBJECT__L27*/ meltfnum[8] = (melt_magic_discr ((melt_ptr_t) ( /*_.GOTOTHEN__V26*/ meltfptr[25])) == MELTOBMAG_OBJECT);; - MELT_LOCATION ("warmelt-genobj.melt:5976:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5992:/ cond"); /*cond */ if ( /*_#IS_OBJECT__L27*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -27915,7 +28335,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5976:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5992:/ cond.else"); /*^block */ /*anyblock */ @@ -27929,7 +28349,7 @@ lab_endgetargs:; melt_assert_failed (("check gotothen"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5976) ? (5976) : __LINE__, __FUNCTION__); + (5992) ? (5992) : __LINE__, __FUNCTION__); ; } ; @@ -27944,7 +28364,7 @@ lab_endgetargs:; /*_.IFCPP___V87*/ meltfptr[83] = /*_.IFELSE___V88*/ meltfptr[84];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5976:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5992:/ clear"); /*clear *//*_#IS_OBJECT__L27*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.IFELSE___V88*/ meltfptr[84] = 0; @@ -27957,14 +28377,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5977:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5993:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OTHENLIST__V33*/ meltfptr[32]), (melt_ptr_t) ( /*_.GOTOTHEN__V26*/ meltfptr[25])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5980:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5996:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27975,7 +28395,7 @@ lab_endgetargs:; /*_#IS_OBJECT__L28*/ meltfnum[16] = (melt_magic_discr ((melt_ptr_t) ( /*_.GOTOELSE__V29*/ meltfptr[28])) == MELTOBMAG_OBJECT);; - MELT_LOCATION ("warmelt-genobj.melt:5980:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5996:/ cond"); /*cond */ if ( /*_#IS_OBJECT__L28*/ meltfnum[16]) /*then */ { /*^cond.then */ @@ -27983,7 +28403,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5980:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:5996:/ cond.else"); /*^block */ /*anyblock */ @@ -27997,7 +28417,7 @@ lab_endgetargs:; melt_assert_failed (("check gotoelse"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5980) ? (5980) : __LINE__, __FUNCTION__); + (5996) ? (5996) : __LINE__, __FUNCTION__); ; } ; @@ -28012,7 +28432,7 @@ lab_endgetargs:; /*_.IFCPP___V89*/ meltfptr[61] = /*_.IFELSE___V90*/ meltfptr[62];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5980:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5996:/ clear"); /*clear *//*_#IS_OBJECT__L28*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.IFELSE___V90*/ meltfptr[62] = 0; @@ -28025,14 +28445,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:5981:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:5997:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OELSELIST__V34*/ meltfptr[33]), (melt_ptr_t) ( /*_.GOTOELSE__V29*/ meltfptr[28])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5982:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:5998:/ cppif.then"); /*^block */ /*anyblock */ { @@ -28058,7 +28478,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5982:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:5998:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -28073,7 +28493,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5982:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5998:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -28087,7 +28507,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5982; + argtab[2].meltbp_long = 5998; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_tuple final olist="; @@ -28108,7 +28528,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V93*/ meltfptr[68];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5982:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5998:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L30*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V93*/ meltfptr[68] = 0; @@ -28121,7 +28541,7 @@ lab_endgetargs:; /*_.IF___V92*/ meltfptr[67] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5982:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:5998:/ quasiblock"); /*_.PROGN___V94*/ meltfptr[69] = /*_.IF___V92*/ meltfptr[67];; @@ -28130,7 +28550,7 @@ lab_endgetargs:; /*_.IFCPP___V91*/ meltfptr[66] = /*_.PROGN___V94*/ meltfptr[69];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5982:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5998:/ clear"); /*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.IF___V92*/ meltfptr[67] = 0; @@ -28143,19 +28563,31 @@ lab_endgetargs:; /*_.IFCPP___V91*/ meltfptr[66] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5983:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5999:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OLIST__V24*/ meltfptr[23];; - MELT_LOCATION ("warmelt-genobj.melt:5983:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5999:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V16*/ meltfptr[14] = /*_.RETURN___V95*/ meltfptr[70];; - MELT_LOCATION ("warmelt-genobj.melt:5897:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:5913:/ clear"); /*clear *//*_.NLOC__V17*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.NMATCHED__V18*/ meltfptr[17] = 0; @@ -28211,14 +28643,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V91*/ meltfptr[66] = 0; /*^clear */ /*clear *//*_.RETURN___V95*/ meltfptr[70] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5892:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-genobj.melt:5892:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:5908:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -28324,7 +28768,7 @@ meltrout_173_warmelt_genobj_COMPILTST_NORMTESTER_SAME (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:5991:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ getarg"); /*_.NTSA__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -28354,7 +28798,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5992:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6008:/ cppif.then"); /*^block */ /*anyblock */ { @@ -28380,7 +28824,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5992:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6008:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -28395,7 +28839,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:5992:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6008:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -28408,7 +28852,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5992; + argtab[2].meltbp_long = 6008; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_same ntsa="; /*^apply.arg */ @@ -28427,7 +28871,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5992:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6008:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0; @@ -28440,7 +28884,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:5992:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6008:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -28449,7 +28893,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5992:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6008:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -28464,7 +28908,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5993:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6009:/ cppif.then"); /*^block */ /*anyblock */ { @@ -28476,7 +28920,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NTSA__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_SAME */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:5993:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6009:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -28484,7 +28928,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5993:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6009:/ cond.else"); /*^block */ /*anyblock */ @@ -28498,7 +28942,7 @@ lab_endgetargs:; melt_assert_failed (("check ntsa"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5993) ? (5993) : __LINE__, __FUNCTION__); + (6009) ? (6009) : __LINE__, __FUNCTION__); ; } ; @@ -28513,7 +28957,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5993:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6009:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; @@ -28526,7 +28970,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5994:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6010:/ cppif.then"); /*^block */ /*anyblock */ { @@ -28538,7 +28982,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:5994:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6010:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -28546,7 +28990,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5994:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6010:/ cond.else"); /*^block */ /*anyblock */ @@ -28560,7 +29004,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5994) ? (5994) : __LINE__, __FUNCTION__); + (6010) ? (6010) : __LINE__, __FUNCTION__); ; } ; @@ -28575,7 +29019,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5994:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6010:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -28588,7 +29032,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:5995:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6011:/ cppif.then"); /*^block */ /*anyblock */ { @@ -28600,7 +29044,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:5995:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6011:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -28608,7 +29052,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:5995:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6011:/ cond.else"); /*^block */ /*anyblock */ @@ -28622,7 +29066,7 @@ lab_endgetargs:; melt_assert_failed (("check tcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (5995) ? (5995) : __LINE__, __FUNCTION__); + (6011) ? (6011) : __LINE__, __FUNCTION__); ; } ; @@ -28637,7 +29081,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:5995:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6011:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -28648,10 +29092,10 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:5996:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6012:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:5997:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6013:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSA__V2*/ meltfptr[1]), 0, "NREP_LOC"); @@ -28659,7 +29103,7 @@ lab_endgetargs:; meltfptr[15] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5998:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6014:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSA__V2*/ meltfptr[1]), 1, "NTEST_MATCHED"); @@ -28667,7 +29111,7 @@ lab_endgetargs:; meltfptr[16] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:5999:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6015:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSA__V2*/ meltfptr[1]), 2, "NTEST_THEN"); @@ -28675,7 +29119,7 @@ lab_endgetargs:; meltfptr[17] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6000:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6016:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSA__V2*/ meltfptr[1]), 3, "NTEST_ELSE"); @@ -28683,7 +29127,7 @@ lab_endgetargs:; meltfptr[18] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6001:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6017:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSA__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH"); @@ -28691,7 +29135,7 @@ lab_endgetargs:; meltfptr[19] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6002:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6018:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSA__V2*/ meltfptr[1]), 7, "NTSAME_IDENTICAL"); @@ -28701,7 +29145,7 @@ lab_endgetargs:; ; /*_#NTESTIX__L6*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) ( /*_.NTSA__V2*/ meltfptr[1])));; - MELT_LOCATION ("warmelt-genobj.melt:6004:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6020:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -28718,7 +29162,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6005:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6021:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -28735,7 +29179,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6006:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6022:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -28762,13 +29206,13 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6006:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6022:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:6007:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6023:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -28794,13 +29238,13 @@ lab_endgetargs:; /*_.ENDMATCH_GOTOINSTR__V26*/ meltfptr[25];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6006:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6022:/ clear"); /*clear *//*_.ENDMATCH_GOTOINSTR__V26*/ meltfptr[25] = 0; } ; } ; - MELT_LOCATION ("warmelt-genobj.melt:6008:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6024:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -28827,13 +29271,13 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6008:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6024:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:6009:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6025:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -28859,13 +29303,13 @@ lab_endgetargs:; /*_.ENDMATCH_GOTOINSTR__V29*/ meltfptr[28];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6008:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6024:/ clear"); /*clear *//*_.ENDMATCH_GOTOINSTR__V29*/ meltfptr[28] = 0; } ; } ; - MELT_LOCATION ("warmelt-genobj.melt:6010:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6026:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -28893,7 +29337,7 @@ lab_endgetargs:; /*_.OELSELIST__V32*/ meltfptr[31] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[8]))));; - MELT_LOCATION ("warmelt-genobj.melt:6013:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6029:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -28930,7 +29374,7 @@ lab_endgetargs:; ( /*_.OTHENLIST__V31*/ meltfptr[30]), "OBLO_BODYL"); ; /*_.OTHENBLOCK__V33*/ meltfptr[32] = /*_.INST__V34*/ meltfptr[33];; - MELT_LOCATION ("warmelt-genobj.melt:6017:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6033:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -28967,7 +29411,7 @@ lab_endgetargs:; ( /*_.OELSELIST__V32*/ meltfptr[31]), "OBLO_BODYL"); ; /*_.OELSEBLOCK__V35*/ meltfptr[34] = /*_.INST__V36*/ meltfptr[35];; - MELT_LOCATION ("warmelt-genobj.melt:6021:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6037:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -28999,7 +29443,7 @@ lab_endgetargs:; ""), argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6024:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6040:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -29063,7 +29507,7 @@ lab_endgetargs:; ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[8]))));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6031:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6047:/ cppif.then"); /*^block */ /*anyblock */ { @@ -29089,7 +29533,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6031:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6047:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -29104,7 +29548,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6031:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6047:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -29117,7 +29561,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6031; + argtab[2].meltbp_long = 6047; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_same ocond="; /*^apply.arg */ @@ -29137,7 +29581,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V43*/ meltfptr[42];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6031:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6047:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V43*/ meltfptr[42] = 0; @@ -29150,7 +29594,7 @@ lab_endgetargs:; /*_.IF___V42*/ meltfptr[41] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6031:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6047:/ quasiblock"); /*_.PROGN___V44*/ meltfptr[42] = /*_.IF___V42*/ meltfptr[41];; @@ -29159,7 +29603,7 @@ lab_endgetargs:; /*_.IFCPP___V41*/ meltfptr[40] = /*_.PROGN___V44*/ meltfptr[42];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6031:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6047:/ clear"); /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V42*/ meltfptr[41] = 0; @@ -29188,7 +29632,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6036:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6052:/ cppif.then"); /*^block */ /*anyblock */ { @@ -29201,7 +29645,7 @@ lab_endgetargs:; ( /*_.OBLOC__V46*/ meltfptr[42]), (melt_ptr_t) (( /*!CLASS_OBJLOCV */ meltfrout->tabval[13])));; - MELT_LOCATION ("warmelt-genobj.melt:6036:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6052:/ cond"); /*cond */ if ( /*_#IS_A__L9*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -29209,7 +29653,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6036:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6052:/ cond.else"); /*^block */ /*anyblock */ @@ -29223,7 +29667,7 @@ lab_endgetargs:; melt_assert_failed (("check obloc"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6036) ? (6036) : __LINE__, + (6052) ? (6052) : __LINE__, __FUNCTION__); ; } @@ -29239,7 +29683,7 @@ lab_endgetargs:; /*_.IFCPP___V47*/ meltfptr[46] = /*_.IFELSE___V48*/ meltfptr[47];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6036:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6052:/ clear"); /*clear *//*_#IS_A__L9*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IFELSE___V48*/ meltfptr[47] = 0; @@ -29250,7 +29694,7 @@ lab_endgetargs:; /*_.IFCPP___V47*/ meltfptr[46] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6037:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6053:/ quasiblock"); /*^checksignal */ @@ -29293,14 +29737,14 @@ lab_endgetargs:; /*_.OCLEAROB__V49*/ meltfptr[47] = /*_.INST__V50*/ meltfptr[49];; { - MELT_LOCATION ("warmelt-genobj.melt:6041:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6057:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V40*/ meltfptr[39]), (melt_ptr_t) ( /*_.OCLEAROB__V49*/ meltfptr[47])); } ; - MELT_LOCATION ("warmelt-genobj.melt:6037:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6053:/ clear"); /*clear *//*_.OCLEAROB__V49*/ meltfptr[47] = 0; } /* end foreach_in_list meltcit1__EACHLIST */ /*_.LOCPAIR__V45*/ meltfptr[41] = NULL; @@ -29309,7 +29753,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-genobj.melt:6033:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6049:/ clear"); /*clear *//*_.LOCPAIR__V45*/ meltfptr[41] = 0; /*^clear */ /*clear *//*_.OBLOC__V46*/ meltfptr[42] = 0; @@ -29319,14 +29763,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6044:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6060:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V40*/ meltfptr[39]), (melt_ptr_t) ( /*_.OCOND__V38*/ meltfptr[37])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6046:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6062:/ cppif.then"); /*^block */ /*anyblock */ { @@ -29337,7 +29781,7 @@ lab_endgetargs:; /*_#IS_OBJECT__L10*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.GOTOTHEN__V25*/ meltfptr[24])) == MELTOBMAG_OBJECT);; - MELT_LOCATION ("warmelt-genobj.melt:6046:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6062:/ cond"); /*cond */ if ( /*_#IS_OBJECT__L10*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -29345,7 +29789,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6046:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6062:/ cond.else"); /*^block */ /*anyblock */ @@ -29359,7 +29803,7 @@ lab_endgetargs:; melt_assert_failed (("check gotothen"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6046) ? (6046) : __LINE__, __FUNCTION__); + (6062) ? (6062) : __LINE__, __FUNCTION__); ; } ; @@ -29374,7 +29818,7 @@ lab_endgetargs:; /*_.IFCPP___V51*/ meltfptr[47] = /*_.IFELSE___V52*/ meltfptr[51];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6046:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6062:/ clear"); /*clear *//*_#IS_OBJECT__L10*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V52*/ meltfptr[51] = 0; @@ -29387,14 +29831,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6047:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6063:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OTHENLIST__V31*/ meltfptr[30]), (melt_ptr_t) ( /*_.GOTOTHEN__V25*/ meltfptr[24])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6049:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6065:/ cppif.then"); /*^block */ /*anyblock */ { @@ -29405,7 +29849,7 @@ lab_endgetargs:; /*_#IS_OBJECT__L11*/ meltfnum[7] = (melt_magic_discr ((melt_ptr_t) ( /*_.GOTOELSE__V28*/ meltfptr[27])) == MELTOBMAG_OBJECT);; - MELT_LOCATION ("warmelt-genobj.melt:6049:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6065:/ cond"); /*cond */ if ( /*_#IS_OBJECT__L11*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -29413,7 +29857,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6049:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6065:/ cond.else"); /*^block */ /*anyblock */ @@ -29427,7 +29871,7 @@ lab_endgetargs:; melt_assert_failed (("check gotoelse"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6049) ? (6049) : __LINE__, __FUNCTION__); + (6065) ? (6065) : __LINE__, __FUNCTION__); ; } ; @@ -29442,7 +29886,7 @@ lab_endgetargs:; /*_.IFCPP___V53*/ meltfptr[51] = /*_.IFELSE___V54*/ meltfptr[53];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6049:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6065:/ clear"); /*clear *//*_#IS_OBJECT__L11*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IFELSE___V54*/ meltfptr[53] = 0; @@ -29455,14 +29899,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6050:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6066:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OELSELIST__V32*/ meltfptr[31]), (melt_ptr_t) ( /*_.GOTOELSE__V28*/ meltfptr[27])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6051:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6067:/ cppif.then"); /*^block */ /*anyblock */ { @@ -29488,7 +29932,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6051:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6067:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -29503,7 +29947,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6051:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6067:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -29517,7 +29961,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6051; + argtab[2].meltbp_long = 6067; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_same return olist="; @@ -29538,7 +29982,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V57*/ meltfptr[56];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6051:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6067:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V57*/ meltfptr[56] = 0; @@ -29551,7 +29995,7 @@ lab_endgetargs:; /*_.IF___V56*/ meltfptr[55] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6051:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6067:/ quasiblock"); /*_.PROGN___V58*/ meltfptr[56] = /*_.IF___V56*/ meltfptr[55];; @@ -29560,7 +30004,7 @@ lab_endgetargs:; /*_.IFCPP___V55*/ meltfptr[53] = /*_.PROGN___V58*/ meltfptr[56];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6051:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6067:/ clear"); /*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V56*/ meltfptr[55] = 0; @@ -29573,19 +30017,31 @@ lab_endgetargs:; /*_.IFCPP___V55*/ meltfptr[53] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6052:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6068:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OLIST__V40*/ meltfptr[39];; - MELT_LOCATION ("warmelt-genobj.melt:6052:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:6068:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V15*/ meltfptr[13] = /*_.RETURN___V59*/ meltfptr[55];; - MELT_LOCATION ("warmelt-genobj.melt:5996:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6012:/ clear"); /*clear *//*_.NLOC__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.NMATCHED__V17*/ meltfptr[16] = 0; @@ -29637,14 +30093,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V55*/ meltfptr[53] = 0; /*^clear */ /*clear *//*_.RETURN___V59*/ meltfptr[55] = 0; - MELT_LOCATION ("warmelt-genobj.melt:5991:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];; - MELT_LOCATION ("warmelt-genobj.melt:5991:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:6007:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -29751,7 +30219,7 @@ meltrout_174_warmelt_genobj_COMPILTST_NORMTESTER_SUCCESS (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:6059:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:6075:/ getarg"); /*_.NTSU__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -29781,7 +30249,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6060:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6076:/ cppif.then"); /*^block */ /*anyblock */ { @@ -29807,7 +30275,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6060:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6076:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -29822,7 +30290,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6060:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6076:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -29835,7 +30303,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6060; + argtab[2].meltbp_long = 6076; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_success ntsu="; /*^apply.arg */ @@ -29860,7 +30328,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6060:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6076:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0; @@ -29873,7 +30341,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6060:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6076:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -29882,7 +30350,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6060:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6076:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -29897,7 +30365,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6061:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6077:/ cppif.then"); /*^block */ /*anyblock */ { @@ -29909,7 +30377,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_SUCCESS */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:6061:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6077:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -29917,7 +30385,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6061:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6077:/ cond.else"); /*^block */ /*anyblock */ @@ -29931,7 +30399,7 @@ lab_endgetargs:; melt_assert_failed (("check ntsu"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6061) ? (6061) : __LINE__, __FUNCTION__); + (6077) ? (6077) : __LINE__, __FUNCTION__); ; } ; @@ -29946,7 +30414,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6061:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6077:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; @@ -29959,7 +30427,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6062:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6078:/ cppif.then"); /*^block */ /*anyblock */ { @@ -29971,7 +30439,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:6062:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6078:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -29979,7 +30447,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6062:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6078:/ cond.else"); /*^block */ /*anyblock */ @@ -29993,7 +30461,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6062) ? (6062) : __LINE__, __FUNCTION__); + (6078) ? (6078) : __LINE__, __FUNCTION__); ; } ; @@ -30008,7 +30476,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6062:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6078:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -30021,7 +30489,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6063:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6079:/ cppif.then"); /*^block */ /*anyblock */ { @@ -30033,7 +30501,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:6063:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6079:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -30041,7 +30509,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6063:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6079:/ cond.else"); /*^block */ /*anyblock */ @@ -30055,7 +30523,7 @@ lab_endgetargs:; melt_assert_failed (("check tcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6063) ? (6063) : __LINE__, __FUNCTION__); + (6079) ? (6079) : __LINE__, __FUNCTION__); ; } ; @@ -30070,7 +30538,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6063:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6079:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -30081,10 +30549,10 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6064:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6080:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:6065:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6081:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1]), 0, "NREP_LOC"); @@ -30092,7 +30560,7 @@ lab_endgetargs:; meltfptr[15] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6066:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6082:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1]), 1, "NTEST_MATCHED"); @@ -30100,7 +30568,7 @@ lab_endgetargs:; meltfptr[16] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6067:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6083:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1]), 2, "NTEST_THEN"); @@ -30108,7 +30576,7 @@ lab_endgetargs:; meltfptr[17] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6068:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6084:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1]), 3, "NTEST_ELSE"); @@ -30116,7 +30584,7 @@ lab_endgetargs:; meltfptr[18] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6069:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6085:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1]), 5, "NTEST_LOCCLIST"); @@ -30124,7 +30592,7 @@ lab_endgetargs:; meltfptr[19] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6070:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6086:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH"); @@ -30132,7 +30600,7 @@ lab_endgetargs:; meltfptr[20] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6071:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6087:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1]), 7, "NTSUCCESS_DO"); @@ -30142,7 +30610,7 @@ lab_endgetargs:; ; /*_#NTESTIX__L6*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) ( /*_.NTSU__V2*/ meltfptr[1])));; - MELT_LOCATION ("warmelt-genobj.melt:6073:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6089:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -30164,7 +30632,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6075:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6091:/ cppif.then"); /*^block */ /*anyblock */ { @@ -30174,7 +30642,7 @@ lab_endgetargs:; ; /*_#NULL__L7*/ meltfnum[1] = (( /*_.NLOCLIS__V20*/ meltfptr[19]) == NULL);; - MELT_LOCATION ("warmelt-genobj.melt:6075:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6091:/ cond"); /*cond */ if ( /*_#NULL__L7*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -30182,7 +30650,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6075:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6091:/ cond.else"); /*^block */ /*anyblock */ @@ -30196,7 +30664,7 @@ lab_endgetargs:; melt_assert_failed (("check nil nloclis"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6075) ? (6075) : __LINE__, __FUNCTION__); + (6091) ? (6091) : __LINE__, __FUNCTION__); ; } ; @@ -30211,7 +30679,7 @@ lab_endgetargs:; /*_.IFCPP___V24*/ meltfptr[23] = /*_.IFELSE___V25*/ meltfptr[24];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6075:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6091:/ clear"); /*clear *//*_#NULL__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V25*/ meltfptr[24] = 0; @@ -30224,7 +30692,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6076:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6092:/ cppif.then"); /*^block */ /*anyblock */ { @@ -30234,7 +30702,7 @@ lab_endgetargs:; ; /*_#NULL__L8*/ meltfnum[1] = (( /*_.NTHEN__V18*/ meltfptr[17]) == NULL);; - MELT_LOCATION ("warmelt-genobj.melt:6076:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6092:/ cond"); /*cond */ if ( /*_#NULL__L8*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -30242,7 +30710,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6076:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6092:/ cond.else"); /*^block */ /*anyblock */ @@ -30256,7 +30724,7 @@ lab_endgetargs:; melt_assert_failed (("check nil nthen"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6076) ? (6076) : __LINE__, __FUNCTION__); + (6092) ? (6092) : __LINE__, __FUNCTION__); ; } ; @@ -30271,7 +30739,7 @@ lab_endgetargs:; /*_.IFCPP___V26*/ meltfptr[24] = /*_.IFELSE___V27*/ meltfptr[26];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6076:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6092:/ clear"); /*clear *//*_#NULL__L8*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V27*/ meltfptr[26] = 0; @@ -30284,7 +30752,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6077:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6093:/ cppif.then"); /*^block */ /*anyblock */ { @@ -30294,7 +30762,7 @@ lab_endgetargs:; ; /*_#NULL__L9*/ meltfnum[1] = (( /*_.NELSE__V19*/ meltfptr[18]) == NULL);; - MELT_LOCATION ("warmelt-genobj.melt:6077:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6093:/ cond"); /*cond */ if ( /*_#NULL__L9*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -30302,7 +30770,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6077:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6093:/ cond.else"); /*^block */ /*anyblock */ @@ -30316,7 +30784,7 @@ lab_endgetargs:; melt_assert_failed (("check nil nelse"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6077) ? (6077) : __LINE__, __FUNCTION__); + (6093) ? (6093) : __LINE__, __FUNCTION__); ; } ; @@ -30331,7 +30799,7 @@ lab_endgetargs:; /*_.IFCPP___V28*/ meltfptr[26] = /*_.IFELSE___V29*/ meltfptr[28];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6077:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6093:/ clear"); /*clear *//*_#NULL__L9*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V29*/ meltfptr[28] = 0; @@ -30342,7 +30810,7 @@ lab_endgetargs:; /*_.IFCPP___V28*/ meltfptr[26] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6078:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6094:/ quasiblock"); /*^checksignal */ @@ -30362,13 +30830,13 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6081:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6097:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L10*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.OSUCC__V31*/ meltfptr[30])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-genobj.melt:6081:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6097:/ cond"); /*cond */ if ( /*_#IS_LIST__L10*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -30378,7 +30846,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-genobj.melt:6083:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6099:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OSUCC__V31*/ meltfptr[30]), (melt_ptr_t) ( /*_.GOTOEND__V23*/ meltfptr[22])); @@ -30386,14 +30854,14 @@ lab_endgetargs:; ; /*_.LIST_LAST__V33*/ meltfptr[32] = (melt_list_last ((melt_ptr_t) ( /*_.OSUCC__V31*/ meltfptr[30])));; - MELT_LOCATION ("warmelt-genobj.melt:6084:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6100:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OSUCC__V31*/ meltfptr[30];; - MELT_LOCATION ("warmelt-genobj.melt:6084:/ putxtraresult"); + MELT_LOCATION ("warmelt-genobj.melt:6100:/ putxtraresult"); if (!meltxrestab_ || !meltxresdescr_) goto labend_rout; if (meltxresdescr_[0] != MELTBPAR_PTR) @@ -30405,7 +30873,7 @@ lab_endgetargs:; /*^finalreturn */ ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-genobj.melt:6082:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6098:/ quasiblock"); /*_.PROGN___V35*/ meltfptr[34] = /*_.RETURN___V34*/ meltfptr[33];; @@ -30414,7 +30882,7 @@ lab_endgetargs:; /*_.IFELSE___V32*/ meltfptr[31] = /*_.PROGN___V35*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6081:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6097:/ clear"); /*clear *//*_.LIST_LAST__V33*/ meltfptr[32] = 0; /*^clear */ /*clear *//*_.RETURN___V34*/ meltfptr[33] = 0; @@ -30430,7 +30898,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:6085:/ blockmultialloc"); + MELT_LOCATION ("warmelt-genobj.melt:6101:/ blockmultialloc"); /*multiallocblock */ { struct meltletrec_1_st @@ -30476,7 +30944,7 @@ lab_endgetargs:; ; /*^putpairtail */ /*putpairtail */ - melt_assertmsg ("putpairtail /1337e6f7 checkpair", + melt_assertmsg ("putpairtail /38b270f3 checkpair", melt_magic_discr ((melt_ptr_t) ( /*_.OSUCC__V37*/ meltfptr[33])) == @@ -30518,7 +30986,7 @@ lab_endgetargs:; /*_.LIST___V36*/ meltfptr[32] = /*_.LIST___V39*/ meltfptr[38];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6085:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6101:/ clear"); /*clear *//*_.OSUCC__V37*/ meltfptr[33] = 0; /*^clear */ /*clear *//*_.GOTOEND__V38*/ meltfptr[34] = 0; @@ -30539,7 +31007,7 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LIST___V36*/ meltfptr[32];; - MELT_LOCATION ("warmelt-genobj.melt:6085:/ putxtraresult"); + MELT_LOCATION ("warmelt-genobj.melt:6101:/ putxtraresult"); if (!meltxrestab_ || !meltxresdescr_) goto labend_rout; if (meltxresdescr_[0] != MELTBPAR_PTR) @@ -30554,7 +31022,7 @@ lab_endgetargs:; /*_.IFELSE___V32*/ meltfptr[31] = /*_.RETURN___V40*/ meltfptr[33];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6081:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6097:/ clear"); /*clear *//*_.LIST___V36*/ meltfptr[32] = 0; /*^clear */ /*clear *//*_.RETURN___V40*/ meltfptr[33] = 0; @@ -30564,7 +31032,7 @@ lab_endgetargs:; ; /*_.LET___V30*/ meltfptr[28] = /*_.IFELSE___V32*/ meltfptr[31];; - MELT_LOCATION ("warmelt-genobj.melt:6078:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6094:/ clear"); /*clear *//*_.OSUCC__V31*/ meltfptr[30] = 0; /*^clear */ /*clear *//*_#IS_LIST__L10*/ meltfnum[1] = 0; @@ -30572,7 +31040,7 @@ lab_endgetargs:; /*clear *//*_.IFELSE___V32*/ meltfptr[31] = 0; /*_.LET___V15*/ meltfptr[13] = /*_.LET___V30*/ meltfptr[28];; - MELT_LOCATION ("warmelt-genobj.melt:6064:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6080:/ clear"); /*clear *//*_.NLOC__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.NMATCHED__V17*/ meltfptr[16] = 0; @@ -30598,14 +31066,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V28*/ meltfptr[26] = 0; /*^clear */ /*clear *//*_.LET___V30*/ meltfptr[28] = 0; - MELT_LOCATION ("warmelt-genobj.melt:6059:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6075:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];; - MELT_LOCATION ("warmelt-genobj.melt:6059:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:6075:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30712,7 +31192,7 @@ meltrout_175_warmelt_genobj_COMPILTST_NORMTESTER_ORCLEAR (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:6090:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:6106:/ getarg"); /*_.NTOC__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -30742,7 +31222,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6091:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6107:/ cppif.then"); /*^block */ /*anyblock */ { @@ -30768,7 +31248,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6091:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6107:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -30783,7 +31263,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6091:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6107:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -30796,7 +31276,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6091; + argtab[2].meltbp_long = 6107; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_orclear ntoc="; /*^apply.arg */ @@ -30815,7 +31295,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6091:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6107:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0; @@ -30828,7 +31308,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6091:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6107:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -30837,7 +31317,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6091:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6107:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -30852,7 +31332,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6092:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6108:/ cppif.then"); /*^block */ /*anyblock */ { @@ -30864,7 +31344,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NTOC__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_OR_CLEAR */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:6092:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6108:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -30872,7 +31352,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6092:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6108:/ cond.else"); /*^block */ /*anyblock */ @@ -30886,7 +31366,7 @@ lab_endgetargs:; melt_assert_failed (("check ntoc"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6092) ? (6092) : __LINE__, __FUNCTION__); + (6108) ? (6108) : __LINE__, __FUNCTION__); ; } ; @@ -30901,7 +31381,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6092:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6108:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; @@ -30914,7 +31394,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6093:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6109:/ cppif.then"); /*^block */ /*anyblock */ { @@ -30926,7 +31406,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:6093:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6109:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -30934,7 +31414,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6093:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6109:/ cond.else"); /*^block */ /*anyblock */ @@ -30948,7 +31428,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6093) ? (6093) : __LINE__, __FUNCTION__); + (6109) ? (6109) : __LINE__, __FUNCTION__); ; } ; @@ -30963,7 +31443,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6093:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6109:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -30976,7 +31456,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6094:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6110:/ cppif.then"); /*^block */ /*anyblock */ { @@ -30988,7 +31468,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:6094:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6110:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -30996,7 +31476,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6094:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6110:/ cond.else"); /*^block */ /*anyblock */ @@ -31010,7 +31490,7 @@ lab_endgetargs:; melt_assert_failed (("check tcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6094) ? (6094) : __LINE__, __FUNCTION__); + (6110) ? (6110) : __LINE__, __FUNCTION__); ; } ; @@ -31025,7 +31505,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6094:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6110:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -31036,10 +31516,10 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6095:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6111:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:6096:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6112:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOC__V2*/ meltfptr[1]), 0, "NREP_LOC"); @@ -31047,7 +31527,7 @@ lab_endgetargs:; meltfptr[15] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6097:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6113:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOC__V2*/ meltfptr[1]), 1, "NTEST_MATCHED"); @@ -31055,7 +31535,7 @@ lab_endgetargs:; meltfptr[16] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6098:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6114:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOC__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH"); @@ -31063,7 +31543,7 @@ lab_endgetargs:; meltfptr[17] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6099:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6115:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOC__V2*/ meltfptr[1]), 2, "NTEST_THEN"); @@ -31071,7 +31551,7 @@ lab_endgetargs:; meltfptr[18] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6100:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6116:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOC__V2*/ meltfptr[1]), 3, "NTEST_ELSE"); @@ -31079,7 +31559,7 @@ lab_endgetargs:; meltfptr[19] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6101:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6117:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOC__V2*/ meltfptr[1]), 7, "NTORCLEAR_LOCSYM"); @@ -31087,7 +31567,7 @@ lab_endgetargs:; meltfptr[20] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6102:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6118:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 1, "GNCX_LOCMAP"); @@ -31098,7 +31578,7 @@ lab_endgetargs:; /*_.OLIST__V23*/ meltfptr[22] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));; - MELT_LOCATION ("warmelt-genobj.melt:6104:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6120:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -31125,13 +31605,13 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6104:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6120:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:6105:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6121:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -31157,7 +31637,7 @@ lab_endgetargs:; /*_.ENDMATCH_GOTOINSTR__V26*/ meltfptr[25];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6104:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6120:/ clear"); /*clear *//*_.ENDMATCH_GOTOINSTR__V26*/ meltfptr[25] = 0; } ; @@ -31165,7 +31645,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6109:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6125:/ cppif.then"); /*^block */ /*anyblock */ { @@ -31191,7 +31671,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6109:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6125:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -31206,7 +31686,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6109:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6125:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -31219,7 +31699,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6109; + argtab[2].meltbp_long = 6125; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_orclear nclear="; @@ -31252,7 +31732,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V29*/ meltfptr[28];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6109:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6125:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V29*/ meltfptr[28] = 0; @@ -31265,7 +31745,7 @@ lab_endgetargs:; /*_.IF___V28*/ meltfptr[27] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6109:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6125:/ quasiblock"); /*_.PROGN___V30*/ meltfptr[28] = /*_.IF___V28*/ meltfptr[27];; @@ -31274,7 +31754,7 @@ lab_endgetargs:; /*_.IFCPP___V27*/ meltfptr[25] = /*_.PROGN___V30*/ meltfptr[28];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6109:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6125:/ clear"); /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V28*/ meltfptr[27] = 0; @@ -31289,7 +31769,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6111:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6127:/ cppif.then"); /*^block */ /*anyblock */ { @@ -31300,7 +31780,7 @@ lab_endgetargs:; /*_#IS_MULTIPLE__L8*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.NCLEAR__V21*/ meltfptr[20])) == MELTOBMAG_MULTIPLE);; - MELT_LOCATION ("warmelt-genobj.melt:6111:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6127:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE__L8*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -31308,7 +31788,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6111:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6127:/ cond.else"); /*^block */ /*anyblock */ @@ -31322,7 +31802,7 @@ lab_endgetargs:; melt_assert_failed (("check nclear"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6111) ? (6111) : __LINE__, __FUNCTION__); + (6127) ? (6127) : __LINE__, __FUNCTION__); ; } ; @@ -31337,7 +31817,7 @@ lab_endgetargs:; /*_.IFCPP___V31*/ meltfptr[27] = /*_.IFELSE___V32*/ meltfptr[28];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6111:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6127:/ clear"); /*clear *//*_#IS_MULTIPLE__L8*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V32*/ meltfptr[28] = 0; @@ -31366,7 +31846,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6115:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6131:/ cppif.then"); /*^block */ /*anyblock */ { @@ -31392,7 +31872,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6115:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6131:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -31407,7 +31887,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6115:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6131:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -31421,7 +31901,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6115; + argtab[2].meltbp_long = 6131; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_orclear curlocs="; @@ -31448,7 +31928,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V36*/ meltfptr[35];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6115:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6131:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V36*/ meltfptr[35] = 0; @@ -31461,7 +31941,7 @@ lab_endgetargs:; /*_.IF___V35*/ meltfptr[34] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6115:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6131:/ quasiblock"); /*_.PROGN___V37*/ meltfptr[35] = /*_.IF___V35*/ meltfptr[34];; @@ -31470,7 +31950,7 @@ lab_endgetargs:; /*_.IFCPP___V34*/ meltfptr[33] = /*_.PROGN___V37*/ meltfptr[35];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6115:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6131:/ clear"); /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V35*/ meltfptr[34] = 0; @@ -31485,7 +31965,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6116:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6132:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -31494,10 +31974,10 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-genobj.melt:6117:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6133:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:6120:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6136:/ quasiblock"); /*^checksignal */ @@ -31520,7 +32000,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6122:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6138:/ cppif.then"); /*^block */ /*anyblock */ { @@ -31546,7 +32026,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6122:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6138:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -31561,7 +32041,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6122:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6138:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -31575,7 +32055,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6122; + argtab[2].meltbp_long = 6138; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_orclear ocurl="; @@ -31597,7 +32077,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V42*/ meltfptr[41];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6122:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6138:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V42*/ meltfptr[41] = 0; @@ -31610,7 +32090,7 @@ lab_endgetargs:; /*_.IF___V41*/ meltfptr[40] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6122:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6138:/ quasiblock"); /*_.PROGN___V43*/ meltfptr[41] = /*_.IF___V41*/ meltfptr[40];; @@ -31619,7 +32099,7 @@ lab_endgetargs:; /*_.IFCPP___V40*/ meltfptr[39] = /*_.PROGN___V43*/ meltfptr[41];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6122:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6138:/ clear"); /*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.IF___V41*/ meltfptr[40] = 0; @@ -31636,12 +32116,12 @@ lab_endgetargs:; /*_.LET___V38*/ meltfptr[34] = /*_.OC__V39*/ meltfptr[35];; - MELT_LOCATION ("warmelt-genobj.melt:6120:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6136:/ clear"); /*clear *//*_.OC__V39*/ meltfptr[35] = 0; /*^clear */ /*clear *//*_.IFCPP___V40*/ meltfptr[39] = 0; /*_.OCURL__V44*/ meltfptr[40] = /*_.LET___V38*/ meltfptr[34];; - MELT_LOCATION ("warmelt-genobj.melt:6124:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6140:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -31681,7 +32161,7 @@ lab_endgetargs:; /*_.OCLRLOC__V45*/ meltfptr[41] = /*_.INST__V46*/ meltfptr[35];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6129:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6145:/ cppif.then"); /*^block */ /*anyblock */ { @@ -31707,7 +32187,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6129:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6145:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -31722,7 +32202,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6129:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6145:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -31736,7 +32216,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6129; + argtab[2].meltbp_long = 6145; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_orclear oclrloc="; @@ -31758,7 +32238,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V49*/ meltfptr[48];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6129:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6145:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V49*/ meltfptr[48] = 0; @@ -31771,7 +32251,7 @@ lab_endgetargs:; /*_.IF___V48*/ meltfptr[47] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6129:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6145:/ quasiblock"); /*_.PROGN___V50*/ meltfptr[48] = /*_.IF___V48*/ meltfptr[47];; @@ -31780,7 +32260,7 @@ lab_endgetargs:; /*_.IFCPP___V47*/ meltfptr[39] = /*_.PROGN___V50*/ meltfptr[48];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6129:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6145:/ clear"); /*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V48*/ meltfptr[47] = 0; @@ -31795,14 +32275,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6130:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6146:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V23*/ meltfptr[22]), (melt_ptr_t) ( /*_.OCLRLOC__V45*/ meltfptr[41])); } ; - MELT_LOCATION ("warmelt-genobj.melt:6117:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6133:/ clear"); /*clear *//*_.LET___V38*/ meltfptr[34] = 0; /*^clear */ /*clear *//*_.OCURL__V44*/ meltfptr[40] = 0; @@ -31816,7 +32296,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-genobj.melt:6112:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6128:/ clear"); /*clear *//*_.CURLOCS__V33*/ meltfptr[28] = 0; /*^clear */ /*clear *//*_#CIX__L9*/ meltfnum[0] = 0; @@ -31826,14 +32306,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6133:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6149:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V23*/ meltfptr[22]), (melt_ptr_t) ( /*_.GOTOTHEN__V25*/ meltfptr[24])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6134:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6150:/ cppif.then"); /*^block */ /*anyblock */ { @@ -31859,7 +32339,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6134:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6150:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -31874,7 +32354,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6134:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6150:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -31888,7 +32368,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6134; + argtab[2].meltbp_long = 6150; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_orclear final olist="; @@ -31909,7 +32389,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V53*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6134:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6150:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V53*/ meltfptr[34] = 0; @@ -31922,7 +32402,7 @@ lab_endgetargs:; /*_.IF___V52*/ meltfptr[48] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6134:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6150:/ quasiblock"); /*_.PROGN___V54*/ meltfptr[40] = /*_.IF___V52*/ meltfptr[48];; @@ -31931,7 +32411,7 @@ lab_endgetargs:; /*_.IFCPP___V51*/ meltfptr[47] = /*_.PROGN___V54*/ meltfptr[40];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6134:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6150:/ clear"); /*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.IF___V52*/ meltfptr[48] = 0; @@ -31944,19 +32424,31 @@ lab_endgetargs:; /*_.IFCPP___V51*/ meltfptr[47] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6135:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6151:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OLIST__V23*/ meltfptr[22];; - MELT_LOCATION ("warmelt-genobj.melt:6135:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:6151:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V15*/ meltfptr[13] = /*_.RETURN___V55*/ meltfptr[41];; - MELT_LOCATION ("warmelt-genobj.melt:6095:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6111:/ clear"); /*clear *//*_.NLOC__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.NMATCHED__V17*/ meltfptr[16] = 0; @@ -31984,14 +32476,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V51*/ meltfptr[47] = 0; /*^clear */ /*clear *//*_.RETURN___V55*/ meltfptr[41] = 0; - MELT_LOCATION ("warmelt-genobj.melt:6090:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6106:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];; - MELT_LOCATION ("warmelt-genobj.melt:6090:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:6106:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -32100,7 +32604,7 @@ meltrout_176_warmelt_genobj_COMPILTST_NORMTESTER_ORTRANSMIT (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:6140:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:6156:/ getarg"); /*_.NTOT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -32130,7 +32634,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6141:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6157:/ cppif.then"); /*^block */ /*anyblock */ { @@ -32156,7 +32660,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6141:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6157:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -32171,7 +32675,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6141:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6157:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -32184,7 +32688,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6141; + argtab[2].meltbp_long = 6157; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_ortransmit ntot="; @@ -32204,7 +32708,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6141:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6157:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0; @@ -32217,7 +32721,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6141:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6157:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -32226,7 +32730,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6141:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6157:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -32241,7 +32745,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6142:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6158:/ cppif.then"); /*^block */ /*anyblock */ { @@ -32252,7 +32756,7 @@ lab_endgetargs:; /*_#IS_A__L3*/ meltfnum[1] = melt_is_instance_of ((melt_ptr_t) ( /*_.NTOT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_OR_TRANSMIT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:6142:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6158:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -32260,7 +32764,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6142:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6158:/ cond.else"); /*^block */ /*anyblock */ @@ -32274,7 +32778,7 @@ lab_endgetargs:; melt_assert_failed (("check ntot"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6142) ? (6142) : __LINE__, __FUNCTION__); + (6158) ? (6158) : __LINE__, __FUNCTION__); ; } ; @@ -32289,7 +32793,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6142:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6158:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; @@ -32302,7 +32806,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6143:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6159:/ cppif.then"); /*^block */ /*anyblock */ { @@ -32314,7 +32818,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:6143:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6159:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -32322,7 +32826,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6143:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6159:/ cond.else"); /*^block */ /*anyblock */ @@ -32336,7 +32840,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6143) ? (6143) : __LINE__, __FUNCTION__); + (6159) ? (6159) : __LINE__, __FUNCTION__); ; } ; @@ -32351,7 +32855,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6143:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6159:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -32364,7 +32868,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6144:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6160:/ cppif.then"); /*^block */ /*anyblock */ { @@ -32376,7 +32880,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:6144:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6160:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -32384,7 +32888,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6144:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6160:/ cond.else"); /*^block */ /*anyblock */ @@ -32398,7 +32902,7 @@ lab_endgetargs:; melt_assert_failed (("check tcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6144) ? (6144) : __LINE__, __FUNCTION__); + (6160) ? (6160) : __LINE__, __FUNCTION__); ; } ; @@ -32413,7 +32917,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6144:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6160:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -32424,10 +32928,10 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6145:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6161:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:6146:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6162:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOT__V2*/ meltfptr[1]), 0, "NREP_LOC"); @@ -32435,7 +32939,7 @@ lab_endgetargs:; meltfptr[15] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6147:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6163:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOT__V2*/ meltfptr[1]), 1, "NTEST_MATCHED"); @@ -32443,7 +32947,7 @@ lab_endgetargs:; meltfptr[16] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6148:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6164:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOT__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH"); @@ -32451,7 +32955,7 @@ lab_endgetargs:; meltfptr[17] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6149:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6165:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOT__V2*/ meltfptr[1]), 7, "NTORTRANSMIT_DST"); @@ -32459,7 +32963,7 @@ lab_endgetargs:; meltfptr[18] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6150:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6166:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOT__V2*/ meltfptr[1]), 8, "NTORTRANSMIT_SRC"); @@ -32467,7 +32971,7 @@ lab_endgetargs:; meltfptr[19] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6151:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6167:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOT__V2*/ meltfptr[1]), 2, "NTEST_THEN"); @@ -32475,7 +32979,7 @@ lab_endgetargs:; meltfptr[20] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6152:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6168:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTOT__V2*/ meltfptr[1]), 3, "NTEST_ELSE"); @@ -32486,7 +32990,7 @@ lab_endgetargs:; /*_.OLIST__V23*/ meltfptr[22] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));; - MELT_LOCATION ("warmelt-genobj.melt:6154:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6170:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -32513,13 +33017,13 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6154:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6170:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:6155:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6171:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -32545,7 +33049,7 @@ lab_endgetargs:; /*_.ENDMATCH_GOTOINSTR__V26*/ meltfptr[25];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6154:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6170:/ clear"); /*clear *//*_.ENDMATCH_GOTOINSTR__V26*/ meltfptr[25] = 0; } ; @@ -32553,7 +33057,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6157:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6173:/ cppif.then"); /*^block */ /*anyblock */ { @@ -32563,7 +33067,7 @@ lab_endgetargs:; ; /*_#NULL__L6*/ meltfnum[0] = (( /*_.NELSE__V22*/ meltfptr[21]) == NULL);; - MELT_LOCATION ("warmelt-genobj.melt:6157:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6173:/ cond"); /*cond */ if ( /*_#NULL__L6*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -32571,7 +33075,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6157:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6173:/ cond.else"); /*^block */ /*anyblock */ @@ -32585,7 +33089,7 @@ lab_endgetargs:; melt_assert_failed (("check null nelse"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6157) ? (6157) : __LINE__, __FUNCTION__); + (6173) ? (6173) : __LINE__, __FUNCTION__); ; } ; @@ -32600,7 +33104,7 @@ lab_endgetargs:; /*_.IFCPP___V27*/ meltfptr[25] = /*_.IFELSE___V28*/ meltfptr[27];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6157:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6173:/ clear"); /*clear *//*_#NULL__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V28*/ meltfptr[27] = 0; @@ -32613,7 +33117,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6158:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6174:/ cppif.then"); /*^block */ /*anyblock */ { @@ -32634,7 +33138,7 @@ lab_endgetargs:; /*_#I__L9*/ meltfnum[8] = (( /*_#MULTIPLE_LENGTH__L7*/ meltfnum[1]) == ( /*_#MULTIPLE_LENGTH__L8*/ meltfnum[0]));; - MELT_LOCATION ("warmelt-genobj.melt:6158:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6174:/ cond"); /*cond */ if ( /*_#I__L9*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -32642,7 +33146,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6158:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6174:/ cond.else"); /*^block */ /*anyblock */ @@ -32656,7 +33160,7 @@ lab_endgetargs:; melt_assert_failed (("check same size ntupdst ntupsc"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6158) ? (6158) : __LINE__, __FUNCTION__); + (6174) ? (6174) : __LINE__, __FUNCTION__); ; } ; @@ -32671,7 +33175,7 @@ lab_endgetargs:; /*_.IFCPP___V29*/ meltfptr[27] = /*_.IFELSE___V30*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6158:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6174:/ clear"); /*clear *//*_#MULTIPLE_LENGTH__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#MULTIPLE_LENGTH__L8*/ meltfnum[0] = 0; @@ -32703,7 +33207,7 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-genobj.melt:6163:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6179:/ quasiblock"); /*_.NCURSRC__V32*/ meltfptr[31] = @@ -32712,7 +33216,7 @@ lab_endgetargs:; ( /*_#NIX__L10*/ meltfnum[1])));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6165:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6181:/ cppif.then"); /*^block */ /*anyblock */ { @@ -32738,7 +33242,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6165:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6181:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -32753,7 +33257,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6165:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6181:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -32767,7 +33271,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6165; + argtab[2].meltbp_long = 6181; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_ortransmit ncursrc="; @@ -32800,7 +33304,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V35*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6165:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6181:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V35*/ meltfptr[34] = 0; @@ -32813,7 +33317,7 @@ lab_endgetargs:; /*_.IF___V34*/ meltfptr[33] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6165:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6181:/ quasiblock"); /*_.PROGN___V36*/ meltfptr[34] = /*_.IF___V34*/ meltfptr[33];; @@ -32822,7 +33326,7 @@ lab_endgetargs:; /*_.IFCPP___V33*/ meltfptr[32] = /*_.PROGN___V36*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6165:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6181:/ clear"); /*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V34*/ meltfptr[33] = 0; @@ -32835,10 +33339,10 @@ lab_endgetargs:; /*_.IFCPP___V33*/ meltfptr[32] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6166:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6182:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:6167:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6183:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -32856,7 +33360,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6168:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6184:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -32881,7 +33385,7 @@ lab_endgetargs:; /*_.DSTYPE__V38*/ meltfptr[34] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6169:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6185:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -32903,7 +33407,7 @@ lab_endgetargs:; (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[4]))));; - MELT_LOCATION ("warmelt-genobj.melt:6171:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6187:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -32963,7 +33467,7 @@ lab_endgetargs:; /*_.OCOMP__V41*/ meltfptr[40] = /*_.INST__V42*/ meltfptr[41];; { - MELT_LOCATION ("warmelt-genobj.melt:6177:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6193:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.DSTLIST__V40*/ meltfptr[39]), (melt_ptr_t) ( /*_.ODST__V39*/ meltfptr[38])); @@ -32971,7 +33475,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6178:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6194:/ cppif.then"); /*^block */ /*anyblock */ { @@ -32997,7 +33501,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6178:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6194:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -33012,7 +33516,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6178:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6194:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -33026,7 +33530,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6178; + argtab[2].meltbp_long = 6194; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_ortransmit osrc="; @@ -33060,7 +33564,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V45*/ meltfptr[44];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6178:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6194:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V45*/ meltfptr[44] = 0; @@ -33073,7 +33577,7 @@ lab_endgetargs:; /*_.IF___V44*/ meltfptr[43] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6178:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6194:/ quasiblock"); /*_.PROGN___V46*/ meltfptr[44] = /*_.IF___V44*/ meltfptr[43];; @@ -33082,7 +33586,7 @@ lab_endgetargs:; /*_.IFCPP___V43*/ meltfptr[42] = /*_.PROGN___V46*/ meltfptr[44];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6178:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6194:/ clear"); /*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.IF___V44*/ meltfptr[43] = 0; @@ -33097,14 +33601,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6179:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6195:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V23*/ meltfptr[22]), (melt_ptr_t) ( /*_.OCOMP__V41*/ meltfptr[40])); } ; - MELT_LOCATION ("warmelt-genobj.melt:6166:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6182:/ clear"); /*clear *//*_.OSRC__V37*/ meltfptr[33] = 0; /*^clear */ /*clear *//*_.DSTYPE__V38*/ meltfptr[34] = 0; @@ -33117,7 +33621,7 @@ lab_endgetargs:; /*^clear */ /*clear *//*_.IFCPP___V43*/ meltfptr[42] = 0; - MELT_LOCATION ("warmelt-genobj.melt:6163:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6179:/ clear"); /*clear *//*_.NCURSRC__V32*/ meltfptr[31] = 0; /*^clear */ /*clear *//*_.IFCPP___V33*/ meltfptr[32] = 0; @@ -33127,7 +33631,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-genobj.melt:6160:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6176:/ clear"); /*clear *//*_.NCURDST__V31*/ meltfptr[29] = 0; /*^clear */ /*clear *//*_#NIX__L10*/ meltfnum[1] = 0; @@ -33135,14 +33639,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6181:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6197:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V23*/ meltfptr[22]), (melt_ptr_t) ( /*_.GOTOTHEN__V25*/ meltfptr[24])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6182:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6198:/ cppif.then"); /*^block */ /*anyblock */ { @@ -33168,7 +33672,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6182:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6198:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -33183,7 +33687,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6182:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6198:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -33197,7 +33701,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6182; + argtab[2].meltbp_long = 6198; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_ortransmit final olist="; @@ -33218,7 +33722,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V49*/ meltfptr[33];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6182:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6198:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V49*/ meltfptr[33] = 0; @@ -33231,7 +33735,7 @@ lab_endgetargs:; /*_.IF___V48*/ meltfptr[44] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6182:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6198:/ quasiblock"); /*_.PROGN___V50*/ meltfptr[34] = /*_.IF___V48*/ meltfptr[44];; @@ -33240,7 +33744,7 @@ lab_endgetargs:; /*_.IFCPP___V47*/ meltfptr[43] = /*_.PROGN___V50*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6182:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6198:/ clear"); /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V48*/ meltfptr[44] = 0; @@ -33253,19 +33757,31 @@ lab_endgetargs:; /*_.IFCPP___V47*/ meltfptr[43] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6183:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6199:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OLIST__V23*/ meltfptr[22];; - MELT_LOCATION ("warmelt-genobj.melt:6183:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:6199:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V15*/ meltfptr[13] = /*_.RETURN___V51*/ meltfptr[38];; - MELT_LOCATION ("warmelt-genobj.melt:6145:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6161:/ clear"); /*clear *//*_.NLOC__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.NMATCHED__V17*/ meltfptr[16] = 0; @@ -33293,14 +33809,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V47*/ meltfptr[43] = 0; /*^clear */ /*clear *//*_.RETURN___V51*/ meltfptr[38] = 0; - MELT_LOCATION ("warmelt-genobj.melt:6140:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6156:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];; - MELT_LOCATION ("warmelt-genobj.melt:6140:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:6156:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -33399,7 +33927,7 @@ meltrout_177_warmelt_genobj_COMPILTST_NORMTESTER_DISJUNCTION /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:6191:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:6207:/ getarg"); /*_.NTDJ__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -33429,7 +33957,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6192:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6208:/ cppif.then"); /*^block */ /*anyblock */ { @@ -33455,7 +33983,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6192:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6208:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -33470,7 +33998,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6192:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6208:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -33483,7 +34011,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6192; + argtab[2].meltbp_long = 6208; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_disjunction ntdj="; @@ -33503,7 +34031,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6192:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6208:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0; @@ -33516,7 +34044,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6192:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6208:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -33525,7 +34053,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6192:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6208:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -33540,7 +34068,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6193:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6209:/ cppif.then"); /*^block */ /*anyblock */ { @@ -33551,7 +34079,7 @@ lab_endgetargs:; /*_#IS_A__L3*/ meltfnum[1] = melt_is_instance_of ((melt_ptr_t) ( /*_.NTDJ__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_DISJUNCTION */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:6193:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6209:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -33559,7 +34087,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6193:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6209:/ cond.else"); /*^block */ /*anyblock */ @@ -33573,7 +34101,7 @@ lab_endgetargs:; melt_assert_failed (("check ntdj"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6193) ? (6193) : __LINE__, __FUNCTION__); + (6209) ? (6209) : __LINE__, __FUNCTION__); ; } ; @@ -33588,7 +34116,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6193:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6209:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; @@ -33601,7 +34129,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6194:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6210:/ cppif.then"); /*^block */ /*anyblock */ { @@ -33613,7 +34141,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:6194:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6210:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -33621,7 +34149,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6194:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6210:/ cond.else"); /*^block */ /*anyblock */ @@ -33635,7 +34163,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6194) ? (6194) : __LINE__, __FUNCTION__); + (6210) ? (6210) : __LINE__, __FUNCTION__); ; } ; @@ -33650,7 +34178,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6194:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6210:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -33663,7 +34191,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6195:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6211:/ cppif.then"); /*^block */ /*anyblock */ { @@ -33675,7 +34203,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.TCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_TESTERCOMPILCONTEXT */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:6195:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6211:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -33683,7 +34211,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6195:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6211:/ cond.else"); /*^block */ /*anyblock */ @@ -33697,7 +34225,7 @@ lab_endgetargs:; melt_assert_failed (("check tcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6195) ? (6195) : __LINE__, __FUNCTION__); + (6211) ? (6211) : __LINE__, __FUNCTION__); ; } ; @@ -33712,7 +34240,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6195:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6211:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -33723,10 +34251,10 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6196:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6212:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:6197:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6213:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GCX__V3*/ meltfptr[2]), 1, "GNCX_LOCMAP"); @@ -33734,7 +34262,7 @@ lab_endgetargs:; meltfptr[15] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6198:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6214:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTDJ__V2*/ meltfptr[1]), 0, "NREP_LOC"); @@ -33742,7 +34270,7 @@ lab_endgetargs:; meltfptr[16] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6199:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6215:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTDJ__V2*/ meltfptr[1]), 2, "NTEST_THEN"); @@ -33750,7 +34278,7 @@ lab_endgetargs:; meltfptr[17] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6200:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6216:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTDJ__V2*/ meltfptr[1]), 4, "NTEST_NORMATCH"); @@ -33758,7 +34286,7 @@ lab_endgetargs:; meltfptr[18] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6201:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6217:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NTDJ__V2*/ meltfptr[1]), 8, "NTDISJ_FRESHORVAR"); @@ -33766,7 +34294,7 @@ lab_endgetargs:; meltfptr[19] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6202:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6218:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -33793,13 +34321,13 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6202:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6218:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:6203:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6219:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -33825,13 +34353,13 @@ lab_endgetargs:; /*_.ENDMATCH_GOTOINSTR__V23*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6202:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6218:/ clear"); /*clear *//*_.ENDMATCH_GOTOINSTR__V23*/ meltfptr[22] = 0; } ; } ; - MELT_LOCATION ("warmelt-genobj.melt:6205:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6221:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -33853,7 +34381,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6207:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6223:/ cppif.then"); /*^block */ /*anyblock */ { @@ -33879,7 +34407,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6207:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6223:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -33894,7 +34422,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6207:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6223:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -33907,7 +34435,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6207; + argtab[2].meltbp_long = 6223; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_disjunction ndisjlocsy="; @@ -33940,7 +34468,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V27*/ meltfptr[26];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6207:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6223:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V27*/ meltfptr[26] = 0; @@ -33953,7 +34481,7 @@ lab_endgetargs:; /*_.IF___V26*/ meltfptr[25] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6207:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6223:/ quasiblock"); /*_.PROGN___V28*/ meltfptr[26] = /*_.IF___V26*/ meltfptr[25];; @@ -33962,7 +34490,7 @@ lab_endgetargs:; /*_.IFCPP___V25*/ meltfptr[24] = /*_.PROGN___V28*/ meltfptr[26];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6207:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6223:/ clear"); /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V26*/ meltfptr[25] = 0; @@ -33995,7 +34523,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6212:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6228:/ cppif.then"); /*^block */ /*anyblock */ { @@ -34021,7 +34549,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6212:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6228:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -34036,7 +34564,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6212:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6228:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -34050,7 +34578,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6212; + argtab[2].meltbp_long = 6228; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_disjunction curdisjloc="; @@ -34077,7 +34605,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V32*/ meltfptr[31];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6212:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6228:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V32*/ meltfptr[31] = 0; @@ -34090,7 +34618,7 @@ lab_endgetargs:; /*_.IF___V31*/ meltfptr[30] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6212:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6228:/ quasiblock"); /*_.PROGN___V33*/ meltfptr[31] = /*_.IF___V31*/ meltfptr[30];; @@ -34099,7 +34627,7 @@ lab_endgetargs:; /*_.IFCPP___V30*/ meltfptr[26] = /*_.PROGN___V33*/ meltfptr[31];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6212:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6228:/ clear"); /*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V31*/ meltfptr[30] = 0; @@ -34114,7 +34642,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6213:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6229:/ cppif.then"); /*^block */ /*anyblock */ { @@ -34127,7 +34655,7 @@ lab_endgetargs:; ( /*_.CURDISJLOC__V29*/ meltfptr[25]), (melt_ptr_t) (( /*!CLASS_NREP_LOCSYMOCC */ meltfrout->tabval[7])));; - MELT_LOCATION ("warmelt-genobj.melt:6213:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6229:/ cond"); /*cond */ if ( /*_#IS_A__L11*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -34135,7 +34663,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6213:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6229:/ cond.else"); /*^block */ /*anyblock */ @@ -34149,7 +34677,7 @@ lab_endgetargs:; melt_assert_failed (("check curdisjloc"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6213) ? (6213) : __LINE__, + (6229) ? (6229) : __LINE__, __FUNCTION__); ; } @@ -34165,7 +34693,7 @@ lab_endgetargs:; /*_.IFCPP___V34*/ meltfptr[30] = /*_.IFELSE___V35*/ meltfptr[31];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6213:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6229:/ clear"); /*clear *//*_#IS_A__L11*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.IFELSE___V35*/ meltfptr[31] = 0; @@ -34176,7 +34704,7 @@ lab_endgetargs:; /*_.IFCPP___V34*/ meltfptr[30] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6214:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6230:/ quasiblock"); /*^getslot */ @@ -34187,7 +34715,7 @@ lab_endgetargs:; meltfptr[31] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6215:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6231:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURDISJLOC__V29*/ meltfptr[25]), 1, "NOCC_SYMB"); @@ -34195,7 +34723,7 @@ lab_endgetargs:; meltfptr[36] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6216:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6232:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURDISJLOC__V29*/ meltfptr[25]), 2, "NOCC_CTYP"); @@ -34203,7 +34731,7 @@ lab_endgetargs:; meltfptr[37] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6217:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6233:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -34228,7 +34756,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6221:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6237:/ cppif.then"); /*^block */ /*anyblock */ { @@ -34254,7 +34782,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6221:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6237:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -34269,7 +34797,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6221:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6237:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -34283,7 +34811,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6221; + argtab[2].meltbp_long = 6237; /*^apply.arg */ argtab[3].meltbp_cstring = "compiltst_normtester_disjunction dobva="; @@ -34305,7 +34833,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V42*/ meltfptr[41];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6221:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6237:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V42*/ meltfptr[41] = 0; @@ -34318,7 +34846,7 @@ lab_endgetargs:; /*_.IF___V41*/ meltfptr[40] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6221:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6237:/ quasiblock"); /*_.PROGN___V43*/ meltfptr[41] = /*_.IF___V41*/ meltfptr[40];; @@ -34327,7 +34855,7 @@ lab_endgetargs:; /*_.IFCPP___V40*/ meltfptr[39] = /*_.PROGN___V43*/ meltfptr[41];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6221:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6237:/ clear"); /*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V41*/ meltfptr[40] = 0; @@ -34342,7 +34870,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6222:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6238:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.LOCMAP__V16*/ meltfptr[15]), (meltobject_ptr_t) ( /*_.DBIND__V36*/ @@ -34352,7 +34880,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-genobj.melt:6214:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6230:/ clear"); /*clear *//*_.DBIND__V36*/ meltfptr[31] = 0; /*^clear */ /*clear *//*_.DSYMB__V37*/ meltfptr[36] = 0; @@ -34368,7 +34896,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-genobj.melt:6209:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6225:/ clear"); /*clear *//*_.CURDISJLOC__V29*/ meltfptr[25] = 0; /*^clear */ /*clear *//*_#LIX__L8*/ meltfnum[1] = 0; @@ -34378,19 +34906,31 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V34*/ meltfptr[30] = 0; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-genobj.melt:6225:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6241:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.GOTOTHEN__V22*/ meltfptr[21];; - MELT_LOCATION ("warmelt-genobj.melt:6225:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:6241:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V15*/ meltfptr[13] = /*_.RETURN___V44*/ meltfptr[40];; - MELT_LOCATION ("warmelt-genobj.melt:6196:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6212:/ clear"); /*clear *//*_.LOCMAP__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.NLOC__V17*/ meltfptr[16] = 0; @@ -34410,14 +34950,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V25*/ meltfptr[24] = 0; /*^clear */ /*clear *//*_.RETURN___V44*/ meltfptr[40] = 0; - MELT_LOCATION ("warmelt-genobj.melt:6191:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6207:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];; - MELT_LOCATION ("warmelt-genobj.melt:6191:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:6207:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -34520,7 +35072,7 @@ meltrout_178_warmelt_genobj_COMPILMATCHER_CMATCHER (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:6231:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ getarg"); /*_.CMAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -34550,7 +35102,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6232:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6248:/ cppif.then"); /*^block */ /*anyblock */ { @@ -34576,7 +35128,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6232:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6248:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -34591,7 +35143,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6232:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6248:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -34604,7 +35156,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6232; + argtab[2].meltbp_long = 6248; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_cmatcher cmat="; /*^apply.arg */ @@ -34629,7 +35181,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6232:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6248:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0; @@ -34642,7 +35194,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6232:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6248:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -34651,7 +35203,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6232:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6248:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -34666,7 +35218,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6233:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6249:/ cppif.then"); /*^block */ /*anyblock */ { @@ -34678,7 +35230,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CMAT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_CMATCHER */ meltfrout-> tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:6233:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6249:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -34686,7 +35238,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6233:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6249:/ cond.else"); /*^block */ /*anyblock */ @@ -34700,7 +35252,7 @@ lab_endgetargs:; melt_assert_failed (("check cmat"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6233) ? (6233) : __LINE__, __FUNCTION__); + (6249) ? (6249) : __LINE__, __FUNCTION__); ; } ; @@ -34715,7 +35267,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6233:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6249:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; @@ -34728,7 +35280,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6234:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6250:/ cppif.then"); /*^block */ /*anyblock */ { @@ -34740,7 +35292,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:6234:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6250:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -34748,7 +35300,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6234:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6250:/ cond.else"); /*^block */ /*anyblock */ @@ -34762,7 +35314,7 @@ lab_endgetargs:; melt_assert_failed (("check mcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6234) ? (6234) : __LINE__, __FUNCTION__); + (6250) ? (6250) : __LINE__, __FUNCTION__); ; } ; @@ -34777,7 +35329,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6234:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6250:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -34790,7 +35342,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6235:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6251:/ cppif.then"); /*^block */ /*anyblock */ { @@ -34802,7 +35354,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:6235:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6251:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -34810,7 +35362,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6235:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6251:/ cond.else"); /*^block */ /*anyblock */ @@ -34824,7 +35376,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6235) ? (6235) : __LINE__, __FUNCTION__); + (6251) ? (6251) : __LINE__, __FUNCTION__); ; } ; @@ -34839,7 +35391,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6235:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6251:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -34850,10 +35402,10 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6236:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6252:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:6237:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6253:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CMAT__V2*/ meltfptr[1]), 2, "AMATCH_IN"); @@ -34861,7 +35413,7 @@ lab_endgetargs:; meltfptr[15] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6238:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6254:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CMAT__V2*/ meltfptr[1]), 3, "AMATCH_MATCHBIND"); @@ -34869,7 +35421,7 @@ lab_endgetargs:; meltfptr[16] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6239:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6255:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CMAT__V2*/ meltfptr[1]), 4, "AMATCH_OUT"); @@ -34877,7 +35429,7 @@ lab_endgetargs:; meltfptr[17] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6240:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6256:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CMAT__V2*/ meltfptr[1]), 5, "CMATCH_STATE"); @@ -34885,7 +35437,7 @@ lab_endgetargs:; meltfptr[18] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6241:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6257:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CMAT__V2*/ meltfptr[1]), 6, "CMATCH_EXPTEST"); @@ -34893,7 +35445,7 @@ lab_endgetargs:; meltfptr[19] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6242:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6258:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CMAT__V2*/ meltfptr[1]), 7, "CMATCH_EXPFILL"); @@ -34901,7 +35453,7 @@ lab_endgetargs:; meltfptr[20] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6244:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6260:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]), 2, "MCX_NORMTESTER"); @@ -34935,7 +35487,7 @@ lab_endgetargs:; (meltgc_new_mapobjects ((meltobject_ptr_t) (( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[4])), ( /*_#I__L10*/ meltfnum[9])));; - MELT_LOCATION ("warmelt-genobj.melt:6251:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6267:/ quasiblock"); /*^cond */ @@ -34972,21 +35524,21 @@ lab_endgetargs:; ((1) + ( /*_#GET_INT__L12*/ meltfnum[11]));; { - MELT_LOCATION ("warmelt-genobj.melt:6253:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6269:/ locexp"); melt_put_int ((melt_ptr_t) ( /*_.BOXCNT__V24*/ meltfptr[23]), ( /*_#CNT__L13*/ meltfnum[12])); } ; /*_#LET___L11*/ meltfnum[10] = /*_#CNT__L13*/ meltfnum[12];; - MELT_LOCATION ("warmelt-genobj.melt:6251:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6267:/ clear"); /*clear *//*_.BOXCNT__V24*/ meltfptr[23] = 0; /*^clear */ /*clear *//*_#GET_INT__L12*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_#CNT__L13*/ meltfnum[12] = 0; /*_#MCXCOUNT__L14*/ meltfnum[11] = /*_#LET___L11*/ meltfnum[10];; - MELT_LOCATION ("warmelt-genobj.melt:6256:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6272:/ quasiblock"); /*_.SBUF__V26*/ meltfptr[25] = @@ -34994,7 +35546,7 @@ lab_endgetargs:; meltgc_new_strbuf ((meltobject_ptr_t) (( /*!DISCR_STRBUF */ meltfrout->tabval[5])), (const char *) 0);; - MELT_LOCATION ("warmelt-genobj.melt:6257:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6273:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -35021,7 +35573,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6257:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6273:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.SBUF__V26*/ meltfptr[25]), melt_string_str ((melt_ptr_t) ( /*_.NAMED_NAME__V27*/ @@ -35030,13 +35582,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6258:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6274:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V26*/ meltfptr[25]), ("_")); } ; - MELT_LOCATION ("warmelt-genobj.melt:6259:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6275:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -35062,7 +35614,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6259:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6275:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V26*/ meltfptr[25]), melt_string_str ((melt_ptr_t) @@ -35072,7 +35624,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6260:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6276:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V26*/ meltfptr[25]), ("_")); @@ -35080,7 +35632,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6261:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6277:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.SBUF__V26*/ meltfptr[25]), ( /*_#MCXCOUNT__L14*/ meltfnum[11])); } @@ -35094,7 +35646,7 @@ lab_endgetargs:; /*_.LET___V25*/ meltfptr[23] = /*_.STRBUF2STRING__V29*/ meltfptr[28];; - MELT_LOCATION ("warmelt-genobj.melt:6256:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6272:/ clear"); /*clear *//*_.SBUF__V26*/ meltfptr[25] = 0; /*^clear */ /*clear *//*_.NAMED_NAME__V27*/ meltfptr[26] = 0; @@ -35103,7 +35655,7 @@ lab_endgetargs:; /*^clear */ /*clear *//*_.STRBUF2STRING__V29*/ meltfptr[28] = 0; /*_.UNIQSTATE__V30*/ meltfptr[25] = /*_.LET___V25*/ meltfptr[23];; - MELT_LOCATION ("warmelt-genobj.melt:6264:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6280:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -35129,7 +35681,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6267:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6283:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.SUBSTMAP__V23*/ meltfptr[22]), (meltobject_ptr_t) ( /*_.CMSTATE__V19*/ @@ -35138,7 +35690,7 @@ lab_endgetargs:; meltfptr[25])); } ; - MELT_LOCATION ("warmelt-genobj.melt:6269:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6285:/ quasiblock"); /*^cond */ @@ -35167,7 +35719,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6270:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6286:/ cppif.then"); /*^block */ /*anyblock */ { @@ -35193,7 +35745,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6270:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6286:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[12]) /*then */ { /*^cond.then */ @@ -35208,7 +35760,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6270:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6286:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -35222,7 +35774,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6270; + argtab[2].meltbp_long = 6286; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_cmatcher nmatched="; /*^apply.arg */ @@ -35242,7 +35794,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V35*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6270:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6286:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V35*/ meltfptr[34] = 0; @@ -35255,7 +35807,7 @@ lab_endgetargs:; /*_.IF___V34*/ meltfptr[33] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6270:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6286:/ quasiblock"); /*_.PROGN___V36*/ meltfptr[34] = /*_.IF___V34*/ meltfptr[33];; @@ -35264,7 +35816,7 @@ lab_endgetargs:; /*_.IFCPP___V33*/ meltfptr[28] = /*_.PROGN___V36*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6270:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6286:/ clear"); /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[12] = 0; /*^clear */ /*clear *//*_.IF___V34*/ meltfptr[33] = 0; @@ -35277,7 +35829,7 @@ lab_endgetargs:; /*_.IFCPP___V33*/ meltfptr[28] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6271:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6287:/ quasiblock"); /*^checksignal */ @@ -35299,7 +35851,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6272:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6288:/ cppif.then"); /*^block */ /*anyblock */ { @@ -35325,7 +35877,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6272:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6288:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[15]) /*then */ { /*^cond.then */ @@ -35340,7 +35892,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6272:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6288:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -35354,7 +35906,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6272; + argtab[2].meltbp_long = 6288; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_cmatcher obmatched="; /*^apply.arg */ @@ -35374,7 +35926,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V40*/ meltfptr[39];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6272:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6288:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[12] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V40*/ meltfptr[39] = 0; @@ -35387,7 +35939,7 @@ lab_endgetargs:; /*_.IF___V39*/ meltfptr[38] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6272:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6288:/ quasiblock"); /*_.PROGN___V41*/ meltfptr[39] = /*_.IF___V39*/ meltfptr[38];; @@ -35396,7 +35948,7 @@ lab_endgetargs:; /*_.IFCPP___V38*/ meltfptr[34] = /*_.PROGN___V41*/ meltfptr[39];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6272:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6288:/ clear"); /*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.IF___V39*/ meltfptr[38] = 0; @@ -35409,7 +35961,7 @@ lab_endgetargs:; /*_.IFCPP___V38*/ meltfptr[34] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6274:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6290:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -35435,7 +35987,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6273:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6289:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.SUBSTMAP__V23*/ meltfptr[22]), (meltobject_ptr_t) ( /*_.BINDER__V42*/ @@ -35445,20 +35997,20 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-genobj.melt:6271:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6287:/ clear"); /*clear *//*_.OBMATCHED__V37*/ meltfptr[33] = 0; /*^clear */ /*clear *//*_.IFCPP___V38*/ meltfptr[34] = 0; /*^clear */ /*clear *//*_.BINDER__V42*/ meltfptr[38] = 0; - MELT_LOCATION ("warmelt-genobj.melt:6269:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6285:/ clear"); /*clear *//*_.NMATCHED__V32*/ meltfptr[27] = 0; /*^clear */ /*clear *//*_.IFCPP___V33*/ meltfptr[28] = 0; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6278:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6294:/ cppif.then"); /*^block */ /*anyblock */ { @@ -35484,7 +36036,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6278:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6294:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L19*/ meltfnum[12]) /*then */ { /*^cond.then */ @@ -35499,7 +36051,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6278:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6294:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -35513,7 +36065,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6278; + argtab[2].meltbp_long = 6294; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_cmatcher normtester="; /*^apply.arg */ @@ -35533,7 +36085,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V45*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6278:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6294:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L20*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V45*/ meltfptr[34] = 0; @@ -35546,7 +36098,7 @@ lab_endgetargs:; /*_.IF___V44*/ meltfptr[33] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6278:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6294:/ quasiblock"); /*_.PROGN___V46*/ meltfptr[38] = /*_.IF___V44*/ meltfptr[33];; @@ -35555,7 +36107,7 @@ lab_endgetargs:; /*_.IFCPP___V43*/ meltfptr[39] = /*_.PROGN___V46*/ meltfptr[38];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6278:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6294:/ clear"); /*clear *//*_#MELT_NEED_DBG__L19*/ meltfnum[12] = 0; /*^clear */ /*clear *//*_.IF___V44*/ meltfptr[33] = 0; @@ -35568,7 +36120,7 @@ lab_endgetargs:; /*_.IFCPP___V43*/ meltfptr[39] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6281:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6297:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -35592,7 +36144,7 @@ lab_endgetargs:; /*_.NTMATCH_INARGS__V47*/ meltfptr[27] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6283:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6299:/ quasiblock"); /*^newclosure */ @@ -35630,7 +36182,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.SUBSTMAP__V23*/ meltfptr[22]); ; /*_.LAMBDA___V48*/ meltfptr[28] = /*_.LAMBDA___V49*/ meltfptr[34];; - MELT_LOCATION ("warmelt-genobj.melt:6280:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6296:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -35651,7 +36203,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6294:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6310:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -35675,7 +36227,7 @@ lab_endgetargs:; /*_.NTMATCH_OUTLOCS__V51*/ meltfptr[38] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6296:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6312:/ quasiblock"); /*^newclosure */ @@ -35713,7 +36265,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.SUBSTMAP__V23*/ meltfptr[22]); ; /*_.LAMBDA___V52*/ meltfptr[51] = /*_.LAMBDA___V53*/ meltfptr[52];; - MELT_LOCATION ("warmelt-genobj.melt:6293:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6309:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -35736,7 +36288,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6305:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6321:/ cppif.then"); /*^block */ /*anyblock */ { @@ -35762,7 +36314,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6305:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6321:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[15]) /*then */ { /*^cond.then */ @@ -35777,7 +36329,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6305:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6321:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -35791,7 +36343,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6305; + argtab[2].meltbp_long = 6321; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_cmatcher substmap="; /*^apply.arg */ @@ -35811,7 +36363,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V57*/ meltfptr[56];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6305:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6321:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[12] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V57*/ meltfptr[56] = 0; @@ -35824,7 +36376,7 @@ lab_endgetargs:; /*_.IF___V56*/ meltfptr[55] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6305:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6321:/ quasiblock"); /*_.PROGN___V58*/ meltfptr[56] = /*_.IF___V56*/ meltfptr[55];; @@ -35833,7 +36385,7 @@ lab_endgetargs:; /*_.IFCPP___V55*/ meltfptr[54] = /*_.PROGN___V58*/ meltfptr[56];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6305:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6321:/ clear"); /*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.IF___V56*/ meltfptr[55] = 0; @@ -35846,10 +36398,10 @@ lab_endgetargs:; /*_.IFCPP___V55*/ meltfptr[54] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6307:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6323:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:6309:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6325:/ quasiblock"); /*^newclosure */ @@ -35887,7 +36439,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]); ; /*_.EXPANDER__V60*/ meltfptr[56] = /*_.LAMBDA___V61*/ meltfptr[60];; - MELT_LOCATION ("warmelt-genobj.melt:6328:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6344:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -35899,7 +36451,7 @@ lab_endgetargs:; (union meltparam_un *) 0, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6329:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6345:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -35911,7 +36463,7 @@ lab_endgetargs:; (union meltparam_un *) 0, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6330:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6346:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -35935,7 +36487,7 @@ lab_endgetargs:; /*_.MLOC__V64*/ meltfptr[63] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6331:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6347:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -35982,7 +36534,7 @@ lab_endgetargs:; ( /*_.MLOC__V64*/ meltfptr[63]), "OBCX_LOC"); ; /*_.TESTCHUNK__V65*/ meltfptr[64] = /*_.INST__V66*/ meltfptr[65];; - MELT_LOCATION ("warmelt-genobj.melt:6335:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6351:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -36031,7 +36583,7 @@ lab_endgetargs:; /*_.FILLCHUNK__V67*/ meltfptr[66] = /*_.INST__V68*/ meltfptr[67];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6340:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6356:/ cppif.then"); /*^block */ /*anyblock */ { @@ -36057,7 +36609,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6340:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6356:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L23*/ meltfnum[12]) /*then */ { /*^cond.then */ @@ -36072,7 +36624,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6340:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6356:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -36086,7 +36638,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6340; + argtab[2].meltbp_long = 6356; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_cmatcher exptest="; /*^apply.arg */ @@ -36124,7 +36676,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V71*/ meltfptr[70];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6340:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6356:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L24*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V71*/ meltfptr[70] = 0; @@ -36137,7 +36689,7 @@ lab_endgetargs:; /*_.IF___V70*/ meltfptr[69] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6340:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6356:/ quasiblock"); /*_.PROGN___V72*/ meltfptr[70] = /*_.IF___V70*/ meltfptr[69];; @@ -36146,7 +36698,7 @@ lab_endgetargs:; /*_.IFCPP___V69*/ meltfptr[68] = /*_.PROGN___V72*/ meltfptr[70];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6340:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6356:/ clear"); /*clear *//*_#MELT_NEED_DBG__L23*/ meltfnum[12] = 0; /*^clear */ /*clear *//*_.IF___V70*/ meltfptr[69] = 0; @@ -36161,7 +36713,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6342:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6358:/ cppif.then"); /*^block */ /*anyblock */ { @@ -36177,7 +36729,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6342:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6358:/ cond.else"); /*^block */ /*anyblock */ @@ -36191,7 +36743,7 @@ lab_endgetargs:; melt_assert_failed (("compilmatcher_cmatcher check exptest"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6342) ? (6342) : __LINE__, __FUNCTION__); + (6358) ? (6358) : __LINE__, __FUNCTION__); ; } ; @@ -36206,7 +36758,7 @@ lab_endgetargs:; /*_.IFCPP___V73*/ meltfptr[69] = /*_.IFELSE___V74*/ meltfptr[70];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6342:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6358:/ clear"); /*clear *//*_.IFELSE___V74*/ meltfptr[70] = 0; } @@ -36215,13 +36767,13 @@ lab_endgetargs:; /*_.IFCPP___V73*/ meltfptr[69] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6343:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6359:/ quasiblock"); /*_.OTHENLIST__V76*/ meltfptr[75] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[32]))));; - MELT_LOCATION ("warmelt-genobj.melt:6345:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6361:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -36263,7 +36815,7 @@ lab_endgetargs:; /*_.OELSELIST__V79*/ meltfptr[78] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[32]))));; - MELT_LOCATION ("warmelt-genobj.melt:6350:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6366:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -36300,7 +36852,7 @@ lab_endgetargs:; ( /*_.OELSELIST__V79*/ meltfptr[78]), "OBLO_BODYL"); ; /*_.OELSEBODY__V80*/ meltfptr[79] = /*_.INST__V81*/ meltfptr[80];; - MELT_LOCATION ("warmelt-genobj.melt:6354:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6370:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -36360,7 +36912,7 @@ lab_endgetargs:; /*_.OCOND__V82*/ meltfptr[81] = /*_.INST__V83*/ meltfptr[82];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6361:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6377:/ cppif.then"); /*^block */ /*anyblock */ { @@ -36386,7 +36938,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6361:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6377:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[15]) /*then */ { /*^cond.then */ @@ -36401,7 +36953,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6361:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6377:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -36415,7 +36967,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6361; + argtab[2].meltbp_long = 6377; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_cmatcher ocond="; /*^apply.arg */ @@ -36435,7 +36987,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V86*/ meltfptr[85];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6361:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6377:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[12] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V86*/ meltfptr[85] = 0; @@ -36448,7 +37000,7 @@ lab_endgetargs:; /*_.IF___V85*/ meltfptr[84] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6361:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6377:/ quasiblock"); /*_.PROGN___V87*/ meltfptr[85] = /*_.IF___V85*/ meltfptr[84];; @@ -36457,7 +37009,7 @@ lab_endgetargs:; /*_.IFCPP___V84*/ meltfptr[83] = /*_.PROGN___V87*/ meltfptr[85];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6361:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6377:/ clear"); /*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.IF___V85*/ meltfptr[84] = 0; @@ -36472,7 +37024,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6362:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6378:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V31*/ meltfptr[26]), (melt_ptr_t) ( /*_.OCOND__V82*/ meltfptr[81])); } @@ -36495,7 +37047,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6366:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6382:/ cppif.then"); /*^block */ /*anyblock */ { @@ -36521,7 +37073,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6366:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6382:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L28*/ meltfnum[15]) /*then */ { /*^cond.then */ @@ -36536,7 +37088,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6366:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6382:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -36550,7 +37102,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6366; + argtab[2].meltbp_long = 6382; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_cmatcher curout="; @@ -36577,7 +37129,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V91*/ meltfptr[90];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6366:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6382:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L29*/ meltfnum[28] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V91*/ meltfptr[90] = 0; @@ -36590,7 +37142,7 @@ lab_endgetargs:; /*_.IF___V90*/ meltfptr[89] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6366:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6382:/ quasiblock"); /*_.PROGN___V92*/ meltfptr[90] = /*_.IF___V90*/ meltfptr[89];; @@ -36599,7 +37151,7 @@ lab_endgetargs:; /*_.IFCPP___V89*/ meltfptr[85] = /*_.PROGN___V92*/ meltfptr[90];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6366:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6382:/ clear"); /*clear *//*_#MELT_NEED_DBG__L28*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.IF___V90*/ meltfptr[89] = 0; @@ -36614,7 +37166,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6367:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6383:/ cppif.then"); /*^block */ /*anyblock */ { @@ -36627,7 +37179,7 @@ lab_endgetargs:; ( /*_.CUROUT__V88*/ meltfptr[84]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[35])));; - MELT_LOCATION ("warmelt-genobj.melt:6367:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6383:/ cond"); /*cond */ if ( /*_#IS_A__L30*/ meltfnum[28]) /*then */ { /*^cond.then */ @@ -36635,7 +37187,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6367:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6383:/ cond.else"); /*^block */ /*anyblock */ @@ -36649,7 +37201,7 @@ lab_endgetargs:; melt_assert_failed (("check curout"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6367) ? (6367) : __LINE__, + (6383) ? (6383) : __LINE__, __FUNCTION__); ; } @@ -36665,7 +37217,7 @@ lab_endgetargs:; /*_.IFCPP___V93*/ meltfptr[89] = /*_.IFELSE___V94*/ meltfptr[90];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6367:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6383:/ clear"); /*clear *//*_#IS_A__L30*/ meltfnum[28] = 0; /*^clear */ /*clear *//*_.IFELSE___V94*/ meltfptr[90] = 0; @@ -36676,10 +37228,10 @@ lab_endgetargs:; /*_.IFCPP___V93*/ meltfptr[89] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6368:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6384:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:6370:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6386:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CUROUT__V88*/ meltfptr[84]), 0, "BINDER"); @@ -36693,7 +37245,7 @@ lab_endgetargs:; ( /*_.SUBSTMAP__V23*/ meltfptr[22]), (meltobject_ptr_t) ( /*_.BINDER__V95*/ meltfptr[90]));; - MELT_LOCATION ("warmelt-genobj.melt:6371:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6387:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -36733,7 +37285,7 @@ lab_endgetargs:; /*_.OCLEAROUT__V97*/ meltfptr[96] = /*_.INST__V98*/ meltfptr[97];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6374:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6390:/ cppif.then"); /*^block */ /*anyblock */ { @@ -36759,7 +37311,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6374:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6390:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L31*/ meltfnum[15]) /*then */ { /*^cond.then */ @@ -36774,7 +37326,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6374:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6390:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -36788,7 +37340,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6374; + argtab[2].meltbp_long = 6390; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_cmatcher oclearout="; @@ -36810,7 +37362,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V101*/ meltfptr[100];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6374:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6390:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L32*/ meltfnum[28] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V101*/ meltfptr[100] = 0; @@ -36823,7 +37375,7 @@ lab_endgetargs:; /*_.IF___V100*/ meltfptr[99] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6374:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6390:/ quasiblock"); /*_.PROGN___V102*/ meltfptr[100] = /*_.IF___V100*/ meltfptr[99];; @@ -36833,7 +37385,7 @@ lab_endgetargs:; /*_.PROGN___V102*/ meltfptr[100];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6374:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6390:/ clear"); /*clear *//*_#MELT_NEED_DBG__L31*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.IF___V100*/ meltfptr[99] = 0; @@ -36848,7 +37400,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6375:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6391:/ cppif.then"); /*^block */ /*anyblock */ { @@ -36860,7 +37412,7 @@ lab_endgetargs:; (melt_magic_discr ((melt_ptr_t) ( /*_.LOCOUT__V96*/ meltfptr[95])) == MELTOBMAG_OBJECT);; - MELT_LOCATION ("warmelt-genobj.melt:6375:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6391:/ cond"); /*cond */ if ( /*_#IS_OBJECT__L33*/ meltfnum[28]) /*then */ { /*^cond.then */ @@ -36868,7 +37420,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6375:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6391:/ cond.else"); /*^block */ /*anyblock */ @@ -36882,7 +37434,7 @@ lab_endgetargs:; melt_assert_failed (("check locout"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6375) ? (6375) : __LINE__, + (6391) ? (6391) : __LINE__, __FUNCTION__); ; } @@ -36899,7 +37451,7 @@ lab_endgetargs:; /*_.IFELSE___V104*/ meltfptr[100];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6375:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6391:/ clear"); /*clear *//*_#IS_OBJECT__L33*/ meltfnum[28] = 0; /*^clear */ /*clear *//*_.IFELSE___V104*/ meltfptr[100] = 0; @@ -36912,7 +37464,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6376:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6392:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OTHENLIST__V76*/ meltfptr[75]), (melt_ptr_t) ( /*_.OCLEAROUT__V97*/ @@ -36920,7 +37472,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-genobj.melt:6368:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6384:/ clear"); /*clear *//*_.BINDER__V95*/ meltfptr[90] = 0; /*^clear */ /*clear *//*_.LOCOUT__V96*/ meltfptr[95] = 0; @@ -36936,7 +37488,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-genobj.melt:6363:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6379:/ clear"); /*clear *//*_.CUROUT__V88*/ meltfptr[84] = 0; /*^clear */ /*clear *//*_#OUTIX__L27*/ meltfnum[12] = 0; @@ -36948,12 +37500,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6379:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6395:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OTHENLIST__V76*/ meltfptr[75]), (melt_ptr_t) ( /*_.FILLCHUNK__V67*/ meltfptr[66])); } ; - MELT_LOCATION ("warmelt-genobj.melt:6380:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6396:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -36979,13 +37531,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6380:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6396:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OTHENLIST__V76*/ meltfptr[75]), (melt_ptr_t) ( /*_.MCX_GOTOTHEN__V105*/ meltfptr[100])); } ; - MELT_LOCATION ("warmelt-genobj.melt:6381:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6397:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -37011,7 +37563,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6381:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6397:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OELSELIST__V79*/ meltfptr[78]), (melt_ptr_t) ( /*_.MCX_GOTOELSE__V106*/ meltfptr[90])); @@ -37019,7 +37571,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6382:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6398:/ cppif.then"); /*^block */ /*anyblock */ { @@ -37045,7 +37597,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6382:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6398:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L34*/ meltfnum[15]) /*then */ { /*^cond.then */ @@ -37060,7 +37612,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6382:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6398:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -37074,7 +37626,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6382; + argtab[2].meltbp_long = 6398; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_cmatcher final ocond="; @@ -37095,7 +37647,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V109*/ meltfptr[98];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6382:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6398:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L35*/ meltfnum[28] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V109*/ meltfptr[98] = 0; @@ -37108,7 +37660,7 @@ lab_endgetargs:; /*_.IF___V108*/ meltfptr[96] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6382:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6398:/ quasiblock"); /*_.PROGN___V110*/ meltfptr[99] = /*_.IF___V108*/ meltfptr[96];; @@ -37117,7 +37669,7 @@ lab_endgetargs:; /*_.IFCPP___V107*/ meltfptr[95] = /*_.PROGN___V110*/ meltfptr[99];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6382:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6398:/ clear"); /*clear *//*_#MELT_NEED_DBG__L34*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.IF___V108*/ meltfptr[96] = 0; @@ -37134,7 +37686,7 @@ lab_endgetargs:; /*_.LET___V75*/ meltfptr[70] = /*_.IFCPP___V107*/ meltfptr[95];; - MELT_LOCATION ("warmelt-genobj.melt:6343:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6359:/ clear"); /*clear *//*_.OTHENLIST__V76*/ meltfptr[75] = 0; /*^clear */ /*clear *//*_.OTHENBODY__V77*/ meltfptr[76] = 0; @@ -37154,7 +37706,7 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V107*/ meltfptr[95] = 0; /*_.LET___V59*/ meltfptr[55] = /*_.LET___V75*/ meltfptr[70];; - MELT_LOCATION ("warmelt-genobj.melt:6307:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6323:/ clear"); /*clear *//*_.EXPANDER__V60*/ meltfptr[56] = 0; /*^clear */ /*clear *//*_.EXPTEST__V62*/ meltfptr[61] = 0; @@ -37174,7 +37726,7 @@ lab_endgetargs:; /*clear *//*_.LET___V75*/ meltfptr[70] = 0; /*_.LET___V15*/ meltfptr[13] = /*_.LET___V59*/ meltfptr[55];; - MELT_LOCATION ("warmelt-genobj.melt:6236:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6252:/ clear"); /*clear *//*_.CMINS__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.CMBIND__V17*/ meltfptr[16] = 0; @@ -37228,14 +37780,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V55*/ meltfptr[54] = 0; /*^clear */ /*clear *//*_.LET___V59*/ meltfptr[55] = 0; - MELT_LOCATION ("warmelt-genobj.melt:6231:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];; - MELT_LOCATION ("warmelt-genobj.melt:6231:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:6247:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -37335,7 +37899,7 @@ meltrout_179_warmelt_genobj_LAMBDA___52__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:6283:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:6299:/ getarg"); /*_.CURIN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -37363,7 +37927,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6284:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6300:/ cppif.then"); /*^block */ /*anyblock */ { @@ -37389,7 +37953,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6284:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6300:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -37404,7 +37968,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6284:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6300:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -37417,7 +37981,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6284; + argtab[2].meltbp_long = 6300; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_cmatcher curin="; /*^apply.arg */ @@ -37447,7 +38011,7 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6284:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6300:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0; @@ -37460,7 +38024,7 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6284:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6300:/ quasiblock"); /*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];; @@ -37469,7 +38033,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6284:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6300:/ clear"); /*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V5*/ meltfptr[4] = 0; @@ -37484,7 +38048,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6285:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6301:/ cppif.then"); /*^block */ /*anyblock */ { @@ -37496,7 +38060,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.FORMIN__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:6285:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6301:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -37504,7 +38068,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6285:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6301:/ cond.else"); /*^block */ /*anyblock */ @@ -37518,7 +38082,7 @@ lab_endgetargs:; melt_assert_failed (("check formin"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6285) ? (6285) : __LINE__, __FUNCTION__); + (6301) ? (6301) : __LINE__, __FUNCTION__); ; } ; @@ -37533,7 +38097,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6285:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6301:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0; @@ -37544,7 +38108,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6286:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6302:/ quasiblock"); /*^checksignal */ @@ -37567,7 +38131,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6287:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6303:/ cppif.then"); /*^block */ /*anyblock */ { @@ -37593,7 +38157,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6287:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6303:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -37608,7 +38172,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6287:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6303:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -37621,7 +38185,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6287; + argtab[2].meltbp_long = 6303; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_cmatcher oin="; /*^apply.arg */ @@ -37641,7 +38205,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6287:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6303:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V13*/ meltfptr[12] = 0; @@ -37654,7 +38218,7 @@ lab_endgetargs:; /*_.IF___V12*/ meltfptr[11] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6287:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6303:/ quasiblock"); /*_.PROGN___V14*/ meltfptr[12] = /*_.IF___V12*/ meltfptr[11];; @@ -37663,7 +38227,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[10] = /*_.PROGN___V14*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6287:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6303:/ clear"); /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V12*/ meltfptr[11] = 0; @@ -37676,7 +38240,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[10] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6289:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6305:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -37702,7 +38266,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6288:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6304:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) (( /*~SUBSTMAP */ meltfclos->tabval[1])), (meltobject_ptr_t) ( /*_.BINDER__V15*/ @@ -37711,13 +38275,13 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-genobj.melt:6286:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6302:/ clear"); /*clear *//*_.OIN__V10*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.IFCPP___V11*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_.BINDER__V15*/ meltfptr[11] = 0; - MELT_LOCATION ("warmelt-genobj.melt:6283:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6299:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -37811,7 +38375,7 @@ meltrout_180_warmelt_genobj_LAMBDA___53__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:6296:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:6312:/ getarg"); /*_.CUROUT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -37839,7 +38403,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6297:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6313:/ cppif.then"); /*^block */ /*anyblock */ { @@ -37865,7 +38429,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6297:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6313:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -37880,7 +38444,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6297:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6313:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -37893,7 +38457,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6297; + argtab[2].meltbp_long = 6313; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_cmatcher curout="; /*^apply.arg */ @@ -37923,7 +38487,7 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6297:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6313:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0; @@ -37936,7 +38500,7 @@ lab_endgetargs:; /*_.IF___V5*/ meltfptr[4] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6297:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6313:/ quasiblock"); /*_.PROGN___V7*/ meltfptr[5] = /*_.IF___V5*/ meltfptr[4];; @@ -37945,7 +38509,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.PROGN___V7*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6297:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6313:/ clear"); /*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V5*/ meltfptr[4] = 0; @@ -37960,7 +38524,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6298:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6314:/ cppif.then"); /*^block */ /*anyblock */ { @@ -37972,7 +38536,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.FORMOUT__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:6298:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6314:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -37980,7 +38544,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6298:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6314:/ cond.else"); /*^block */ /*anyblock */ @@ -37994,7 +38558,7 @@ lab_endgetargs:; melt_assert_failed (("check formout"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6298) ? (6298) : __LINE__, __FUNCTION__); + (6314) ? (6314) : __LINE__, __FUNCTION__); ; } ; @@ -38009,7 +38573,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[4] = /*_.IFELSE___V9*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6298:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6314:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.IFELSE___V9*/ meltfptr[5] = 0; @@ -38020,7 +38584,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6299:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6315:/ quasiblock"); /*^checksignal */ @@ -38043,7 +38607,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6300:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6316:/ cppif.then"); /*^block */ /*anyblock */ { @@ -38069,7 +38633,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6300:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6316:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -38084,7 +38648,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6300:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6316:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -38097,7 +38661,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6300; + argtab[2].meltbp_long = 6316; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_cmatcher oout="; /*^apply.arg */ @@ -38122,7 +38686,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6300:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6316:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V13*/ meltfptr[12] = 0; @@ -38135,7 +38699,7 @@ lab_endgetargs:; /*_.IF___V12*/ meltfptr[11] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6300:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6316:/ quasiblock"); /*_.PROGN___V14*/ meltfptr[12] = /*_.IF___V12*/ meltfptr[11];; @@ -38144,7 +38708,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[10] = /*_.PROGN___V14*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6300:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6316:/ clear"); /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V12*/ meltfptr[11] = 0; @@ -38157,7 +38721,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[10] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6302:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6318:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -38183,7 +38747,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6301:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6317:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) (( /*~SUBSTMAP */ meltfclos->tabval[1])), (meltobject_ptr_t) ( /*_.BINDER__V15*/ @@ -38192,13 +38756,13 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-genobj.melt:6299:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6315:/ clear"); /*clear *//*_.OOUT__V10*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.IFCPP___V11*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_.BINDER__V15*/ meltfptr[11] = 0; - MELT_LOCATION ("warmelt-genobj.melt:6296:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6312:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -38292,7 +38856,7 @@ meltrout_181_warmelt_genobj_LAMBDA___54__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:6309:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:6325:/ getarg"); /*_.TUP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -38302,7 +38866,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-genobj.melt:6312:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6328:/ quasiblock"); /*^newclosure */ @@ -38340,7 +38904,7 @@ lab_endgetargs:; (melt_ptr_t) (( /*~MCX */ meltfclos->tabval[1])); ; /*_.LAMBDA___V3*/ meltfptr[2] = /*_.LAMBDA___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-genobj.melt:6310:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6326:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -38358,11 +38922,23 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6309:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6325:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.MULTIPLE_MAP__V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:6309:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:6325:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -38456,7 +39032,7 @@ meltrout_182_warmelt_genobj_LAMBDA___55__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:6312:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:6328:/ getarg"); /*_.C__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -38466,14 +39042,14 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-genobj.melt:6314:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6330:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L1*/ meltfnum[0] = melt_is_instance_of ((melt_ptr_t) ( /*_.C__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SYMBOL */ meltfrout-> tabval[0])));; - MELT_LOCATION ("warmelt-genobj.melt:6314:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6330:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -38481,7 +39057,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:6315:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6331:/ quasiblock"); /*_.R__V5*/ meltfptr[4] = @@ -38490,12 +39066,12 @@ lab_endgetargs:; (( /*~SUBSTMAP */ meltfclos->tabval[0])), (meltobject_ptr_t) ( /*_.C__V2*/ meltfptr[1]));; - MELT_LOCATION ("warmelt-genobj.melt:6316:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6332:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L2*/ meltfnum[1] = (( /*_.R__V5*/ meltfptr[4]) == NULL);; - MELT_LOCATION ("warmelt-genobj.melt:6316:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6332:/ cond"); /*cond */ if ( /*_#NULL__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -38503,7 +39079,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:6317:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6333:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -38528,7 +39104,7 @@ lab_endgetargs:; /*_.MCX_LOC__V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6318:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6334:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -38555,7 +39131,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6317:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6333:/ locexp"); melt_error_str ((melt_ptr_t) ( /*_.MCX_LOC__V6*/ meltfptr[5]), ("invalid symbol to expand for cmatcher"), @@ -38565,7 +39141,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6316:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6332:/ clear"); /*clear *//*_.MCX_LOC__V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.NAMED_NAME__V7*/ meltfptr[6] = 0; @@ -38575,14 +39151,14 @@ lab_endgetargs:; ; /*_.LET___V4*/ meltfptr[3] = /*_.R__V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:6315:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6331:/ clear"); /*clear *//*_.R__V5*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_#NULL__L2*/ meltfnum[1] = 0; /*_.IFELSE___V3*/ meltfptr[2] = /*_.LET___V4*/ meltfptr[3];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6314:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6330:/ clear"); /*clear *//*_.LET___V4*/ meltfptr[3] = 0; } ; @@ -38594,13 +39170,13 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:6320:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6336:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_OBJECT__L3*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.C__V2*/ meltfptr[1])) == MELTOBMAG_OBJECT);; - MELT_LOCATION ("warmelt-genobj.melt:6320:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6336:/ cond"); /*cond */ if ( /*_#IS_OBJECT__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -38608,7 +39184,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:6321:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6337:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -38637,7 +39213,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-genobj.melt:6321:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6337:/ locexp"); /* error_plain */ melt_error_str ((melt_ptr_t) ( /*_.MCX_LOC__V9*/ meltfptr[6]), @@ -38648,7 +39224,7 @@ lab_endgetargs:; /*clear *//*_.IFELSE___V8*/ meltfptr[5] = 0; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6320:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6336:/ clear"); /*clear *//*_.MCX_LOC__V9*/ meltfptr[6] = 0; } ; @@ -38660,13 +39236,13 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:6323:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6339:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_STRING__L4*/ meltfnum[3] = (melt_magic_discr ((melt_ptr_t) ( /*_.C__V2*/ meltfptr[1])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-genobj.melt:6323:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6339:/ cond"); /*cond */ if ( /*_#IS_STRING__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -38687,7 +39263,7 @@ lab_endgetargs:; /*_.MAKE_STRING__V11*/ meltfptr[3];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6323:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6339:/ clear"); /*clear *//*_.MAKE_STRING__V11*/ meltfptr[3] = 0; } ; @@ -38699,7 +39275,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:6326:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6342:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -38727,7 +39303,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6326:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6342:/ locexp"); /* error_plain */ melt_error_str ((melt_ptr_t) ( /*_.MCX_LOC__V12*/ meltfptr[6]), @@ -38735,12 +39311,12 @@ lab_endgetargs:; (melt_ptr_t) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6325:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6341:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6323:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6339:/ clear"); /*clear *//*_.MCX_LOC__V12*/ meltfptr[6] = 0; } ; @@ -38750,7 +39326,7 @@ lab_endgetargs:; /*_.IFELSE___V10*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6320:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6336:/ clear"); /*clear *//*_#IS_STRING__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[4] = 0; @@ -38761,7 +39337,7 @@ lab_endgetargs:; /*_.IFELSE___V3*/ meltfptr[2] = /*_.IFELSE___V8*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6314:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6330:/ clear"); /*clear *//*_#IS_OBJECT__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V8*/ meltfptr[5] = 0; @@ -38769,11 +39345,23 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-genobj.melt:6312:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6328:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:6312:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:6328:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -38873,7 +39461,7 @@ meltrout_183_warmelt_genobj_COMPILMATCHER_FUNMATCHER (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:6393:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ getarg"); /*_.FMAT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -38903,7 +39491,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6394:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6410:/ cppif.then"); /*^block */ /*anyblock */ { @@ -38929,7 +39517,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6394:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6410:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -38944,7 +39532,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6394:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6410:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -38957,7 +39545,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6394; + argtab[2].meltbp_long = 6410; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_funmatcher fmat="; /*^apply.arg */ @@ -38982,7 +39570,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6394:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6410:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0; @@ -38995,7 +39583,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6394:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6410:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -39004,7 +39592,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6394:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6410:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -39019,7 +39607,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6395:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6411:/ cppif.then"); /*^block */ /*anyblock */ { @@ -39031,7 +39619,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.FMAT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_FUNMATCHER */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-genobj.melt:6395:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6411:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -39039,7 +39627,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6395:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6411:/ cond.else"); /*^block */ /*anyblock */ @@ -39053,7 +39641,7 @@ lab_endgetargs:; melt_assert_failed (("check fmat"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6395) ? (6395) : __LINE__, __FUNCTION__); + (6411) ? (6411) : __LINE__, __FUNCTION__); ; } ; @@ -39068,7 +39656,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6395:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6411:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; @@ -39081,7 +39669,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6396:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6412:/ cppif.then"); /*^block */ /*anyblock */ { @@ -39093,7 +39681,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.MCX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MATCHCOMPILCONTEXT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-genobj.melt:6396:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6412:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -39101,7 +39689,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6396:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6412:/ cond.else"); /*^block */ /*anyblock */ @@ -39115,7 +39703,7 @@ lab_endgetargs:; melt_assert_failed (("check mcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6396) ? (6396) : __LINE__, __FUNCTION__); + (6412) ? (6412) : __LINE__, __FUNCTION__); ; } ; @@ -39130,7 +39718,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6396:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6412:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -39143,7 +39731,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6397:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6413:/ cppif.then"); /*^block */ /*anyblock */ { @@ -39155,7 +39743,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GCX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_C_GENERATION_CONTEXT */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-genobj.melt:6397:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6413:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -39163,7 +39751,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6397:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6413:/ cond.else"); /*^block */ /*anyblock */ @@ -39177,7 +39765,7 @@ lab_endgetargs:; melt_assert_failed (("check gcx"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6397) ? (6397) : __LINE__, __FUNCTION__); + (6413) ? (6413) : __LINE__, __FUNCTION__); ; } ; @@ -39192,7 +39780,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6397:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6413:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -39203,10 +39791,10 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6398:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6414:/ quasiblock"); - MELT_LOCATION ("warmelt-genobj.melt:6399:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6415:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.FMAT__V2*/ meltfptr[1]), 2, "AMATCH_IN"); @@ -39214,7 +39802,7 @@ lab_endgetargs:; meltfptr[13] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6400:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6416:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.FMAT__V2*/ meltfptr[1]), 3, "AMATCH_MATCHBIND"); @@ -39222,7 +39810,7 @@ lab_endgetargs:; meltfptr[15] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6401:/ getslot"); + MELT_LOCATION ("warmelt-genobj.melt:6417:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.FMAT__V2*/ meltfptr[1]), 4, "AMATCH_OUT"); @@ -39230,7 +39818,7 @@ lab_endgetargs:; meltfptr[16] = slot; }; ; - MELT_LOCATION ("warmelt-genobj.melt:6402:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6418:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -39254,7 +39842,7 @@ lab_endgetargs:; /*_.NTMA__V18*/ meltfptr[17] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6404:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6420:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -39278,7 +39866,7 @@ lab_endgetargs:; /*_.OLIST__V19*/ meltfptr[18] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6405:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6421:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -39304,7 +39892,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6407:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6423:/ cppif.then"); /*^block */ /*anyblock */ { @@ -39330,7 +39918,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6407:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6423:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -39345,7 +39933,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6407:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6423:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -39358,7 +39946,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6407; + argtab[2].meltbp_long = 6423; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_funmatcher ntma="; /*^apply.arg */ @@ -39378,7 +39966,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V23*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6407:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6423:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V23*/ meltfptr[22] = 0; @@ -39391,7 +39979,7 @@ lab_endgetargs:; /*_.IF___V22*/ meltfptr[21] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6407:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6423:/ quasiblock"); /*_.PROGN___V24*/ meltfptr[22] = /*_.IF___V22*/ meltfptr[21];; @@ -39400,7 +39988,7 @@ lab_endgetargs:; /*_.IFCPP___V21*/ meltfptr[20] = /*_.PROGN___V24*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6407:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6423:/ clear"); /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V22*/ meltfptr[21] = 0; @@ -39415,7 +40003,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6408:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6424:/ cppif.then"); /*^block */ /*anyblock */ { @@ -39427,7 +40015,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NTMA__V18*/ meltfptr[17]), (melt_ptr_t) (( /*!CLASS_NORMTESTER_MATCHER */ meltfrout->tabval[4])));; - MELT_LOCATION ("warmelt-genobj.melt:6408:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6424:/ cond"); /*cond */ if ( /*_#IS_A__L8*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -39435,7 +40023,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-genobj.melt:6408:/ cond.else"); + MELT_LOCATION ("warmelt-genobj.melt:6424:/ cond.else"); /*^block */ /*anyblock */ @@ -39449,7 +40037,7 @@ lab_endgetargs:; melt_assert_failed (("check ntma"), ("warmelt-genobj.melt") ? ("warmelt-genobj.melt") : __FILE__, - (6408) ? (6408) : __LINE__, __FUNCTION__); + (6424) ? (6424) : __LINE__, __FUNCTION__); ; } ; @@ -39464,7 +40052,7 @@ lab_endgetargs:; /*_.IFCPP___V25*/ meltfptr[21] = /*_.IFELSE___V26*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6408:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6424:/ clear"); /*clear *//*_#IS_A__L8*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V26*/ meltfptr[22] = 0; @@ -39475,7 +40063,7 @@ lab_endgetargs:; /*_.IFCPP___V25*/ meltfptr[21] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6409:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6425:/ quasiblock"); /*^cond */ @@ -39502,7 +40090,7 @@ lab_endgetargs:; /*_.MATNDATA__V27*/ meltfptr[22] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6410:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6426:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -39519,7 +40107,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6411:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6427:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -39543,7 +40131,7 @@ lab_endgetargs:; /*_.NMATCHED__V29*/ meltfptr[28] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6412:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6428:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -39560,7 +40148,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6413:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6429:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -39584,7 +40172,7 @@ lab_endgetargs:; /*_.NINS__V31*/ meltfptr[30] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6414:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6430:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -39608,7 +40196,7 @@ lab_endgetargs:; /*_.NOUTS__V32*/ meltfptr[31] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6417:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6433:/ quasiblock"); /*^newclosure */ @@ -39633,7 +40221,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.GCX__V4*/ meltfptr[3]); ; /*_.LAMBDA___V33*/ meltfptr[32] = /*_.LAMBDA___V34*/ meltfptr[33];; - MELT_LOCATION ("warmelt-genobj.melt:6415:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6431:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -39652,7 +40240,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6422:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6438:/ quasiblock"); /*^newclosure */ @@ -39677,7 +40265,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.GCX__V4*/ meltfptr[3]); ; /*_.LAMBDA___V36*/ meltfptr[35] = /*_.LAMBDA___V37*/ meltfptr[36];; - MELT_LOCATION ("warmelt-genobj.melt:6420:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6436:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -39696,7 +40284,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6425:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6441:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -39714,7 +40302,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6426:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6442:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -39735,7 +40323,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6428:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6444:/ cppif.then"); /*^block */ /*anyblock */ { @@ -39761,7 +40349,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6428:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6444:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -39776,7 +40364,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6428:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6444:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -39790,7 +40378,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6428; + argtab[2].meltbp_long = 6444; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_funmatcher matndata="; /*^apply.arg */ @@ -39888,7 +40476,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V43*/ meltfptr[42];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6428:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6444:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V43*/ meltfptr[42] = 0; @@ -39901,7 +40489,7 @@ lab_endgetargs:; /*_.IF___V42*/ meltfptr[41] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6428:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6444:/ quasiblock"); /*_.PROGN___V44*/ meltfptr[42] = /*_.IF___V42*/ meltfptr[41];; @@ -39910,7 +40498,7 @@ lab_endgetargs:; /*_.IFCPP___V41*/ meltfptr[40] = /*_.PROGN___V44*/ meltfptr[42];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6428:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6444:/ clear"); /*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V42*/ meltfptr[41] = 0; @@ -39923,7 +40511,7 @@ lab_endgetargs:; /*_.IFCPP___V41*/ meltfptr[40] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-genobj.melt:6435:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6451:/ quasiblock"); /*_#MULTIPLE_LENGTH__L11*/ meltfnum[1] = @@ -39938,10 +40526,10 @@ lab_endgetargs:; (meltgc_new_multiple ((meltobject_ptr_t) (( /*!DISCR_MULTIPLE */ meltfrout->tabval[14])), ( /*_#I__L12*/ meltfnum[0])));; - MELT_LOCATION ("warmelt-genobj.melt:6437:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6453:/ checksignal"); MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-genobj.melt:6439:/ blockmultialloc"); + MELT_LOCATION ("warmelt-genobj.melt:6455:/ blockmultialloc"); /*multiallocblock */ { struct meltletrec_1_st @@ -39997,7 +40585,7 @@ lab_endgetargs:; /*_.LIST___V46*/ meltfptr[42] = /*_.LIST___V48*/ meltfptr[47];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6439:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6455:/ clear"); /*clear *//*_.OTESTCLOS__V47*/ meltfptr[46] = 0; /*^clear */ /*clear *//*_.LIST___V48*/ meltfptr[47] = 0; @@ -40007,7 +40595,7 @@ lab_endgetargs:; /*clear *//*_.LIST___V48*/ meltfptr[47] = 0; } /*end multiallocblock */ ; - MELT_LOCATION ("warmelt-genobj.melt:6437:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6453:/ quasiblock"); /*^rawallocobj */ @@ -40060,10 +40648,10 @@ lab_endgetargs:; "OGETSL_FIELD"); ; /*_.OGETCLOS__V49*/ meltfptr[46] = /*_.INST__V50*/ meltfptr[47];; - MELT_LOCATION ("warmelt-genobj.melt:6443:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6459:/ checksignal"); MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-genobj.melt:6445:/ blockmultialloc"); + MELT_LOCATION ("warmelt-genobj.melt:6461:/ blockmultialloc"); /*multiallocblock */ { struct meltletrec_2_st @@ -40119,7 +40707,7 @@ lab_endgetargs:; /*_.LIST___V51*/ meltfptr[50] = /*_.LIST___V53*/ meltfptr[52];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6445:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6461:/ clear"); /*clear *//*_.OTESTRES__V52*/ meltfptr[51] = 0; /*^clear */ /*clear *//*_.LIST___V53*/ meltfptr[52] = 0; @@ -40129,7 +40717,7 @@ lab_endgetargs:; /*clear *//*_.LIST___V53*/ meltfptr[52] = 0; } /*end multiallocblock */ ; - MELT_LOCATION ("warmelt-genobj.melt:6443:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6459:/ quasiblock"); /*^rawallocobj */ @@ -40195,7 +40783,7 @@ lab_endgetargs:; /*_.OTHENLIST__V56*/ meltfptr[55] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[18]))));; - MELT_LOCATION ("warmelt-genobj.melt:6451:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6467:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -40237,7 +40825,7 @@ lab_endgetargs:; /*_.OELSELIST__V59*/ meltfptr[58] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[18]))));; - MELT_LOCATION ("warmelt-genobj.melt:6456:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6472:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -40274,7 +40862,7 @@ lab_endgetargs:; ( /*_.OELSELIST__V59*/ meltfptr[58]), "OBLO_BODYL"); ; /*_.OELSEBODY__V60*/ meltfptr[59] = /*_.INST__V61*/ meltfptr[60];; - MELT_LOCATION ("warmelt-genobj.melt:6460:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6476:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -40333,7 +40921,7 @@ lab_endgetargs:; /*_.OCOND__V62*/ meltfptr[61] = /*_.INST__V63*/ meltfptr[62];; { - MELT_LOCATION ("warmelt-genobj.melt:6467:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6483:/ locexp"); meltgc_multiple_put_nth ((melt_ptr_t) ( /*_.OARGS__V45*/ meltfptr[41]), (0), (melt_ptr_t) ( /*_.OMATDATA__V28*/ @@ -40342,7 +40930,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6468:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6484:/ locexp"); meltgc_multiple_put_nth ((melt_ptr_t) ( /*_.OARGS__V45*/ meltfptr[41]), (1), (melt_ptr_t) ( /*_.OMATCHED__V30*/ @@ -40369,7 +40957,7 @@ lab_endgetargs:; (( /*_#INIX__L13*/ meltfnum[12]) + (2));; { - MELT_LOCATION ("warmelt-genobj.melt:6472:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6488:/ locexp"); meltgc_multiple_put_nth ((melt_ptr_t) ( /*_.OARGS__V45*/ meltfptr[41]), ( /*_#I__L14*/ meltfnum[13]), @@ -40383,7 +40971,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-genobj.melt:6469:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6485:/ clear"); /*clear *//*_.CURINS__V64*/ meltfptr[63] = 0; /*^clear */ /*clear *//*_#INIX__L13*/ meltfnum[12] = 0; @@ -40407,7 +40995,7 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-genobj.melt:6478:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6494:/ quasiblock"); /*^checksignal */ @@ -40450,7 +41038,7 @@ lab_endgetargs:; /*_.OBCL__V66*/ meltfptr[65] = /*_.INST__V67*/ meltfptr[66];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6481:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6497:/ cppif.then"); /*^block */ /*anyblock */ { @@ -40476,7 +41064,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6481:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6497:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[15]) /*then */ { /*^cond.then */ @@ -40491,7 +41079,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6481:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6497:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -40505,7 +41093,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6481; + argtab[2].meltbp_long = 6497; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_funmatcher obcl="; @@ -40527,7 +41115,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V70*/ meltfptr[69];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6481:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6497:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V70*/ meltfptr[69] = 0; @@ -40540,7 +41128,7 @@ lab_endgetargs:; /*_.IF___V69*/ meltfptr[68] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6481:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6497:/ quasiblock"); /*_.PROGN___V71*/ meltfptr[69] = /*_.IF___V69*/ meltfptr[68];; @@ -40549,7 +41137,7 @@ lab_endgetargs:; /*_.IFCPP___V68*/ meltfptr[67] = /*_.PROGN___V71*/ meltfptr[69];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6481:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6497:/ clear"); /*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.IF___V69*/ meltfptr[68] = 0; @@ -40564,14 +41152,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6482:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6498:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OELSELIST__V59*/ meltfptr[58]), (melt_ptr_t) ( /*_.OBCL__V66*/ meltfptr[65])); } ; - MELT_LOCATION ("warmelt-genobj.melt:6478:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6494:/ clear"); /*clear *//*_.OBCL__V66*/ meltfptr[65] = 0; /*^clear */ /*clear *//*_.IFCPP___V68*/ meltfptr[67] = 0; @@ -40581,13 +41169,13 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-genobj.melt:6475:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6491:/ clear"); /*clear *//*_.CUROUTS__V65*/ meltfptr[64] = 0; /*^clear */ /*clear *//*_#OUTIX__L15*/ meltfnum[14] = 0; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-genobj.melt:6485:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6501:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -40605,7 +41193,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6486:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6502:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -40623,7 +41211,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6488:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6504:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -40649,13 +41237,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6488:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6504:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OTHENLIST__V56*/ meltfptr[55]), (melt_ptr_t) ( /*_.MCX_GOTOTHEN__V74*/ meltfptr[65])); } ; - MELT_LOCATION ("warmelt-genobj.melt:6489:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6505:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -40681,7 +41269,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6489:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6505:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OELSELIST__V59*/ meltfptr[58]), (melt_ptr_t) ( /*_.MCX_GOTOELSE__V75*/ meltfptr[67])); @@ -40689,7 +41277,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-genobj.melt:6490:/ cppif.then"); + MELT_LOCATION ("warmelt-genobj.melt:6506:/ cppif.then"); /*^block */ /*anyblock */ { @@ -40715,7 +41303,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6490:/ cond"); + MELT_LOCATION ("warmelt-genobj.melt:6506:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[16]) /*then */ { /*^cond.then */ @@ -40730,7 +41318,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-genobj.melt:6490:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6506:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -40744,7 +41332,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-genobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 6490; + argtab[2].meltbp_long = 6506; /*^apply.arg */ argtab[3].meltbp_cstring = "compilmatcher_funmatcher ogetclos="; /*^apply.arg */ @@ -40776,7 +41364,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V78*/ meltfptr[77];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6490:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6506:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V78*/ meltfptr[77] = 0; @@ -40789,7 +41377,7 @@ lab_endgetargs:; /*_.IF___V77*/ meltfptr[76] = NULL;; } ; - MELT_LOCATION ("warmelt-genobj.melt:6490:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6506:/ quasiblock"); /*_.PROGN___V79*/ meltfptr[77] = /*_.IF___V77*/ meltfptr[76];; @@ -40798,7 +41386,7 @@ lab_endgetargs:; /*_.IFCPP___V76*/ meltfptr[75] = /*_.PROGN___V79*/ meltfptr[77];; /*epilog */ - MELT_LOCATION ("warmelt-genobj.melt:6490:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6506:/ clear"); /*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.IF___V77*/ meltfptr[76] = 0; @@ -40813,27 +41401,27 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-genobj.melt:6492:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6508:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V19*/ meltfptr[18]), (melt_ptr_t) ( /*_.OGETCLOS__V49*/ meltfptr[46])); } ; { - MELT_LOCATION ("warmelt-genobj.melt:6493:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6509:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V19*/ meltfptr[18]), (melt_ptr_t) ( /*_.OMAPP__V54*/ meltfptr[51])); } ; { - MELT_LOCATION ("warmelt-genobj.melt:6494:/ locexp"); + MELT_LOCATION ("warmelt-genobj.melt:6510:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.OLIST__V19*/ meltfptr[18]), (melt_ptr_t) ( /*_.OCOND__V62*/ meltfptr[61])); } ; - MELT_LOCATION ("warmelt-genobj.melt:6435:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6451:/ clear"); /*clear *//*_#MULTIPLE_LENGTH__L11*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#I__L12*/ meltfnum[0] = 0; @@ -40868,7 +41456,7 @@ lab_endgetargs:; /*^clear */ /*clear *//*_.IFCPP___V76*/ meltfptr[75] = 0; - MELT_LOCATION ("warmelt-genobj.melt:6409:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6425:/ clear"); /*clear *//*_.MATNDATA__V27*/ meltfptr[22] = 0; /*^clear */ /*clear *//*_.OMATDATA__V28*/ meltfptr[27] = 0; @@ -40895,7 +41483,7 @@ lab_endgetargs:; /*^clear */ /*clear *//*_.IFCPP___V41*/ meltfptr[40] = 0; - MELT_LOCATION ("warmelt-genobj.melt:6398:/ clear"); + MELT_LOCATION ("warmelt-genobj.melt:6414:/ clear"); /*clear *//*_.FMINS__V15*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.FMBIND__V16*/ meltfptr[15] = 0; @@ -40911,7 +41499,7 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V21*/ meltfptr[20] = 0; /*^clear */ /*clear *//*_.IFCPP___V25*/ meltfptr[21] = 0; - MELT_LOCATION ("warmelt-genobj.melt:6393:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -41009,7 +41597,7 @@ meltrout_184_warmelt_genobj_LAMBDA___56__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:6417:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:6433:/ getarg"); /*_.THEIN__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -41019,7 +41607,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-genobj.melt:6418:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6434:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -41037,11 +41625,23 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6417:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6433:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.COMPILE_OBJ__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:6417:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:6433:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -41133,7 +41733,7 @@ meltrout_185_warmelt_genobj_LAMBDA___57__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-genobj.melt:6422:/ getarg"); + MELT_LOCATION ("warmelt-genobj.melt:6438:/ getarg"); /*_.THEOUT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -41143,7 +41743,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-genobj.melt:6423:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:6439:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -41161,11 +41761,23 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-genobj.melt:6422:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:6438:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.COMPILE_OBJ__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-genobj.melt:6422:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:6438:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-genobj+meltdesc.c b/gcc/melt/generated/warmelt-genobj+meltdesc.c index 460cb5aa5c8..c8b0e79c81e 100644 --- a/gcc/melt/generated/warmelt-genobj+meltdesc.c +++ b/gcc/melt/generated/warmelt-genobj+meltdesc.c @@ -19,7 +19,7 @@ #endif /*__cplusplus */ /* version of the GCC compiler & MELT runtime generating this */ -const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revision 188875] MELT_0.9.6-pre" +const char melt_genversionstr[]="4.8.0 20120702 (experimental) [melt-branch revision 189162] MELT_0.9.6-pre" #ifdef __cplusplus " (in C++)" @@ -28,7 +28,7 @@ const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revi #endif ; -const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_188875]"; +const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_189162]"; /* source name & real path of the module */ /*MELTMODULENAME MELT-STAGE-ZERO/warmelt-genobj */ @@ -36,18 +36,18 @@ const char melt_modulename[]="warmelt-genobj"; const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.8.0/melt-modules/0.9.6-pre/warmelt-genobj"; /* hash of preprocessed melt-run.h generating this */ -const char melt_prepromd5meltrun[]="40fea0fe808f877cf6541857ec8d6c2d"; +const char melt_prepromd5meltrun[]="b3a18a5fcc8e78e7c3ea5bf55f88e347"; /* hexmd5checksum of primary C file */ -const char melt_primaryhexmd5[]="47539dbee9716745c86f04e8929fac42"; +const char melt_primaryhexmd5[]="993c855fea58b0337ab65fc54661e246"; /* hexmd5checksum of secondary C files */ const char* const melt_secondaryhexmd5tab[]={ /*nosecfile*/ (const char*)0, - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+01.c #1 */ "332466e01013b09f348f94adb23f677e", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+02.c #2 */ "bf7150a5c36fc2fca030d31ff8a88d82", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+03.c #3 */ "89e2cf67b4e20e8b516eabd6d292ab89", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+04.c #4 */ "332618ea9b1dcdcfe7fe1af516bbff75", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+05.c #5 */ "2445ef56bf2dfc202b930a6c3f6de862", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+01.c #1 */ "08ed28b9325a605cb77a9535162ae0a4", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+02.c #2 */ "341b510c9ea941cce6923fdf0461f125", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+03.c #3 */ "30406d36bd33c6ecdf2b026ffeb414d6", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+04.c #4 */ "1f974db5396131e3acc4e83c23a90a79", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-genobj+05.c #5 */ "295ad564df1ad9416c1e0ed0c3e892fa", /*nosecfile*/ (const char*)0, (const char*)0 }; @@ -55,10 +55,10 @@ const char* const melt_secondaryhexmd5tab[]={ const int melt_lastsecfileindex=5; /* cumulated checksum of primary & secondary files */ -const char melt_cumulated_hexmd5[]="a9f39416b40d1431a18c7a7575be4eda" ; +const char melt_cumulated_hexmd5[]="162dd27cadefa962fd22905e8d4da407" ; /* include the timestamp file */ -#define meltmod_warmelt_genobj_mds__a9f39416b40d1431a18c7a7575be4eda 1 +#define meltmod_warmelt_genobj_mds__162dd27cadefa962fd22905e8d4da407 1 #include "warmelt-genobj+melttime.h" diff --git a/gcc/melt/generated/warmelt-genobj+melttime.h b/gcc/melt/generated/warmelt-genobj+melttime.h index e8b5f332d2a..709fed060dd 100644 --- a/gcc/melt/generated/warmelt-genobj+melttime.h +++ b/gcc/melt/generated/warmelt-genobj+melttime.h @@ -5,7 +5,7 @@ /* This warmelt-genobj+melttime.h is included from warmelt-genobj+meltdesc.c only. */ -#if meltmod_warmelt_genobj_mds__a9f39416b40d1431a18c7a7575be4eda +#if meltmod_warmelt_genobj_mds__162dd27cadefa962fd22905e8d4da407 /* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-genobj */ #ifdef __cplusplus @@ -18,8 +18,8 @@ extern "C" { /*MELT BOOTSTRAP*/ -const char melt_gen_timestamp[]="Fri Jun 22 15:20:08 2012 CEST"; -const long long melt_gen_timenum=1340371208; +const char melt_gen_timestamp[]="Mon Jul 2 17:04:56 2012 MEST"; +const long long melt_gen_timenum=1341241496; const char melt_build_timestamp[]= __DATE__ "@" __TIME__ #ifdef __cplusplus @@ -34,7 +34,7 @@ const long long melt_gen_timenum=1340371208; } ; /* end extern C */ #endif /*__cplusplus */ - #else /* ! meltmod_warmelt_genobj_mds__a9f39416b40d1431a18c7a7575be4eda */ + #else /* ! meltmod_warmelt_genobj_mds__162dd27cadefa962fd22905e8d4da407 */ #error invalid timestamp file for MELT-STAGE-ZERO/warmelt-genobj - #endif /* meltmod_warmelt_genobj_mds__a9f39416b40d1431a18c7a7575be4eda */ + #endif /* meltmod_warmelt_genobj_mds__162dd27cadefa962fd22905e8d4da407 */ diff --git a/gcc/melt/generated/warmelt-genobj.c b/gcc/melt/generated/warmelt-genobj.c index a4d399bf9e1..d3f1e49ed6f 100644 --- a/gcc/melt/generated/warmelt-genobj.c +++ b/gcc/melt/generated/warmelt-genobj.c @@ -4290,7 +4290,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V35*/ meltfptr[24];; - MELT_LOCATION ("warmelt-genobj.melt:678:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:678:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V33*/ meltfptr[15] = /*_.RETURN___V41*/ meltfptr[37];; @@ -4320,7 +4332,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:638:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:638:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5638,7 +5662,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V36*/ meltfptr[35];; - MELT_LOCATION ("warmelt-genobj.melt:723:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:723:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V33*/ meltfptr[15] = /*_.RETURN___V42*/ meltfptr[38];; @@ -5670,7 +5706,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-genobj.melt:682:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:682:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6002,7 +6050,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:789:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:789:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6331,7 +6391,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-genobj.melt:799:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-genobj.melt:799:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6390,7 +6462,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, dbgprintf ("start initialize_module_meltdata_warmelt_genobj iniframp__=%p", (void *) iniframp__); melt_assertmsg ("check module initial frame", - iniframp__->mcfr_nbvar == /*minihash */ -683); + iniframp__->mcfr_nbvar == /*minihash */ -1561); struct cdata_st { @@ -7833,7 +7905,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, struct MELT_STRING_STRUCT (16) dstr_1421__CLASS_NREP_CPPIF; struct MELT_ROUTINE_STRUCT (3) drout_1422__PUTOBJDEST_OBJCPPIF; struct MELT_CLOSURE_STRUCT (0) dclo_1423__PUTOBJDEST_OBJCPPIF; - struct MELT_ROUTINE_STRUCT (11) drout_1424__COMPILOBJ_NREP_RETURN; + struct MELT_ROUTINE_STRUCT (13) drout_1424__COMPILOBJ_NREP_RETURN; struct MELT_CLOSURE_STRUCT (0) dclo_1425__COMPILOBJ_NREP_RETURN; struct MELT_OBJECT_STRUCT (3) dsym_1426__CLASS_NREP_RETURN; struct MELT_STRING_STRUCT (17) dstr_1427__CLASS_NREP_RETUR; @@ -8248,7 +8320,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_5__CLASS_OBJVALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_5__CLASS_OBJVALUE.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_5__CLASS_OBJVALUE.obj_hash = 814314844; + cdat->dobj_5__CLASS_OBJVALUE.obj_hash = 104529986; cdat->dobj_5__CLASS_OBJVALUE.obj_len = 8; @@ -8319,7 +8391,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_11__OBV_TYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_11__OBV_TYPE.obj_num = 0; - cdat->dobj_11__OBV_TYPE.obj_hash = 94635059; + cdat->dobj_11__OBV_TYPE.obj_hash = 177636380; cdat->dobj_11__OBV_TYPE.obj_len = 4; @@ -8379,7 +8451,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_15__CLASS_OBJPUREVALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_15__CLASS_OBJPUREVALUE.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_15__CLASS_OBJPUREVALUE.obj_hash = 1009414693; + cdat->dobj_15__CLASS_OBJPUREVALUE.obj_hash = 517883845; cdat->dobj_15__CLASS_OBJPUREVALUE.obj_len = 8; @@ -8454,7 +8526,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_21__CLASS_OBJLOCV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_21__CLASS_OBJLOCV.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_21__CLASS_OBJLOCV.obj_hash = 272487417; + cdat->dobj_21__CLASS_OBJLOCV.obj_hash = 517787481; cdat->dobj_21__CLASS_OBJLOCV.obj_len = 8; @@ -8525,7 +8597,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_27__OBL_OFF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_27__OBL_OFF.obj_num = 1; - cdat->dobj_27__OBL_OFF.obj_hash = 372908211; + cdat->dobj_27__OBL_OFF.obj_hash = 521914560; cdat->dobj_27__OBL_OFF.obj_len = 4; @@ -8581,7 +8653,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_31__OBL_PROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_31__OBL_PROC.obj_num = 2; - cdat->dobj_31__OBL_PROC.obj_hash = 866276697; + cdat->dobj_31__OBL_PROC.obj_hash = 998768931; cdat->dobj_31__OBL_PROC.obj_len = 4; @@ -8638,7 +8710,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_35__OBL_CNAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_35__OBL_CNAME.obj_num = 3; - cdat->dobj_35__OBL_CNAME.obj_hash = 912189252; + cdat->dobj_35__OBL_CNAME.obj_hash = 442775915; cdat->dobj_35__OBL_CNAME.obj_len = 4; @@ -8698,7 +8770,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_39__CLASS_OBJCLOCCV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_39__CLASS_OBJCLOCCV.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_39__CLASS_OBJCLOCCV.obj_hash = 427572235; + cdat->dobj_39__CLASS_OBJCLOCCV.obj_hash = 555807009; cdat->dobj_39__CLASS_OBJCLOCCV.obj_len = 8; @@ -8769,7 +8841,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_45__OBC_OFF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_45__OBC_OFF.obj_num = 1; - cdat->dobj_45__OBC_OFF.obj_hash = 517787481; + cdat->dobj_45__OBC_OFF.obj_hash = 182202170; cdat->dobj_45__OBC_OFF.obj_len = 4; @@ -8825,7 +8897,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_49__OBC_PROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_49__OBC_PROC.obj_num = 2; - cdat->dobj_49__OBC_PROC.obj_hash = 521914560; + cdat->dobj_49__OBC_PROC.obj_hash = 500520642; cdat->dobj_49__OBC_PROC.obj_len = 4; @@ -8881,7 +8953,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_53__OBC_NAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_53__OBC_NAME.obj_num = 3; - cdat->dobj_53__OBC_NAME.obj_hash = 998768931; + cdat->dobj_53__OBC_NAME.obj_hash = 355057875; cdat->dobj_53__OBC_NAME.obj_len = 4; @@ -8941,7 +9013,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_57__CLASS_OBJCONSTV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_57__CLASS_OBJCONSTV.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_57__CLASS_OBJCONSTV.obj_hash = 716539615; + cdat->dobj_57__CLASS_OBJCONSTV.obj_hash = 794908637; cdat->dobj_57__CLASS_OBJCONSTV.obj_len = 8; @@ -9016,7 +9088,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_63__CLASS_OBJPREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_63__CLASS_OBJPREDEF.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_63__CLASS_OBJPREDEF.obj_hash = 707991564; + cdat->dobj_63__CLASS_OBJPREDEF.obj_hash = 218671349; cdat->dobj_63__CLASS_OBJPREDEF.obj_len = 8; @@ -9087,7 +9159,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_69__OBPREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_69__OBPREDEF.obj_num = 1; - cdat->dobj_69__OBPREDEF.obj_hash = 947010446; + cdat->dobj_69__OBPREDEF.obj_hash = 668034934; cdat->dobj_69__OBPREDEF.obj_len = 4; @@ -9146,7 +9218,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_73__CLASS_OBJNIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_73__CLASS_OBJNIL.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_73__CLASS_OBJNIL.obj_hash = 355057875; + cdat->dobj_73__CLASS_OBJNIL.obj_hash = 50501172; cdat->dobj_73__CLASS_OBJNIL.obj_len = 8; @@ -9220,7 +9292,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_79__CLASS_OBJINITELEM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_79__CLASS_OBJINITELEM.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_79__CLASS_OBJINITELEM.obj_hash = 794908637; + cdat->dobj_79__CLASS_OBJINITELEM.obj_hash = 952693984; cdat->dobj_79__CLASS_OBJINITELEM.obj_len = 8; @@ -9292,7 +9364,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_85__OIE_CNAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_85__OIE_CNAME.obj_num = 1; - cdat->dobj_85__OIE_CNAME.obj_hash = 244614080; + cdat->dobj_85__OIE_CNAME.obj_hash = 913214638; cdat->dobj_85__OIE_CNAME.obj_len = 4; @@ -9348,7 +9420,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_89__OIE_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_89__OIE_DATA.obj_num = 2; - cdat->dobj_89__OIE_DATA.obj_hash = 264833157; + cdat->dobj_89__OIE_DATA.obj_hash = 323170478; cdat->dobj_89__OIE_DATA.obj_len = 4; @@ -9405,7 +9477,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_93__OIE_DISCR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_93__OIE_DISCR.obj_num = 3; - cdat->dobj_93__OIE_DISCR.obj_hash = 673164443; + cdat->dobj_93__OIE_DISCR.obj_hash = 605694917; cdat->dobj_93__OIE_DISCR.obj_len = 4; @@ -9463,7 +9535,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_97__OIE_LOCVAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_97__OIE_LOCVAR.obj_num = 4; - cdat->dobj_97__OIE_LOCVAR.obj_hash = 50501172; + cdat->dobj_97__OIE_LOCVAR.obj_hash = 18483643; cdat->dobj_97__OIE_LOCVAR.obj_len = 4; @@ -9524,7 +9596,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_101__CLASS_OBJINITOBJECT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_101__CLASS_OBJINITOBJECT.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_101__CLASS_OBJINITOBJECT.obj_hash = 952693984; + cdat->dobj_101__CLASS_OBJINITOBJECT.obj_hash = 856065982; cdat->dobj_101__CLASS_OBJINITOBJECT.obj_len = 8; @@ -9597,7 +9669,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_107__OIO_PREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_107__OIO_PREDEF.obj_num = 5; - cdat->dobj_107__OIO_PREDEF.obj_hash = 913214638; + cdat->dobj_107__OIO_PREDEF.obj_hash = 766829720; cdat->dobj_107__OIO_PREDEF.obj_len = 4; @@ -9656,7 +9728,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_111__OIO_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_111__OIO_CLASS.obj_num = 6; - cdat->dobj_111__OIO_CLASS.obj_hash = 323170478; + cdat->dobj_111__OIO_CLASS.obj_hash = 511013035; cdat->dobj_111__OIO_CLASS.obj_len = 4; @@ -9717,7 +9789,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_115__CLASS_OBJINITUNIQUEOBJECT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_115__CLASS_OBJINITUNIQUEOBJECT.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_115__CLASS_OBJINITUNIQUEOBJECT.obj_hash = 371292529; + cdat->dobj_115__CLASS_OBJINITUNIQUEOBJECT.obj_hash = 297716340; cdat->dobj_115__CLASS_OBJINITUNIQUEOBJECT.obj_len = 8; @@ -9792,7 +9864,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_121__CLASS_OBJINITMULTIPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_121__CLASS_OBJINITMULTIPLE.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_121__CLASS_OBJINITMULTIPLE.obj_hash = 418872250; + cdat->dobj_121__CLASS_OBJINITMULTIPLE.obj_hash = 532297103; cdat->dobj_121__CLASS_OBJINITMULTIPLE.obj_len = 8; @@ -9865,7 +9937,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_127__OIM_TUPVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_127__OIM_TUPVAL.obj_num = 5; - cdat->dobj_127__OIM_TUPVAL.obj_hash = 963653811; + cdat->dobj_127__OIM_TUPVAL.obj_hash = 595458464; cdat->dobj_127__OIM_TUPVAL.obj_len = 4; @@ -9926,7 +9998,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_131__CLASS_OBJINITCLOSURE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_131__CLASS_OBJINITCLOSURE.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_131__CLASS_OBJINITCLOSURE.obj_hash = 511013035; + cdat->dobj_131__CLASS_OBJINITCLOSURE.obj_hash = 429150863; cdat->dobj_131__CLASS_OBJINITCLOSURE.obj_len = 8; @@ -9999,7 +10071,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_137__OICLO_ROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_137__OICLO_ROUT.obj_num = 5; - cdat->dobj_137__OICLO_ROUT.obj_hash = 356237741; + cdat->dobj_137__OICLO_ROUT.obj_hash = 47570347; cdat->dobj_137__OICLO_ROUT.obj_len = 4; @@ -10060,7 +10132,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_141__CLASS_OBJINITROUTINE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_141__CLASS_OBJINITROUTINE.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_141__CLASS_OBJINITROUTINE.obj_hash = 674670201; + cdat->dobj_141__CLASS_OBJINITROUTINE.obj_hash = 338771978; cdat->dobj_141__CLASS_OBJINITROUTINE.obj_len = 8; @@ -10135,7 +10207,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_147__OIR_PROCROUTINE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_147__OIR_PROCROUTINE.obj_num = 5; - cdat->dobj_147__OIR_PROCROUTINE.obj_hash = 302800545; + cdat->dobj_147__OIR_PROCROUTINE.obj_hash = 484804283; cdat->dobj_147__OIR_PROCROUTINE.obj_len = 4; @@ -10198,7 +10270,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_151__CLASS_OBJINITSTRING.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_151__CLASS_OBJINITSTRING.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_151__CLASS_OBJINITSTRING.obj_hash = 1028892830; + cdat->dobj_151__CLASS_OBJINITSTRING.obj_hash = 175857055; cdat->dobj_151__CLASS_OBJINITSTRING.obj_len = 8; @@ -10273,7 +10345,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_157__CLASS_OBJINITPAIR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_157__CLASS_OBJINITPAIR.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_157__CLASS_OBJINITPAIR.obj_hash = 47570347; + cdat->dobj_157__CLASS_OBJINITPAIR.obj_hash = 88590037; cdat->dobj_157__CLASS_OBJINITPAIR.obj_len = 8; @@ -10348,7 +10420,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_163__CLASS_OBJINITLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_163__CLASS_OBJINITLIST.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_163__CLASS_OBJINITLIST.obj_hash = 338771978; + cdat->dobj_163__CLASS_OBJINITLIST.obj_hash = 670562423; cdat->dobj_163__CLASS_OBJINITLIST.obj_len = 8; @@ -10423,7 +10495,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_169__CLASS_OBJINITBOXINTEGER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_169__CLASS_OBJINITBOXINTEGER.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_169__CLASS_OBJINITBOXINTEGER.obj_hash = 823399128; + cdat->dobj_169__CLASS_OBJINITBOXINTEGER.obj_hash = 302384328; cdat->dobj_169__CLASS_OBJINITBOXINTEGER.obj_len = 8; @@ -10498,7 +10570,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_175__CLASS_OBJEXPV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_175__CLASS_OBJEXPV.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_175__CLASS_OBJEXPV.obj_hash = 509089389; + cdat->dobj_175__CLASS_OBJEXPV.obj_hash = 752426227; cdat->dobj_175__CLASS_OBJEXPV.obj_len = 8; @@ -10570,7 +10642,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_181__OBX_CONT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_181__OBX_CONT.obj_num = 1; - cdat->dobj_181__OBX_CONT.obj_hash = 88590037; + cdat->dobj_181__OBX_CONT.obj_hash = 820088876; cdat->dobj_181__OBX_CONT.obj_len = 4; @@ -10630,7 +10702,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_185__CLASS_OBJLOCATEDEXPV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_185__CLASS_OBJLOCATEDEXPV.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_185__CLASS_OBJLOCATEDEXPV.obj_hash = 670562423; + cdat->dobj_185__CLASS_OBJLOCATEDEXPV.obj_hash = 124576862; cdat->dobj_185__CLASS_OBJLOCATEDEXPV.obj_len = 8; @@ -10702,7 +10774,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_191__OBCX_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_191__OBCX_LOC.obj_num = 2; - cdat->dobj_191__OBCX_LOC.obj_hash = 145421460; + cdat->dobj_191__OBCX_LOC.obj_hash = 49043128; cdat->dobj_191__OBCX_LOC.obj_len = 4; @@ -10762,7 +10834,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_195__CLASS_OBJFLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_195__CLASS_OBJFLAG.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_195__CLASS_OBJFLAG.obj_hash = 99179615; + cdat->dobj_195__CLASS_OBJFLAG.obj_hash = 296787860; cdat->dobj_195__CLASS_OBJFLAG.obj_len = 8; @@ -10837,7 +10909,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_201__OBFLAG_MATCHFLAG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_201__OBFLAG_MATCHFLAG.obj_num = 1; - cdat->dobj_201__OBFLAG_MATCHFLAG.obj_hash = 672349188; + cdat->dobj_201__OBFLAG_MATCHFLAG.obj_hash = 925326999; cdat->dobj_201__OBFLAG_MATCHFLAG.obj_len = 4; @@ -10899,7 +10971,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_205__OBFLAG_NAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_205__OBFLAG_NAME.obj_num = 2; - cdat->dobj_205__OBFLAG_NAME.obj_hash = 81260100; + cdat->dobj_205__OBFLAG_NAME.obj_hash = 193847907; cdat->dobj_205__OBFLAG_NAME.obj_len = 4; @@ -10960,7 +11032,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_209__OBFLAG_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_209__OBFLAG_RANK.obj_num = 3; - cdat->dobj_209__OBFLAG_RANK.obj_hash = 124576862; + cdat->dobj_209__OBFLAG_RANK.obj_hash = 718427559; cdat->dobj_209__OBFLAG_RANK.obj_len = 4; @@ -11022,7 +11094,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_213__CLASS_OBJINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_213__CLASS_OBJINSTR.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_213__CLASS_OBJINSTR.obj_hash = 306598138; + cdat->dobj_213__CLASS_OBJINSTR.obj_hash = 537210709; cdat->dobj_213__CLASS_OBJINSTR.obj_len = 8; @@ -11093,7 +11165,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_219__OBI_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_219__OBI_LOC.obj_num = 0; - cdat->dobj_219__OBI_LOC.obj_hash = 296787860; + cdat->dobj_219__OBI_LOC.obj_hash = 4322264; cdat->dobj_219__OBI_LOC.obj_len = 4; @@ -11153,7 +11225,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_223__CLASS_OBJCOMMENTINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_223__CLASS_OBJCOMMENTINSTR.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_223__CLASS_OBJCOMMENTINSTR.obj_hash = 456095037; + cdat->dobj_223__CLASS_OBJCOMMENTINSTR.obj_hash = 791837060; cdat->dobj_223__CLASS_OBJCOMMENTINSTR.obj_len = 8; @@ -11228,7 +11300,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_229__OBCI_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_229__OBCI_COMMENT.obj_num = 1; - cdat->dobj_229__OBCI_COMMENT.obj_hash = 229119971; + cdat->dobj_229__OBCI_COMMENT.obj_hash = 199182248; cdat->dobj_229__OBCI_COMMENT.obj_len = 4; @@ -11291,7 +11363,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_233__CLASS_OBJCHECKSIGNAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_233__CLASS_OBJCHECKSIGNAL.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_233__CLASS_OBJCHECKSIGNAL.obj_hash = 236693091; + cdat->dobj_233__CLASS_OBJCHECKSIGNAL.obj_hash = 1048871745; cdat->dobj_233__CLASS_OBJCHECKSIGNAL.obj_len = 8; @@ -11366,7 +11438,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_239__CLASS_OBJDESTINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_239__CLASS_OBJDESTINSTR.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_239__CLASS_OBJDESTINSTR.obj_hash = 4322264; + cdat->dobj_239__CLASS_OBJDESTINSTR.obj_hash = 466494374; cdat->dobj_239__CLASS_OBJDESTINSTR.obj_len = 8; @@ -11441,7 +11513,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_245__OBDI_DESTLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_245__OBDI_DESTLIST.obj_num = 1; - cdat->dobj_245__OBDI_DESTLIST.obj_hash = 444324371; + cdat->dobj_245__OBDI_DESTLIST.obj_hash = 628726542; cdat->dobj_245__OBDI_DESTLIST.obj_len = 4; @@ -11504,7 +11576,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_249__CLASS_OBJCOMPUTE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_249__CLASS_OBJCOMPUTE.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_249__CLASS_OBJCOMPUTE.obj_hash = 199182248; + cdat->dobj_249__CLASS_OBJCOMPUTE.obj_hash = 132685678; cdat->dobj_249__CLASS_OBJCOMPUTE.obj_len = 8; @@ -11577,7 +11649,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_255__OBCPT_EXPR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_255__OBCPT_EXPR.obj_num = 2; - cdat->dobj_255__OBCPT_EXPR.obj_hash = 230792057; + cdat->dobj_255__OBCPT_EXPR.obj_hash = 961430733; cdat->dobj_255__OBCPT_EXPR.obj_len = 4; @@ -11636,7 +11708,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_259__OBCPT_TYPE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_259__OBCPT_TYPE.obj_num = 3; - cdat->dobj_259__OBCPT_TYPE.obj_hash = 749847668; + cdat->dobj_259__OBCPT_TYPE.obj_hash = 432032996; cdat->dobj_259__OBCPT_TYPE.obj_len = 4; @@ -11697,7 +11769,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_263__CLASS_OBJGETARG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_263__CLASS_OBJGETARG.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_263__CLASS_OBJGETARG.obj_hash = 604247069; + cdat->dobj_263__CLASS_OBJGETARG.obj_hash = 746695072; cdat->dobj_263__CLASS_OBJGETARG.obj_len = 8; @@ -11771,7 +11843,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_269__OBARG_OBLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_269__OBARG_OBLOC.obj_num = 1; - cdat->dobj_269__OBARG_OBLOC.obj_hash = 485996753; + cdat->dobj_269__OBARG_OBLOC.obj_hash = 733541896; cdat->dobj_269__OBARG_OBLOC.obj_len = 4; @@ -11831,7 +11903,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_273__OBARG_BIND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_273__OBARG_BIND.obj_num = 2; - cdat->dobj_273__OBARG_BIND.obj_hash = 132685678; + cdat->dobj_273__OBARG_BIND.obj_hash = 920286524; cdat->dobj_273__OBARG_BIND.obj_len = 4; @@ -11892,7 +11964,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_277__CLASS_OBJGETARGREST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_277__CLASS_OBJGETARGREST.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_277__CLASS_OBJGETARGREST.obj_hash = 103914219; + cdat->dobj_277__CLASS_OBJGETARGREST.obj_hash = 378413623; cdat->dobj_277__CLASS_OBJGETARGREST.obj_len = 8; @@ -11965,7 +12037,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_283__OBARG_REST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_283__OBARG_REST.obj_num = 3; - cdat->dobj_283__OBARG_REST.obj_hash = 705062423; + cdat->dobj_283__OBARG_REST.obj_hash = 1070075861; cdat->dobj_283__OBARG_REST.obj_len = 4; @@ -12026,7 +12098,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_287__CLASS_OBJPUTXTRARESULT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_287__CLASS_OBJPUTXTRARESULT.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_287__CLASS_OBJPUTXTRARESULT.obj_hash = 930781047; + cdat->dobj_287__CLASS_OBJPUTXTRARESULT.obj_hash = 166375117; cdat->dobj_287__CLASS_OBJPUTXTRARESULT.obj_len = 8; @@ -12100,7 +12172,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_293__OBXRES_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_293__OBXRES_RANK.obj_num = 1; - cdat->dobj_293__OBXRES_RANK.obj_hash = 683653369; + cdat->dobj_293__OBXRES_RANK.obj_hash = 97684963; cdat->dobj_293__OBXRES_RANK.obj_len = 4; @@ -12162,7 +12234,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_297__OBXRES_OBLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_297__OBXRES_OBLOC.obj_num = 2; - cdat->dobj_297__OBXRES_OBLOC.obj_hash = 978454436; + cdat->dobj_297__OBXRES_OBLOC.obj_hash = 1004400148; cdat->dobj_297__OBXRES_OBLOC.obj_len = 4; @@ -12225,7 +12297,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_301__CLASS_OBJFINALRETURN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_301__CLASS_OBJFINALRETURN.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_301__CLASS_OBJFINALRETURN.obj_hash = 642588646; + cdat->dobj_301__CLASS_OBJFINALRETURN.obj_hash = 483810972; cdat->dobj_301__CLASS_OBJFINALRETURN.obj_len = 8; @@ -12300,7 +12372,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_307__CLASS_OBJCLEAR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_307__CLASS_OBJCLEAR.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_307__CLASS_OBJCLEAR.obj_hash = 133846511; + cdat->dobj_307__CLASS_OBJCLEAR.obj_hash = 476876334; cdat->dobj_307__CLASS_OBJCLEAR.obj_len = 8; @@ -12373,7 +12445,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_313__OCLR_VLOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_313__OCLR_VLOC.obj_num = 1; - cdat->dobj_313__OCLR_VLOC.obj_hash = 671026399; + cdat->dobj_313__OCLR_VLOC.obj_hash = 893133541; cdat->dobj_313__OCLR_VLOC.obj_len = 4; @@ -12434,7 +12506,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_317__CLASS_OBJANYBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_317__CLASS_OBJANYBLOCK.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_317__CLASS_OBJANYBLOCK.obj_hash = 1004400148; + cdat->dobj_317__CLASS_OBJANYBLOCK.obj_hash = 35561378; cdat->dobj_317__CLASS_OBJANYBLOCK.obj_len = 8; @@ -12507,7 +12579,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_323__OBLO_BODYL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_323__OBLO_BODYL.obj_num = 1; - cdat->dobj_323__OBLO_BODYL.obj_hash = 898967499; + cdat->dobj_323__OBLO_BODYL.obj_hash = 430007770; cdat->dobj_323__OBLO_BODYL.obj_len = 4; @@ -12566,7 +12638,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_327__OBLO_EPIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_327__OBLO_EPIL.obj_num = 2; - cdat->dobj_327__OBLO_EPIL.obj_hash = 1039100250; + cdat->dobj_327__OBLO_EPIL.obj_hash = 855187088; cdat->dobj_327__OBLO_EPIL.obj_len = 4; @@ -12627,7 +12699,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_331__CLASS_OBJPLAINBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_331__CLASS_OBJPLAINBLOCK.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_331__CLASS_OBJPLAINBLOCK.obj_hash = 850781225; + cdat->dobj_331__CLASS_OBJPLAINBLOCK.obj_hash = 340232711; cdat->dobj_331__CLASS_OBJPLAINBLOCK.obj_len = 8; @@ -12702,7 +12774,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_337__CLASS_OBJMULTIALLOCBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_337__CLASS_OBJMULTIALLOCBLOCK.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_337__CLASS_OBJMULTIALLOCBLOCK.obj_hash = 721233985; + cdat->dobj_337__CLASS_OBJMULTIALLOCBLOCK.obj_hash = 992051817; cdat->dobj_337__CLASS_OBJMULTIALLOCBLOCK.obj_len = 8; @@ -12777,7 +12849,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_343__OMALBLO_ALLSTRUCT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_343__OMALBLO_ALLSTRUCT.obj_num = 3; - cdat->dobj_343__OMALBLO_ALLSTRUCT.obj_hash = 814240618; + cdat->dobj_343__OMALBLO_ALLSTRUCT.obj_hash = 107339879; cdat->dobj_343__OMALBLO_ALLSTRUCT.obj_len = 4; @@ -12840,7 +12912,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_347__OMALBLO_NAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_347__OMALBLO_NAME.obj_num = 4; - cdat->dobj_347__OMALBLO_NAME.obj_hash = 173873069; + cdat->dobj_347__OMALBLO_NAME.obj_hash = 39557258; cdat->dobj_347__OMALBLO_NAME.obj_len = 4; @@ -12903,7 +12975,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_351__CLASS_OBJCOMMENTEDBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_351__CLASS_OBJCOMMENTEDBLOCK.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_351__CLASS_OBJCOMMENTEDBLOCK.obj_hash = 342587311; + cdat->dobj_351__CLASS_OBJCOMMENTEDBLOCK.obj_hash = 879440799; cdat->dobj_351__CLASS_OBJCOMMENTEDBLOCK.obj_len = 8; @@ -12978,7 +13050,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_357__OCOMBLO_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_357__OCOMBLO_COMMENT.obj_num = 3; - cdat->dobj_357__OCOMBLO_COMMENT.obj_hash = 505492369; + cdat->dobj_357__OCOMBLO_COMMENT.obj_hash = 896059834; cdat->dobj_357__OCOMBLO_COMMENT.obj_len = 4; @@ -13041,7 +13113,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_361__CLASS_OBJMULTIBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_361__CLASS_OBJMULTIBLOCK.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_361__CLASS_OBJMULTIBLOCK.obj_hash = 280586215; + cdat->dobj_361__CLASS_OBJMULTIBLOCK.obj_hash = 698445721; cdat->dobj_361__CLASS_OBJMULTIBLOCK.obj_len = 8; @@ -13116,7 +13188,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_367__OMULBLO_SUBCOMP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_367__OMULBLO_SUBCOMP.obj_num = 3; - cdat->dobj_367__OMULBLO_SUBCOMP.obj_hash = 560679845; + cdat->dobj_367__OMULBLO_SUBCOMP.obj_hash = 90822062; cdat->dobj_367__OMULBLO_SUBCOMP.obj_len = 4; @@ -13179,7 +13251,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_371__CLASS_OBJMATCHFLAGBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_371__CLASS_OBJMATCHFLAGBLOCK.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_371__CLASS_OBJMATCHFLAGBLOCK.obj_hash = 847023918; + cdat->dobj_371__CLASS_OBJMATCHFLAGBLOCK.obj_hash = 666052255; cdat->dobj_371__CLASS_OBJMATCHFLAGBLOCK.obj_len = 8; @@ -13254,7 +13326,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_377__OMCHFLGBLO_FLAGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_377__OMCHFLGBLO_FLAGS.obj_num = 3; - cdat->dobj_377__OMCHFLGBLO_FLAGS.obj_hash = 460455825; + cdat->dobj_377__OMCHFLGBLO_FLAGS.obj_hash = 786175678; cdat->dobj_377__OMCHFLGBLO_FLAGS.obj_len = 4; @@ -13317,7 +13389,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_381__CLASS_OBJLABELINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_381__CLASS_OBJLABELINSTR.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_381__CLASS_OBJLABELINSTR.obj_hash = 895491867; + cdat->dobj_381__CLASS_OBJLABELINSTR.obj_hash = 199587067; cdat->dobj_381__CLASS_OBJLABELINSTR.obj_len = 8; @@ -13392,7 +13464,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_387__OBLAB_PREFIX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_387__OBLAB_PREFIX.obj_num = 1; - cdat->dobj_387__OBLAB_PREFIX.obj_hash = 641725606; + cdat->dobj_387__OBLAB_PREFIX.obj_hash = 329181665; cdat->dobj_387__OBLAB_PREFIX.obj_len = 4; @@ -13453,7 +13525,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_391__OBLAB_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_391__OBLAB_RANK.obj_num = 2; - cdat->dobj_391__OBLAB_RANK.obj_hash = 828446724; + cdat->dobj_391__OBLAB_RANK.obj_hash = 574194245; cdat->dobj_391__OBLAB_RANK.obj_len = 4; @@ -13514,7 +13586,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_395__CLASS_OBJGOTOINSTR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_395__CLASS_OBJGOTOINSTR.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_395__CLASS_OBJGOTOINSTR.obj_hash = 223013330; + cdat->dobj_395__CLASS_OBJGOTOINSTR.obj_hash = 198577971; cdat->dobj_395__CLASS_OBJGOTOINSTR.obj_len = 8; @@ -13589,7 +13661,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_401__OBGOTO_PREFIX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_401__OBGOTO_PREFIX.obj_num = 1; - cdat->dobj_401__OBGOTO_PREFIX.obj_hash = 899879137; + cdat->dobj_401__OBGOTO_PREFIX.obj_hash = 946580366; cdat->dobj_401__OBGOTO_PREFIX.obj_len = 4; @@ -13651,7 +13723,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_405__OBGOTO_RANK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_405__OBGOTO_RANK.obj_num = 2; - cdat->dobj_405__OBGOTO_RANK.obj_hash = 199587067; + cdat->dobj_405__OBGOTO_RANK.obj_hash = 1000755209; cdat->dobj_405__OBGOTO_RANK.obj_len = 4; @@ -13713,7 +13785,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_409__CLASS_OBJLOOP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_409__CLASS_OBJLOOP.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_409__CLASS_OBJLOOP.obj_hash = 18382826; + cdat->dobj_409__CLASS_OBJLOOP.obj_hash = 485727770; cdat->dobj_409__CLASS_OBJLOOP.obj_len = 8; @@ -13788,7 +13860,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_415__OBLOOP_LABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_415__OBLOOP_LABEL.obj_num = 3; - cdat->dobj_415__OBLOOP_LABEL.obj_hash = 384499419; + cdat->dobj_415__OBLOOP_LABEL.obj_hash = 930712722; cdat->dobj_415__OBLOOP_LABEL.obj_len = 4; @@ -13850,7 +13922,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_419__OBLOOP_RESV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_419__OBLOOP_RESV.obj_num = 4; - cdat->dobj_419__OBLOOP_RESV.obj_hash = 198577971; + cdat->dobj_419__OBLOOP_RESV.obj_hash = 803464390; cdat->dobj_419__OBLOOP_RESV.obj_len = 4; @@ -13912,7 +13984,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_423__CLASS_OBJEXIT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_423__CLASS_OBJEXIT.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_423__CLASS_OBJEXIT.obj_hash = 1025201640; + cdat->dobj_423__CLASS_OBJEXIT.obj_hash = 157010753; cdat->dobj_423__CLASS_OBJEXIT.obj_len = 8; @@ -13987,7 +14059,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_429__OBEXIT_LABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_429__OBEXIT_LABEL.obj_num = 1; - cdat->dobj_429__OBEXIT_LABEL.obj_hash = 94784617; + cdat->dobj_429__OBEXIT_LABEL.obj_hash = 89946328; cdat->dobj_429__OBEXIT_LABEL.obj_len = 4; @@ -14050,7 +14122,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_433__CLASS_OBJAGAIN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_433__CLASS_OBJAGAIN.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_433__CLASS_OBJAGAIN.obj_hash = 684000235; + cdat->dobj_433__CLASS_OBJAGAIN.obj_hash = 371873233; cdat->dobj_433__CLASS_OBJAGAIN.obj_len = 8; @@ -14125,7 +14197,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_439__OBAGAIN_LABEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_439__OBAGAIN_LABEL.obj_num = 1; - cdat->dobj_439__OBAGAIN_LABEL.obj_hash = 522584430; + cdat->dobj_439__OBAGAIN_LABEL.obj_hash = 551441742; cdat->dobj_439__OBAGAIN_LABEL.obj_len = 4; @@ -14188,7 +14260,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_443__CLASS_OBJCITERBLOCK.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_443__CLASS_OBJCITERBLOCK.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_443__CLASS_OBJCITERBLOCK.obj_hash = 149617405; + cdat->dobj_443__CLASS_OBJCITERBLOCK.obj_hash = 368476447; cdat->dobj_443__CLASS_OBJCITERBLOCK.obj_len = 8; @@ -14263,7 +14335,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_449__OBCITER_CITER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_449__OBCITER_CITER.obj_num = 3; - cdat->dobj_449__OBCITER_CITER.obj_hash = 650550465; + cdat->dobj_449__OBCITER_CITER.obj_hash = 14625764; cdat->dobj_449__OBCITER_CITER.obj_len = 4; @@ -14326,7 +14398,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_453__OBCITER_BEFORE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_453__OBCITER_BEFORE.obj_num = 4; - cdat->dobj_453__OBCITER_BEFORE.obj_hash = 937739367; + cdat->dobj_453__OBCITER_BEFORE.obj_hash = 443401314; cdat->dobj_453__OBCITER_BEFORE.obj_len = 4; @@ -14389,7 +14461,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_457__OBCITER_AFTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_457__OBCITER_AFTER.obj_num = 5; - cdat->dobj_457__OBCITER_AFTER.obj_hash = 371873233; + cdat->dobj_457__OBCITER_AFTER.obj_hash = 1025540724; cdat->dobj_457__OBCITER_AFTER.obj_len = 4; @@ -14452,7 +14524,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_461__CLASS_OBJCOND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_461__CLASS_OBJCOND.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_461__CLASS_OBJCOND.obj_hash = 720767860; + cdat->dobj_461__CLASS_OBJCOND.obj_hash = 97398868; cdat->dobj_461__CLASS_OBJCOND.obj_len = 8; @@ -14526,7 +14598,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_467__OBCOND_TEST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_467__OBCOND_TEST.obj_num = 1; - cdat->dobj_467__OBCOND_TEST.obj_hash = 368476447; + cdat->dobj_467__OBCOND_TEST.obj_hash = 677009926; cdat->dobj_467__OBCOND_TEST.obj_len = 4; @@ -14587,7 +14659,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_471__OBCOND_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_471__OBCOND_THEN.obj_num = 2; - cdat->dobj_471__OBCOND_THEN.obj_hash = 14625764; + cdat->dobj_471__OBCOND_THEN.obj_hash = 423680705; cdat->dobj_471__OBCOND_THEN.obj_len = 4; @@ -14648,7 +14720,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_475__OBCOND_ELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_475__OBCOND_ELSE.obj_num = 3; - cdat->dobj_475__OBCOND_ELSE.obj_hash = 443401314; + cdat->dobj_475__OBCOND_ELSE.obj_hash = 111547049; cdat->dobj_475__OBCOND_ELSE.obj_len = 4; @@ -14710,7 +14782,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_479__CLASS_OBJCPPIF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_479__CLASS_OBJCPPIF.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_479__CLASS_OBJCPPIF.obj_hash = 50074280; + cdat->dobj_479__CLASS_OBJCPPIF.obj_hash = 325770157; cdat->dobj_479__CLASS_OBJCPPIF.obj_len = 8; @@ -14783,7 +14855,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_485__OBIFP_COND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_485__OBIFP_COND.obj_num = 1; - cdat->dobj_485__OBIFP_COND.obj_hash = 97398868; + cdat->dobj_485__OBIFP_COND.obj_hash = 173104783; cdat->dobj_485__OBIFP_COND.obj_len = 4; @@ -14842,7 +14914,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_489__OBIFP_THEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_489__OBIFP_THEN.obj_num = 2; - cdat->dobj_489__OBIFP_THEN.obj_hash = 677009926; + cdat->dobj_489__OBIFP_THEN.obj_hash = 865401146; cdat->dobj_489__OBIFP_THEN.obj_len = 4; @@ -14901,7 +14973,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_493__OBIFP_ELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_493__OBIFP_ELSE.obj_num = 3; - cdat->dobj_493__OBIFP_ELSE.obj_hash = 423680705; + cdat->dobj_493__OBIFP_ELSE.obj_hash = 303332405; cdat->dobj_493__OBIFP_ELSE.obj_len = 4; @@ -14962,7 +15034,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_497__CLASS_OBJINTERNCOMMON.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_497__CLASS_OBJINTERNCOMMON.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_497__CLASS_OBJINTERNCOMMON.obj_hash = 46411766; + cdat->dobj_497__CLASS_OBJINTERNCOMMON.obj_hash = 20215251; cdat->dobj_497__CLASS_OBJINTERNCOMMON.obj_len = 8; @@ -15037,7 +15109,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_503__OBINTERN_IOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_503__OBINTERN_IOBJ.obj_num = 1; - cdat->dobj_503__OBINTERN_IOBJ.obj_hash = 325770157; + cdat->dobj_503__OBINTERN_IOBJ.obj_hash = 494388258; cdat->dobj_503__OBINTERN_IOBJ.obj_len = 4; @@ -15100,7 +15172,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_507__CLASS_OBJINTERNSYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_507__CLASS_OBJINTERNSYMBOL.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_507__CLASS_OBJINTERNSYMBOL.obj_hash = 795616667; + cdat->dobj_507__CLASS_OBJINTERNSYMBOL.obj_hash = 179931564; cdat->dobj_507__CLASS_OBJINTERNSYMBOL.obj_len = 8; @@ -15175,7 +15247,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_513__CLASS_OBJINTERNKEYWORD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_513__CLASS_OBJINTERNKEYWORD.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_513__CLASS_OBJINTERNKEYWORD.obj_hash = 303332405; + cdat->dobj_513__CLASS_OBJINTERNKEYWORD.obj_hash = 756413108; cdat->dobj_513__CLASS_OBJINTERNKEYWORD.obj_len = 8; @@ -15250,7 +15322,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_519__CLASS_OBJGETNAMEDCOMMON.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_519__CLASS_OBJGETNAMEDCOMMON.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_519__CLASS_OBJGETNAMEDCOMMON.obj_hash = 20215251; + cdat->dobj_519__CLASS_OBJGETNAMEDCOMMON.obj_hash = 379962106; cdat->dobj_519__CLASS_OBJGETNAMEDCOMMON.obj_len = 8; @@ -15325,7 +15397,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_525__OBGNAMED_IOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_525__OBGNAMED_IOBJ.obj_num = 1; - cdat->dobj_525__OBGNAMED_IOBJ.obj_hash = 494388258; + cdat->dobj_525__OBGNAMED_IOBJ.obj_hash = 787124835; cdat->dobj_525__OBGNAMED_IOBJ.obj_len = 4; @@ -15388,7 +15460,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_529__CLASS_OBJGETNAMEDSYMBOL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_529__CLASS_OBJGETNAMEDSYMBOL.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_529__CLASS_OBJGETNAMEDSYMBOL.obj_hash = 179931564; + cdat->dobj_529__CLASS_OBJGETNAMEDSYMBOL.obj_hash = 290924710; cdat->dobj_529__CLASS_OBJGETNAMEDSYMBOL.obj_len = 8; @@ -15463,7 +15535,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_535__CLASS_OBJGETNAMEDKEYWORD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_535__CLASS_OBJGETNAMEDKEYWORD.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_535__CLASS_OBJGETNAMEDKEYWORD.obj_hash = 756413108; + cdat->dobj_535__CLASS_OBJGETNAMEDKEYWORD.obj_hash = 95547839; cdat->dobj_535__CLASS_OBJGETNAMEDKEYWORD.obj_len = 8; @@ -15538,7 +15610,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_541__CLASS_OBJAPPLY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_541__CLASS_OBJAPPLY.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_541__CLASS_OBJAPPLY.obj_hash = 379962106; + cdat->dobj_541__CLASS_OBJAPPLY.obj_hash = 930769119; cdat->dobj_541__CLASS_OBJAPPLY.obj_len = 8; @@ -15611,7 +15683,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_547__OBAPP_CLOS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_547__OBAPP_CLOS.obj_num = 2; - cdat->dobj_547__OBAPP_CLOS.obj_hash = 787124835; + cdat->dobj_547__OBAPP_CLOS.obj_hash = 391793228; cdat->dobj_547__OBAPP_CLOS.obj_len = 4; @@ -15670,7 +15742,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_551__OBAPP_ARGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_551__OBAPP_ARGS.obj_num = 3; - cdat->dobj_551__OBAPP_ARGS.obj_hash = 305632878; + cdat->dobj_551__OBAPP_ARGS.obj_hash = 634896259; cdat->dobj_551__OBAPP_ARGS.obj_len = 4; @@ -15731,7 +15803,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_555__CLASS_OBJMULTIAPPLY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_555__CLASS_OBJMULTIAPPLY.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_555__CLASS_OBJMULTIAPPLY.obj_hash = 573542898; + cdat->dobj_555__CLASS_OBJMULTIAPPLY.obj_hash = 727072914; cdat->dobj_555__CLASS_OBJMULTIAPPLY.obj_len = 8; @@ -15806,7 +15878,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_561__OBMULTAPP_XRES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_561__OBMULTAPP_XRES.obj_num = 4; - cdat->dobj_561__OBMULTAPP_XRES.obj_hash = 197184091; + cdat->dobj_561__OBMULTAPP_XRES.obj_hash = 470864717; cdat->dobj_561__OBMULTAPP_XRES.obj_len = 4; @@ -15869,7 +15941,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_565__CLASS_OBJMSEND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_565__CLASS_OBJMSEND.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_565__CLASS_OBJMSEND.obj_hash = 940855249; + cdat->dobj_565__CLASS_OBJMSEND.obj_hash = 175105490; cdat->dobj_565__CLASS_OBJMSEND.obj_len = 8; @@ -15942,7 +16014,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_571__OBMSND_SEL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_571__OBMSND_SEL.obj_num = 2; - cdat->dobj_571__OBMSND_SEL.obj_hash = 254277301; + cdat->dobj_571__OBMSND_SEL.obj_hash = 222486649; cdat->dobj_571__OBMSND_SEL.obj_len = 4; @@ -16002,7 +16074,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_575__OBMSND_RECV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_575__OBMSND_RECV.obj_num = 3; - cdat->dobj_575__OBMSND_RECV.obj_hash = 519903674; + cdat->dobj_575__OBMSND_RECV.obj_hash = 271338440; cdat->dobj_575__OBMSND_RECV.obj_len = 4; @@ -16063,7 +16135,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_579__OBMSND_ARGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_579__OBMSND_ARGS.obj_num = 4; - cdat->dobj_579__OBMSND_ARGS.obj_hash = 727072914; + cdat->dobj_579__OBMSND_ARGS.obj_hash = 717397063; cdat->dobj_579__OBMSND_ARGS.obj_len = 4; @@ -16125,7 +16197,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_583__CLASS_OBJMULTIMSEND.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_583__CLASS_OBJMULTIMSEND.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_583__CLASS_OBJMULTIMSEND.obj_hash = 455714314; + cdat->dobj_583__CLASS_OBJMULTIMSEND.obj_hash = 1060750881; cdat->dobj_583__CLASS_OBJMULTIMSEND.obj_len = 8; @@ -16200,7 +16272,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_589__OBMULTSND_XRES.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_589__OBMULTSND_XRES.obj_num = 5; - cdat->dobj_589__OBMULTSND_XRES.obj_hash = 175105490; + cdat->dobj_589__OBMULTSND_XRES.obj_hash = 247354383; cdat->dobj_589__OBMULTSND_XRES.obj_len = 4; @@ -16263,7 +16335,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_593__CLASS_OBJRAWALLOCOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_593__CLASS_OBJRAWALLOCOBJ.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_593__CLASS_OBJRAWALLOCOBJ.obj_hash = 849288382; + cdat->dobj_593__CLASS_OBJRAWALLOCOBJ.obj_hash = 351346092; cdat->dobj_593__CLASS_OBJRAWALLOCOBJ.obj_len = 8; @@ -16338,7 +16410,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_599__OBRALLOBJ_CLASS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_599__OBRALLOBJ_CLASS.obj_num = 2; - cdat->dobj_599__OBRALLOBJ_CLASS.obj_hash = 936375817; + cdat->dobj_599__OBRALLOBJ_CLASS.obj_hash = 925239938; cdat->dobj_599__OBRALLOBJ_CLASS.obj_len = 4; @@ -16401,7 +16473,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_603__OBRALLOBJ_LEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_603__OBRALLOBJ_LEN.obj_num = 3; - cdat->dobj_603__OBRALLOBJ_LEN.obj_hash = 462371411; + cdat->dobj_603__OBRALLOBJ_LEN.obj_hash = 23231316; cdat->dobj_603__OBRALLOBJ_LEN.obj_len = 4; @@ -16464,7 +16536,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_607__OBRALLOBJ_CLASSNAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_607__OBRALLOBJ_CLASSNAME.obj_num = 4; - cdat->dobj_607__OBRALLOBJ_CLASSNAME.obj_hash = 1060750881; + cdat->dobj_607__OBRALLOBJ_CLASSNAME.obj_hash = 543805263; cdat->dobj_607__OBRALLOBJ_CLASSNAME.obj_len = 4; @@ -16527,7 +16599,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_611__CLASS_OBJNEWCLOSURE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_611__CLASS_OBJNEWCLOSURE.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_611__CLASS_OBJNEWCLOSURE.obj_hash = 568752204; + cdat->dobj_611__CLASS_OBJNEWCLOSURE.obj_hash = 18088647; cdat->dobj_611__CLASS_OBJNEWCLOSURE.obj_len = 8; @@ -16602,7 +16674,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_617__OBNCLO_DISCR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_617__OBNCLO_DISCR.obj_num = 2; - cdat->dobj_617__OBNCLO_DISCR.obj_hash = 351346092; + cdat->dobj_617__OBNCLO_DISCR.obj_hash = 716179317; cdat->dobj_617__OBNCLO_DISCR.obj_len = 4; @@ -16664,7 +16736,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_621__OBNCLO_ROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_621__OBNCLO_ROUT.obj_num = 3; - cdat->dobj_621__OBNCLO_ROUT.obj_hash = 925239938; + cdat->dobj_621__OBNCLO_ROUT.obj_hash = 1033470403; cdat->dobj_621__OBNCLO_ROUT.obj_len = 4; @@ -16724,7 +16796,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_625__OBNCLO_LEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_625__OBNCLO_LEN.obj_num = 4; - cdat->dobj_625__OBNCLO_LEN.obj_hash = 23231316; + cdat->dobj_625__OBNCLO_LEN.obj_hash = 540119382; cdat->dobj_625__OBNCLO_LEN.obj_len = 4; @@ -16785,7 +16857,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_629__CLASS_OBJPUTUPLE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_629__CLASS_OBJPUTUPLE.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_629__CLASS_OBJPUTUPLE.obj_hash = 817149262; + cdat->dobj_629__CLASS_OBJPUTUPLE.obj_hash = 778140642; cdat->dobj_629__CLASS_OBJPUTUPLE.obj_len = 8; @@ -16860,7 +16932,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_635__OPUTU_TUPLED.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_635__OPUTU_TUPLED.obj_num = 1; - cdat->dobj_635__OPUTU_TUPLED.obj_hash = 18088647; + cdat->dobj_635__OPUTU_TUPLED.obj_hash = 226504451; cdat->dobj_635__OPUTU_TUPLED.obj_len = 4; @@ -16923,7 +16995,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_639__OPUTU_OFFSET.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_639__OPUTU_OFFSET.obj_num = 2; - cdat->dobj_639__OPUTU_OFFSET.obj_hash = 716179317; + cdat->dobj_639__OPUTU_OFFSET.obj_hash = 877165787; cdat->dobj_639__OPUTU_OFFSET.obj_len = 4; @@ -16985,7 +17057,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_643__OPUTU_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_643__OPUTU_VALUE.obj_num = 3; - cdat->dobj_643__OPUTU_VALUE.obj_hash = 1033470403; + cdat->dobj_643__OPUTU_VALUE.obj_hash = 390331005; cdat->dobj_643__OPUTU_VALUE.obj_len = 4; @@ -17047,7 +17119,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_647__CLASS_OBJPUTPAIR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_647__CLASS_OBJPUTPAIR.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_647__CLASS_OBJPUTPAIR.obj_hash = 449315673; + cdat->dobj_647__CLASS_OBJPUTPAIR.obj_hash = 775191454; cdat->dobj_647__CLASS_OBJPUTPAIR.obj_len = 8; @@ -17120,7 +17192,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_653__OPUTP_PAIR.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_653__OPUTP_PAIR.obj_num = 1; - cdat->dobj_653__OPUTP_PAIR.obj_hash = 778140642; + cdat->dobj_653__OPUTP_PAIR.obj_hash = 297242168; cdat->dobj_653__OPUTP_PAIR.obj_len = 4; @@ -17181,7 +17253,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_657__CLASS_OBJPUTPAIRHEAD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_657__CLASS_OBJPUTPAIRHEAD.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_657__CLASS_OBJPUTPAIRHEAD.obj_hash = 946019496; + cdat->dobj_657__CLASS_OBJPUTPAIRHEAD.obj_hash = 754407166; cdat->dobj_657__CLASS_OBJPUTPAIRHEAD.obj_len = 8; @@ -17254,7 +17326,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_663__OPUTP_HEAD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_663__OPUTP_HEAD.obj_num = 2; - cdat->dobj_663__OPUTP_HEAD.obj_hash = 750252574; + cdat->dobj_663__OPUTP_HEAD.obj_hash = 717385459; cdat->dobj_663__OPUTP_HEAD.obj_len = 4; @@ -17315,7 +17387,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_667__CLASS_OBJPUTPAIRTAIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_667__CLASS_OBJPUTPAIRTAIL.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_667__CLASS_OBJPUTPAIRTAIL.obj_hash = 67452529; + cdat->dobj_667__CLASS_OBJPUTPAIRTAIL.obj_hash = 850075141; cdat->dobj_667__CLASS_OBJPUTPAIRTAIL.obj_len = 8; @@ -17388,7 +17460,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_673__OPUTP_TAIL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_673__OPUTP_TAIL.obj_num = 2; - cdat->dobj_673__OPUTP_TAIL.obj_hash = 557962260; + cdat->dobj_673__OPUTP_TAIL.obj_hash = 390278551; cdat->dobj_673__OPUTP_TAIL.obj_len = 4; @@ -17449,7 +17521,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_677__CLASS_OBJPUTLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_677__CLASS_OBJPUTLIST.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_677__CLASS_OBJPUTLIST.obj_hash = 905934205; + cdat->dobj_677__CLASS_OBJPUTLIST.obj_hash = 103524164; cdat->dobj_677__CLASS_OBJPUTLIST.obj_len = 8; @@ -17522,7 +17594,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_683__OPUTL_LIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_683__OPUTL_LIST.obj_num = 1; - cdat->dobj_683__OPUTL_LIST.obj_hash = 573091896; + cdat->dobj_683__OPUTL_LIST.obj_hash = 163555899; cdat->dobj_683__OPUTL_LIST.obj_len = 4; @@ -17582,7 +17654,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_687__OPUTL_FIRST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_687__OPUTL_FIRST.obj_num = 2; - cdat->dobj_687__OPUTL_FIRST.obj_hash = 805672081; + cdat->dobj_687__OPUTL_FIRST.obj_hash = 500130597; cdat->dobj_687__OPUTL_FIRST.obj_len = 4; @@ -17642,7 +17714,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_691__OPUTL_LAST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_691__OPUTL_LAST.obj_num = 3; - cdat->dobj_691__OPUTL_LAST.obj_hash = 850075141; + cdat->dobj_691__OPUTL_LAST.obj_hash = 389147813; cdat->dobj_691__OPUTL_LAST.obj_len = 4; @@ -17703,7 +17775,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_695__CLASS_OBJPUTSLOT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_695__CLASS_OBJPUTSLOT.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_695__CLASS_OBJPUTSLOT.obj_hash = 1053546639; + cdat->dobj_695__CLASS_OBJPUTSLOT.obj_hash = 1017058549; cdat->dobj_695__CLASS_OBJPUTSLOT.obj_len = 8; @@ -17777,7 +17849,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_701__OSLOT_ODATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_701__OSLOT_ODATA.obj_num = 1; - cdat->dobj_701__OSLOT_ODATA.obj_hash = 103524164; + cdat->dobj_701__OSLOT_ODATA.obj_hash = 572859839; cdat->dobj_701__OSLOT_ODATA.obj_len = 4; @@ -17839,7 +17911,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_705__OSLOT_OFFSET.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_705__OSLOT_OFFSET.obj_num = 2; - cdat->dobj_705__OSLOT_OFFSET.obj_hash = 163555899; + cdat->dobj_705__OSLOT_OFFSET.obj_hash = 989097337; cdat->dobj_705__OSLOT_OFFSET.obj_len = 4; @@ -17901,7 +17973,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_709__OSLOT_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_709__OSLOT_FIELD.obj_num = 3; - cdat->dobj_709__OSLOT_FIELD.obj_hash = 500130597; + cdat->dobj_709__OSLOT_FIELD.obj_hash = 388214304; cdat->dobj_709__OSLOT_FIELD.obj_len = 4; @@ -17962,7 +18034,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_713__OSLOT_VALUE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_713__OSLOT_VALUE.obj_num = 4; - cdat->dobj_713__OSLOT_VALUE.obj_hash = 389147813; + cdat->dobj_713__OSLOT_VALUE.obj_hash = 390315299; cdat->dobj_713__OSLOT_VALUE.obj_len = 4; @@ -18024,7 +18096,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_717__CLASS_OBJGETSLOT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_717__CLASS_OBJGETSLOT.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_717__CLASS_OBJGETSLOT.obj_hash = 1017058549; + cdat->dobj_717__CLASS_OBJGETSLOT.obj_hash = 99128730; cdat->dobj_717__CLASS_OBJGETSLOT.obj_len = 8; @@ -18097,7 +18169,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_723__OGETSL_OBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_723__OGETSL_OBJ.obj_num = 2; - cdat->dobj_723__OGETSL_OBJ.obj_hash = 572859839; + cdat->dobj_723__OGETSL_OBJ.obj_hash = 1026667645; cdat->dobj_723__OGETSL_OBJ.obj_len = 4; @@ -18158,7 +18230,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_727__OGETSL_FIELD.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_727__OGETSL_FIELD.obj_num = 3; - cdat->dobj_727__OGETSL_FIELD.obj_hash = 989097337; + cdat->dobj_727__OGETSL_FIELD.obj_hash = 1044282313; cdat->dobj_727__OGETSL_FIELD.obj_len = 4; @@ -18221,7 +18293,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_731__CLASS_OBJPUTCLOSUROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_731__CLASS_OBJPUTCLOSUROUT.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_731__CLASS_OBJPUTCLOSUROUT.obj_hash = 245797350; + cdat->dobj_731__CLASS_OBJPUTCLOSUROUT.obj_hash = 663309937; cdat->dobj_731__CLASS_OBJPUTCLOSUROUT.obj_len = 8; @@ -18295,7 +18367,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_737__OPCLOR_CLOS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_737__OPCLOR_CLOS.obj_num = 1; - cdat->dobj_737__OPCLOR_CLOS.obj_hash = 641959604; + cdat->dobj_737__OPCLOR_CLOS.obj_hash = 273196065; cdat->dobj_737__OPCLOR_CLOS.obj_len = 4; @@ -18356,7 +18428,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_741__OPCLOR_ROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_741__OPCLOR_ROUT.obj_num = 2; - cdat->dobj_741__OPCLOR_ROUT.obj_hash = 99128730; + cdat->dobj_741__OPCLOR_ROUT.obj_hash = 411652868; cdat->dobj_741__OPCLOR_ROUT.obj_len = 4; @@ -18418,7 +18490,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_745__CLASS_OBJPUTCLOSEDV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_745__CLASS_OBJPUTCLOSEDV.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_745__CLASS_OBJPUTCLOSEDV.obj_hash = 752341393; + cdat->dobj_745__CLASS_OBJPUTCLOSEDV.obj_hash = 642025987; cdat->dobj_745__CLASS_OBJPUTCLOSEDV.obj_len = 8; @@ -18492,7 +18564,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_751__OPCLOV_CLOS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_751__OPCLOV_CLOS.obj_num = 1; - cdat->dobj_751__OPCLOV_CLOS.obj_hash = 890060649; + cdat->dobj_751__OPCLOV_CLOS.obj_hash = 62117662; cdat->dobj_751__OPCLOV_CLOS.obj_len = 4; @@ -18552,7 +18624,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_755__OPCLOV_OFF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_755__OPCLOV_OFF.obj_num = 2; - cdat->dobj_755__OPCLOV_OFF.obj_hash = 663309937; + cdat->dobj_755__OPCLOV_OFF.obj_hash = 691471058; cdat->dobj_755__OPCLOV_OFF.obj_len = 4; @@ -18612,7 +18684,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_759__OPCLOV_CVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_759__OPCLOV_CVAL.obj_num = 3; - cdat->dobj_759__OPCLOV_CVAL.obj_hash = 273196065; + cdat->dobj_759__OPCLOV_CVAL.obj_hash = 957113648; cdat->dobj_759__OPCLOV_CVAL.obj_len = 4; @@ -18674,7 +18746,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_763__CLASS_OBJPUTCLOSEDNOTNULLV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_763__CLASS_OBJPUTCLOSEDNOTNULLV.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_763__CLASS_OBJPUTCLOSEDNOTNULLV.obj_hash = 864990501; + cdat->dobj_763__CLASS_OBJPUTCLOSEDNOTNULLV.obj_hash = 1070435926; cdat->dobj_763__CLASS_OBJPUTCLOSEDNOTNULLV.obj_len = 8; @@ -18749,7 +18821,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_769__CLASS_OBJPUTROUTCONST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_769__CLASS_OBJPUTROUTCONST.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_769__CLASS_OBJPUTROUTCONST.obj_hash = 47238125; + cdat->dobj_769__CLASS_OBJPUTROUTCONST.obj_hash = 929018972; cdat->dobj_769__CLASS_OBJPUTROUTCONST.obj_len = 8; @@ -18824,7 +18896,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_775__OPRCONST_ROUT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_775__OPRCONST_ROUT.obj_num = 1; - cdat->dobj_775__OPRCONST_ROUT.obj_hash = 335013257; + cdat->dobj_775__OPRCONST_ROUT.obj_hash = 152182004; cdat->dobj_775__OPRCONST_ROUT.obj_len = 4; @@ -18887,7 +18959,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_779__OPRCONST_OFF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_779__OPRCONST_OFF.obj_num = 2; - cdat->dobj_779__OPRCONST_OFF.obj_hash = 397635936; + cdat->dobj_779__OPRCONST_OFF.obj_hash = 827129550; cdat->dobj_779__OPRCONST_OFF.obj_len = 4; @@ -18950,7 +19022,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_783__OPRCONST_CVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_783__OPRCONST_CVAL.obj_num = 3; - cdat->dobj_783__OPRCONST_CVAL.obj_hash = 517160963; + cdat->dobj_783__OPRCONST_CVAL.obj_hash = 495202858; cdat->dobj_783__OPRCONST_CVAL.obj_len = 4; @@ -19013,7 +19085,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_787__CLASS_OBJPUTROUTCONSTNOTNULL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_787__CLASS_OBJPUTROUTCONSTNOTNULL.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_787__CLASS_OBJPUTROUTCONSTNOTNULL.obj_hash = 419700940; + cdat->dobj_787__CLASS_OBJPUTROUTCONSTNOTNULL.obj_hash = 789466879; cdat->dobj_787__CLASS_OBJPUTROUTCONSTNOTNULL.obj_len = 8; @@ -19088,7 +19160,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_793__CLASS_OBJTOUCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_793__CLASS_OBJTOUCH.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_793__CLASS_OBJTOUCH.obj_hash = 599048554; + cdat->dobj_793__CLASS_OBJTOUCH.obj_hash = 644792658; cdat->dobj_793__CLASS_OBJTOUCH.obj_len = 8; @@ -19161,7 +19233,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_799__OTOUCH_VAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_799__OTOUCH_VAL.obj_num = 1; - cdat->dobj_799__OTOUCH_VAL.obj_hash = 766004838; + cdat->dobj_799__OTOUCH_VAL.obj_hash = 131902196; cdat->dobj_799__OTOUCH_VAL.obj_len = 4; @@ -19222,7 +19294,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_803__OTOUCH_COMMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_803__OTOUCH_COMMENT.obj_num = 2; - cdat->dobj_803__OTOUCH_COMMENT.obj_hash = 314421588; + cdat->dobj_803__OTOUCH_COMMENT.obj_hash = 822233777; cdat->dobj_803__OTOUCH_COMMENT.obj_len = 4; @@ -19285,7 +19357,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_807__CLASS_OBJSETPREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_807__CLASS_OBJSETPREDEF.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_807__CLASS_OBJSETPREDEF.obj_hash = 417978384; + cdat->dobj_807__CLASS_OBJSETPREDEF.obj_hash = 64839954; cdat->dobj_807__CLASS_OBJSETPREDEF.obj_len = 8; @@ -19359,7 +19431,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_813__OSPR_OBJECT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_813__OSPR_OBJECT.obj_num = 1; - cdat->dobj_813__OSPR_OBJECT.obj_hash = 10518410; + cdat->dobj_813__OSPR_OBJECT.obj_hash = 156282512; cdat->dobj_813__OSPR_OBJECT.obj_len = 4; @@ -19420,7 +19492,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_817__OSPR_PREDEF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_817__OSPR_PREDEF.obj_num = 2; - cdat->dobj_817__OSPR_PREDEF.obj_hash = 644792658; + cdat->dobj_817__OSPR_PREDEF.obj_hash = 1031426459; cdat->dobj_817__OSPR_PREDEF.obj_len = 4; @@ -19512,7 +19584,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_823__CLASS_ROUTINEOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_823__CLASS_ROUTINEOBJ.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_823__CLASS_ROUTINEOBJ.obj_hash = 965529183; + cdat->dobj_823__CLASS_ROUTINEOBJ.obj_hash = 1069454711; cdat->dobj_823__CLASS_ROUTINEOBJ.obj_len = 8; @@ -19586,7 +19658,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_829__OBROUT_PROC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_829__OBROUT_PROC.obj_num = 2; - cdat->dobj_829__OBROUT_PROC.obj_hash = 242067029; + cdat->dobj_829__OBROUT_PROC.obj_hash = 13629087; cdat->dobj_829__OBROUT_PROC.obj_len = 4; @@ -19647,7 +19719,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_833__OBROUT_BODY.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_833__OBROUT_BODY.obj_num = 3; - cdat->dobj_833__OBROUT_BODY.obj_hash = 64839954; + cdat->dobj_833__OBROUT_BODY.obj_hash = 143669556; cdat->dobj_833__OBROUT_BODY.obj_len = 4; @@ -19709,7 +19781,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_837__OBROUT_NBVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_837__OBROUT_NBVAL.obj_num = 4; - cdat->dobj_837__OBROUT_NBVAL.obj_hash = 156282512; + cdat->dobj_837__OBROUT_NBVAL.obj_hash = 461456589; cdat->dobj_837__OBROUT_NBVAL.obj_len = 4; @@ -19772,7 +19844,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_841__OBROUT_NBLONG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_841__OBROUT_NBLONG.obj_num = 5; - cdat->dobj_841__OBROUT_NBLONG.obj_hash = 1031426459; + cdat->dobj_841__OBROUT_NBLONG.obj_hash = 452772766; cdat->dobj_841__OBROUT_NBLONG.obj_len = 4; @@ -19835,7 +19907,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_845__OBROUT_OTHERS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_845__OBROUT_OTHERS.obj_num = 6; - cdat->dobj_845__OBROUT_OTHERS.obj_hash = 351716671; + cdat->dobj_845__OBROUT_OTHERS.obj_hash = 771222022; cdat->dobj_845__OBROUT_OTHERS.obj_len = 4; @@ -19898,7 +19970,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_849__OBROUT_RETVAL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_849__OBROUT_RETVAL.obj_num = 7; - cdat->dobj_849__OBROUT_RETVAL.obj_hash = 592402726; + cdat->dobj_849__OBROUT_RETVAL.obj_hash = 666514012; cdat->dobj_849__OBROUT_RETVAL.obj_len = 4; @@ -19961,7 +20033,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_853__OBROUT_CNTCITER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_853__OBROUT_CNTCITER.obj_num = 8; - cdat->dobj_853__OBROUT_CNTCITER.obj_hash = 804415170; + cdat->dobj_853__OBROUT_CNTCITER.obj_hash = 16000408; cdat->dobj_853__OBROUT_CNTCITER.obj_len = 4; @@ -20024,7 +20096,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_857__OBROUT_CNTLETREC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_857__OBROUT_CNTLETREC.obj_num = 9; - cdat->dobj_857__OBROUT_CNTLETREC.obj_hash = 379252179; + cdat->dobj_857__OBROUT_CNTLETREC.obj_hash = 443308728; cdat->dobj_857__OBROUT_CNTLETREC.obj_len = 4; @@ -20087,7 +20159,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_861__CLASS_PROCROUTINEOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_861__CLASS_PROCROUTINEOBJ.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_861__CLASS_PROCROUTINEOBJ.obj_hash = 452772766; + cdat->dobj_861__CLASS_PROCROUTINEOBJ.obj_hash = 232103389; cdat->dobj_861__CLASS_PROCROUTINEOBJ.obj_len = 8; @@ -20162,7 +20234,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_867__OPROUT_GETARGS.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_867__OPROUT_GETARGS.obj_num = 10; - cdat->dobj_867__OPROUT_GETARGS.obj_hash = 771222022; + cdat->dobj_867__OPROUT_GETARGS.obj_hash = 860040135; cdat->dobj_867__OPROUT_GETARGS.obj_len = 4; @@ -20223,7 +20295,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_871__OPROUT_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_871__OPROUT_LOC.obj_num = 11; - cdat->dobj_871__OPROUT_LOC.obj_hash = 666514012; + cdat->dobj_871__OPROUT_LOC.obj_hash = 1049070564; cdat->dobj_871__OPROUT_LOC.obj_len = 4; @@ -20284,7 +20356,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_875__OPROUT_FUNAM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_875__OPROUT_FUNAM.obj_num = 12; - cdat->dobj_875__OPROUT_FUNAM.obj_hash = 16000408; + cdat->dobj_875__OPROUT_FUNAM.obj_hash = 364467906; cdat->dobj_875__OPROUT_FUNAM.obj_len = 4; @@ -20347,7 +20419,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_879__OPROUT_RESTNAM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_879__OPROUT_RESTNAM.obj_num = 13; - cdat->dobj_879__OPROUT_RESTNAM.obj_hash = 443308728; + cdat->dobj_879__OPROUT_RESTNAM.obj_hash = 955498838; cdat->dobj_879__OPROUT_RESTNAM.obj_len = 4; @@ -20410,7 +20482,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_883__OPROUT_FILENUM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_883__OPROUT_FILENUM.obj_num = 14; - cdat->dobj_883__OPROUT_FILENUM.obj_hash = 194780367; + cdat->dobj_883__OPROUT_FILENUM.obj_hash = 414441026; cdat->dobj_883__OPROUT_FILENUM.obj_len = 4; @@ -20473,7 +20545,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_887__CLASS_INITIALROUTINEOBJ.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_887__CLASS_INITIALROUTINEOBJ.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_887__CLASS_INITIALROUTINEOBJ.obj_hash = 860040135; + cdat->dobj_887__CLASS_INITIALROUTINEOBJ.obj_hash = 616428590; cdat->dobj_887__CLASS_INITIALROUTINEOBJ.obj_len = 8; @@ -20547,7 +20619,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_893__OIROUT_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_893__OIROUT_DATA.obj_num = 10; - cdat->dobj_893__OIROUT_DATA.obj_hash = 1049070564; + cdat->dobj_893__OIROUT_DATA.obj_hash = 985078005; cdat->dobj_893__OIROUT_DATA.obj_len = 4; @@ -20609,7 +20681,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_897__OIROUT_PROLOG.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_897__OIROUT_PROLOG.obj_num = 11; - cdat->dobj_897__OIROUT_PROLOG.obj_hash = 364467906; + cdat->dobj_897__OIROUT_PROLOG.obj_hash = 681984575; cdat->dobj_897__OIROUT_PROLOG.obj_len = 4; @@ -20671,7 +20743,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_901__OIROUT_FILL.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_901__OIROUT_FILL.obj_num = 12; - cdat->dobj_901__OIROUT_FILL.obj_hash = 955498838; + cdat->dobj_901__OIROUT_FILL.obj_hash = 198701937; cdat->dobj_901__OIROUT_FILL.obj_len = 4; @@ -20733,7 +20805,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_905__OIROUT_MODULENAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_905__OIROUT_MODULENAME.obj_num = 13; - cdat->dobj_905__OIROUT_MODULENAME.obj_hash = 414441026; + cdat->dobj_905__OIROUT_MODULENAME.obj_hash = 672250857; cdat->dobj_905__OIROUT_MODULENAME.obj_len = 4; @@ -21231,7 +21303,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_939.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_939.obj_num = 0; - cdat->dobj_939.obj_hash = 228981896; + cdat->dobj_939.obj_hash = 841012625; cdat->dobj_939.obj_len = 2; @@ -21281,7 +21353,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_942.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_942.obj_num = 1; - cdat->dobj_942.obj_hash = 953930399; + cdat->dobj_942.obj_hash = 412509105; cdat->dobj_942.obj_len = 2; /*inimult dtup_943__OUTPUT_C_DECLINIT */ @@ -21307,7 +21379,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_944__OUTPUT_C_DECLINIT.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]); - cdat->dobj_944__OUTPUT_C_DECLINIT.obj_hash = 908636058; + cdat->dobj_944__OUTPUT_C_DECLINIT.obj_hash = 842584143; cdat->dobj_944__OUTPUT_C_DECLINIT.obj_len = 4; @@ -21367,7 +21439,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_948__PUT_OBJDEST.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]); - cdat->dobj_948__PUT_OBJDEST.obj_hash = 842584143; + cdat->dobj_948__PUT_OBJDEST.obj_hash = 171801282; cdat->dobj_948__PUT_OBJDEST.obj_len = 4; @@ -21429,7 +21501,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_952.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_952.obj_num = 0; - cdat->dobj_952.obj_hash = 71948902; + cdat->dobj_952.obj_hash = 4684857; cdat->dobj_952.obj_len = 2; @@ -21480,7 +21552,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_955.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_955.obj_num = 1; - cdat->dobj_955.obj_hash = 470344546; + cdat->dobj_955.obj_hash = 802696349; cdat->dobj_955.obj_len = 2; @@ -21531,7 +21603,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_958.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_958.obj_num = 2; - cdat->dobj_958.obj_hash = 1068668835; + cdat->dobj_958.obj_hash = 773335824; cdat->dobj_958.obj_len = 2; @@ -21581,7 +21653,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_961.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_961.obj_num = 3; - cdat->dobj_961.obj_hash = 830031666; + cdat->dobj_961.obj_hash = 547264502; cdat->dobj_961.obj_len = 2; /*inimult dtup_962__OUTPUT_C_CODE */ @@ -21607,7 +21679,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_963__OUTPUT_C_CODE.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]); - cdat->dobj_963__OUTPUT_C_CODE.obj_hash = 429380459; + cdat->dobj_963__OUTPUT_C_CODE.obj_hash = 1007458000; cdat->dobj_963__OUTPUT_C_CODE.obj_len = 4; @@ -21670,7 +21742,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_967.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_967.obj_num = 0; - cdat->dobj_967.obj_hash = 773335824; + cdat->dobj_967.obj_hash = 99529776; cdat->dobj_967.obj_len = 2; /*^iniobj */ @@ -21692,7 +21764,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_968.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_968.obj_num = 1; - cdat->dobj_968.obj_hash = 267883451; + cdat->dobj_968.obj_hash = 966126235; cdat->dobj_968.obj_len = 2; @@ -21742,7 +21814,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_971.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_971.obj_num = 2; - cdat->dobj_971.obj_hash = 547264502; + cdat->dobj_971.obj_hash = 649813519; cdat->dobj_971.obj_len = 2; /*^iniobj */ @@ -21764,7 +21836,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_972.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_972.obj_num = 3; - cdat->dobj_972.obj_hash = 731963996; + cdat->dobj_972.obj_hash = 893677114; cdat->dobj_972.obj_len = 2; /*inimult dtup_973__OUTPUT_C_INITIAL_FILL */ @@ -21791,7 +21863,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_974__OUTPUT_C_INITIAL_FILL.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]); - cdat->dobj_974__OUTPUT_C_INITIAL_FILL.obj_hash = 226736196; + cdat->dobj_974__OUTPUT_C_INITIAL_FILL.obj_hash = 629084200; cdat->dobj_974__OUTPUT_C_INITIAL_FILL.obj_len = 4; @@ -21854,7 +21926,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_978.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_978.obj_num = 0; - cdat->dobj_978.obj_hash = 966126235; + cdat->dobj_978.obj_hash = 103976378; cdat->dobj_978.obj_len = 2; /*^iniobj */ @@ -21876,7 +21948,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_979.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_979.obj_num = 1; - cdat->dobj_979.obj_hash = 649813519; + cdat->dobj_979.obj_hash = 558395240; cdat->dobj_979.obj_len = 2; @@ -21927,7 +21999,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_982.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_982.obj_num = 2; - cdat->dobj_982.obj_hash = 1017397476; + cdat->dobj_982.obj_hash = 42263475; cdat->dobj_982.obj_len = 2; /*^iniobj */ @@ -21949,7 +22021,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_983.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_983.obj_num = 3; - cdat->dobj_983.obj_hash = 455870234; + cdat->dobj_983.obj_hash = 766040453; cdat->dobj_983.obj_len = 2; /*inimult dtup_984__OUTPUT_C_INITIAL_PREDEF */ @@ -21976,7 +22048,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_985__OUTPUT_C_INITIAL_PREDEF.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]); - cdat->dobj_985__OUTPUT_C_INITIAL_PREDEF.obj_hash = 900338944; + cdat->dobj_985__OUTPUT_C_INITIAL_PREDEF.obj_hash = 720817082; cdat->dobj_985__OUTPUT_C_INITIAL_PREDEF.obj_len = 4; @@ -23064,7 +23136,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1067__INITIALSYSTEMDATA_OBJPREDEF.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V219*/ meltfptr[218]); - cdat->dobj_1067__INITIALSYSTEMDATA_OBJPREDEF.obj_hash = 947806662; + cdat->dobj_1067__INITIALSYSTEMDATA_OBJPREDEF.obj_hash = 978254980; cdat->dobj_1067__INITIALSYSTEMDATA_OBJPREDEF.obj_len = 2; @@ -25061,7 +25133,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1218.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1218.obj_num = 0; - cdat->dobj_1218.obj_hash = 980368816; + cdat->dobj_1218.obj_hash = 219399037; cdat->dobj_1218.obj_len = 2; @@ -25111,7 +25183,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1221.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1221.obj_num = 1; - cdat->dobj_1221.obj_hash = 677581485; + cdat->dobj_1221.obj_hash = 443182530; cdat->dobj_1221.obj_len = 2; @@ -25161,7 +25233,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1224.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1224.obj_num = 2; - cdat->dobj_1224.obj_hash = 713074241; + cdat->dobj_1224.obj_hash = 658010095; cdat->dobj_1224.obj_len = 2; @@ -25211,7 +25283,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1227.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1227.obj_num = 3; - cdat->dobj_1227.obj_hash = 342719835; + cdat->dobj_1227.obj_hash = 489021509; cdat->dobj_1227.obj_len = 2; @@ -25261,7 +25333,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1230.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_1230.obj_num = 4; - cdat->dobj_1230.obj_hash = 183435464; + cdat->dobj_1230.obj_hash = 545484654; cdat->dobj_1230.obj_len = 2; /*inimult dtup_1231__COMPILE_LETREC_FILL */ @@ -25287,7 +25359,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1232__COMPILE_LETREC_FILL.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]); - cdat->dobj_1232__COMPILE_LETREC_FILL.obj_hash = 446780483; + cdat->dobj_1232__COMPILE_LETREC_FILL.obj_hash = 261704485; cdat->dobj_1232__COMPILE_LETREC_FILL.obj_len = 4; @@ -27608,7 +27680,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, strncpy (cdat->drout_1424__COMPILOBJ_NREP_RETURN.routdescr, "COMPILOBJ_NREP_RETURN @warmelt-genobj.melt:4094", MELT_ROUTDESCR_LEN - 1); - cdat->drout_1424__COMPILOBJ_NREP_RETURN.nbval = 11; + cdat->drout_1424__COMPILOBJ_NREP_RETURN.nbval = 13; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1424__COMPILOBJ_NREP_RETURN, meltrout_122_warmelt_genobj_COMPILOBJ_NREP_RETURN); @@ -27656,7 +27728,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1428__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1428__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:4136", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:4152", MELT_ROUTDESCR_LEN - 1); cdat->drout_1428__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1428__LAMBDA_, meltrout_123_warmelt_genobj_LAMBDA___36__); @@ -27692,7 +27764,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, "DISCRCLOSURE_OBJPREDEF", sizeof (cdat->dstr_1430__DISCRCLOSURE_OBJ. val) - 1); - MELT_LOCATION ("warmelt-genobj.melt:4138:/ iniobj"); + MELT_LOCATION ("warmelt-genobj.melt:4154:/ iniobj"); /*iniobj dobj_1431__DISCRCLOSURE_OBJPREDEF*/ /*_.VALDATA___V1587*/ meltfptr[1586] = @@ -27709,7 +27781,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1431__DISCRCLOSURE_OBJPREDEF.meltobj_class = (meltobject_ptr_t) ( /*_.VALDATA___V219*/ meltfptr[218]); - cdat->dobj_1431__DISCRCLOSURE_OBJPREDEF.obj_hash = 842058441; + cdat->dobj_1431__DISCRCLOSURE_OBJPREDEF.obj_hash = 879708319; cdat->dobj_1431__DISCRCLOSURE_OBJPREDEF.obj_len = 2; @@ -27749,7 +27821,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1434__COMPILOBJ_NREP_LAMBDA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1434__COMPILOBJ_NREP_LAMBDA.routdescr, - "COMPILOBJ_NREP_LAMBDA @warmelt-genobj.melt:4144", + "COMPILOBJ_NREP_LAMBDA @warmelt-genobj.melt:4160", MELT_ROUTDESCR_LEN - 1); cdat->drout_1434__COMPILOBJ_NREP_LAMBDA.nbval = 16; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1434__COMPILOBJ_NREP_LAMBDA, @@ -27799,7 +27871,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1438__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1438__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:4180", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:4196", MELT_ROUTDESCR_LEN - 1); cdat->drout_1438__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1438__LAMBDA_, meltrout_125_warmelt_genobj_LAMBDA___37__); @@ -27810,7 +27882,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1439__COMPILOBJ_NREP_MAKEINST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1439__COMPILOBJ_NREP_MAKEINST.routdescr, - "COMPILOBJ_NREP_MAKEINST @warmelt-genobj.melt:4196", + "COMPILOBJ_NREP_MAKEINST @warmelt-genobj.melt:4212", MELT_ROUTDESCR_LEN - 1); cdat->drout_1439__COMPILOBJ_NREP_MAKEINST.nbval = 19; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1439__COMPILOBJ_NREP_MAKEINST, @@ -27888,7 +27960,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1445__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1445__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:4226", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:4242", MELT_ROUTDESCR_LEN - 1); cdat->drout_1445__LAMBDA_.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1445__LAMBDA_, meltrout_127_warmelt_genobj_LAMBDA___38__); @@ -27899,7 +27971,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1446__COMPILOBJ_ROUTPROC.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1446__COMPILOBJ_ROUTPROC.routdescr, - "COMPILOBJ_ROUTPROC @warmelt-genobj.melt:4253", + "COMPILOBJ_ROUTPROC @warmelt-genobj.melt:4269", MELT_ROUTDESCR_LEN - 1); cdat->drout_1446__COMPILOBJ_ROUTPROC.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1446__COMPILOBJ_ROUTPROC, @@ -27918,7 +27990,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1448__COMPILOBJ_PREDEF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1448__COMPILOBJ_PREDEF.routdescr, - "COMPILOBJ_PREDEF @warmelt-genobj.melt:4262", + "COMPILOBJ_PREDEF @warmelt-genobj.melt:4278", MELT_ROUTDESCR_LEN - 1); cdat->drout_1448__COMPILOBJ_PREDEF.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1448__COMPILOBJ_PREDEF, @@ -27968,7 +28040,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1452__COMPIL_DATA_AND_SLOTS_FILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1452__COMPIL_DATA_AND_SLOTS_FILL.routdescr, - "COMPIL_DATA_AND_SLOTS_FILL @warmelt-genobj.melt:4278", + "COMPIL_DATA_AND_SLOTS_FILL @warmelt-genobj.melt:4294", MELT_ROUTDESCR_LEN - 1); cdat->drout_1452__COMPIL_DATA_AND_SLOTS_FILL.nbval = 32; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1452__COMPIL_DATA_AND_SLOTS_FILL, @@ -28056,7 +28128,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1459__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1459__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:4349", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:4365", MELT_ROUTDESCR_LEN - 1); cdat->drout_1459__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1459__LAMBDA_, meltrout_131_warmelt_genobj_LAMBDA___39__); @@ -28067,7 +28139,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1460__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1460__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:4367", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:4383", MELT_ROUTDESCR_LEN - 1); cdat->drout_1460__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1460__LAMBDA_, meltrout_132_warmelt_genobj_LAMBDA___40__); @@ -28078,7 +28150,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1461__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1461__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:4394", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:4410", MELT_ROUTDESCR_LEN - 1); cdat->drout_1461__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1461__LAMBDA_, meltrout_133_warmelt_genobj_LAMBDA___41__); @@ -28091,7 +28163,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1462__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL. routdescr, - "DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL @warmelt-genobj.melt:4416", + "DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL @warmelt-genobj.melt:4432", MELT_ROUTDESCR_LEN - 1); cdat->drout_1462__DISPOSE_DLOCBIND_AFTER_DATA_AND_SLOTS_FILL.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -28112,7 +28184,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1464__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1464__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:4421", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:4437", MELT_ROUTDESCR_LEN - 1); cdat->drout_1464__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1464__LAMBDA_, meltrout_135_warmelt_genobj_LAMBDA___42__); @@ -28123,7 +28195,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1465__COMPILOBJ_DATASYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1465__COMPILOBJ_DATASYMBOL.routdescr, - "COMPILOBJ_DATASYMBOL @warmelt-genobj.melt:4424", + "COMPILOBJ_DATASYMBOL @warmelt-genobj.melt:4440", MELT_ROUTDESCR_LEN - 1); cdat->drout_1465__COMPILOBJ_DATASYMBOL.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1465__COMPILOBJ_DATASYMBOL, @@ -28142,7 +28214,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1467__COMPILOBJ_DATAINSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1467__COMPILOBJ_DATAINSTANCE.routdescr, - "COMPILOBJ_DATAINSTANCE @warmelt-genobj.melt:4475", + "COMPILOBJ_DATAINSTANCE @warmelt-genobj.melt:4491", MELT_ROUTDESCR_LEN - 1); cdat->drout_1467__COMPILOBJ_DATAINSTANCE.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1467__COMPILOBJ_DATAINSTANCE, @@ -28161,7 +28233,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1469__COMPILOBJ_DATATUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1469__COMPILOBJ_DATATUPLE.routdescr, - "COMPILOBJ_DATATUPLE @warmelt-genobj.melt:4552", + "COMPILOBJ_DATATUPLE @warmelt-genobj.melt:4568", MELT_ROUTDESCR_LEN - 1); cdat->drout_1469__COMPILOBJ_DATATUPLE.nbval = 20; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1469__COMPILOBJ_DATATUPLE, @@ -28211,7 +28283,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1473__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1473__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:4569", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:4585", MELT_ROUTDESCR_LEN - 1); cdat->drout_1473__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1473__LAMBDA_, meltrout_139_warmelt_genobj_LAMBDA___43__); @@ -28280,7 +28352,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1478__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1478__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:4597", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:4613", MELT_ROUTDESCR_LEN - 1); cdat->drout_1478__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1478__LAMBDA_, meltrout_140_warmelt_genobj_LAMBDA___44__); @@ -28291,7 +28363,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1479__COMPILOBJ_DATASTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1479__COMPILOBJ_DATASTRING.routdescr, - "COMPILOBJ_DATASTRING @warmelt-genobj.melt:4622", + "COMPILOBJ_DATASTRING @warmelt-genobj.melt:4638", MELT_ROUTDESCR_LEN - 1); cdat->drout_1479__COMPILOBJ_DATASTRING.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1479__COMPILOBJ_DATASTRING, @@ -28370,7 +28442,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1485__COMPILOBJ_DATABOXEDINTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1485__COMPILOBJ_DATABOXEDINTEGER.routdescr, - "COMPILOBJ_DATABOXEDINTEGER @warmelt-genobj.melt:4667", + "COMPILOBJ_DATABOXEDINTEGER @warmelt-genobj.melt:4683", MELT_ROUTDESCR_LEN - 1); cdat->drout_1485__COMPILOBJ_DATABOXEDINTEGER.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1485__COMPILOBJ_DATABOXEDINTEGER, @@ -28449,7 +28521,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1491__COMPILOBJ_DATACLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1491__COMPILOBJ_DATACLOSURE.routdescr, - "COMPILOBJ_DATACLOSURE @warmelt-genobj.melt:4712", + "COMPILOBJ_DATACLOSURE @warmelt-genobj.melt:4728", MELT_ROUTDESCR_LEN - 1); cdat->drout_1491__COMPILOBJ_DATACLOSURE.nbval = 23; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1491__COMPILOBJ_DATACLOSURE, @@ -28590,7 +28662,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1501__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1501__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:4775", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:4791", MELT_ROUTDESCR_LEN - 1); cdat->drout_1501__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1501__LAMBDA_, meltrout_144_warmelt_genobj_LAMBDA___45__); @@ -28601,7 +28673,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1502__COMPILOBJ_DATAROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1502__COMPILOBJ_DATAROUTINE.routdescr, - "COMPILOBJ_DATAROUTINE @warmelt-genobj.melt:4799", + "COMPILOBJ_DATAROUTINE @warmelt-genobj.melt:4815", MELT_ROUTDESCR_LEN - 1); cdat->drout_1502__COMPILOBJ_DATAROUTINE.nbval = 26; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1502__COMPILOBJ_DATAROUTINE, @@ -28678,7 +28750,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1508__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1508__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:4856", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:4872", MELT_ROUTDESCR_LEN - 1); cdat->drout_1508__LAMBDA_.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1508__LAMBDA_, meltrout_146_warmelt_genobj_LAMBDA___46__); @@ -28723,7 +28795,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, strncpy (cdat-> drout_1511__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. routdescr, - "COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER @warmelt-genobj.melt:4917", + "COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER @warmelt-genobj.melt:4933", MELT_ROUTDESCR_LEN - 1); cdat->drout_1511__COMPILOBJ_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER. nbval = 2; @@ -28783,7 +28855,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1515__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT. routdescr, - "COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT @warmelt-genobj.melt:4927", + "COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT @warmelt-genobj.melt:4943", MELT_ROUTDESCR_LEN - 1); cdat->drout_1515__COMPILOBJ_QUASIDATA_PARENT_MODULE_ENVIRONMENT.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -28838,7 +28910,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1519__COMPILOBJ_NREP_STORE_PREDEFINED.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1519__COMPILOBJ_NREP_STORE_PREDEFINED.routdescr, - "COMPILOBJ_NREP_STORE_PREDEFINED @warmelt-genobj.melt:4937", + "COMPILOBJ_NREP_STORE_PREDEFINED @warmelt-genobj.melt:4953", MELT_ROUTDESCR_LEN - 1); cdat->drout_1519__COMPILOBJ_NREP_STORE_PREDEFINED.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -28893,7 +28965,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, strncpy (cdat-> drout_1523__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. routdescr, - "COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER @warmelt-genobj.melt:4976", + "COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER @warmelt-genobj.melt:4992", MELT_ROUTDESCR_LEN - 1); cdat-> drout_1523__COMPILOBJ_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER. @@ -28952,7 +29024,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1527__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1527__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:5007", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:5023", MELT_ROUTDESCR_LEN - 1); cdat->drout_1527__LAMBDA_.nbval = 12; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1527__LAMBDA_, meltrout_151_warmelt_genobj_LAMBDA___47__); @@ -28963,7 +29035,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1528__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1528__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:5020", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:5036", MELT_ROUTDESCR_LEN - 1); cdat->drout_1528__LAMBDA_.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1528__LAMBDA_, meltrout_152_warmelt_genobj_LAMBDA___48__); @@ -29009,7 +29081,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, "COMPILE_MATCHER", sizeof (cdat->dstr_1531__COMPILE_MATCHER. val) - 1); - MELT_LOCATION ("warmelt-genobj.melt:5073:/ iniobj"); + MELT_LOCATION ("warmelt-genobj.melt:5089:/ iniobj"); /*iniobj dobj_1532__COMPILE_MATCHER*/ /*_.VALDATA___V1688*/ meltfptr[1687] = @@ -29026,7 +29098,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1532__COMPILE_MATCHER.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]); - cdat->dobj_1532__COMPILE_MATCHER.obj_hash = 815255808; + cdat->dobj_1532__COMPILE_MATCHER.obj_hash = 3242181; cdat->dobj_1532__COMPILE_MATCHER.obj_len = 4; @@ -29101,7 +29173,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, "CLASS_PROPED", sizeof (cdat->dstr_1537__CLASS_PROPED.val) - 1); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ iniobj"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ iniobj"); /*iniobj dobj_1538__CLASS_MATCHCOMPILCONTEXT*/ /*_.VALDATA___V1694*/ meltfptr[1693] = @@ -29120,7 +29192,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1538__CLASS_MATCHCOMPILCONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1538__CLASS_MATCHCOMPILCONTEXT.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_1538__CLASS_MATCHCOMPILCONTEXT.obj_hash = 802954788; + cdat->dobj_1538__CLASS_MATCHCOMPILCONTEXT.obj_hash = 1019152282; cdat->dobj_1538__CLASS_MATCHCOMPILCONTEXT.obj_len = 8; @@ -29193,7 +29265,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1544__MCX_LOC.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1544__MCX_LOC.obj_num = 1; - cdat->dobj_1544__MCX_LOC.obj_hash = 416693734; + cdat->dobj_1544__MCX_LOC.obj_hash = 719461874; cdat->dobj_1544__MCX_LOC.obj_len = 4; @@ -29254,7 +29326,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1548__MCX_NORMTESTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1548__MCX_NORMTESTER.obj_num = 2; - cdat->dobj_1548__MCX_NORMTESTER.obj_hash = 209883396; + cdat->dobj_1548__MCX_NORMTESTER.obj_hash = 209628317; cdat->dobj_1548__MCX_NORMTESTER.obj_len = 4; @@ -29317,7 +29389,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1552__MCX_GOTOTHEN.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1552__MCX_GOTOTHEN.obj_num = 3; - cdat->dobj_1552__MCX_GOTOTHEN.obj_hash = 977103386; + cdat->dobj_1552__MCX_GOTOTHEN.obj_hash = 722900089; cdat->dobj_1552__MCX_GOTOTHEN.obj_len = 4; @@ -29380,7 +29452,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1556__MCX_GOTOELSE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1556__MCX_GOTOELSE.obj_num = 4; - cdat->dobj_1556__MCX_GOTOELSE.obj_hash = 146236692; + cdat->dobj_1556__MCX_GOTOELSE.obj_hash = 293618501; cdat->dobj_1556__MCX_GOTOELSE.obj_len = 4; @@ -29441,7 +29513,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1560__MCX_OLIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1560__MCX_OLIST.obj_num = 5; - cdat->dobj_1560__MCX_OLIST.obj_hash = 1056831489; + cdat->dobj_1560__MCX_OLIST.obj_hash = 836855526; cdat->dobj_1560__MCX_OLIST.obj_len = 4; @@ -29500,7 +29572,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1564__MCX_SUFFIX.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1564__MCX_SUFFIX.obj_num = 6; - cdat->dobj_1564__MCX_SUFFIX.obj_hash = 280839969; + cdat->dobj_1564__MCX_SUFFIX.obj_hash = 156318099; cdat->dobj_1564__MCX_SUFFIX.obj_len = 4; @@ -29561,7 +29633,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1568__MCX_STATECOUNTER.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1568__MCX_STATECOUNTER.obj_num = 7; - cdat->dobj_1568__MCX_STATECOUNTER.obj_hash = 244220323; + cdat->dobj_1568__MCX_STATECOUNTER.obj_hash = 417427637; cdat->dobj_1568__MCX_STATECOUNTER.obj_len = 4; @@ -29605,7 +29677,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, "COMPILE_TESTER", sizeof (cdat->dstr_1571__COMPILE_TESTER.val) - 1); - MELT_LOCATION ("warmelt-genobj.melt:5095:/ iniobj"); + MELT_LOCATION ("warmelt-genobj.melt:5111:/ iniobj"); /*iniobj dobj_1572__COMPILE_TESTER*/ /*_.VALDATA___V1728*/ meltfptr[1727] = @@ -29622,7 +29694,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_1572__COMPILE_TESTER.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V18*/ meltfptr[17]); - cdat->dobj_1572__COMPILE_TESTER.obj_hash = 243888133; + cdat->dobj_1572__COMPILE_TESTER.obj_hash = 725460620; cdat->dobj_1572__COMPILE_TESTER.obj_len = 4; @@ -29666,7 +29738,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, "CLASS_TESTERCOMPILCONTEXT", sizeof (cdat->dstr_1575__CLASS_TESTERCOMP. val) - 1); - MELT_LOCATION ("warmelt-genobj.melt:5098:/ iniobj"); + MELT_LOCATION ("warmelt-genobj.melt:5114:/ iniobj"); /*iniobj dobj_1576__CLASS_TESTERCOMPILCONTEXT*/ /*_.VALDATA___V1732*/ meltfptr[1731] = @@ -29685,7 +29757,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1576__CLASS_TESTERCOMPILCONTEXT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1576__CLASS_TESTERCOMPILCONTEXT.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_1576__CLASS_TESTERCOMPILCONTEXT.obj_hash = 370506198; + cdat->dobj_1576__CLASS_TESTERCOMPILCONTEXT.obj_hash = 947888643; cdat->dobj_1576__CLASS_TESTERCOMPILCONTEXT.obj_len = 8; @@ -29760,7 +29832,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1582__TCX_NRMATCH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1582__TCX_NRMATCH.obj_num = 1; - cdat->dobj_1582__TCX_NRMATCH.obj_hash = 938858964; + cdat->dobj_1582__TCX_NRMATCH.obj_hash = 700007754; cdat->dobj_1582__TCX_NRMATCH.obj_len = 4; @@ -29823,7 +29895,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1586__TCX_FREELIST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1586__TCX_FREELIST.obj_num = 2; - cdat->dobj_1586__TCX_FREELIST.obj_hash = 549585533; + cdat->dobj_1586__TCX_FREELIST.obj_hash = 545817471; cdat->dobj_1586__TCX_FREELIST.obj_len = 4; @@ -29886,7 +29958,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1590__TCX_NEXTEST.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1590__TCX_NEXTEST.obj_num = 3; - cdat->dobj_1590__TCX_NEXTEST.obj_hash = 1019152282; + cdat->dobj_1590__TCX_NEXTEST.obj_hash = 19447869; cdat->dobj_1590__TCX_NEXTEST.obj_len = 4; @@ -29905,7 +29977,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1592__COMPILTST_ANYTESTER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1592__COMPILTST_ANYTESTER.routdescr, - "COMPILTST_ANYTESTER @warmelt-genobj.melt:5108", + "COMPILTST_ANYTESTER @warmelt-genobj.melt:5124", MELT_ROUTDESCR_LEN - 1); cdat->drout_1592__COMPILTST_ANYTESTER.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1592__COMPILTST_ANYTESTER, @@ -29955,7 +30027,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1596__COMPILOBJ_NREP_MATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1596__COMPILOBJ_NREP_MATCH.routdescr, - "COMPILOBJ_NREP_MATCH @warmelt-genobj.melt:5122", + "COMPILOBJ_NREP_MATCH @warmelt-genobj.melt:5138", MELT_ROUTDESCR_LEN - 1); cdat->drout_1596__COMPILOBJ_NREP_MATCH.nbval = 26; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1596__COMPILOBJ_NREP_MATCH, @@ -30098,7 +30170,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1606__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1606__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:5255", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:5271", MELT_ROUTDESCR_LEN - 1); cdat->drout_1606__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1606__LAMBDA_, meltrout_155_warmelt_genobj_LAMBDA___49__); @@ -30192,7 +30264,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_1612__CLASS_ROOT.val, "CLASS_ROOT", sizeof (cdat->dstr_1612__CLASS_ROOT.val) - 1); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ iniobj"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ iniobj"); /*iniobj dobj_1613__CLASS_ALTERNATE_MATCH_NREP_DATA*/ /*_.VALDATA___V1771*/ meltfptr[1770] = @@ -30211,7 +30283,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1613__CLASS_ALTERNATE_MATCH_NREP_DATA.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_1613__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_1613__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_hash = 541199007; + cdat->dobj_1613__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_hash = 69018742; cdat->dobj_1613__CLASS_ALTERNATE_MATCH_NREP_DATA.obj_len = 8; @@ -30286,7 +30358,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1619__ALTMATCHN_PREV.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1619__ALTMATCHN_PREV.obj_num = 0; - cdat->dobj_1619__ALTMATCHN_PREV.obj_hash = 332443624; + cdat->dobj_1619__ALTMATCHN_PREV.obj_hash = 439560897; cdat->dobj_1619__ALTMATCHN_PREV.obj_len = 4; @@ -30349,7 +30421,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1623__ALTMATCHN_NREP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1623__ALTMATCHN_NREP.obj_num = 1; - cdat->dobj_1623__ALTMATCHN_NREP.obj_hash = 936011700; + cdat->dobj_1623__ALTMATCHN_NREP.obj_hash = 423457421; cdat->dobj_1623__ALTMATCHN_NREP.obj_len = 4; @@ -30412,7 +30484,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1627__ALTMATCHN_FLAGMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1627__ALTMATCHN_FLAGMAP.obj_num = 2; - cdat->dobj_1627__ALTMATCHN_FLAGMAP.obj_hash = 442096352; + cdat->dobj_1627__ALTMATCHN_FLAGMAP.obj_hash = 368077757; cdat->dobj_1627__ALTMATCHN_FLAGMAP.obj_len = 4; @@ -30475,7 +30547,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->dobj_1631__ALTMATCHN_DATAMAP.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_1631__ALTMATCHN_DATAMAP.obj_num = 3; - cdat->dobj_1631__ALTMATCHN_DATAMAP.obj_hash = 604382022; + cdat->dobj_1631__ALTMATCHN_DATAMAP.obj_hash = 897605133; cdat->dobj_1631__ALTMATCHN_DATAMAP.obj_len = 4; @@ -30494,7 +30566,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1633__COMPILOBJ_NREP_ALTMATCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1633__COMPILOBJ_NREP_ALTMATCH.routdescr, - "COMPILOBJ_NREP_ALTMATCH @warmelt-genobj.melt:5331", + "COMPILOBJ_NREP_ALTMATCH @warmelt-genobj.melt:5347", MELT_ROUTDESCR_LEN - 1); cdat->drout_1633__COMPILOBJ_NREP_ALTMATCH.nbval = 16; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1633__COMPILOBJ_NREP_ALTMATCH, @@ -30544,7 +30616,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1637__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1637__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:5374", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:5390", MELT_ROUTDESCR_LEN - 1); cdat->drout_1637__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1637__LAMBDA_, meltrout_157_warmelt_genobj_LAMBDA___50__); @@ -30555,7 +30627,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1638__COMPILOBJ_NREP_MATCHLABEL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1638__COMPILOBJ_NREP_MATCHLABEL.routdescr, - "COMPILOBJ_NREP_MATCHLABEL @warmelt-genobj.melt:5404", + "COMPILOBJ_NREP_MATCHLABEL @warmelt-genobj.melt:5420", MELT_ROUTDESCR_LEN - 1); cdat->drout_1638__COMPILOBJ_NREP_MATCHLABEL.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1638__COMPILOBJ_NREP_MATCHLABEL, @@ -30636,7 +30708,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1644__COMPILOBJ_NREP_MATCHFLAG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1644__COMPILOBJ_NREP_MATCHFLAG.routdescr, - "COMPILOBJ_NREP_MATCHFLAG @warmelt-genobj.melt:5431", + "COMPILOBJ_NREP_MATCHFLAG @warmelt-genobj.melt:5447", MELT_ROUTDESCR_LEN - 1); cdat->drout_1644__COMPILOBJ_NREP_MATCHFLAG.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1644__COMPILOBJ_NREP_MATCHFLAG, @@ -30717,7 +30789,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1650__COMPILOBJ_NREP_MATCHDATAINIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1650__COMPILOBJ_NREP_MATCHDATAINIT.routdescr, - "COMPILOBJ_NREP_MATCHDATAINIT @warmelt-genobj.melt:5464", + "COMPILOBJ_NREP_MATCHDATAINIT @warmelt-genobj.melt:5480", MELT_ROUTDESCR_LEN - 1); cdat->drout_1650__COMPILOBJ_NREP_MATCHDATAINIT.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1650__COMPILOBJ_NREP_MATCHDATAINIT, @@ -30920,7 +30992,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1664__COMPILOBJ_NREP_MATCHEDATA.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1664__COMPILOBJ_NREP_MATCHEDATA.routdescr, - "COMPILOBJ_NREP_MATCHEDATA @warmelt-genobj.melt:5505", + "COMPILOBJ_NREP_MATCHEDATA @warmelt-genobj.melt:5521", MELT_ROUTDESCR_LEN - 1); cdat->drout_1664__COMPILOBJ_NREP_MATCHEDATA.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1664__COMPILOBJ_NREP_MATCHEDATA, @@ -30939,7 +31011,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1666__COMPILOBJ_NREP_MATCHJUMP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1666__COMPILOBJ_NREP_MATCHJUMP.routdescr, - "COMPILOBJ_NREP_MATCHJUMP @warmelt-genobj.melt:5531", + "COMPILOBJ_NREP_MATCHJUMP @warmelt-genobj.melt:5547", MELT_ROUTDESCR_LEN - 1); cdat->drout_1666__COMPILOBJ_NREP_MATCHJUMP.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1666__COMPILOBJ_NREP_MATCHJUMP, @@ -30989,7 +31061,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1670__NORMTESTER_LABELINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1670__NORMTESTER_LABELINSTR.routdescr, - "NORMTESTER_LABELINSTR @warmelt-genobj.melt:5560", + "NORMTESTER_LABELINSTR @warmelt-genobj.melt:5576", MELT_ROUTDESCR_LEN - 1); cdat->drout_1670__NORMTESTER_LABELINSTR.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1670__NORMTESTER_LABELINSTR, @@ -31008,7 +31080,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1672__NORMTESTER_GOTOINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1672__NORMTESTER_GOTOINSTR.routdescr, - "NORMTESTER_GOTOINSTR @warmelt-genobj.melt:5592", + "NORMTESTER_GOTOINSTR @warmelt-genobj.melt:5608", MELT_ROUTDESCR_LEN - 1); cdat->drout_1672__NORMTESTER_GOTOINSTR.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1672__NORMTESTER_GOTOINSTR, @@ -31027,7 +31099,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1674__ENDMATCH_GOTOINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1674__ENDMATCH_GOTOINSTR.routdescr, - "ENDMATCH_GOTOINSTR @warmelt-genobj.melt:5625", + "ENDMATCH_GOTOINSTR @warmelt-genobj.melt:5641", MELT_ROUTDESCR_LEN - 1); cdat->drout_1674__ENDMATCH_GOTOINSTR.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1674__ENDMATCH_GOTOINSTR, @@ -31046,7 +31118,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1676__TESTMATCH_GOTOINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1676__TESTMATCH_GOTOINSTR.routdescr, - "TESTMATCH_GOTOINSTR @warmelt-genobj.melt:5649", + "TESTMATCH_GOTOINSTR @warmelt-genobj.melt:5665", MELT_ROUTDESCR_LEN - 1); cdat->drout_1676__TESTMATCH_GOTOINSTR.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1676__TESTMATCH_GOTOINSTR, @@ -31065,7 +31137,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1678__NORMTESTER_FREE_OBJLOC_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1678__NORMTESTER_FREE_OBJLOC_LIST.routdescr, - "NORMTESTER_FREE_OBJLOC_LIST @warmelt-genobj.melt:5675", + "NORMTESTER_FREE_OBJLOC_LIST @warmelt-genobj.melt:5691", MELT_ROUTDESCR_LEN - 1); cdat->drout_1678__NORMTESTER_FREE_OBJLOC_LIST.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1678__NORMTESTER_FREE_OBJLOC_LIST, @@ -31084,7 +31156,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1680__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1680__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:5689", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:5705", MELT_ROUTDESCR_LEN - 1); cdat->drout_1680__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1680__LAMBDA_, meltrout_168_warmelt_genobj_LAMBDA___51__); @@ -31095,7 +31167,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1681__COMPILTST_NORMTESTER_ANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1681__COMPILTST_NORMTESTER_ANY.routdescr, - "COMPILTST_NORMTESTER_ANY @warmelt-genobj.melt:5707", + "COMPILTST_NORMTESTER_ANY @warmelt-genobj.melt:5723", MELT_ROUTDESCR_LEN - 1); cdat->drout_1681__COMPILTST_NORMTESTER_ANY.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1681__COMPILTST_NORMTESTER_ANY, @@ -31114,7 +31186,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1683__COMPILTST_NORMTESTER_MATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1683__COMPILTST_NORMTESTER_MATCHER.routdescr, - "COMPILTST_NORMTESTER_MATCHER @warmelt-genobj.melt:5719", + "COMPILTST_NORMTESTER_MATCHER @warmelt-genobj.melt:5735", MELT_ROUTDESCR_LEN - 1); cdat->drout_1683__COMPILTST_NORMTESTER_MATCHER.nbval = 14; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1683__COMPILTST_NORMTESTER_MATCHER, @@ -31164,7 +31236,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1687__COMPILTST_NORMTESTER_INSTANCE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1687__COMPILTST_NORMTESTER_INSTANCE.routdescr, - "COMPILTST_NORMTESTER_INSTANCE @warmelt-genobj.melt:5792", + "COMPILTST_NORMTESTER_INSTANCE @warmelt-genobj.melt:5808", MELT_ROUTDESCR_LEN - 1); cdat->drout_1687__COMPILTST_NORMTESTER_INSTANCE.nbval = 19; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1687__COMPILTST_NORMTESTER_INSTANCE, @@ -31214,7 +31286,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1691__COMPILTST_NORMTESTER_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1691__COMPILTST_NORMTESTER_TUPLE.routdescr, - "COMPILTST_NORMTESTER_TUPLE @warmelt-genobj.melt:5892", + "COMPILTST_NORMTESTER_TUPLE @warmelt-genobj.melt:5908", MELT_ROUTDESCR_LEN - 1); cdat->drout_1691__COMPILTST_NORMTESTER_TUPLE.nbval = 20; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1691__COMPILTST_NORMTESTER_TUPLE, @@ -31264,7 +31336,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1695__COMPILTST_NORMTESTER_SAME.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1695__COMPILTST_NORMTESTER_SAME.routdescr, - "COMPILTST_NORMTESTER_SAME @warmelt-genobj.melt:5991", + "COMPILTST_NORMTESTER_SAME @warmelt-genobj.melt:6007", MELT_ROUTDESCR_LEN - 1); cdat->drout_1695__COMPILTST_NORMTESTER_SAME.nbval = 15; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1695__COMPILTST_NORMTESTER_SAME, @@ -31314,7 +31386,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1699__COMPILTST_NORMTESTER_SUCCESS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1699__COMPILTST_NORMTESTER_SUCCESS.routdescr, - "COMPILTST_NORMTESTER_SUCCESS @warmelt-genobj.melt:6059", + "COMPILTST_NORMTESTER_SUCCESS @warmelt-genobj.melt:6075", MELT_ROUTDESCR_LEN - 1); cdat->drout_1699__COMPILTST_NORMTESTER_SUCCESS.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1699__COMPILTST_NORMTESTER_SUCCESS, @@ -31333,7 +31405,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1701__COMPILTST_NORMTESTER_ORCLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1701__COMPILTST_NORMTESTER_ORCLEAR.routdescr, - "COMPILTST_NORMTESTER_ORCLEAR @warmelt-genobj.melt:6090", + "COMPILTST_NORMTESTER_ORCLEAR @warmelt-genobj.melt:6106", MELT_ROUTDESCR_LEN - 1); cdat->drout_1701__COMPILTST_NORMTESTER_ORCLEAR.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1701__COMPILTST_NORMTESTER_ORCLEAR, @@ -31383,7 +31455,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1705__COMPILTST_NORMTESTER_ORTRANSMIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1705__COMPILTST_NORMTESTER_ORTRANSMIT.routdescr, - "COMPILTST_NORMTESTER_ORTRANSMIT @warmelt-genobj.melt:6140", + "COMPILTST_NORMTESTER_ORTRANSMIT @warmelt-genobj.melt:6156", MELT_ROUTDESCR_LEN - 1); cdat->drout_1705__COMPILTST_NORMTESTER_ORTRANSMIT.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -31434,7 +31506,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1709__COMPILTST_NORMTESTER_DISJUNCTION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1709__COMPILTST_NORMTESTER_DISJUNCTION.routdescr, - "COMPILTST_NORMTESTER_DISJUNCTION @warmelt-genobj.melt:6191", + "COMPILTST_NORMTESTER_DISJUNCTION @warmelt-genobj.melt:6207", MELT_ROUTDESCR_LEN - 1); cdat->drout_1709__COMPILTST_NORMTESTER_DISJUNCTION.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -31485,7 +31557,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1713__COMPILMATCHER_CMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1713__COMPILMATCHER_CMATCHER.routdescr, - "COMPILMATCHER_CMATCHER @warmelt-genobj.melt:6231", + "COMPILMATCHER_CMATCHER @warmelt-genobj.melt:6247", MELT_ROUTDESCR_LEN - 1); cdat->drout_1713__COMPILMATCHER_CMATCHER.nbval = 37; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1713__COMPILMATCHER_CMATCHER, @@ -31566,7 +31638,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1719__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1719__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:6283", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:6299", MELT_ROUTDESCR_LEN - 1); cdat->drout_1719__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1719__LAMBDA_, meltrout_179_warmelt_genobj_LAMBDA___52__); @@ -31577,7 +31649,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1720__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1720__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:6296", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:6312", MELT_ROUTDESCR_LEN - 1); cdat->drout_1720__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1720__LAMBDA_, meltrout_180_warmelt_genobj_LAMBDA___53__); @@ -31588,7 +31660,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1721__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1721__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:6309", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:6325", MELT_ROUTDESCR_LEN - 1); cdat->drout_1721__LAMBDA_.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1721__LAMBDA_, meltrout_181_warmelt_genobj_LAMBDA___54__); @@ -31599,7 +31671,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1722__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1722__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:6312", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:6328", MELT_ROUTDESCR_LEN - 1); cdat->drout_1722__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1722__LAMBDA_, meltrout_182_warmelt_genobj_LAMBDA___55__); @@ -31610,7 +31682,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1723__COMPILMATCHER_FUNMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1723__COMPILMATCHER_FUNMATCHER.routdescr, - "COMPILMATCHER_FUNMATCHER @warmelt-genobj.melt:6393", + "COMPILMATCHER_FUNMATCHER @warmelt-genobj.melt:6409", MELT_ROUTDESCR_LEN - 1); cdat->drout_1723__COMPILMATCHER_FUNMATCHER.nbval = 23; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1723__COMPILMATCHER_FUNMATCHER, @@ -31660,7 +31732,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1727__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1727__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:6417", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:6433", MELT_ROUTDESCR_LEN - 1); cdat->drout_1727__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1727__LAMBDA_, meltrout_184_warmelt_genobj_LAMBDA___56__); @@ -31671,7 +31743,7 @@ initialize_module_meltdata_warmelt_genobj (initial_frame_st * iniframp__, cdat->drout_1728__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_1728__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-genobj.melt:6422", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-genobj.melt:6438", MELT_ROUTDESCR_LEN - 1); cdat->drout_1728__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_1728__LAMBDA_, meltrout_185_warmelt_genobj_LAMBDA___57__); @@ -31778,7 +31850,8 @@ start_module_melt (void *modargp_) melt_topframe = (struct melt_callframe_st *) &meltfram__; /**initial routine prologue**/ /* set initial frame marking */ - ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = /*minihash */ -683; + ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = + /*minihash */ -1561; ((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout = meltmod__warmelt_genobj__forward_or_mark_module_start_frame; /**COMMENT: get previous environment **/ ; @@ -79540,8 +79613,34 @@ meltmod__warmelt_genobj__initialmeltchunk_25 (struct ( /*_.VALROUT___V1580*/ meltfptr[1579])) == MELTOBMAG_ROUTINE); melt_assertmsg ("putroutconstnotnull notnullconst", - NULL != /*_.VALDATA___V457*/ meltfptr[456]); + NULL != /*_.VALCLO___V1068*/ meltfptr[1067]); ((meltroutine_ptr_t) /*_.VALROUT___V1580*/ meltfptr[1579])->tabval[10] = + (melt_ptr_t) ( /*_.VALCLO___V1068*/ meltfptr[1067]); + + MELT_LOCATION ("warmelt-genobj.melt:4094:/ initchunk"); + /*^putroutconst */ + /*putroutconst */ + melt_assertmsg ("putroutconst checkrout", + melt_magic_discr ((melt_ptr_t) + ( /*_.VALROUT___V1580*/ meltfptr[1579])) + == MELTOBMAG_ROUTINE); + if (MELT_HAS_INITIAL_ENVIRONMENT) + melt_checkmsg + ("putroutconst constnull.drout_1424__COMPILOBJ_NREP_RETURN#11", + NULL != ( /*_.CTYPE_VOID__V50*/ meltfptr[49])); + ((meltroutine_ptr_t) /*_.VALROUT___V1580*/ meltfptr[1579])->tabval[11] = + (melt_ptr_t) ( /*_.CTYPE_VOID__V50*/ meltfptr[49]); + + MELT_LOCATION ("warmelt-genobj.melt:4094:/ initchunk"); + /*^putroutconstnotnull */ + /*putroutconstnotnull */ + melt_assertmsg ("putroutconstnotnull checkrout", + melt_magic_discr ((melt_ptr_t) + ( /*_.VALROUT___V1580*/ meltfptr[1579])) + == MELTOBMAG_ROUTINE); + melt_assertmsg ("putroutconstnotnull notnullconst", + NULL != /*_.VALDATA___V457*/ meltfptr[456]); + ((meltroutine_ptr_t) /*_.VALROUT___V1580*/ meltfptr[1579])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V457*/ meltfptr[456]); MELT_LOCATION ("warmelt-genobj.melt:4094:/ initchunk"); @@ -79583,7 +79682,7 @@ meltmod__warmelt_genobj__initialmeltchunk_25 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1582*/ meltfptr[1581]); - MELT_LOCATION ("warmelt-genobj.melt:4136:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4152:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -79596,7 +79695,7 @@ meltmod__warmelt_genobj__initialmeltchunk_25 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1584*/ meltfptr[1583])->tabval[0] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]); - MELT_LOCATION ("warmelt-genobj.melt:4136:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4152:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1584*/ meltfptr[1583]); @@ -79620,7 +79719,20 @@ meltmod__warmelt_genobj__initialmeltchunk_25 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1585*/ meltfptr[1584]); - MELT_LOCATION ("warmelt-genobj.melt:4138:/ initchunk"); + +#undef meltfram__ +} /*end of meltmod__warmelt_genobj__initialmeltchunk_25 */ + +void +meltmod__warmelt_genobj__initialmeltchunk_26 (struct + frame_start_module_melt_st + *meltmeltframptr__, + char predefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + MELT_LOCATION ("warmelt-genobj.melt:4154:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -79654,23 +79766,10 @@ meltmod__warmelt_genobj__initialmeltchunk_25 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1589*/ meltfptr[1588]); - -#undef meltfram__ -} /*end of meltmod__warmelt_genobj__initialmeltchunk_25 */ - -void -meltmod__warmelt_genobj__initialmeltchunk_26 (struct - frame_start_module_melt_st - *meltmeltframptr__, - char predefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L -/*touch:VALUEDATA_*/ + /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1588*/ meltfptr[1587]); - MELT_LOCATION ("warmelt-genobj.melt:4138:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4154:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -79688,12 +79787,12 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALDATA___V1588*/ meltfptr[1587]); - MELT_LOCATION ("warmelt-genobj.melt:4138:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4154:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1587*/ meltfptr[1586]); - MELT_LOCATION ("warmelt-genobj.melt:4144:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -79707,7 +79806,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:4144:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -79721,7 +79820,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_LAMBDA__V114*/ meltfptr[113]); - MELT_LOCATION ("warmelt-genobj.melt:4144:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -79735,7 +79834,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:4144:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -79749,7 +79848,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]); - MELT_LOCATION ("warmelt-genobj.melt:4144:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -79761,7 +79860,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1194*/ meltfptr[1193]); - MELT_LOCATION ("warmelt-genobj.melt:4144:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -79775,7 +79874,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-genobj.melt:4144:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -79787,7 +79886,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V487*/ meltfptr[486]); - MELT_LOCATION ("warmelt-genobj.melt:4144:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -79799,7 +79898,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V767*/ meltfptr[766]); - MELT_LOCATION ("warmelt-genobj.melt:4144:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -79811,7 +79910,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1587*/ meltfptr[1586]); - MELT_LOCATION ("warmelt-genobj.melt:4144:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -79825,7 +79924,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[9] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4144:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -79839,7 +79938,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:4144:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -79853,7 +79952,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[11] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V53*/ meltfptr[52]); - MELT_LOCATION ("warmelt-genobj.melt:4144:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -79865,7 +79964,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V901*/ meltfptr[900]); - MELT_LOCATION ("warmelt-genobj.melt:4144:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -79879,7 +79978,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[13] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:4144:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -79893,7 +79992,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[14] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4180:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -79905,7 +80004,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1591*/ meltfptr[1590])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V901*/ meltfptr[900]); - MELT_LOCATION ("warmelt-genobj.melt:4180:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -79918,7 +80017,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1591*/ meltfptr[1590])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:4180:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -79931,12 +80030,12 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1591*/ meltfptr[1590])->tabval[2] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4180:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1591*/ meltfptr[1590]); - MELT_LOCATION ("warmelt-genobj.melt:4144:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -79950,7 +80049,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1590*/ meltfptr[1589])->tabval[15] = (melt_ptr_t) ( /*_.VALROUT___V1591*/ meltfptr[1590]); - MELT_LOCATION ("warmelt-genobj.melt:4144:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4160:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1590*/ meltfptr[1589]); @@ -79989,7 +80088,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1593*/ meltfptr[1592]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80003,7 +80102,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80017,7 +80116,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_INSTANCE__V115*/ meltfptr[114]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80031,7 +80130,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80045,7 +80144,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CLASS__V83*/ meltfptr[82]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80059,7 +80158,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80090,7 +80189,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1596*/ meltfptr[1595]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80104,7 +80203,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1596*/ meltfptr[1595]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80118,7 +80217,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[7] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80130,7 +80229,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V487*/ meltfptr[486]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80142,7 +80241,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V749*/ meltfptr[748]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80156,7 +80255,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80170,7 +80269,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[11] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V53*/ meltfptr[52]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80184,7 +80283,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_NREP_FIELDASSIGN__V96*/ meltfptr[95]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80198,7 +80297,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_FIELD__V92*/ meltfptr[91]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80212,7 +80311,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[14] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80226,7 +80325,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80238,7 +80337,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80252,7 +80351,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[17] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:4226:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4242:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80265,7 +80364,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_FIELDASSIGN__V96*/ meltfptr[95]); - MELT_LOCATION ("warmelt-genobj.melt:4226:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4242:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80278,7 +80377,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FIELD__V92*/ meltfptr[91]); - MELT_LOCATION ("warmelt-genobj.melt:4226:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4242:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80291,7 +80390,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[2] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4226:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4242:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80304,7 +80403,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]); - MELT_LOCATION ("warmelt-genobj.melt:4226:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4242:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80316,7 +80415,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850]); - MELT_LOCATION ("warmelt-genobj.melt:4226:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4242:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80329,12 +80428,12 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1598*/ meltfptr[1597])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:4226:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4242:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1598*/ meltfptr[1597]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80348,7 +80447,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1595*/ meltfptr[1594])->tabval[18] = (melt_ptr_t) ( /*_.VALROUT___V1598*/ meltfptr[1597]); - MELT_LOCATION ("warmelt-genobj.melt:4196:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4212:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1595*/ meltfptr[1594]); @@ -80387,7 +80486,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1600*/ meltfptr[1599]); - MELT_LOCATION ("warmelt-genobj.melt:4253:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4269:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80401,7 +80500,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1602*/ meltfptr[1601])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:4253:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4269:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80414,7 +80513,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1602*/ meltfptr[1601])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]); - MELT_LOCATION ("warmelt-genobj.melt:4253:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4269:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80427,7 +80526,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1602*/ meltfptr[1601])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:4253:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4269:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1602*/ meltfptr[1601]); @@ -80447,7 +80546,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1603*/ meltfptr[1602]); - MELT_LOCATION ("warmelt-genobj.melt:4262:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80461,7 +80560,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:4262:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80473,7 +80572,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V219*/ meltfptr[218]); - MELT_LOCATION ("warmelt-genobj.melt:4262:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80486,7 +80585,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1604*/ meltfptr[1603])->tabval[2] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]); - MELT_LOCATION ("warmelt-genobj.melt:4262:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1604*/ meltfptr[1603]); @@ -80525,7 +80624,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1606*/ meltfptr[1605]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80539,7 +80638,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_BOUND_DATA__V52*/ meltfptr[51]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80551,7 +80650,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80563,7 +80662,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V161*/ meltfptr[160]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80575,7 +80674,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80589,7 +80688,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80603,7 +80702,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[5] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80617,7 +80716,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAINSTANCE__V93*/ meltfptr[92]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80648,7 +80747,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1609*/ meltfptr[1608]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80681,7 +80780,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1611*/ meltfptr[1610]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80695,7 +80794,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1611*/ meltfptr[1610]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80709,7 +80808,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80723,7 +80822,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80735,7 +80834,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V331*/ meltfptr[330]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80749,7 +80848,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[13] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80763,7 +80862,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80775,7 +80874,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80789,7 +80888,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[16] = (melt_ptr_t) ( /*_.VALSTR___V1613*/ meltfptr[1612]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80801,7 +80900,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V617*/ meltfptr[616]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80815,7 +80914,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[18] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V53*/ meltfptr[52]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80829,7 +80928,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80841,7 +80940,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[20] = (melt_ptr_t) ( /*_.VALCLO___V1200*/ meltfptr[1199]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80855,7 +80954,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[21] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80867,7 +80966,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V1104*/ meltfptr[1103]); - MELT_LOCATION ("warmelt-genobj.melt:4349:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4365:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80881,7 +80980,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]); - MELT_LOCATION ("warmelt-genobj.melt:4349:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4365:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80893,7 +80992,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V1200*/ meltfptr[1199]); - MELT_LOCATION ("warmelt-genobj.melt:4349:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4365:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80906,7 +81005,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[2] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4349:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4365:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80918,12 +81017,12 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1614*/ meltfptr[1613])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1104*/ meltfptr[1103]); - MELT_LOCATION ("warmelt-genobj.melt:4349:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4365:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1614*/ meltfptr[1613]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80937,7 +81036,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[23] = (melt_ptr_t) ( /*_.VALROUT___V1614*/ meltfptr[1613]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80951,7 +81050,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[24] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80965,7 +81064,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[25] = (melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -80979,7 +81078,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[26] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -80991,7 +81090,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[27] = (melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850]); - MELT_LOCATION ("warmelt-genobj.melt:4367:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4383:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81004,7 +81103,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1615*/ meltfptr[1614])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4367:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4383:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81017,7 +81116,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1615*/ meltfptr[1614])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]); - MELT_LOCATION ("warmelt-genobj.melt:4367:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4383:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81030,7 +81129,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1615*/ meltfptr[1614])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:4367:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4383:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81042,12 +81141,12 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1615*/ meltfptr[1614])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V851*/ meltfptr[850]); - MELT_LOCATION ("warmelt-genobj.melt:4367:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4383:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1615*/ meltfptr[1614]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81061,7 +81160,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[28] = (melt_ptr_t) ( /*_.VALROUT___V1615*/ meltfptr[1614]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81073,7 +81172,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[29] = (melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81085,7 +81184,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[30] = (melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]); - MELT_LOCATION ("warmelt-genobj.melt:4394:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4410:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81097,12 +81196,12 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1616*/ meltfptr[1615])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]); - MELT_LOCATION ("warmelt-genobj.melt:4394:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4410:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1616*/ meltfptr[1615]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81116,7 +81215,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1608*/ meltfptr[1607])->tabval[31] = (melt_ptr_t) ( /*_.VALROUT___V1616*/ meltfptr[1615]); - MELT_LOCATION ("warmelt-genobj.melt:4278:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4294:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1608*/ meltfptr[1607]); @@ -81136,7 +81235,20 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1617*/ meltfptr[1616]); - MELT_LOCATION ("warmelt-genobj.melt:4416:/ initchunk"); + +#undef meltfram__ +} /*end of meltmod__warmelt_genobj__initialmeltchunk_26 */ + +void +meltmod__warmelt_genobj__initialmeltchunk_27 (struct + frame_start_module_melt_st + *meltmeltframptr__, + char predefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + MELT_LOCATION ("warmelt-genobj.melt:4432:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81150,7 +81262,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1618*/ meltfptr[1617])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:4416:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4432:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81164,20 +81276,7 @@ meltmod__warmelt_genobj__initialmeltchunk_26 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1618*/ meltfptr[1617])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - -#undef meltfram__ -} /*end of meltmod__warmelt_genobj__initialmeltchunk_26 */ - -void -meltmod__warmelt_genobj__initialmeltchunk_27 (struct - frame_start_module_melt_st - *meltmeltframptr__, - char predefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - MELT_LOCATION ("warmelt-genobj.melt:4416:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4432:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81191,7 +81290,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1618*/ meltfptr[1617])->tabval[2] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V53*/ meltfptr[52]); - MELT_LOCATION ("warmelt-genobj.melt:4416:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4432:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81203,7 +81302,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1618*/ meltfptr[1617])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1298*/ meltfptr[1297]); - MELT_LOCATION ("warmelt-genobj.melt:4421:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4437:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81215,12 +81314,12 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1619*/ meltfptr[1618])->tabval[0] = (melt_ptr_t) ( /*_.VALCLO___V1298*/ meltfptr[1297]); - MELT_LOCATION ("warmelt-genobj.melt:4421:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4437:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1619*/ meltfptr[1618]); - MELT_LOCATION ("warmelt-genobj.melt:4416:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4432:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81234,7 +81333,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1618*/ meltfptr[1617])->tabval[4] = (melt_ptr_t) ( /*_.VALROUT___V1619*/ meltfptr[1618]); - MELT_LOCATION ("warmelt-genobj.melt:4416:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4432:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1618*/ meltfptr[1617]); @@ -81254,7 +81353,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1620*/ meltfptr[1619]); - MELT_LOCATION ("warmelt-genobj.melt:4424:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4440:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81268,7 +81367,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:4424:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4440:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81282,7 +81381,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V55*/ meltfptr[54]); - MELT_LOCATION ("warmelt-genobj.melt:4424:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4440:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81296,7 +81395,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:4424:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4440:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81308,7 +81407,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]); - MELT_LOCATION ("warmelt-genobj.melt:4424:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4440:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81322,7 +81421,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4424:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4440:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81334,7 +81433,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270]); - MELT_LOCATION ("warmelt-genobj.melt:4424:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4440:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81348,7 +81447,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]); - MELT_LOCATION ("warmelt-genobj.melt:4424:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4440:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81362,7 +81461,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]); - MELT_LOCATION ("warmelt-genobj.melt:4424:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4440:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81376,7 +81475,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]); - MELT_LOCATION ("warmelt-genobj.melt:4424:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4440:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81388,7 +81487,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1621*/ meltfptr[1620])->tabval[9] = (melt_ptr_t) ( /*_.VALCLO___V1617*/ meltfptr[1616]); - MELT_LOCATION ("warmelt-genobj.melt:4424:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4440:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1621*/ meltfptr[1620]); @@ -81408,7 +81507,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1622*/ meltfptr[1621]); - MELT_LOCATION ("warmelt-genobj.melt:4475:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4491:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81422,7 +81521,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1623*/ meltfptr[1622])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:4475:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4491:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81436,7 +81535,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1623*/ meltfptr[1622])->tabval[1] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:4475:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4491:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81448,7 +81547,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1623*/ meltfptr[1622])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]); - MELT_LOCATION ("warmelt-genobj.melt:4475:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4491:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81462,7 +81561,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1623*/ meltfptr[1622])->tabval[3] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4475:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4491:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81474,7 +81573,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1623*/ meltfptr[1622])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V271*/ meltfptr[270]); - MELT_LOCATION ("warmelt-genobj.melt:4475:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4491:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81488,7 +81587,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1623*/ meltfptr[1622])->tabval[5] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]); - MELT_LOCATION ("warmelt-genobj.melt:4475:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4491:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81500,7 +81599,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1623*/ meltfptr[1622])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V257*/ meltfptr[256]); - MELT_LOCATION ("warmelt-genobj.melt:4475:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4491:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81514,7 +81613,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1623*/ meltfptr[1622])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]); - MELT_LOCATION ("warmelt-genobj.melt:4475:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4491:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81528,7 +81627,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1623*/ meltfptr[1622])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]); - MELT_LOCATION ("warmelt-genobj.melt:4475:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4491:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81540,7 +81639,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1623*/ meltfptr[1622])->tabval[9] = (melt_ptr_t) ( /*_.VALCLO___V1617*/ meltfptr[1616]); - MELT_LOCATION ("warmelt-genobj.melt:4475:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4491:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1623*/ meltfptr[1622]); @@ -81560,7 +81659,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1624*/ meltfptr[1623]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81573,7 +81672,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_DATATUPLE__V117*/ meltfptr[116]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81587,7 +81686,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81600,7 +81699,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81612,7 +81711,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81625,7 +81724,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[4] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81638,7 +81737,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[5] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4569:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4585:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81651,12 +81750,12 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1626*/ meltfptr[1625])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4569:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4585:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1626*/ meltfptr[1625]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81669,7 +81768,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[6] = (melt_ptr_t) ( /*_.VALROUT___V1626*/ meltfptr[1625]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81682,7 +81781,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[7] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81695,7 +81794,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81726,7 +81825,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1627*/ meltfptr[1626]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81759,7 +81858,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1629*/ meltfptr[1628]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81773,7 +81872,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1629*/ meltfptr[1628]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81785,7 +81884,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V277*/ meltfptr[276]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81799,7 +81898,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[13] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81813,7 +81912,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81827,7 +81926,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[15] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V53*/ meltfptr[52]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81839,7 +81938,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81853,7 +81952,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[17] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:4597:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81865,7 +81964,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V785*/ meltfptr[784]); - MELT_LOCATION ("warmelt-genobj.melt:4597:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81878,12 +81977,12 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1631*/ meltfptr[1630])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:4597:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4613:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1631*/ meltfptr[1630]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81897,7 +81996,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[18] = (melt_ptr_t) ( /*_.VALROUT___V1631*/ meltfptr[1630]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81909,7 +82008,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1625*/ meltfptr[1624])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]); - MELT_LOCATION ("warmelt-genobj.melt:4552:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4568:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1625*/ meltfptr[1624]); @@ -81948,7 +82047,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1633*/ meltfptr[1632]); - MELT_LOCATION ("warmelt-genobj.melt:4622:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4638:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81962,7 +82061,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_DATASTRING__V118*/ meltfptr[117]); - MELT_LOCATION ("warmelt-genobj.melt:4622:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4638:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -81976,7 +82075,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:4622:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4638:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -81988,7 +82087,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]); - MELT_LOCATION ("warmelt-genobj.melt:4622:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4638:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82002,7 +82101,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]); - MELT_LOCATION ("warmelt-genobj.melt:4622:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4638:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82016,7 +82115,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4622:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4638:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -82047,7 +82146,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1636*/ meltfptr[1635]); - MELT_LOCATION ("warmelt-genobj.melt:4622:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4638:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82061,7 +82160,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1636*/ meltfptr[1635]); - MELT_LOCATION ("warmelt-genobj.melt:4622:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4638:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -82073,7 +82172,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V307*/ meltfptr[306]); - MELT_LOCATION ("warmelt-genobj.melt:4622:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4638:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82087,7 +82186,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]); - MELT_LOCATION ("warmelt-genobj.melt:4622:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4638:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82101,7 +82200,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1635*/ meltfptr[1634])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]); - MELT_LOCATION ("warmelt-genobj.melt:4622:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4638:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1635*/ meltfptr[1634]); @@ -82140,7 +82239,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1639*/ meltfptr[1638]); - MELT_LOCATION ("warmelt-genobj.melt:4667:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4683:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82154,7 +82253,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1641*/ meltfptr[1640])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_DATABOXEDINTEGER__V119*/ meltfptr[118]); - MELT_LOCATION ("warmelt-genobj.melt:4667:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4683:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82168,7 +82267,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1641*/ meltfptr[1640])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:4667:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4683:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -82180,7 +82279,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1641*/ meltfptr[1640])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]); - MELT_LOCATION ("warmelt-genobj.melt:4667:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4683:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82194,7 +82293,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1641*/ meltfptr[1640])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]); - MELT_LOCATION ("warmelt-genobj.melt:4667:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4683:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82208,7 +82307,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1641*/ meltfptr[1640])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4667:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4683:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -82239,7 +82338,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1642*/ meltfptr[1641]); - MELT_LOCATION ("warmelt-genobj.melt:4667:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4683:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82253,7 +82352,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1641*/ meltfptr[1640])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1642*/ meltfptr[1641]); - MELT_LOCATION ("warmelt-genobj.melt:4667:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4683:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -82265,7 +82364,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1641*/ meltfptr[1640])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V325*/ meltfptr[324]); - MELT_LOCATION ("warmelt-genobj.melt:4667:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4683:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82279,7 +82378,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1641*/ meltfptr[1640])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]); - MELT_LOCATION ("warmelt-genobj.melt:4667:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4683:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82293,7 +82392,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1641*/ meltfptr[1640])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]); - MELT_LOCATION ("warmelt-genobj.melt:4667:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4683:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1641*/ meltfptr[1640]); @@ -82332,7 +82431,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1645*/ meltfptr[1644]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82346,7 +82445,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_DATACLOSURE__V120*/ meltfptr[119]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82360,7 +82459,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82374,7 +82473,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -82386,7 +82485,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82400,7 +82499,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82414,7 +82513,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[5] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -82445,7 +82544,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1648*/ meltfptr[1647]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82478,7 +82577,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1650*/ meltfptr[1649]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82492,7 +82591,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V1650*/ meltfptr[1649]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82506,7 +82605,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -82518,7 +82617,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V287*/ meltfptr[286]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82532,7 +82631,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[11] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82546,7 +82645,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82560,7 +82659,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAROUTINE__V121*/ meltfptr[120]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -82572,7 +82671,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V887*/ meltfptr[886]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82586,7 +82685,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[15] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -82598,7 +82697,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V1017*/ meltfptr[1016]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82612,7 +82711,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[17] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V53*/ meltfptr[52]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82626,7 +82725,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[18] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -82638,7 +82737,20 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V901*/ meltfptr[900]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + +#undef meltfram__ +} /*end of meltmod__warmelt_genobj__initialmeltchunk_27 */ + +void +meltmod__warmelt_genobj__initialmeltchunk_28 (struct + frame_start_module_melt_st + *meltmeltframptr__, + char predefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82652,7 +82764,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[20] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:4775:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4791:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82665,20 +82777,7 @@ meltmod__warmelt_genobj__initialmeltchunk_27 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1652*/ meltfptr[1651])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - -#undef meltfram__ -} /*end of meltmod__warmelt_genobj__initialmeltchunk_27 */ - -void -meltmod__warmelt_genobj__initialmeltchunk_28 (struct - frame_start_module_melt_st - *meltmeltframptr__, - char predefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - MELT_LOCATION ("warmelt-genobj.melt:4775:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4791:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -82690,7 +82789,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1652*/ meltfptr[1651])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V901*/ meltfptr[900]); - MELT_LOCATION ("warmelt-genobj.melt:4775:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4791:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82703,12 +82802,12 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1652*/ meltfptr[1651])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:4775:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4791:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1652*/ meltfptr[1651]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82722,7 +82821,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[21] = (melt_ptr_t) ( /*_.VALROUT___V1652*/ meltfptr[1651]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -82734,7 +82833,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1647*/ meltfptr[1646])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]); - MELT_LOCATION ("warmelt-genobj.melt:4712:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4728:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1647*/ meltfptr[1646]); @@ -82792,7 +82891,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1656*/ meltfptr[1655]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82806,7 +82905,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAROUTINE__V121*/ meltfptr[120]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82820,7 +82919,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -82832,7 +82931,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1043*/ meltfptr[1042]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -82863,7 +82962,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1659*/ meltfptr[1658]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82877,7 +82976,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V1659*/ meltfptr[1658]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82891,7 +82990,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82905,7 +83004,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82919,7 +83018,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[7] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -82931,7 +83030,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V297*/ meltfptr[296]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82945,7 +83044,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[9] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82959,7 +83058,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[10] = (melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -82973,7 +83072,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_NREP_ROUTPROC__V32*/ meltfptr[31]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83006,7 +83105,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1661*/ meltfptr[1660]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83020,7 +83119,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1661*/ meltfptr[1660]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83034,7 +83133,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[14] = (melt_ptr_t) ( /*_.LIST_EVERY__V42*/ meltfptr[41]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83048,7 +83147,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NREP_CONSTOCC__V64*/ meltfptr[63]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83062,7 +83161,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83076,7 +83175,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[17] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83090,7 +83189,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[18] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V47*/ meltfptr[46]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -83102,7 +83201,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V943*/ meltfptr[942]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83116,7 +83215,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[20] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -83128,7 +83227,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83142,7 +83241,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[22] = (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA__V122*/ meltfptr[121]); - MELT_LOCATION ("warmelt-genobj.melt:4856:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4872:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83155,7 +83254,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1663*/ meltfptr[1662])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_CONSTOCC__V64*/ meltfptr[63]); - MELT_LOCATION ("warmelt-genobj.melt:4856:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4872:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83168,7 +83267,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1663*/ meltfptr[1662])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]); - MELT_LOCATION ("warmelt-genobj.melt:4856:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4872:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83181,7 +83280,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1663*/ meltfptr[1662])->tabval[2] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4856:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4872:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83194,7 +83293,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1663*/ meltfptr[1662])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_FIXED_BINDING__V47*/ meltfptr[46]); - MELT_LOCATION ("warmelt-genobj.melt:4856:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -83206,7 +83305,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1663*/ meltfptr[1662])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V943*/ meltfptr[942]); - MELT_LOCATION ("warmelt-genobj.melt:4856:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4872:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83219,7 +83318,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1663*/ meltfptr[1662])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:4856:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4872:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -83231,7 +83330,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1663*/ meltfptr[1662])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]); - MELT_LOCATION ("warmelt-genobj.melt:4856:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4872:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83244,12 +83343,12 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1663*/ meltfptr[1662])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA__V122*/ meltfptr[121]); - MELT_LOCATION ("warmelt-genobj.melt:4856:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4872:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1663*/ meltfptr[1662]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83263,7 +83362,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[23] = (melt_ptr_t) ( /*_.VALROUT___V1663*/ meltfptr[1662]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -83275,7 +83374,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[24] = (melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83289,7 +83388,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1658*/ meltfptr[1657])->tabval[25] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:4799:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4815:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1658*/ meltfptr[1657]); @@ -83328,7 +83427,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1665*/ meltfptr[1664]); - MELT_LOCATION ("warmelt-genobj.melt:4917:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4933:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83344,7 +83443,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V123*/ meltfptr[122]); - MELT_LOCATION ("warmelt-genobj.melt:4917:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4933:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83358,7 +83457,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1667*/ meltfptr[1666])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43]); - MELT_LOCATION ("warmelt-genobj.melt:4917:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4933:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1667*/ meltfptr[1666]); @@ -83397,7 +83496,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1669*/ meltfptr[1668]); - MELT_LOCATION ("warmelt-genobj.melt:4927:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4943:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83414,7 +83513,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_PARENT_MODULE_ENVIRONMENT__V124*/ meltfptr[123]); - MELT_LOCATION ("warmelt-genobj.melt:4927:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4943:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83428,7 +83527,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1671*/ meltfptr[1670])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43]); - MELT_LOCATION ("warmelt-genobj.melt:4927:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4943:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1671*/ meltfptr[1670]); @@ -83467,7 +83566,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1673*/ meltfptr[1672]); - MELT_LOCATION ("warmelt-genobj.melt:4937:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4953:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83481,7 +83580,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_STORE_PREDEFINED__V125*/ meltfptr[124]); - MELT_LOCATION ("warmelt-genobj.melt:4937:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4953:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83495,7 +83594,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:4937:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4953:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83509,7 +83608,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:4937:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4953:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83523,7 +83622,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[3] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4937:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4953:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83537,7 +83636,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-genobj.melt:4937:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4953:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83551,7 +83650,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]); - MELT_LOCATION ("warmelt-genobj.melt:4937:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4953:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83565,7 +83664,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-genobj.melt:4937:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4953:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -83577,7 +83676,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1088*/ meltfptr[1087]); - MELT_LOCATION ("warmelt-genobj.melt:4937:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4953:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83591,7 +83690,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1675*/ meltfptr[1674])->tabval[8] = (melt_ptr_t) ( /*_.CTYPE_VOID__V50*/ meltfptr[49]); - MELT_LOCATION ("warmelt-genobj.melt:4937:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4953:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1675*/ meltfptr[1674]); @@ -83630,7 +83729,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1677*/ meltfptr[1676]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83646,7 +83745,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V126*/ meltfptr[125]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83660,7 +83759,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_INITIAL_GENERATION_CONTEXT__V44*/ meltfptr[43]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83674,7 +83773,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83688,7 +83787,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83702,7 +83801,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -83714,7 +83813,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V507*/ meltfptr[506]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83728,7 +83827,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_STRING__V35*/ meltfptr[34]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83742,7 +83841,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[7] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83756,7 +83855,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[8] = (melt_ptr_t) ( /*_.LIST_EVERY__V42*/ meltfptr[41]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -83768,7 +83867,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1017*/ meltfptr[1016]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83782,7 +83881,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[10] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83796,7 +83895,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -83808,7 +83907,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V297*/ meltfptr[296]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83822,7 +83921,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[13] = (melt_ptr_t) ( /*_.LIST_EVERY__V42*/ meltfptr[41]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83838,7 +83937,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V123*/ meltfptr[122]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -83850,7 +83949,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83864,7 +83963,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[16] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -83876,7 +83975,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -83888,7 +83987,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V405*/ meltfptr[404]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83902,7 +84001,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[19] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]); - MELT_LOCATION ("warmelt-genobj.melt:5007:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5023:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -83914,7 +84013,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1680*/ meltfptr[1679])->tabval[0] = (melt_ptr_t) ( /*_.VALDATA___V1017*/ meltfptr[1016]); - MELT_LOCATION ("warmelt-genobj.melt:5007:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5023:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83927,7 +84026,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1680*/ meltfptr[1679])->tabval[1] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:5007:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5023:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83940,7 +84039,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1680*/ meltfptr[1679])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:5007:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5023:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -83952,7 +84051,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1680*/ meltfptr[1679])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V297*/ meltfptr[296]); - MELT_LOCATION ("warmelt-genobj.melt:5007:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5023:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83965,7 +84064,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1680*/ meltfptr[1679])->tabval[4] = (melt_ptr_t) ( /*_.LIST_EVERY__V42*/ meltfptr[41]); - MELT_LOCATION ("warmelt-genobj.melt:5007:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5023:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -83979,7 +84078,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1680*/ meltfptr[1679])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V123*/ meltfptr[122]); - MELT_LOCATION ("warmelt-genobj.melt:5007:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5023:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -83991,7 +84090,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1680*/ meltfptr[1679])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]); - MELT_LOCATION ("warmelt-genobj.melt:5007:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5023:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -84004,7 +84103,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1680*/ meltfptr[1679])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:5007:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5023:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -84016,7 +84115,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1680*/ meltfptr[1679])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]); - MELT_LOCATION ("warmelt-genobj.melt:5007:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5023:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -84028,7 +84127,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1680*/ meltfptr[1679])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V405*/ meltfptr[404]); - MELT_LOCATION ("warmelt-genobj.melt:5007:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5023:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -84041,7 +84140,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1680*/ meltfptr[1679])->tabval[10] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]); - MELT_LOCATION ("warmelt-genobj.melt:5020:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5036:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -84055,7 +84154,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1681*/ meltfptr[1680])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_QUASIDATA_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V123*/ meltfptr[122]); - MELT_LOCATION ("warmelt-genobj.melt:5020:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5036:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -84067,7 +84166,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1681*/ meltfptr[1680])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V925*/ meltfptr[924]); - MELT_LOCATION ("warmelt-genobj.melt:5020:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5036:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -84080,7 +84179,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1681*/ meltfptr[1680])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:5020:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5036:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -84092,7 +84191,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1681*/ meltfptr[1680])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V949*/ meltfptr[948]); - MELT_LOCATION ("warmelt-genobj.melt:5020:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5036:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -84105,7 +84204,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1681*/ meltfptr[1680])->tabval[4] = (melt_ptr_t) ( /*_.VALSTR___V1682*/ meltfptr[1681]); - MELT_LOCATION ("warmelt-genobj.melt:5020:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5036:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -84117,7 +84216,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1681*/ meltfptr[1680])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V405*/ meltfptr[404]); - MELT_LOCATION ("warmelt-genobj.melt:5020:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5036:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -84130,12 +84229,12 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1681*/ meltfptr[1680])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V24*/ meltfptr[23]); - MELT_LOCATION ("warmelt-genobj.melt:5020:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5036:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1681*/ meltfptr[1680]); - MELT_LOCATION ("warmelt-genobj.melt:5007:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5023:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -84148,12 +84247,12 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1680*/ meltfptr[1679])->tabval[11] = (melt_ptr_t) ( /*_.VALROUT___V1681*/ meltfptr[1680]); - MELT_LOCATION ("warmelt-genobj.melt:5007:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5023:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1680*/ meltfptr[1679]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -84167,7 +84266,20 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1679*/ meltfptr[1678])->tabval[20] = (melt_ptr_t) ( /*_.VALROUT___V1680*/ meltfptr[1679]); - MELT_LOCATION ("warmelt-genobj.melt:4976:/ initchunk"); + +#undef meltfram__ +} /*end of meltmod__warmelt_genobj__initialmeltchunk_28 */ + +void +meltmod__warmelt_genobj__initialmeltchunk_29 (struct + frame_start_module_melt_st + *meltmeltframptr__, + char predefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + MELT_LOCATION ("warmelt-genobj.melt:4992:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1679*/ meltfptr[1678]); @@ -84184,20 +84296,7 @@ meltmod__warmelt_genobj__initialmeltchunk_28 (struct ((meltclosure_ptr_t) /*_.VALCLO___V1683*/ meltfptr[1682])->rout = (meltroutine_ptr_t) ( /*_.VALROUT___V1679*/ meltfptr[1678]); - -#undef meltfram__ -} /*end of meltmod__warmelt_genobj__initialmeltchunk_28 */ - -void -meltmod__warmelt_genobj__initialmeltchunk_29 (struct - frame_start_module_melt_st - *meltmeltframptr__, - char predefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L -/*touch:DATACLOSURE_*/ + /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1683*/ meltfptr[1682]); /*putslot */ @@ -84238,7 +84337,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1686*/ meltfptr[1685]); - MELT_LOCATION ("warmelt-genobj.melt:5073:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5089:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84256,7 +84355,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1689*/ meltfptr[1688]); - MELT_LOCATION ("warmelt-genobj.melt:5073:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5089:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1688*/ meltfptr[1687]); @@ -84299,7 +84398,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1692*/ meltfptr[1691]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84317,7 +84416,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1695*/ meltfptr[1694]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84370,7 +84469,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1696*/ meltfptr[1695]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84388,7 +84487,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1696*/ meltfptr[1695]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84406,7 +84505,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1698*/ meltfptr[1697]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84424,12 +84523,12 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1694*/ meltfptr[1693]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1697*/ meltfptr[1696]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84447,7 +84546,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1700*/ meltfptr[1699]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84465,12 +84564,12 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1694*/ meltfptr[1693]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1699*/ meltfptr[1698]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84488,7 +84587,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1702*/ meltfptr[1701]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84506,12 +84605,12 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1694*/ meltfptr[1693]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1701*/ meltfptr[1700]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84529,7 +84628,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1704*/ meltfptr[1703]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84547,12 +84646,12 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1694*/ meltfptr[1693]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1703*/ meltfptr[1702]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84570,7 +84669,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1706*/ meltfptr[1705]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84588,12 +84687,12 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1694*/ meltfptr[1693]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1705*/ meltfptr[1704]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84611,7 +84710,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1708*/ meltfptr[1707]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84629,12 +84728,12 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1694*/ meltfptr[1693]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1707*/ meltfptr[1706]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84652,7 +84751,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1710*/ meltfptr[1709]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84670,7 +84769,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1694*/ meltfptr[1693]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1709*/ meltfptr[1708]); @@ -84794,7 +84893,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1711*/ meltfptr[1710]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84812,7 +84911,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1711*/ meltfptr[1710]); - MELT_LOCATION ("warmelt-genobj.melt:5077:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5093:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1694*/ meltfptr[1693]); @@ -84969,7 +85068,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1726*/ meltfptr[1725]); - MELT_LOCATION ("warmelt-genobj.melt:5095:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5111:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -84987,7 +85086,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1729*/ meltfptr[1728]); - MELT_LOCATION ("warmelt-genobj.melt:5095:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5111:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1728*/ meltfptr[1727]); @@ -85011,7 +85110,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1730*/ meltfptr[1729]); - MELT_LOCATION ("warmelt-genobj.melt:5098:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5114:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -85029,7 +85128,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1733*/ meltfptr[1732]); - MELT_LOCATION ("warmelt-genobj.melt:5098:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5114:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -85082,7 +85181,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1734*/ meltfptr[1733]); - MELT_LOCATION ("warmelt-genobj.melt:5098:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5114:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -85100,7 +85199,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1734*/ meltfptr[1733]); - MELT_LOCATION ("warmelt-genobj.melt:5098:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5114:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -85118,7 +85217,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1736*/ meltfptr[1735]); - MELT_LOCATION ("warmelt-genobj.melt:5098:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5114:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -85136,12 +85235,12 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]); - MELT_LOCATION ("warmelt-genobj.melt:5098:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5114:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1735*/ meltfptr[1734]); - MELT_LOCATION ("warmelt-genobj.melt:5098:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5114:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -85159,7 +85258,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1738*/ meltfptr[1737]); - MELT_LOCATION ("warmelt-genobj.melt:5098:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5114:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -85177,12 +85276,12 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]); - MELT_LOCATION ("warmelt-genobj.melt:5098:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5114:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1737*/ meltfptr[1736]); - MELT_LOCATION ("warmelt-genobj.melt:5098:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5114:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -85200,7 +85299,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1740*/ meltfptr[1739]); - MELT_LOCATION ("warmelt-genobj.melt:5098:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5114:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -85218,7 +85317,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]); - MELT_LOCATION ("warmelt-genobj.melt:5098:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5114:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1739*/ meltfptr[1738]); @@ -85286,7 +85385,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1741*/ meltfptr[1740]); - MELT_LOCATION ("warmelt-genobj.melt:5098:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5114:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -85304,7 +85403,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1741*/ meltfptr[1740]); - MELT_LOCATION ("warmelt-genobj.melt:5098:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5114:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1732*/ meltfptr[1731]); @@ -85366,7 +85465,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1746*/ meltfptr[1745]); - MELT_LOCATION ("warmelt-genobj.melt:5108:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5124:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85379,7 +85478,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1748*/ meltfptr[1747])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V128*/ meltfptr[127]); - MELT_LOCATION ("warmelt-genobj.melt:5108:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5124:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85393,7 +85492,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1748*/ meltfptr[1747])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:5108:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5124:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -85405,7 +85504,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1748*/ meltfptr[1747])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]); - MELT_LOCATION ("warmelt-genobj.melt:5108:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5124:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85418,7 +85517,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1748*/ meltfptr[1747])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5108:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5124:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1748*/ meltfptr[1747]); @@ -85457,7 +85556,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1750*/ meltfptr[1749]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85471,7 +85570,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V129*/ meltfptr[128]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85485,7 +85584,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85499,7 +85598,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85513,7 +85612,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85527,7 +85626,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85541,7 +85640,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -85553,7 +85652,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V517*/ meltfptr[516]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -85565,7 +85664,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V551*/ meltfptr[550]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85579,7 +85678,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -85591,7 +85690,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V537*/ meltfptr[536]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -85603,7 +85702,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85617,7 +85716,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[11] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85631,7 +85730,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V128*/ meltfptr[127]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85645,7 +85744,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANYTESTER__V130*/ meltfptr[129]); - MELT_LOCATION ("warmelt-genobj.melt:5560:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85659,7 +85758,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1754*/ meltfptr[1753])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5560:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85673,7 +85772,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1754*/ meltfptr[1753])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:5560:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85687,7 +85786,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1754*/ meltfptr[1753])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V128*/ meltfptr[127]); - MELT_LOCATION ("warmelt-genobj.melt:5560:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85701,7 +85800,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1754*/ meltfptr[1753])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V129*/ meltfptr[128]); - MELT_LOCATION ("warmelt-genobj.melt:5560:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -85713,12 +85812,25 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1754*/ meltfptr[1753])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V537*/ meltfptr[536]); - MELT_LOCATION ("warmelt-genobj.melt:5560:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5576:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1754*/ meltfptr[1753]); - /*putclosurout#106 */ + +#undef meltfram__ +} /*end of meltmod__warmelt_genobj__initialmeltchunk_29 */ + +void +meltmod__warmelt_genobj__initialmeltchunk_30 (struct + frame_start_module_melt_st + *meltmeltframptr__, + char predefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L +/*putclosurout#106*/ melt_assertmsg ("putclosrout#106 checkclo", melt_magic_discr ((melt_ptr_t) ( /*_.VALCLO___V1753*/ meltfptr[1752])) == @@ -85733,20 +85845,7 @@ meltmod__warmelt_genobj__initialmeltchunk_29 (struct /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1753*/ meltfptr[1752]); - -#undef meltfram__ -} /*end of meltmod__warmelt_genobj__initialmeltchunk_29 */ - -void -meltmod__warmelt_genobj__initialmeltchunk_30 (struct - frame_start_module_melt_st - *meltmeltframptr__, - char predefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -85758,7 +85857,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[14] = (melt_ptr_t) ( /*_.VALCLO___V1753*/ meltfptr[1752]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -85770,7 +85869,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V1728*/ meltfptr[1727]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85784,7 +85883,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[16] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85798,7 +85897,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SUCCESS__V131*/ meltfptr[130]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85812,7 +85911,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[18] = (melt_ptr_t) ( /*_.MAPOBJECT_EVERY__V132*/ meltfptr[131]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85826,7 +85925,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[19] = (melt_ptr_t) ( /*_.LIST_FIND__V133*/ meltfptr[132]); - MELT_LOCATION ("warmelt-genobj.melt:5255:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5271:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85839,12 +85938,12 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1755*/ meltfptr[1754])->tabval[0] = (melt_ptr_t) ( /*_.LIST_FIND__V133*/ meltfptr[132]); - MELT_LOCATION ("warmelt-genobj.melt:5255:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5271:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1755*/ meltfptr[1754]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85858,7 +85957,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[20] = (melt_ptr_t) ( /*_.VALROUT___V1755*/ meltfptr[1754]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85872,7 +85971,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[21] = (melt_ptr_t) ( /*_.LIST_FIND__V133*/ meltfptr[132]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -85884,7 +85983,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -85896,7 +85995,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[23] = (melt_ptr_t) ( /*_.VALCLO___V1296*/ meltfptr[1295]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85910,7 +86009,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[24] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V16*/ meltfptr[15]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -85924,7 +86023,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1752*/ meltfptr[1751])->tabval[25] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]); - MELT_LOCATION ("warmelt-genobj.melt:5122:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5138:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1752*/ meltfptr[1751]); @@ -86077,7 +86176,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1769*/ meltfptr[1768]); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -86095,7 +86194,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1772*/ meltfptr[1771]); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -86130,7 +86229,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1773*/ meltfptr[1772]); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -86148,7 +86247,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct obj_vartab[5] = (melt_ptr_t) ( /*_.VALTUP___V1773*/ meltfptr[1772]); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -86166,7 +86265,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1775*/ meltfptr[1774]); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -86184,12 +86283,12 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1771*/ meltfptr[1770]); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1774*/ meltfptr[1773]); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -86207,7 +86306,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1777*/ meltfptr[1776]); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -86225,12 +86324,12 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1771*/ meltfptr[1770]); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1776*/ meltfptr[1775]); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -86248,7 +86347,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1779*/ meltfptr[1778]); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -86266,12 +86365,12 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1771*/ meltfptr[1770]); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1778*/ meltfptr[1777]); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -86289,7 +86388,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct obj_vartab[1] = (melt_ptr_t) ( /*_.VALSTR___V1781*/ meltfptr[1780]); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -86307,7 +86406,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct obj_vartab[2] = (melt_ptr_t) ( /*_.VALDATA___V1771*/ meltfptr[1770]); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1780*/ meltfptr[1779]); @@ -86371,7 +86470,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V1782*/ meltfptr[1781]); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -86389,7 +86488,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct obj_vartab[6] = (melt_ptr_t) ( /*_.VALTUP___V1782*/ meltfptr[1781]); - MELT_LOCATION ("warmelt-genobj.melt:5320:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5336:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1771*/ meltfptr[1770]); @@ -86470,7 +86569,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1789*/ meltfptr[1788]); - MELT_LOCATION ("warmelt-genobj.melt:5331:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86484,7 +86583,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_ALTMATCH__V135*/ meltfptr[134]); - MELT_LOCATION ("warmelt-genobj.melt:5331:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86498,7 +86597,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:5331:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86512,7 +86611,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5331:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -86524,7 +86623,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V527*/ meltfptr[526]); - MELT_LOCATION ("warmelt-genobj.melt:5331:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86538,7 +86637,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-genobj.melt:5331:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86552,7 +86651,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V37*/ meltfptr[36]); - MELT_LOCATION ("warmelt-genobj.melt:5331:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -86564,7 +86663,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1771*/ meltfptr[1770]); - MELT_LOCATION ("warmelt-genobj.melt:5331:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86578,7 +86677,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V85*/ meltfptr[84]); - MELT_LOCATION ("warmelt-genobj.melt:5331:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -86590,7 +86689,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1200*/ meltfptr[1199]); - MELT_LOCATION ("warmelt-genobj.melt:5331:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -86602,7 +86701,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]); - MELT_LOCATION ("warmelt-genobj.melt:5331:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86616,7 +86715,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[10] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]); - MELT_LOCATION ("warmelt-genobj.melt:5331:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86630,7 +86729,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[11] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5331:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86644,7 +86743,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[12] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:5374:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86657,7 +86756,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5374:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5390:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86670,12 +86769,12 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1792*/ meltfptr[1791])->tabval[1] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:5374:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5390:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1792*/ meltfptr[1791]); - MELT_LOCATION ("warmelt-genobj.melt:5331:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86689,7 +86788,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[13] = (melt_ptr_t) ( /*_.VALROUT___V1792*/ meltfptr[1791]); - MELT_LOCATION ("warmelt-genobj.melt:5331:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86703,7 +86802,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[14] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:5331:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -86715,7 +86814,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1791*/ meltfptr[1790])->tabval[15] = (melt_ptr_t) ( /*_.VALCLO___V1296*/ meltfptr[1295]); - MELT_LOCATION ("warmelt-genobj.melt:5331:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5347:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1791*/ meltfptr[1790]); @@ -86754,7 +86853,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1794*/ meltfptr[1793]); - MELT_LOCATION ("warmelt-genobj.melt:5404:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5420:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86768,7 +86867,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1796*/ meltfptr[1795])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_LABEL__V136*/ meltfptr[135]); - MELT_LOCATION ("warmelt-genobj.melt:5404:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5420:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86782,7 +86881,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1796*/ meltfptr[1795])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:5404:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5420:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86796,7 +86895,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1796*/ meltfptr[1795])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5404:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5420:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86810,7 +86909,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1796*/ meltfptr[1795])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]); - MELT_LOCATION ("warmelt-genobj.melt:5404:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5420:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86824,7 +86923,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1796*/ meltfptr[1795])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_MATCH_STEP_WITH_DATA__V137*/ meltfptr[136]); - MELT_LOCATION ("warmelt-genobj.melt:5404:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5420:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -86836,7 +86935,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1796*/ meltfptr[1795])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1088*/ meltfptr[1087]); - MELT_LOCATION ("warmelt-genobj.melt:5404:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5420:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86850,7 +86949,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1796*/ meltfptr[1795])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VOID__V50*/ meltfptr[49]); - MELT_LOCATION ("warmelt-genobj.melt:5404:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5420:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1796*/ meltfptr[1795]); @@ -86908,7 +87007,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1800*/ meltfptr[1799]); - MELT_LOCATION ("warmelt-genobj.melt:5431:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5447:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86922,7 +87021,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5431:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5447:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86936,7 +87035,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_FLAG__V138*/ meltfptr[137]); - MELT_LOCATION ("warmelt-genobj.melt:5431:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5447:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86950,7 +87049,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:5431:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5447:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -86962,7 +87061,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1771*/ meltfptr[1770]); - MELT_LOCATION ("warmelt-genobj.melt:5431:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5447:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -86974,7 +87073,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V351*/ meltfptr[350]); - MELT_LOCATION ("warmelt-genobj.melt:5431:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5447:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -86988,7 +87087,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[5] = (melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]); - MELT_LOCATION ("warmelt-genobj.melt:5431:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5447:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87002,7 +87101,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1802*/ meltfptr[1801])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_MATCH_FLAG__V139*/ meltfptr[138]); - MELT_LOCATION ("warmelt-genobj.melt:5431:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5447:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1802*/ meltfptr[1801]); @@ -87060,7 +87159,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1806*/ meltfptr[1805]); - MELT_LOCATION ("warmelt-genobj.melt:5464:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5480:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87074,7 +87173,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5464:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5480:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87090,7 +87189,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_DATA_INITIALIZER__V140*/ meltfptr[139]); - MELT_LOCATION ("warmelt-genobj.melt:5464:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5480:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87104,7 +87203,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:5464:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5480:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87118,7 +87217,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_DATA_ACTION__V141*/ meltfptr[140]); - MELT_LOCATION ("warmelt-genobj.melt:5464:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5480:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87132,7 +87231,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCHED_DATA__V142*/ meltfptr[141]); - MELT_LOCATION ("warmelt-genobj.melt:5464:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5480:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87165,7 +87264,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1809*/ meltfptr[1808]); - MELT_LOCATION ("warmelt-genobj.melt:5464:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5480:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87179,7 +87278,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V1809*/ meltfptr[1808]); - MELT_LOCATION ("warmelt-genobj.melt:5464:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5480:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87193,7 +87292,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_MATCHED_DATA__V144*/ meltfptr[143]); - MELT_LOCATION ("warmelt-genobj.melt:5464:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5480:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -87205,7 +87304,20 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1200*/ meltfptr[1199]); - MELT_LOCATION ("warmelt-genobj.melt:5464:/ initchunk"); + +#undef meltfram__ +} /*end of meltmod__warmelt_genobj__initialmeltchunk_30 */ + +void +meltmod__warmelt_genobj__initialmeltchunk_31 (struct + frame_start_module_melt_st + *meltmeltframptr__, + char predefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + MELT_LOCATION ("warmelt-genobj.melt:5480:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -87217,7 +87329,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V1771*/ meltfptr[1770]); - MELT_LOCATION ("warmelt-genobj.melt:5464:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5480:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -87229,20 +87341,7 @@ meltmod__warmelt_genobj__initialmeltchunk_30 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1808*/ meltfptr[1807])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]); - -#undef meltfram__ -} /*end of meltmod__warmelt_genobj__initialmeltchunk_30 */ - -void -meltmod__warmelt_genobj__initialmeltchunk_31 (struct - frame_start_module_melt_st - *meltmeltframptr__, - char predefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - MELT_LOCATION ("warmelt-genobj.melt:5464:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5480:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1808*/ meltfptr[1807]); @@ -87357,7 +87456,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1820*/ meltfptr[1819]); - MELT_LOCATION ("warmelt-genobj.melt:5505:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5521:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87371,7 +87470,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1822*/ meltfptr[1821])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5505:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5521:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87385,7 +87484,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1822*/ meltfptr[1821])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCHED_DATA__V142*/ meltfptr[141]); - MELT_LOCATION ("warmelt-genobj.melt:5505:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5521:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87399,7 +87498,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1822*/ meltfptr[1821])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:5505:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5521:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -87411,7 +87510,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1822*/ meltfptr[1821])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1771*/ meltfptr[1770]); - MELT_LOCATION ("warmelt-genobj.melt:5505:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5521:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -87423,7 +87522,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1822*/ meltfptr[1821])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V161*/ meltfptr[160]); - MELT_LOCATION ("warmelt-genobj.melt:5505:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5521:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1822*/ meltfptr[1821]); @@ -87443,7 +87542,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1823*/ meltfptr[1822]); - MELT_LOCATION ("warmelt-genobj.melt:5531:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5547:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87457,7 +87556,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1824*/ meltfptr[1823])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5531:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5547:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87471,7 +87570,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1824*/ meltfptr[1823])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH_JUMP__V145*/ meltfptr[144]); - MELT_LOCATION ("warmelt-genobj.melt:5531:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5547:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87485,7 +87584,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1824*/ meltfptr[1823])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:5531:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5547:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -87497,7 +87596,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1824*/ meltfptr[1823])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V1088*/ meltfptr[1087]); - MELT_LOCATION ("warmelt-genobj.melt:5531:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5547:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87511,7 +87610,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1824*/ meltfptr[1823])->tabval[4] = (melt_ptr_t) ( /*_.CTYPE_VOID__V50*/ meltfptr[49]); - MELT_LOCATION ("warmelt-genobj.melt:5531:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5547:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1824*/ meltfptr[1823]); @@ -87550,7 +87649,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1826*/ meltfptr[1825]); - MELT_LOCATION ("warmelt-genobj.melt:5592:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5608:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87564,7 +87663,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1828*/ meltfptr[1827])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5592:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5608:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87578,7 +87677,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1828*/ meltfptr[1827])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:5592:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5608:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87592,7 +87691,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1828*/ meltfptr[1827])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V128*/ meltfptr[127]); - MELT_LOCATION ("warmelt-genobj.melt:5592:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5608:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87606,7 +87705,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1828*/ meltfptr[1827])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V129*/ meltfptr[128]); - MELT_LOCATION ("warmelt-genobj.melt:5592:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5608:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -87618,7 +87717,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1828*/ meltfptr[1827])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V551*/ meltfptr[550]); - MELT_LOCATION ("warmelt-genobj.melt:5592:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5608:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1828*/ meltfptr[1827]); @@ -87638,7 +87737,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1829*/ meltfptr[1828]); - MELT_LOCATION ("warmelt-genobj.melt:5625:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5641:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87651,7 +87750,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1830*/ meltfptr[1829])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V129*/ meltfptr[128]); - MELT_LOCATION ("warmelt-genobj.melt:5625:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5641:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87665,7 +87764,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1830*/ meltfptr[1829])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:5625:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5641:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87678,7 +87777,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1830*/ meltfptr[1829])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5625:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5641:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87691,7 +87790,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1830*/ meltfptr[1829])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]); - MELT_LOCATION ("warmelt-genobj.melt:5625:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5641:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -87703,7 +87802,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1830*/ meltfptr[1829])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V551*/ meltfptr[550]); - MELT_LOCATION ("warmelt-genobj.melt:5625:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5641:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87716,7 +87815,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1830*/ meltfptr[1829])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]); - MELT_LOCATION ("warmelt-genobj.melt:5625:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5641:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1830*/ meltfptr[1829]); @@ -87736,7 +87835,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1831*/ meltfptr[1830]); - MELT_LOCATION ("warmelt-genobj.melt:5649:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5665:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87749,7 +87848,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1832*/ meltfptr[1831])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5649:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5665:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87762,7 +87861,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1832*/ meltfptr[1831])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V128*/ meltfptr[127]); - MELT_LOCATION ("warmelt-genobj.melt:5649:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5665:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87775,7 +87874,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1832*/ meltfptr[1831])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_MATCH__V129*/ meltfptr[128]); - MELT_LOCATION ("warmelt-genobj.melt:5649:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5665:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87789,7 +87888,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1832*/ meltfptr[1831])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:5649:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5665:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87802,7 +87901,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1832*/ meltfptr[1831])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]); - MELT_LOCATION ("warmelt-genobj.melt:5649:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5665:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -87814,7 +87913,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1832*/ meltfptr[1831])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V551*/ meltfptr[550]); - MELT_LOCATION ("warmelt-genobj.melt:5649:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5665:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87827,7 +87926,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1832*/ meltfptr[1831])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]); - MELT_LOCATION ("warmelt-genobj.melt:5649:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5665:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1832*/ meltfptr[1831]); @@ -87847,7 +87946,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1833*/ meltfptr[1832]); - MELT_LOCATION ("warmelt-genobj.melt:5675:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5691:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87861,7 +87960,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1834*/ meltfptr[1833])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5675:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5691:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87875,7 +87974,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1834*/ meltfptr[1833])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V128*/ meltfptr[127]); - MELT_LOCATION ("warmelt-genobj.melt:5675:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5691:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87889,7 +87988,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1834*/ meltfptr[1833])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:5675:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5691:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -87901,7 +88000,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1834*/ meltfptr[1833])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]); - MELT_LOCATION ("warmelt-genobj.melt:5675:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5691:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87915,7 +88014,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1834*/ meltfptr[1833])->tabval[4] = (melt_ptr_t) ( /*_.LIST_MAP__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-genobj.melt:5675:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5691:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87929,7 +88028,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1834*/ meltfptr[1833])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]); - MELT_LOCATION ("warmelt-genobj.melt:5675:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5691:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -87941,7 +88040,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1834*/ meltfptr[1833])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1200*/ meltfptr[1199]); - MELT_LOCATION ("warmelt-genobj.melt:5675:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5691:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87955,7 +88054,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1834*/ meltfptr[1833])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V85*/ meltfptr[84]); - MELT_LOCATION ("warmelt-genobj.melt:5689:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5705:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87968,7 +88067,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1835*/ meltfptr[1834])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]); - MELT_LOCATION ("warmelt-genobj.melt:5689:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5705:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -87980,7 +88079,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1835*/ meltfptr[1834])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V1200*/ meltfptr[1199]); - MELT_LOCATION ("warmelt-genobj.melt:5689:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5705:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -87993,12 +88092,12 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1835*/ meltfptr[1834])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V85*/ meltfptr[84]); - MELT_LOCATION ("warmelt-genobj.melt:5689:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5705:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1835*/ meltfptr[1834]); - MELT_LOCATION ("warmelt-genobj.melt:5675:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5691:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88012,7 +88111,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1834*/ meltfptr[1833])->tabval[8] = (melt_ptr_t) ( /*_.VALROUT___V1835*/ meltfptr[1834]); - MELT_LOCATION ("warmelt-genobj.melt:5675:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5691:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88026,7 +88125,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1834*/ meltfptr[1833])->tabval[9] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-genobj.melt:5675:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5691:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1834*/ meltfptr[1833]); @@ -88046,7 +88145,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1836*/ meltfptr[1835]); - MELT_LOCATION ("warmelt-genobj.melt:5707:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5723:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88060,7 +88159,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1837*/ meltfptr[1836])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5707:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5723:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88074,7 +88173,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1837*/ meltfptr[1836])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP__V20*/ meltfptr[19]); - MELT_LOCATION ("warmelt-genobj.melt:5707:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5723:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88088,7 +88187,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1837*/ meltfptr[1836])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-genobj.melt:5707:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5723:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1837*/ meltfptr[1836]); @@ -88108,7 +88207,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1838*/ meltfptr[1837]); - MELT_LOCATION ("warmelt-genobj.melt:5719:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5735:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88122,7 +88221,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1839*/ meltfptr[1838])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5719:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5735:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88136,7 +88235,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1839*/ meltfptr[1838])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_MATCHER__V146*/ meltfptr[145]); - MELT_LOCATION ("warmelt-genobj.melt:5719:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5735:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88150,7 +88249,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1839*/ meltfptr[1838])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:5719:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5735:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88162,7 +88261,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1839*/ meltfptr[1838])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]); - MELT_LOCATION ("warmelt-genobj.melt:5719:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5735:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88174,7 +88273,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1839*/ meltfptr[1838])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1829*/ meltfptr[1828]); - MELT_LOCATION ("warmelt-genobj.melt:5719:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5735:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88188,7 +88287,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1839*/ meltfptr[1838])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-genobj.melt:5719:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5735:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88200,7 +88299,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1839*/ meltfptr[1838])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1836*/ meltfptr[1835]); - MELT_LOCATION ("warmelt-genobj.melt:5719:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5735:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88212,7 +88311,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1839*/ meltfptr[1838])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1833*/ meltfptr[1832]); - MELT_LOCATION ("warmelt-genobj.melt:5719:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5735:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88224,7 +88323,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1839*/ meltfptr[1838])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1831*/ meltfptr[1830]); - MELT_LOCATION ("warmelt-genobj.melt:5719:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5735:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88236,7 +88335,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1839*/ meltfptr[1838])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); - MELT_LOCATION ("warmelt-genobj.melt:5719:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5735:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88248,7 +88347,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1839*/ meltfptr[1838])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]); - MELT_LOCATION ("warmelt-genobj.melt:5719:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5735:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88260,7 +88359,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1839*/ meltfptr[1838])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V1694*/ meltfptr[1693]); - MELT_LOCATION ("warmelt-genobj.melt:5719:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5735:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88274,7 +88373,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1839*/ meltfptr[1838])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V36*/ meltfptr[35]); - MELT_LOCATION ("warmelt-genobj.melt:5719:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5735:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88286,7 +88385,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1839*/ meltfptr[1838])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1688*/ meltfptr[1687]); - MELT_LOCATION ("warmelt-genobj.melt:5719:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5735:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1839*/ meltfptr[1838]); @@ -88325,7 +88424,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1841*/ meltfptr[1840]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88339,7 +88438,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88353,7 +88452,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_INSTANCE__V147*/ meltfptr[146]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88367,7 +88466,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88379,7 +88478,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88393,7 +88492,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88405,7 +88504,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1831*/ meltfptr[1830]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88417,7 +88516,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1829*/ meltfptr[1828]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88431,7 +88530,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[7] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88443,7 +88542,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1836*/ meltfptr[1835]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88455,7 +88554,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V487*/ meltfptr[486]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88467,7 +88566,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V1068*/ meltfptr[1067]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88481,7 +88580,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[11] = (melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88493,7 +88592,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V617*/ meltfptr[616]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88505,7 +88604,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88517,7 +88616,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88531,7 +88630,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88545,7 +88644,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88559,7 +88658,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_GET_FIELD__V94*/ meltfptr[93]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88571,7 +88670,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1843*/ meltfptr[1842])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V1104*/ meltfptr[1103]); - MELT_LOCATION ("warmelt-genobj.melt:5792:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5808:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1843*/ meltfptr[1842]); @@ -88610,7 +88709,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1845*/ meltfptr[1844]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88624,7 +88723,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88638,7 +88737,20 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_TUPLE__V148*/ meltfptr[147]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + +#undef meltfram__ +} /*end of meltmod__warmelt_genobj__initialmeltchunk_31 */ + +void +meltmod__warmelt_genobj__initialmeltchunk_32 (struct + frame_start_module_melt_st + *meltmeltframptr__, + char predefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88652,7 +88764,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88664,20 +88776,7 @@ meltmod__warmelt_genobj__initialmeltchunk_31 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]); - -#undef meltfram__ -} /*end of meltmod__warmelt_genobj__initialmeltchunk_31 */ - -void -meltmod__warmelt_genobj__initialmeltchunk_32 (struct - frame_start_module_melt_st - *meltmeltframptr__, - char predefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88691,7 +88790,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88703,7 +88802,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1831*/ meltfptr[1830]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88715,7 +88814,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1829*/ meltfptr[1828]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88729,7 +88828,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[7] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88741,7 +88840,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1836*/ meltfptr[1835]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88753,7 +88852,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V487*/ meltfptr[486]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88765,7 +88864,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V1068*/ meltfptr[1067]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88779,7 +88878,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[11] = (melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88791,7 +88890,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V617*/ meltfptr[616]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88803,7 +88902,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88815,7 +88914,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88829,7 +88928,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V85*/ meltfptr[84]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88843,7 +88942,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_LET_BINDING__V57*/ meltfptr[56]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88857,7 +88956,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_NORMAL_LET_BINDING__V73*/ meltfptr[72]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88871,7 +88970,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[18] = (melt_ptr_t) ( /*_.CLASS_NREP_UNSAFE_NTH_COMPONENT__V98*/ meltfptr[97]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88883,7 +88982,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1847*/ meltfptr[1846])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V1104*/ meltfptr[1103]); - MELT_LOCATION ("warmelt-genobj.melt:5892:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5908:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1847*/ meltfptr[1846]); @@ -88922,7 +89021,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1849*/ meltfptr[1848]); - MELT_LOCATION ("warmelt-genobj.melt:5991:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88936,7 +89035,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1851*/ meltfptr[1850])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:5991:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88950,7 +89049,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1851*/ meltfptr[1850])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SAME__V149*/ meltfptr[148]); - MELT_LOCATION ("warmelt-genobj.melt:5991:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88964,7 +89063,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1851*/ meltfptr[1850])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:5991:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -88976,7 +89075,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1851*/ meltfptr[1850])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]); - MELT_LOCATION ("warmelt-genobj.melt:5991:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -88990,7 +89089,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1851*/ meltfptr[1850])->tabval[4] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:5991:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89002,7 +89101,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1851*/ meltfptr[1850])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1831*/ meltfptr[1830]); - MELT_LOCATION ("warmelt-genobj.melt:5991:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89014,7 +89113,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1851*/ meltfptr[1850])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1829*/ meltfptr[1828]); - MELT_LOCATION ("warmelt-genobj.melt:5991:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89026,7 +89125,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1851*/ meltfptr[1850])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V1836*/ meltfptr[1835]); - MELT_LOCATION ("warmelt-genobj.melt:5991:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89040,7 +89139,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1851*/ meltfptr[1850])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-genobj.melt:5991:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89052,7 +89151,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1851*/ meltfptr[1850])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V487*/ meltfptr[486]); - MELT_LOCATION ("warmelt-genobj.melt:5991:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89064,7 +89163,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1851*/ meltfptr[1850])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V1068*/ meltfptr[1067]); - MELT_LOCATION ("warmelt-genobj.melt:5991:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89078,7 +89177,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1851*/ meltfptr[1850])->tabval[11] = (melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]); - MELT_LOCATION ("warmelt-genobj.melt:5991:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89090,7 +89189,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1851*/ meltfptr[1850])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V617*/ meltfptr[616]); - MELT_LOCATION ("warmelt-genobj.melt:5991:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89102,7 +89201,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1851*/ meltfptr[1850])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V177*/ meltfptr[176]); - MELT_LOCATION ("warmelt-genobj.melt:5991:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89114,7 +89213,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1851*/ meltfptr[1850])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]); - MELT_LOCATION ("warmelt-genobj.melt:5991:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6007:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1851*/ meltfptr[1850]); @@ -89153,7 +89252,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1853*/ meltfptr[1852]); - MELT_LOCATION ("warmelt-genobj.melt:6059:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6075:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89167,7 +89266,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1855*/ meltfptr[1854])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:6059:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6075:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89181,7 +89280,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1855*/ meltfptr[1854])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_SUCCESS__V131*/ meltfptr[130]); - MELT_LOCATION ("warmelt-genobj.melt:6059:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6075:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89195,7 +89294,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1855*/ meltfptr[1854])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:6059:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6075:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89207,7 +89306,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1855*/ meltfptr[1854])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]); - MELT_LOCATION ("warmelt-genobj.melt:6059:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6075:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89219,7 +89318,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1855*/ meltfptr[1854])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1831*/ meltfptr[1830]); - MELT_LOCATION ("warmelt-genobj.melt:6059:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6075:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89233,7 +89332,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1855*/ meltfptr[1854])->tabval[5] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:6059:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6075:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1855*/ meltfptr[1854]); @@ -89253,7 +89352,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V1856*/ meltfptr[1855]); - MELT_LOCATION ("warmelt-genobj.melt:6090:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6106:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89267,7 +89366,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1857*/ meltfptr[1856])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:6090:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6106:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89281,7 +89380,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1857*/ meltfptr[1856])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_OR_CLEAR__V150*/ meltfptr[149]); - MELT_LOCATION ("warmelt-genobj.melt:6090:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6106:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89295,7 +89394,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1857*/ meltfptr[1856])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:6090:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6106:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89307,7 +89406,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1857*/ meltfptr[1856])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]); - MELT_LOCATION ("warmelt-genobj.melt:6090:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6106:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89321,7 +89420,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1857*/ meltfptr[1856])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-genobj.melt:6090:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6106:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89333,7 +89432,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1857*/ meltfptr[1856])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1831*/ meltfptr[1830]); - MELT_LOCATION ("warmelt-genobj.melt:6090:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6106:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89345,7 +89444,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1857*/ meltfptr[1856])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1829*/ meltfptr[1828]); - MELT_LOCATION ("warmelt-genobj.melt:6090:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6106:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89359,7 +89458,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1857*/ meltfptr[1856])->tabval[7] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:6090:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6106:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89371,7 +89470,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1857*/ meltfptr[1856])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]); - MELT_LOCATION ("warmelt-genobj.melt:6090:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6106:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1857*/ meltfptr[1856]); @@ -89410,7 +89509,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1859*/ meltfptr[1858]); - MELT_LOCATION ("warmelt-genobj.melt:6140:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6156:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89424,7 +89523,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1861*/ meltfptr[1860])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:6140:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6156:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89438,7 +89537,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1861*/ meltfptr[1860])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_OR_TRANSMIT__V151*/ meltfptr[150]); - MELT_LOCATION ("warmelt-genobj.melt:6140:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6156:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89452,7 +89551,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1861*/ meltfptr[1860])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:6140:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6156:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89464,7 +89563,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1861*/ meltfptr[1860])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]); - MELT_LOCATION ("warmelt-genobj.melt:6140:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6156:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89478,7 +89577,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1861*/ meltfptr[1860])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-genobj.melt:6140:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6156:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89490,7 +89589,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1861*/ meltfptr[1860])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1831*/ meltfptr[1830]); - MELT_LOCATION ("warmelt-genobj.melt:6140:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6156:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89502,7 +89601,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1861*/ meltfptr[1860])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1829*/ meltfptr[1828]); - MELT_LOCATION ("warmelt-genobj.melt:6140:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6156:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89516,7 +89615,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1861*/ meltfptr[1860])->tabval[7] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:6140:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6156:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89530,7 +89629,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1861*/ meltfptr[1860])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_NREP_SYMOCC__V85*/ meltfptr[84]); - MELT_LOCATION ("warmelt-genobj.melt:6140:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6156:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89542,7 +89641,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1861*/ meltfptr[1860])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V405*/ meltfptr[404]); - MELT_LOCATION ("warmelt-genobj.melt:6140:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6156:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1861*/ meltfptr[1860]); @@ -89581,7 +89680,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1863*/ meltfptr[1862]); - MELT_LOCATION ("warmelt-genobj.melt:6191:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6207:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89595,7 +89694,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1865*/ meltfptr[1864])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:6191:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6207:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89609,7 +89708,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1865*/ meltfptr[1864])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_DISJUNCTION__V152*/ meltfptr[151]); - MELT_LOCATION ("warmelt-genobj.melt:6191:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6207:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89623,7 +89722,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1865*/ meltfptr[1864])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:6191:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6207:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89635,7 +89734,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1865*/ meltfptr[1864])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V1732*/ meltfptr[1731]); - MELT_LOCATION ("warmelt-genobj.melt:6191:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6207:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89647,7 +89746,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1865*/ meltfptr[1864])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V1831*/ meltfptr[1830]); - MELT_LOCATION ("warmelt-genobj.melt:6191:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6207:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89659,7 +89758,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1865*/ meltfptr[1864])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V1829*/ meltfptr[1828]); - MELT_LOCATION ("warmelt-genobj.melt:6191:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6207:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89671,7 +89770,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1865*/ meltfptr[1864])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V1836*/ meltfptr[1835]); - MELT_LOCATION ("warmelt-genobj.melt:6191:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6207:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89685,7 +89784,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1865*/ meltfptr[1864])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_NREP_LOCSYMOCC__V62*/ meltfptr[61]); - MELT_LOCATION ("warmelt-genobj.melt:6191:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6207:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89697,7 +89796,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1865*/ meltfptr[1864])->tabval[8] = (melt_ptr_t) ( /*_.VALCLO___V1200*/ meltfptr[1199]); - MELT_LOCATION ("warmelt-genobj.melt:6191:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6207:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1865*/ meltfptr[1864]); @@ -89736,7 +89835,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1867*/ meltfptr[1866]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89750,7 +89849,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89764,7 +89863,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CMATCHER__V153*/ meltfptr[152]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -89776,7 +89875,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1694*/ meltfptr[1693]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89790,7 +89889,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89804,7 +89903,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V37*/ meltfptr[36]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89818,7 +89917,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V30*/ meltfptr[29]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89832,7 +89931,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89846,7 +89945,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89860,7 +89959,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V128*/ meltfptr[127]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89874,7 +89973,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[9] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89888,7 +89987,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89902,7 +90001,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[11] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY_BOTH__V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89916,7 +90015,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_MATCHER__V146*/ meltfptr[145]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89930,7 +90029,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[13] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89944,7 +90043,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89958,7 +90057,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[15] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89972,7 +90071,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]); - MELT_LOCATION ("warmelt-genobj.melt:6283:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89985,7 +90084,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1870*/ meltfptr[1869])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:6283:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -89998,7 +90097,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1870*/ meltfptr[1869])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-genobj.melt:6283:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90011,7 +90110,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1870*/ meltfptr[1869])->tabval[2] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:6283:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90024,12 +90123,12 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1870*/ meltfptr[1869])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]); - MELT_LOCATION ("warmelt-genobj.melt:6283:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6299:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1870*/ meltfptr[1869]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90043,7 +90142,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[17] = (melt_ptr_t) ( /*_.VALROUT___V1870*/ meltfptr[1869]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90057,7 +90156,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[18] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90071,7 +90170,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90085,7 +90184,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[20] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90099,7 +90198,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[21] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]); - MELT_LOCATION ("warmelt-genobj.melt:6296:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6312:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90112,7 +90211,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1871*/ meltfptr[1870])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:6296:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6312:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90125,7 +90224,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1871*/ meltfptr[1870])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-genobj.melt:6296:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6312:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90138,7 +90237,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1871*/ meltfptr[1870])->tabval[2] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:6296:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6312:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90151,12 +90250,12 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1871*/ meltfptr[1870])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V46*/ meltfptr[45]); - MELT_LOCATION ("warmelt-genobj.melt:6296:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6312:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1871*/ meltfptr[1870]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90170,7 +90269,20 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[22] = (melt_ptr_t) ( /*_.VALROUT___V1871*/ meltfptr[1870]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + +#undef meltfram__ +} /*end of meltmod__warmelt_genobj__initialmeltchunk_32 */ + +void +meltmod__warmelt_genobj__initialmeltchunk_33 (struct + frame_start_module_melt_st + *meltmeltframptr__, + char predefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90184,7 +90296,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[23] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90198,20 +90310,7 @@ meltmod__warmelt_genobj__initialmeltchunk_32 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[24] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]); - -#undef meltfram__ -} /*end of meltmod__warmelt_genobj__initialmeltchunk_32 */ - -void -meltmod__warmelt_genobj__initialmeltchunk_33 (struct - frame_start_module_melt_st - *meltmeltframptr__, - char predefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -90223,7 +90322,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[25] = (melt_ptr_t) ( /*_.VALDATA___V1694*/ meltfptr[1693]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90237,7 +90336,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[26] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90251,7 +90350,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[27] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]); - MELT_LOCATION ("warmelt-genobj.melt:6309:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6325:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90264,7 +90363,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[0] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]); - MELT_LOCATION ("warmelt-genobj.melt:6309:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6325:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90277,7 +90376,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-genobj.melt:6309:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6325:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -90289,7 +90388,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1694*/ meltfptr[1693]); - MELT_LOCATION ("warmelt-genobj.melt:6309:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6325:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90302,7 +90401,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-genobj.melt:6309:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6325:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90315,7 +90414,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]); - MELT_LOCATION ("warmelt-genobj.melt:6312:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6328:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90328,7 +90427,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1873*/ meltfptr[1872])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_SYMBOL__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-genobj.melt:6312:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6328:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -90340,7 +90439,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1873*/ meltfptr[1872])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V1694*/ meltfptr[1693]); - MELT_LOCATION ("warmelt-genobj.melt:6312:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6328:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90353,7 +90452,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1873*/ meltfptr[1872])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-genobj.melt:6312:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6328:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90366,12 +90465,12 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1873*/ meltfptr[1872])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V14*/ meltfptr[13]); - MELT_LOCATION ("warmelt-genobj.melt:6312:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6328:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1873*/ meltfptr[1872]); - MELT_LOCATION ("warmelt-genobj.melt:6309:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6325:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90384,12 +90483,12 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1872*/ meltfptr[1871])->tabval[5] = (melt_ptr_t) ( /*_.VALROUT___V1873*/ meltfptr[1872]); - MELT_LOCATION ("warmelt-genobj.melt:6309:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6325:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1872*/ meltfptr[1871]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90403,7 +90502,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[28] = (melt_ptr_t) ( /*_.VALROUT___V1872*/ meltfptr[1871]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -90415,7 +90514,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[29] = (melt_ptr_t) ( /*_.VALDATA___V341*/ meltfptr[340]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90429,7 +90528,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[30] = (melt_ptr_t) ( /*_.CTYPE_LONG__V41*/ meltfptr[40]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90443,7 +90542,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[31] = (melt_ptr_t) ( /*_.CTYPE_VOID__V50*/ meltfptr[49]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90457,7 +90556,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[32] = (melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -90469,7 +90568,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[33] = (melt_ptr_t) ( /*_.VALDATA___V487*/ meltfptr[486]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -90481,7 +90580,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[34] = (melt_ptr_t) ( /*_.VALDATA___V617*/ meltfptr[616]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90495,7 +90594,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[35] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -90507,7 +90606,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1869*/ meltfptr[1868])->tabval[36] = (melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]); - MELT_LOCATION ("warmelt-genobj.melt:6231:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6247:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1869*/ meltfptr[1868]); @@ -90565,7 +90664,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1877*/ meltfptr[1876]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90579,7 +90678,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V9*/ meltfptr[8]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90593,7 +90692,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FUNMATCHER__V155*/ meltfptr[154]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -90605,7 +90704,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V1694*/ meltfptr[1693]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90619,7 +90718,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_C_GENERATION_CONTEXT__V38*/ meltfptr[37]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90633,7 +90732,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_MATCHER__V146*/ meltfptr[145]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90647,7 +90746,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[5] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90661,7 +90760,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_NORMTESTER_ANY__V128*/ meltfptr[127]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90675,7 +90774,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[7] = (melt_ptr_t) ( /*_.MULTIPLE_MAP__V39*/ meltfptr[38]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90689,7 +90788,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[8] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:6417:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6433:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90702,12 +90801,12 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1880*/ meltfptr[1879])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:6417:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6433:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1880*/ meltfptr[1879]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90721,7 +90820,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[9] = (melt_ptr_t) ( /*_.VALROUT___V1880*/ meltfptr[1879]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90735,7 +90834,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[10] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:6422:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6438:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90748,12 +90847,12 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1881*/ meltfptr[1880])->tabval[0] = (melt_ptr_t) ( /*_.COMPILE_OBJ__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-genobj.melt:6422:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6438:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1881*/ meltfptr[1880]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90767,7 +90866,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[11] = (melt_ptr_t) ( /*_.VALROUT___V1881*/ meltfptr[1880]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -90798,7 +90897,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V1882*/ meltfptr[1881]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90812,7 +90911,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V1882*/ meltfptr[1881]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90826,7 +90925,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[14] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V17*/ meltfptr[16]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -90838,7 +90937,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V873*/ meltfptr[872]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90852,7 +90951,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[16] = (melt_ptr_t) ( /*_.FMATCH_MATCHF__V156*/ meltfptr[155]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -90864,7 +90963,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V711*/ meltfptr[710]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -90878,7 +90977,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[18] = (melt_ptr_t) ( /*_.DISCR_LIST__V12*/ meltfptr[11]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -90890,7 +90989,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[19] = (melt_ptr_t) ( /*_.VALDATA___V487*/ meltfptr[486]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -90902,7 +91001,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[20] = (melt_ptr_t) ( /*_.VALDATA___V617*/ meltfptr[616]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -90914,7 +91013,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[21] = (melt_ptr_t) ( /*_.VALDATA___V463*/ meltfptr[462]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -90926,7 +91025,7 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct ((meltroutine_ptr_t) /*_.VALROUT___V1879*/ meltfptr[1878])->tabval[22] = (melt_ptr_t) ( /*_.VALCLO___V1296*/ meltfptr[1295]); - MELT_LOCATION ("warmelt-genobj.melt:6393:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6409:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V1879*/ meltfptr[1878]); @@ -96609,6 +96708,19 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct /*clear *//*_.INSTALL_METHOD__V1948*/ meltfptr[1888] = 0; } + +#undef meltfram__ +} /*end of meltmod__warmelt_genobj__initialmeltchunk_33 */ + +void +meltmod__warmelt_genobj__initialmeltchunk_34 (struct + frame_start_module_melt_st + *meltmeltframptr__, + char predefinited[]) +{ +#define meltfram__ (*meltmeltframptr__) +#undef meltcallcount +#define meltcallcount 0L MELT_LOCATION ("warmelt-genobj.melt:3459:/ initchunk"); /*^block */ /*anyblock */ @@ -96671,19 +96783,6 @@ meltmod__warmelt_genobj__initialmeltchunk_33 (struct /*clear *//*_.INSTALL_METHOD__V1950*/ meltfptr[1890] = 0; } - -#undef meltfram__ -} /*end of meltmod__warmelt_genobj__initialmeltchunk_33 */ - -void -meltmod__warmelt_genobj__initialmeltchunk_34 (struct - frame_start_module_melt_st - *meltmeltframptr__, - char predefinited[]) -{ -#define meltfram__ (*meltmeltframptr__) -#undef meltcallcount -#define meltcallcount 0L MELT_LOCATION ("warmelt-genobj.melt:3540:/ initchunk"); /*^block */ /*anyblock */ @@ -97317,7 +97416,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1969*/ meltfptr[1888] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:4133:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4149:/ initchunk"); /*^block */ /*anyblock */ { @@ -97351,12 +97450,12 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1970*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:4135:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4151:/ initchunk"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-genobj.melt:4136:/ quasiblock"); + MELT_LOCATION ("warmelt-genobj.melt:4152:/ quasiblock"); /*^newclosure */ @@ -97369,7 +97468,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct ; /*_.LAMBDA___V1971*/ meltfptr[1890] = /*_.LAMBDA___V1972*/ meltfptr[1888];; - MELT_LOCATION ("warmelt-genobj.melt:4135:/ checksignal"); + MELT_LOCATION ("warmelt-genobj.melt:4151:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -97400,7 +97499,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1973*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:4193:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4209:/ initchunk"); /*^block */ /*anyblock */ { @@ -97434,7 +97533,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1974*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:4249:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4265:/ initchunk"); /*^block */ /*anyblock */ { @@ -97468,7 +97567,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1975*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:4259:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4275:/ initchunk"); /*^block */ /*anyblock */ { @@ -97502,7 +97601,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1976*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:4270:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4286:/ initchunk"); /*^block */ /*anyblock */ { @@ -97536,7 +97635,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1977*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:4470:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4486:/ initchunk"); /*^block */ /*anyblock */ { @@ -97570,7 +97669,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1978*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:4547:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4563:/ initchunk"); /*^block */ /*anyblock */ { @@ -97604,7 +97703,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1979*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:4617:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4633:/ initchunk"); /*^block */ /*anyblock */ { @@ -97638,7 +97737,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1980*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:4664:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4680:/ initchunk"); /*^block */ /*anyblock */ { @@ -97672,7 +97771,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1981*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:4708:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4724:/ initchunk"); /*^block */ /*anyblock */ { @@ -97706,7 +97805,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1982*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:4794:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4810:/ initchunk"); /*^block */ /*anyblock */ { @@ -97740,7 +97839,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1983*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:4914:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4930:/ initchunk"); /*^block */ /*anyblock */ { @@ -97774,7 +97873,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1984*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:4923:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4939:/ initchunk"); /*^block */ /*anyblock */ { @@ -97805,7 +97904,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1985*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:4933:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4949:/ initchunk"); /*^block */ /*anyblock */ { @@ -97836,7 +97935,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1986*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:4971:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:4987:/ initchunk"); /*^block */ /*anyblock */ { @@ -97870,7 +97969,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1987*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5058:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5074:/ initchunk"); /*^block */ /*anyblock */ { @@ -97901,7 +98000,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1988*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5076:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5092:/ initchunk"); /*^block */ /*anyblock */ { @@ -97939,7 +98038,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.VALUEXPORTER___V1989*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5087:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5103:/ initchunk"); /*^block */ /*anyblock */ { @@ -98110,7 +98209,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.VALUEXPORTER___V1990*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5097:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5113:/ initchunk"); /*^block */ /*anyblock */ { @@ -98148,7 +98247,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.VALUEXPORTER___V1991*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5104:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5120:/ initchunk"); /*^block */ /*anyblock */ { @@ -98243,7 +98342,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.VALUEXPORTER___V1992*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5118:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5134:/ initchunk"); /*^block */ /*anyblock */ { @@ -98277,7 +98376,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1993*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5312:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5328:/ initchunk"); /*^block */ /*anyblock */ { @@ -98311,7 +98410,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1994*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5328:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5344:/ initchunk"); /*^block */ /*anyblock */ { @@ -98425,7 +98524,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.VALUEXPORTER___V1995*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5400:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5416:/ initchunk"); /*^block */ /*anyblock */ { @@ -98459,7 +98558,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1996*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5426:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5442:/ initchunk"); /*^block */ /*anyblock */ { @@ -98493,7 +98592,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1997*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5461:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5477:/ initchunk"); /*^block */ /*anyblock */ { @@ -98527,7 +98626,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1998*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5500:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5516:/ initchunk"); /*^block */ /*anyblock */ { @@ -98558,7 +98657,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V1999*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5526:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5542:/ initchunk"); /*^block */ /*anyblock */ { @@ -98592,7 +98691,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V2000*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5550:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5566:/ initchunk"); /*^block */ /*anyblock */ { @@ -98626,7 +98725,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V2001*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5716:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5732:/ initchunk"); /*^block */ /*anyblock */ { @@ -98660,7 +98759,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V2002*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5789:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5805:/ initchunk"); /*^block */ /*anyblock */ { @@ -98694,7 +98793,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V2003*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5886:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:5902:/ initchunk"); /*^block */ /*anyblock */ { @@ -98728,7 +98827,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V2004*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:5985:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6001:/ initchunk"); /*^block */ /*anyblock */ { @@ -98762,7 +98861,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V2005*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:6055:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6071:/ initchunk"); /*^block */ /*anyblock */ { @@ -98796,7 +98895,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V2006*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:6087:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6103:/ initchunk"); /*^block */ /*anyblock */ { @@ -98830,7 +98929,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V2007*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:6137:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6153:/ initchunk"); /*^block */ /*anyblock */ { @@ -98864,7 +98963,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V2008*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:6185:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6201:/ initchunk"); /*^block */ /*anyblock */ { @@ -98898,7 +98997,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V2009*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:6228:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6244:/ initchunk"); /*^block */ /*anyblock */ { @@ -98932,7 +99031,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V2010*/ meltfptr[1890] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:6385:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6401:/ initchunk"); /*^block */ /*anyblock */ { @@ -98965,7 +99064,7 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct /*clear *//*_.INSTALL_METHOD__V2011*/ meltfptr[1889] = 0; } - MELT_LOCATION ("warmelt-genobj.melt:6498:/ initchunk"); + MELT_LOCATION ("warmelt-genobj.melt:6514:/ initchunk"); /*^block */ /*anyblock */ { @@ -99305,14 +99404,6 @@ meltmod__warmelt_genobj__initialmeltchunk_34 (struct (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V455*/ meltfptr[454])); - /*internsym:CLASS_OBJCLEAR */ - (void) - meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460])); - - /*internsym:OCLR_VLOC */ - (void) - meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V469*/ meltfptr[468])); - #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_34 */ @@ -99326,7 +99417,15 @@ meltmod__warmelt_genobj__initialmeltchunk_35 (struct #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L -/*internsym:CLASS_OBJANYBLOCK*/ +/*internsym:CLASS_OBJCLEAR*/ + (void) + meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V461*/ meltfptr[460])); + + /*internsym:OCLR_VLOC */ + (void) + meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V469*/ meltfptr[468])); + + /*internsym:CLASS_OBJANYBLOCK */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V471*/ meltfptr[470])); @@ -99847,16 +99946,6 @@ meltmod__warmelt_genobj__initialmeltchunk_35 (struct meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1059*/ meltfptr[1058])); - /*internsym:OIROUT_MODULENAME */ - (void) - meltgc_intern_symbol ((melt_ptr_t) - ( /*_.VALDATA___V1061*/ meltfptr[1060])); - - /*internsym:CLASS_OBJBLOCK */ - (void) - meltgc_intern_symbol ((melt_ptr_t) - ( /*_.VALDATA___V1063*/ meltfptr[1062])); - #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_35 */ @@ -99870,7 +99959,17 @@ meltmod__warmelt_genobj__initialmeltchunk_36 (struct #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L -/*internsym:CLASS_OBJCHECKINTERRUPT*/ +/*internsym:OIROUT_MODULENAME*/ + (void) + meltgc_intern_symbol ((melt_ptr_t) + ( /*_.VALDATA___V1061*/ meltfptr[1060])); + + /*internsym:CLASS_OBJBLOCK */ + (void) + meltgc_intern_symbol ((melt_ptr_t) + ( /*_.VALDATA___V1063*/ meltfptr[1062])); + + /*internsym:CLASS_OBJCHECKINTERRUPT */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1065*/ meltfptr[1064])); @@ -100500,16 +100599,6 @@ meltmod__warmelt_genobj__initialmeltchunk_36 (struct meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1530*/ meltfptr[1529])); - /*internsym:DISCR_NULL_RECEIVER */ - (void) - meltgc_intern_symbol ((melt_ptr_t) - ( /*_.VALDATA___V1534*/ meltfptr[1533])); - - /*internsym:CLASS_NREP_IF */ - (void) - meltgc_intern_symbol ((melt_ptr_t) - ( /*_.VALDATA___V1546*/ meltfptr[1545])); - #undef meltfram__ } /*end of meltmod__warmelt_genobj__initialmeltchunk_36 */ @@ -100523,7 +100612,17 @@ meltmod__warmelt_genobj__initialmeltchunk_37 (struct #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L -/*internsym:CLASS_NREP_IFISA*/ +/*internsym:DISCR_NULL_RECEIVER*/ + (void) + meltgc_intern_symbol ((melt_ptr_t) + ( /*_.VALDATA___V1534*/ meltfptr[1533])); + + /*internsym:CLASS_NREP_IF */ + (void) + meltgc_intern_symbol ((melt_ptr_t) + ( /*_.VALDATA___V1546*/ meltfptr[1545])); + + /*internsym:CLASS_NREP_IFISA */ (void) meltgc_intern_symbol ((melt_ptr_t) ( /*_.VALDATA___V1550*/ meltfptr[1549])); @@ -100967,7 +101066,7 @@ meltmod__warmelt_genobj__forward_or_mark_module_start_frame (struct int ix = 0; initial_frame_st *meltframptr_ = (initial_frame_st *) fp; melt_assertmsg ("check module frame", - meltframptr_->mcfr_nbvar == /*minihash */ -683); + meltframptr_->mcfr_nbvar == /*minihash */ -1561); if (!marking && melt_is_forwarding) { dbgprintf diff --git a/gcc/melt/generated/warmelt-macro+01.c b/gcc/melt/generated/warmelt-macro+01.c index 74888f30a76..95233c77419 100644 --- a/gcc/melt/generated/warmelt-macro+01.c +++ b/gcc/melt/generated/warmelt-macro+01.c @@ -2929,7 +2929,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V15*/ meltfptr[13];; - MELT_LOCATION ("warmelt-macro.melt:961:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:961:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3490,7 +3502,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:986:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:986:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4438,7 +4462,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V23*/ meltfptr[21];; - MELT_LOCATION ("warmelt-macro.melt:1006:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1006:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5204,7 +5240,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:1075:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1075:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:1073:/ quasiblock"); @@ -5601,7 +5649,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V43*/ meltfptr[39];; - MELT_LOCATION ("warmelt-macro.melt:1087:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1087:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V41*/ meltfptr[37] = /*_.RETURN___V49*/ meltfptr[45];; @@ -5651,7 +5711,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V21*/ meltfptr[17];; - MELT_LOCATION ("warmelt-macro.melt:1038:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1038:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6553,7 +6625,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:1127:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1127:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:1124:/ quasiblock"); @@ -6666,7 +6750,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:1138:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1138:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:1135:/ quasiblock"); @@ -6945,7 +7041,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SCITER__V65*/ meltfptr[35];; - MELT_LOCATION ("warmelt-macro.melt:1153:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1153:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V64*/ meltfptr[37] = /*_.RETURN___V71*/ meltfptr[67];; @@ -6999,7 +7107,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V21*/ meltfptr[19];; - MELT_LOCATION ("warmelt-macro.melt:1096:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1096:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7134,7 +7254,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PUT_ENV__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:1141:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1141:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8084,7 +8216,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:1187:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1187:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:1183:/ quasiblock"); @@ -8279,7 +8423,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V45*/ meltfptr[31];; - MELT_LOCATION ("warmelt-macro.melt:1196:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1196:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V44*/ meltfptr[30] = /*_.RETURN___V51*/ meltfptr[47];; @@ -8329,7 +8485,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V21*/ meltfptr[19];; - MELT_LOCATION ("warmelt-macro.melt:1159:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1159:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9493,7 +9661,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V44*/ meltfptr[40];; - MELT_LOCATION ("warmelt-macro.melt:1227:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1227:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V43*/ meltfptr[36] = /*_.RETURN___V50*/ meltfptr[46];; @@ -9537,7 +9717,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V22*/ meltfptr[20];; - MELT_LOCATION ("warmelt-macro.melt:1202:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1202:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10222,7 +10414,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V21*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:1234:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1234:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11015,7 +11219,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RESK__V30*/ meltfptr[29];; - MELT_LOCATION ("warmelt-macro.melt:1268:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1268:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V29*/ meltfptr[25] = @@ -11486,8 +11702,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RESM__V49*/ meltfptr[48];; - MELT_LOCATION - ("warmelt-macro.melt:1278:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1278:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V48*/ meltfptr[46] = @@ -11714,8 +11944,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RESS__V57*/ meltfptr[49];; - MELT_LOCATION - ("warmelt-macro.melt:1283:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1283:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V56*/ meltfptr[48] = @@ -11950,8 +12194,23 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RESP__V66*/ meltfptr[49];; - MELT_LOCATION - ("warmelt-macro.melt:1289:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1289:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V64*/ meltfptr[44] = @@ -12201,8 +12460,23 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RESC__V75*/ meltfptr[50];; - MELT_LOCATION - ("warmelt-macro.melt:1296:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1296:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V73*/ meltfptr[46] = @@ -12471,8 +12745,23 @@ lab_endgetargs:; meltfptr[0] = /*_.RESC__V84*/ meltfptr[40];; - MELT_LOCATION - ("warmelt-macro.melt:1303:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1303:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; @@ -12774,8 +13063,26 @@ lab_endgetargs:; meltfptr[0] = /*_.RESF__V93*/ meltfptr[44];; - MELT_LOCATION - ("warmelt-macro.melt:1310:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1310:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && + meltxresdescr_ + [0] + && + meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; @@ -13113,8 +13420,21 @@ lab_endgetargs:; /*_.RESF__V102*/ meltfptr [46];; - MELT_LOCATION - ("warmelt-macro.melt:1317:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1317:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto @@ -13936,8 +14256,21 @@ lab_endgetargs:; /*_.RESS__V121*/ meltfptr [120];; - MELT_LOCATION - ("warmelt-macro.melt:1339:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1339:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto @@ -14304,8 +14637,21 @@ lab_endgetargs:; /*_.RESC__V129*/ meltfptr [121];; - MELT_LOCATION - ("warmelt-macro.melt:1346:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1346:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto @@ -14672,8 +15018,21 @@ lab_endgetargs:; /*_.RESC__V137*/ meltfptr [122];; - MELT_LOCATION - ("warmelt-macro.melt:1351:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1351:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto @@ -15050,8 +15409,21 @@ lab_endgetargs:; /*_.RESF__V145*/ meltfptr [119];; - MELT_LOCATION - ("warmelt-macro.melt:1355:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1355:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto @@ -15417,8 +15789,21 @@ lab_endgetargs:; /*_.RESF__V153*/ meltfptr [120];; - MELT_LOCATION - ("warmelt-macro.melt:1359:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1359:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto @@ -15536,8 +15921,21 @@ lab_endgetargs:; [0] = NULL;; - MELT_LOCATION - ("warmelt-macro.melt:1365:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1365:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto @@ -16258,8 +16656,21 @@ lab_endgetargs:; /*_.LAZYMAC__V168*/ meltfptr [119];; - MELT_LOCATION - ("warmelt-macro.melt:1382:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1382:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto @@ -16726,8 +17137,21 @@ lab_endgetargs:; /*_.RESA__V177*/ meltfptr [40];; - MELT_LOCATION - ("warmelt-macro.melt:1396:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1396:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto @@ -17190,8 +17614,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION - ("warmelt-macro.melt:1402:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1402:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION @@ -17401,8 +17839,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RESCA__V192*/ meltfptr[119];; - MELT_LOCATION - ("warmelt-macro.melt:1406:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1406:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V191*/ meltfptr[123] = @@ -17500,7 +17952,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SEXPR__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-macro.melt:1409:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1409:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V14*/ meltfptr[12] = /*_.RETURN___V199*/ meltfptr[95];; @@ -17519,7 +17983,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:1252:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1252:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17657,7 +18133,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MEXPANDER__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-macro.melt:1372:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1372:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18223,7 +18711,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[15];; - MELT_LOCATION ("warmelt-macro.melt:1412:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1412:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18676,7 +19176,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RESTUP__V13*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:1450:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1450:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V10*/ meltfptr[6] = /*_.RETURN___V18*/ meltfptr[14];; @@ -18696,7 +19208,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[6];; - MELT_LOCATION ("warmelt-macro.melt:1443:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1443:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18828,7 +19352,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PATTERNEXPAND_1__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:1447:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1447:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19709,7 +20245,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];; - MELT_LOCATION ("warmelt-macro.melt:1457:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1457:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20080,7 +20628,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-macro.melt:1470:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1470:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20382,7 +20942,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:1482:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1482:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20706,7 +21278,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-macro.melt:1501:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1501:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20920,7 +21504,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MAKE_INTEGERBOX__V6*/ meltfptr[5];; - MELT_LOCATION ("warmelt-macro.melt:1529:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1529:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:1522:/ quasiblock"); @@ -20979,7 +21575,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:1514:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1514:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -21574,7 +22182,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:1548:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1548:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:1545:/ quasiblock"); @@ -22020,7 +22640,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RESP__V42*/ meltfptr[41];; - MELT_LOCATION ("warmelt-macro.melt:1562:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1562:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V41*/ meltfptr[39] = @@ -22839,7 +23471,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PCOMP__V73*/ meltfptr[72];; - MELT_LOCATION ("warmelt-macro.melt:1587:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1587:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V71*/ meltfptr[70] = @@ -24022,8 +24667,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PCOMP__V114*/ meltfptr[113];; - MELT_LOCATION - ("warmelt-macro.melt:1616:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1616:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V112*/ meltfptr[41] = @@ -25224,8 +25883,23 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PCOMP__V145*/ meltfptr[75];; - MELT_LOCATION - ("warmelt-macro.melt:1649:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1649:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V143*/ meltfptr[116] = @@ -26088,8 +26762,23 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PCOMP__V183*/ meltfptr[72];; - MELT_LOCATION - ("warmelt-macro.melt:1672:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1672:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V181*/ meltfptr[66] = @@ -26207,8 +26896,23 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION - ("warmelt-macro.melt:1677:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1677:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION @@ -26387,7 +27091,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:1535:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1535:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -27169,7 +27885,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PAT__V29*/ meltfptr[28];; - MELT_LOCATION ("warmelt-macro.melt:1710:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1710:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V26*/ meltfptr[22] = @@ -27464,7 +28192,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.JOKP__V44*/ meltfptr[43];; - MELT_LOCATION ("warmelt-macro.melt:1725:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1725:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V42*/ meltfptr[22] = @@ -27677,8 +28418,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PAVR__V54*/ meltfptr[45];; - MELT_LOCATION - ("warmelt-macro.melt:1736:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1736:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION @@ -27945,8 +28700,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NEWPAVR__V64*/ meltfptr[57];; - MELT_LOCATION - ("warmelt-macro.melt:1747:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1747:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V62*/ meltfptr[22] = @@ -28316,8 +29085,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PATEX__V77*/ meltfptr[43];; - MELT_LOCATION - ("warmelt-macro.melt:1754:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:1754:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V76*/ meltfptr[22] = @@ -28647,7 +29430,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PAT__V86*/ meltfptr[65];; - MELT_LOCATION ("warmelt-macro.melt:1770:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1770:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V84*/ meltfptr[42] = /*_.RETURN___V92*/ meltfptr[66];; @@ -28684,7 +29479,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V10*/ meltfptr[8];; - MELT_LOCATION ("warmelt-macro.melt:1688:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1688:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30135,7 +30942,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RESLIST__V25*/ meltfptr[24];; - MELT_LOCATION ("warmelt-macro.melt:1843:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1843:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V24*/ meltfptr[22] = /*_.RETURN___V49*/ meltfptr[36];; @@ -30159,7 +30978,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V24*/ meltfptr[22];; - MELT_LOCATION ("warmelt-macro.melt:1779:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1779:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30314,7 +31145,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MAKE_MULTIPLE__V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-macro.melt:1856:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1856:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:1855:/ quasiblock"); @@ -30608,7 +31451,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:1878:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1878:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:1876:/ quasiblock"); @@ -31939,7 +32794,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.BNDTUP__V66*/ meltfptr[28];; - MELT_LOCATION ("warmelt-macro.melt:1949:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1949:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V65*/ meltfptr[37] = /*_.RETURN___V81*/ meltfptr[26];; @@ -31989,7 +32856,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[6];; - MELT_LOCATION ("warmelt-macro.melt:1852:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1852:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -32529,7 +33408,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-macro.melt:1956:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1956:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -33265,7 +34156,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];; - MELT_LOCATION ("warmelt-macro.melt:1969:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:1969:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -33815,7 +34718,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2012:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2012:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2009:/ quasiblock"); @@ -34288,7 +35203,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-macro.melt:2004:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2004:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -35183,7 +36110,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.TUPEXP__V30*/ meltfptr[15];; - MELT_LOCATION ("warmelt-macro.melt:2066:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2066:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V29*/ meltfptr[16] = /*_.RETURN___V37*/ meltfptr[32];; @@ -35213,7 +36152,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[5];; - MELT_LOCATION ("warmelt-macro.melt:2050:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2050:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -36736,7 +37687,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2129:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2129:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2124:/ quasiblock"); @@ -36966,7 +37929,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-macro.melt:2143:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2143:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2140:/ quasiblock"); @@ -37267,7 +38242,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-macro.melt:2156:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2156:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2152:/ quasiblock"); @@ -38243,7 +39230,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SDEFPRI__V75*/ meltfptr[67];; - MELT_LOCATION ("warmelt-macro.melt:2210:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2210:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V69*/ meltfptr[48] = /*_.RETURN___V102*/ meltfptr[98];; @@ -38369,7 +39368,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:2106:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2106:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -38825,7 +39836,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2251:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2251:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2248:/ quasiblock"); @@ -38913,7 +39936,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2262:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2262:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2259:/ quasiblock"); @@ -38965,7 +40000,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2267:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2267:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2264:/ quasiblock"); @@ -39042,7 +40089,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2275:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2275:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2272:/ quasiblock"); @@ -39201,7 +40260,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2290:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2290:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2288:/ quasiblock"); @@ -39346,7 +40417,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2300:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2300:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2298:/ quasiblock"); @@ -40864,7 +41947,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SRCIT__V104*/ meltfptr[96];; - MELT_LOCATION ("warmelt-macro.melt:2364:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2364:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V98*/ meltfptr[74] = /*_.RETURN___V143*/ meltfptr[139];; @@ -41016,7 +42111,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:2229:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2229:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-macro+02.c b/gcc/melt/generated/warmelt-macro+02.c index b1870b85e62..703b52d1510 100644 --- a/gcc/melt/generated/warmelt-macro+02.c +++ b/gcc/melt/generated/warmelt-macro+02.c @@ -2793,7 +2793,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2411:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2411:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2407:/ quasiblock"); @@ -2872,7 +2884,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2420:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2420:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2418:/ quasiblock"); @@ -2925,7 +2949,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2424:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2424:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2422:/ quasiblock"); @@ -3509,7 +3545,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2443:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2443:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2441:/ quasiblock"); @@ -3561,7 +3609,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2447:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2447:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2445:/ quasiblock"); @@ -3740,7 +3800,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2455:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2455:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2452:/ quasiblock"); @@ -4156,7 +4228,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2472:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2472:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2469:/ quasiblock"); @@ -4491,7 +4575,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2487:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2487:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2485:/ quasiblock"); @@ -4824,7 +4920,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2501:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2501:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2499:/ quasiblock"); @@ -6112,7 +6220,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SDEFCMATCH__V176*/ meltfptr[142];; - MELT_LOCATION ("warmelt-macro.melt:2564:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2564:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V172*/ meltfptr[159] = /*_.RETURN___V203*/ meltfptr[199];; @@ -6284,7 +6404,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:2382:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2382:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6987,7 +7119,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2603:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2603:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2599:/ quasiblock"); @@ -7066,7 +7210,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2612:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2612:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2610:/ quasiblock"); @@ -7143,7 +7299,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2617:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2617:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2614:/ quasiblock"); @@ -7552,7 +7720,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2634:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2634:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2632:/ quasiblock"); @@ -7628,7 +7808,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2639:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2639:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2636:/ quasiblock"); @@ -8972,7 +9164,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SDFUM__V120*/ meltfptr[119];; - MELT_LOCATION ("warmelt-macro.melt:2713:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2713:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V119*/ meltfptr[109] = /*_.RETURN___V140*/ meltfptr[133];; @@ -9098,7 +9302,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:2578:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2578:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10511,7 +10727,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SDEFUN__V62*/ meltfptr[54];; - MELT_LOCATION ("warmelt-macro.melt:2787:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2787:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V60*/ meltfptr[52] = /*_.RETURN___V65*/ meltfptr[57];; @@ -10591,7 +10819,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:2724:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2724:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10722,7 +10962,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PUT_ENV__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:2763:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2763:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11551,7 +11803,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SDEFINE__V41*/ meltfptr[33];; - MELT_LOCATION ("warmelt-macro.melt:2852:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2852:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V39*/ meltfptr[31] = /*_.RETURN___V49*/ meltfptr[45];; @@ -11752,7 +12016,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2873:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2873:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2870:/ quasiblock"); @@ -12214,8 +12491,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION - ("warmelt-macro.melt:2902:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:2902:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION @@ -12514,7 +12805,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SDEFUN__V78*/ meltfptr[70];; - MELT_LOCATION ("warmelt-macro.melt:2909:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2909:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V94*/ meltfptr[89] = @@ -12608,7 +12911,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:2915:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2915:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:2913:/ quasiblock"); @@ -12666,7 +12981,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[8];; - MELT_LOCATION ("warmelt-macro.melt:2809:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2809:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -12793,7 +13120,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PUT_ENV__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:2904:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2904:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15929,7 +16268,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V6*/ meltfptr[5];; - MELT_LOCATION ("warmelt-macro.melt:2930:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:2930:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18645,7 +18996,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MULTI___V14*/ meltfptr[10];; - MELT_LOCATION ("warmelt-macro.melt:3050:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3050:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20621,7 +20984,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:3206:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3206:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:3204:/ quasiblock"); @@ -21774,7 +22149,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:3254:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3254:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:3251:/ quasiblock"); @@ -22441,8 +22828,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION - ("warmelt-macro.melt:3278:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:3278:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION @@ -22896,7 +23297,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.FA__V110*/ meltfptr[74];; - MELT_LOCATION ("warmelt-macro.melt:3292:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3292:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V108*/ meltfptr[78] = /*_.RETURN___V116*/ meltfptr[93];; @@ -22934,7 +23347,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V32*/ meltfptr[30];; - MELT_LOCATION ("warmelt-macro.melt:3199:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3199:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -23438,7 +23863,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!konst_2_TRUE */ meltfrout->tabval[2]);; - MELT_LOCATION ("warmelt-macro.melt:3235:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3235:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:3233:/ quasiblock"); @@ -23475,7 +23912,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-macro.melt:3223:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3223:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -24245,7 +24694,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-macro.melt:3342:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3342:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:3339:/ quasiblock"); @@ -25207,7 +25668,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SINST__V84*/ meltfptr[64];; - MELT_LOCATION ("warmelt-macro.melt:3396:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3396:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V82*/ meltfptr[67] = /*_.RETURN___V90*/ meltfptr[74];; @@ -25299,7 +25772,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[10];; - MELT_LOCATION ("warmelt-macro.melt:3296:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3296:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25846,7 +26331,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:3434:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3434:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:3432:/ quasiblock"); @@ -25948,7 +26445,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:3445:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3445:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:3443:/ quasiblock"); @@ -26470,7 +26979,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:3466:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3466:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:3462:/ quasiblock"); @@ -26524,7 +27046,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:3470:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3470:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:3467:/ quasiblock"); @@ -26891,7 +27426,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:3483:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3483:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:3475:/ quasiblock"); @@ -28097,7 +28644,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:3411:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3411:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -28750,7 +29309,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-macro.melt:3590:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3590:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:3587:/ quasiblock"); @@ -29453,7 +30024,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[8];; - MELT_LOCATION ("warmelt-macro.melt:3559:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3559:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30378,7 +30961,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.EXPTUPLE__V40*/ meltfptr[39];; - MELT_LOCATION ("warmelt-macro.melt:3654:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3654:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V38*/ meltfptr[34] = /*_.RETURN___V45*/ meltfptr[41];; @@ -30588,7 +31183,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:3628:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3628:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -31516,7 +32123,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:3702:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3702:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:3698:/ quasiblock"); @@ -31713,7 +32332,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PATF__V43*/ meltfptr[35];; - MELT_LOCATION ("warmelt-macro.melt:3711:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3711:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V42*/ meltfptr[34] = /*_.RETURN___V49*/ meltfptr[45];; @@ -31757,7 +32388,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V20*/ meltfptr[18];; - MELT_LOCATION ("warmelt-macro.melt:3670:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3670:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -32029,7 +32672,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V7*/ meltfptr[6];; - MELT_LOCATION ("warmelt-macro.melt:3685:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3685:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -32733,7 +33388,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-macro.melt:3747:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3747:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:3744:/ quasiblock"); @@ -33476,7 +34143,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SPATI__V65*/ meltfptr[49];; - MELT_LOCATION ("warmelt-macro.melt:3789:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3789:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V60*/ meltfptr[51] = /*_.RETURN___V73*/ meltfptr[53];; @@ -33544,7 +34223,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[11];; - MELT_LOCATION ("warmelt-macro.melt:3714:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3714:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -33687,7 +34378,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SPAF_PATTERN__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:3772:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3772:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -34381,7 +35084,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-macro.melt:3842:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3842:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:3839:/ quasiblock"); @@ -35103,7 +35818,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SPATI__V65*/ meltfptr[49];; - MELT_LOCATION ("warmelt-macro.melt:3882:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3882:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:3874:/ checksignal"); @@ -35189,7 +35916,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[11];; - MELT_LOCATION ("warmelt-macro.melt:3809:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3809:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -35332,7 +36071,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SPAF_PATTERN__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:3867:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3867:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -35722,7 +36473,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:3894:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3894:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V14*/ meltfptr[10] = /*_.RETURN___V16*/ meltfptr[15];; @@ -35738,7 +36501,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[10];; - MELT_LOCATION ("warmelt-macro.melt:3886:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3886:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -36556,7 +37331,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MRES__V37*/ meltfptr[36];; - MELT_LOCATION ("warmelt-macro.melt:3950:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3950:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V34*/ meltfptr[32] = /*_.RETURN___V43*/ meltfptr[39];; @@ -36626,7 +37413,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[8];; - MELT_LOCATION ("warmelt-macro.melt:3909:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3909:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -37454,7 +38253,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:3960:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:3960:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -38166,7 +38977,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-macro.melt:4008:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4008:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -38492,7 +39315,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-macro.melt:4067:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4067:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4065:/ quasiblock"); @@ -38629,7 +39464,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-macro.melt:4078:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4078:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4076:/ quasiblock"); @@ -38807,7 +39654,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[8];; - MELT_LOCATION ("warmelt-macro.melt:4056:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4056:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -39128,7 +39987,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-macro.melt:4108:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4108:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4106:/ quasiblock"); @@ -39265,7 +40136,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-macro.melt:4119:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4119:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4117:/ quasiblock"); @@ -39445,7 +40328,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[8];; - MELT_LOCATION ("warmelt-macro.melt:4097:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4097:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -40117,7 +41012,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SPROGN__V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-macro.melt:4154:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4154:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V17*/ meltfptr[15] = /*_.RETURN___V27*/ meltfptr[23];; @@ -40139,7 +41046,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[15];; - MELT_LOCATION ("warmelt-macro.melt:4139:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4139:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -40277,7 +41196,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MEXPANDER__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:4147:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4147:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -40682,7 +41613,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-macro.melt:4171:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4171:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4169:/ quasiblock"); @@ -40862,7 +41805,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:4158:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4158:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -42085,7 +43040,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RESE__V53*/ meltfptr[52];; - MELT_LOCATION ("warmelt-macro.melt:4228:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4228:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V52*/ meltfptr[51] = /*_.RETURN___V59*/ meltfptr[55];; @@ -42297,7 +43264,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RESP__V61*/ meltfptr[52];; - MELT_LOCATION ("warmelt-macro.melt:4234:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4234:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V60*/ meltfptr[56] = /*_.RETURN___V67*/ meltfptr[46];; @@ -42378,7 +43357,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:4190:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4190:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -43157,7 +44148,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.XWHEN__V29*/ meltfptr[28];; - MELT_LOCATION ("warmelt-macro.melt:4270:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4270:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V26*/ meltfptr[25] = /*_.RETURN___V35*/ meltfptr[31];; @@ -43205,7 +44208,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:4245:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4245:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -43995,7 +45010,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.XUNLESS__V29*/ meltfptr[28];; - MELT_LOCATION ("warmelt-macro.melt:4307:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4307:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V26*/ meltfptr[25] = /*_.RETURN___V35*/ meltfptr[31];; @@ -44043,7 +45070,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:4281:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4281:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-macro+03.c b/gcc/melt/generated/warmelt-macro+03.c index 0f3d33ab2ec..ec524ac3f49 100644 --- a/gcc/melt/generated/warmelt-macro+03.c +++ b/gcc/melt/generated/warmelt-macro+03.c @@ -2970,7 +2970,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-macro.melt:4341:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4341:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4339:/ quasiblock"); @@ -3549,7 +3561,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RESP__V57*/ meltfptr[44];; - MELT_LOCATION ("warmelt-macro.melt:4364:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4364:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V56*/ meltfptr[43] = /*_.RETURN___V63*/ meltfptr[50];; @@ -3627,7 +3651,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:4317:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4317:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3830,7 +3866,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V6*/ meltfptr[5];; - MELT_LOCATION ("warmelt-macro.melt:4388:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4388:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V5*/ meltfptr[3] = /*_.RETURN___V7*/ meltfptr[6];; @@ -3848,7 +3896,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-macro.melt:4375:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4375:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4736,7 +4796,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.EXPREST__V37*/ meltfptr[36];; - MELT_LOCATION ("warmelt-macro.melt:4414:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4414:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V36*/ meltfptr[24] = @@ -4886,7 +4958,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:4417:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4417:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4415:/ quasiblock"); @@ -5241,7 +5325,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.EXPREST__V59*/ meltfptr[58];; - MELT_LOCATION ("warmelt-macro.melt:4433:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4433:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V58*/ meltfptr[57] = @@ -5398,7 +5495,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:4436:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4436:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4434:/ quasiblock"); @@ -5459,7 +5569,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:4441:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4441:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4439:/ quasiblock"); @@ -5523,7 +5645,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[10];; - MELT_LOCATION ("warmelt-macro.melt:4390:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4390:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8175,7 +8309,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V29*/ meltfptr[25];; - MELT_LOCATION ("warmelt-macro.melt:4543:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4543:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V14*/ meltfptr[10] = /*_.RETURN___V115*/ meltfptr[39];; @@ -8217,7 +8363,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[10];; - MELT_LOCATION ("warmelt-macro.melt:4454:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4454:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8360,7 +8518,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.C__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-macro.melt:4464:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4464:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9051,7 +9221,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:4582:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4582:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4580:/ quasiblock"); @@ -9352,7 +9534,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V34*/ meltfptr[31];; - MELT_LOCATION ("warmelt-macro.melt:4597:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4597:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V33*/ meltfptr[27] = /*_.RETURN___V46*/ meltfptr[40];; @@ -9407,7 +9601,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:4560:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4560:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9549,7 +9755,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MEXPANDER__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:4573:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4573:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10043,7 +10261,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:4615:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4615:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4613:/ quasiblock"); @@ -10108,7 +10338,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.ARGSUB__V26*/ meltfptr[25];; - MELT_LOCATION ("warmelt-macro.melt:4622:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4622:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4620:/ quasiblock"); @@ -10160,7 +10402,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:4626:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4626:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4624:/ quasiblock"); @@ -10461,7 +10715,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V38*/ meltfptr[36];; - MELT_LOCATION ("warmelt-macro.melt:4636:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4636:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V33*/ meltfptr[28] = /*_.RETURN___V44*/ meltfptr[40];; @@ -10525,7 +10791,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[11];; - MELT_LOCATION ("warmelt-macro.melt:4601:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4601:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10922,7 +11200,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:4647:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4647:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V14*/ meltfptr[10] = /*_.RETURN___V16*/ meltfptr[15];; @@ -10938,7 +11228,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[10];; - MELT_LOCATION ("warmelt-macro.melt:4639:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4639:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11449,7 +11751,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:4665:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4665:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V15*/ meltfptr[11] = /*_.RETURN___V20*/ meltfptr[18];; @@ -11469,7 +11783,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[11];; - MELT_LOCATION ("warmelt-macro.melt:4653:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4653:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11866,7 +12192,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:4676:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4676:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V14*/ meltfptr[10] = /*_.RETURN___V16*/ meltfptr[15];; @@ -11882,7 +12220,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[10];; - MELT_LOCATION ("warmelt-macro.melt:4668:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4668:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -12586,7 +12936,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-macro.melt:4704:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4704:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V15*/ meltfptr[11] = /*_.RETURN___V29*/ meltfptr[22];; @@ -12614,7 +12976,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[11];; - MELT_LOCATION ("warmelt-macro.melt:4683:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4683:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13205,7 +13579,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-macro.melt:4740:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4740:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4738:/ quasiblock"); @@ -13392,7 +13778,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V30*/ meltfptr[27];; - MELT_LOCATION ("warmelt-macro.melt:4746:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4746:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V29*/ meltfptr[26] = /*_.RETURN___V36*/ meltfptr[32];; @@ -13439,7 +13837,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:4720:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4720:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13581,7 +13991,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MEXPANDER__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:4732:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4732:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14261,7 +14683,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-macro.melt:4771:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4771:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4764:/ checksignal"); @@ -14307,7 +14741,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[11];; - MELT_LOCATION ("warmelt-macro.melt:4750:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4750:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15140,7 +15586,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:4819:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4819:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4817:/ quasiblock"); @@ -15310,7 +15768,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SINST__V32*/ meltfptr[30];; - MELT_LOCATION ("warmelt-macro.melt:4826:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4826:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V21*/ meltfptr[18] = /*_.RETURN___V41*/ meltfptr[35];; @@ -15352,7 +15822,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V21*/ meltfptr[18];; - MELT_LOCATION ("warmelt-macro.melt:4788:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4788:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15997,7 +16479,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:4851:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4851:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4849:/ quasiblock"); @@ -16140,7 +16634,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V25*/ meltfptr[23];; - MELT_LOCATION ("warmelt-macro.melt:4853:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4853:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V15*/ meltfptr[11] = /*_.RETURN___V34*/ meltfptr[28];; @@ -16180,7 +16686,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[11];; - MELT_LOCATION ("warmelt-macro.melt:4830:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4830:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16562,7 +17080,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MEXPAND_REFERENCE__V13*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:4870:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4870:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16819,7 +17349,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PATEXPAND_REFERENCE__V8*/ meltfptr[7];; - MELT_LOCATION ("warmelt-macro.melt:4877:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4877:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17589,7 +18131,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:4919:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4919:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4917:/ quasiblock"); @@ -17759,7 +18313,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SGET__V27*/ meltfptr[26];; - MELT_LOCATION ("warmelt-macro.melt:4925:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4925:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V19*/ meltfptr[16] = /*_.RETURN___V38*/ meltfptr[32];; @@ -17799,7 +18365,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V19*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:4891:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4891:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18179,7 +18757,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MEXPAND_DEREF__V13*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:4936:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4936:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19050,7 +19640,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:4994:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4994:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:4992:/ quasiblock"); @@ -19220,7 +19822,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SPUT__V32*/ meltfptr[30];; - MELT_LOCATION ("warmelt-macro.melt:5000:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5000:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V19*/ meltfptr[16] = /*_.RETURN___V43*/ meltfptr[37];; @@ -19266,7 +19880,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V19*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:4959:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:4959:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19837,7 +20463,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V18*/ meltfptr[17];; - MELT_LOCATION ("warmelt-macro.melt:5025:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5025:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V14*/ meltfptr[12] = /*_.RETURN___V24*/ meltfptr[20];; @@ -19861,7 +20499,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:5012:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5012:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20487,7 +21137,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-macro.melt:5044:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5044:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V15*/ meltfptr[11] = /*_.RETURN___V27*/ meltfptr[23];; @@ -20515,7 +21177,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[11];; - MELT_LOCATION ("warmelt-macro.melt:5029:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5029:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -21084,7 +21758,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V18*/ meltfptr[17];; - MELT_LOCATION ("warmelt-macro.melt:5072:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5072:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V14*/ meltfptr[12] = /*_.RETURN___V24*/ meltfptr[20];; @@ -21108,7 +21794,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:5059:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5059:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -21734,7 +22432,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-macro.melt:5091:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5091:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V15*/ meltfptr[11] = /*_.RETURN___V27*/ meltfptr[23];; @@ -21762,7 +22472,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[11];; - MELT_LOCATION ("warmelt-macro.melt:5076:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5076:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -23722,7 +24444,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SMAT__V82*/ meltfptr[54];; - MELT_LOCATION ("warmelt-macro.melt:5186:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5186:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V79*/ meltfptr[51] = /*_.RETURN___V89*/ meltfptr[70];; @@ -23790,7 +24524,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:5107:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5107:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -23939,7 +24685,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.C__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-macro.melt:5121:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5121:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25375,7 +26133,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LETB__V69*/ meltfptr[33];; - MELT_LOCATION ("warmelt-macro.melt:5280:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5280:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V68*/ meltfptr[31] = /*_.RETURN___V71*/ meltfptr[37];; @@ -25425,7 +26195,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:5200:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5200:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-macro+04.c b/gcc/melt/generated/warmelt-macro+04.c index 9903d1b91ea..f4a00c5ea26 100644 --- a/gcc/melt/generated/warmelt-macro+04.c +++ b/gcc/melt/generated/warmelt-macro+04.c @@ -3106,7 +3106,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LETR__V44*/ meltfptr[43];; - MELT_LOCATION ("warmelt-macro.melt:5333:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5333:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V43*/ meltfptr[42] = /*_.RETURN___V46*/ meltfptr[45];; @@ -3156,7 +3168,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:5284:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5284:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3332,7 +3356,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MEXPAND_LETBINDING__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:5306:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5306:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3678,7 +3714,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-macro.melt:5314:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5314:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3811,7 +3859,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MEXPANDER__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:5327:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5327:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4037,7 +4097,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RECV__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-macro.melt:5353:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5353:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:5351:/ checksignal"); @@ -4047,7 +4119,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V7*/ meltfptr[3];; - MELT_LOCATION ("warmelt-macro.melt:5351:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5351:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4909,8 +4993,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION - ("warmelt-macro.melt:5410:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:5410:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V53*/ meltfptr[49] = @@ -6138,8 +6236,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION - ("warmelt-macro.melt:5477:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-macro.melt:5477:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION @@ -6980,7 +7092,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LETR__V120*/ meltfptr[33];; - MELT_LOCATION ("warmelt-macro.melt:5506:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5506:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V119*/ meltfptr[104] = /*_.RETURN___V126*/ meltfptr[40];; @@ -7042,7 +7166,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:5364:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5364:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7191,7 +7327,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.BX__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-macro.melt:5391:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5391:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7322,7 +7470,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MEXPANDER__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:5497:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5497:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8067,7 +8227,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LAMBR__V33*/ meltfptr[32];; - MELT_LOCATION ("warmelt-macro.melt:5550:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5550:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V29*/ meltfptr[28] = /*_.RETURN___V35*/ meltfptr[34];; @@ -8117,7 +8289,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:5520:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5520:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8256,7 +8440,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MEXPANDER__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:5543:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5543:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8828,7 +9024,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:5591:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5591:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:5589:/ quasiblock"); @@ -9058,7 +9266,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:5606:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5606:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:5603:/ quasiblock"); @@ -10625,7 +10846,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:5664:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5664:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:5661:/ quasiblock"); @@ -11078,7 +11312,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V111*/ meltfptr[87];; - MELT_LOCATION ("warmelt-macro.melt:5674:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5674:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V110*/ meltfptr[84] = /*_.RETURN___V116*/ meltfptr[29];; @@ -11122,7 +11368,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-macro.melt:5571:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5571:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11509,7 +11767,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MEXPANDER__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:5610:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5610:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11640,7 +11910,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MEXPANDER__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:5641:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5641:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -12087,7 +12369,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V10*/ meltfptr[8];; - MELT_LOCATION ("warmelt-macro.melt:5652:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5652:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -12560,7 +12854,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:5710:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5710:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:5708:/ quasiblock"); @@ -12838,7 +13144,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:5725:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5725:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:5722:/ quasiblock"); @@ -13042,7 +13360,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MULCR__V48*/ meltfptr[47];; - MELT_LOCATION ("warmelt-macro.melt:5740:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5740:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V44*/ meltfptr[43] = /*_.RETURN___V50*/ meltfptr[49];; @@ -13122,7 +13452,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:5694:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5694:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13254,7 +13596,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PUT_ENV__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:5727:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5727:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13385,7 +13739,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MEXPANDER__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:5731:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5731:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13882,7 +14248,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.QUOTED__V17*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:5780:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5780:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V22*/ meltfptr[20] = /*_.RETURN___V23*/ meltfptr[19];; @@ -13946,7 +14324,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SQU__V25*/ meltfptr[24];; - MELT_LOCATION ("warmelt-macro.melt:5784:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5784:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V24*/ meltfptr[19] = /*_.RETURN___V27*/ meltfptr[26];; @@ -13986,7 +14376,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-macro.melt:5756:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5756:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14393,7 +14795,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:5809:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5809:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:5807:/ quasiblock"); @@ -14465,7 +14879,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SCOM__V23*/ meltfptr[20];; - MELT_LOCATION ("warmelt-macro.melt:5815:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5815:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V22*/ meltfptr[19] = /*_.RETURN___V25*/ meltfptr[24];; @@ -14503,7 +14929,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-macro.melt:5795:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5795:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15346,7 +15784,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:5858:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5858:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:5856:/ quasiblock"); @@ -15539,7 +15989,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SCH__V43*/ meltfptr[32];; - MELT_LOCATION ("warmelt-macro.melt:5865:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5865:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V42*/ meltfptr[31] = /*_.RETURN___V49*/ meltfptr[24];; @@ -15579,7 +16041,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:5826:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5826:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16242,7 +16716,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:5894:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5894:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:5891:/ quasiblock"); @@ -16324,7 +16810,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:5916:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5916:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:5914:/ quasiblock"); @@ -16666,7 +17164,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:5935:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5935:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:5933:/ quasiblock"); @@ -16864,7 +17374,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SUP__V49*/ meltfptr[46];; - MELT_LOCATION ("warmelt-macro.melt:5942:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5942:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V48*/ meltfptr[42] = /*_.RETURN___V55*/ meltfptr[37];; @@ -16900,7 +17422,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:5876:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5876:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17364,7 +17898,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];; - MELT_LOCATION ("warmelt-macro.melt:5965:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5965:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17501,7 +18047,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MEXPANDER__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:5973:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5973:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17750,7 +18308,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:5990:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5990:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:5988:/ quasiblock"); @@ -17811,7 +18381,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PROGR__V17*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:5997:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5997:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V16*/ meltfptr[13] = /*_.RETURN___V18*/ meltfptr[17];; @@ -17845,7 +18427,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-macro.melt:5981:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:5981:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18332,7 +18926,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETR__V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-macro.melt:6019:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6019:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V16*/ meltfptr[14] = /*_.RETURN___V22*/ meltfptr[21];; @@ -18356,7 +18962,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:6007:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6007:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18883,7 +19501,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-macro.melt:6046:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6046:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:6044:/ quasiblock"); @@ -19102,7 +19732,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.FORR__V37*/ meltfptr[36];; - MELT_LOCATION ("warmelt-macro.melt:6062:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6062:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V33*/ meltfptr[32] = /*_.RETURN___V39*/ meltfptr[38];; @@ -19156,7 +19798,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:6031:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6031:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19295,7 +19949,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MEXPANDER__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:6055:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6055:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19813,7 +20479,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-macro.melt:6089:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6089:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:6087:/ quasiblock"); @@ -19906,7 +20584,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-macro.melt:6096:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6096:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:6093:/ quasiblock"); @@ -20062,7 +20752,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.EXR__V39*/ meltfptr[38];; - MELT_LOCATION ("warmelt-macro.melt:6107:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6107:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V35*/ meltfptr[31] = /*_.RETURN___V41*/ meltfptr[40];; @@ -20118,7 +20820,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:6074:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6074:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20257,7 +20971,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MEXPANDER__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:6100:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6100:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20766,7 +21492,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:6132:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6132:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:6130:/ quasiblock"); @@ -20815,7 +21553,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:6136:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6136:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:6134:/ quasiblock"); @@ -20898,7 +21648,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:6142:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6142:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:6139:/ quasiblock"); @@ -21083,7 +21845,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MAGAIN__V38*/ meltfptr[34];; - MELT_LOCATION ("warmelt-macro.melt:6149:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6149:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V37*/ meltfptr[33] = /*_.RETURN___V44*/ meltfptr[40];; @@ -21137,7 +21911,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:6117:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6117:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -21627,7 +22413,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-macro.melt:6175:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6175:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:6173:/ quasiblock"); @@ -21884,7 +22682,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V34*/ meltfptr[33];; - MELT_LOCATION ("warmelt-macro.melt:6190:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6190:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V33*/ meltfptr[32] = /*_.RETURN___V40*/ meltfptr[36];; @@ -21942,7 +22752,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:6161:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6161:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -22895,7 +23717,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:6241:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6241:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:6234:/ quasiblock"); @@ -23187,7 +24021,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:6251:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6251:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:6248:/ quasiblock"); @@ -23678,7 +24525,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.ACPPIF__V71*/ meltfptr[70];; - MELT_LOCATION ("warmelt-macro.melt:6278:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6278:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V37*/ meltfptr[31] = /*_.RETURN___V77*/ meltfptr[73];; @@ -23748,7 +24607,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:6205:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6205:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25056,7 +25927,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.DCPPIF__V58*/ meltfptr[57];; - MELT_LOCATION ("warmelt-macro.melt:6351:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6351:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V48*/ meltfptr[36] = /*_.RETURN___V64*/ meltfptr[60];; @@ -25136,7 +26019,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:6294:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6294:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25878,7 +26773,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:6389:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6389:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:6387:/ quasiblock"); @@ -25964,7 +26871,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:6394:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6394:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:6392:/ quasiblock"); @@ -26124,7 +27043,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:6404:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6404:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:6402:/ quasiblock"); @@ -26538,7 +27469,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:6425:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6425:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:6423:/ quasiblock"); @@ -26864,7 +27807,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-macro.melt:6445:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6445:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-macro.melt:6441:/ quasiblock"); @@ -27303,7 +28258,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.DCPPIF__V85*/ meltfptr[84];; - MELT_LOCATION ("warmelt-macro.melt:6469:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6469:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V55*/ meltfptr[51] = /*_.RETURN___V91*/ meltfptr[87];; @@ -27397,7 +28364,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:6366:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6366:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -28162,7 +29141,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V26*/ meltfptr[25];; - MELT_LOCATION ("warmelt-macro.melt:6501:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6501:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V18*/ meltfptr[16] = /*_.RETURN___V32*/ meltfptr[28];; @@ -28192,7 +29183,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:6476:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6476:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -28492,7 +29495,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:6488:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6488:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -29361,7 +30376,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V41*/ meltfptr[35];; - MELT_LOCATION ("warmelt-macro.melt:6541:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6541:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V40*/ meltfptr[34] = /*_.RETURN___V47*/ meltfptr[38];; @@ -29423,7 +30450,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:6508:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6508:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30375,7 +31414,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V48*/ meltfptr[42];; - MELT_LOCATION ("warmelt-macro.melt:6592:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6592:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V47*/ meltfptr[41] = /*_.RETURN___V54*/ meltfptr[45];; @@ -30451,7 +31502,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:6551:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6551:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -31187,7 +32250,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V26*/ meltfptr[25];; - MELT_LOCATION ("warmelt-macro.melt:6622:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6622:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V18*/ meltfptr[14] = /*_.RETURN___V32*/ meltfptr[28];; @@ -31217,7 +32292,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:6599:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6599:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -31399,7 +32486,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-macro.melt:6611:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6611:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -32586,7 +33685,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V56*/ meltfptr[47];; - MELT_LOCATION ("warmelt-macro.melt:6668:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6668:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V55*/ meltfptr[49] = /*_.RETURN___V62*/ meltfptr[58];; @@ -32658,7 +33769,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:6628:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6628:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-macro+05.c b/gcc/melt/generated/warmelt-macro+05.c index 9805b4a61c5..6cb4b40b3d6 100644 --- a/gcc/melt/generated/warmelt-macro+05.c +++ b/gcc/melt/generated/warmelt-macro+05.c @@ -2847,7 +2847,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-macro.melt:6690:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6690:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V16*/ meltfptr[12] = /*_.RETURN___V27*/ meltfptr[23];; @@ -2875,7 +2887,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:6675:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6675:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3538,7 +3562,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V23*/ meltfptr[22];; - MELT_LOCATION ("warmelt-macro.melt:6715:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6715:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V18*/ meltfptr[14] = /*_.RETURN___V29*/ meltfptr[25];; @@ -3566,7 +3602,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:6699:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6699:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4202,7 +4250,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-macro.melt:6739:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6739:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V16*/ meltfptr[14] = /*_.RETURN___V27*/ meltfptr[23];; @@ -4230,7 +4290,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:6724:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6724:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5027,7 +5099,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V27*/ meltfptr[26];; - MELT_LOCATION ("warmelt-macro.melt:6771:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6771:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V26*/ meltfptr[25] = /*_.RETURN___V33*/ meltfptr[29];; @@ -5073,7 +5157,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:6749:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6749:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5943,7 +6039,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V33*/ meltfptr[32];; - MELT_LOCATION ("warmelt-macro.melt:6806:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6806:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V32*/ meltfptr[31] = /*_.RETURN___V39*/ meltfptr[35];; @@ -6003,7 +6111,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-macro.melt:6777:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:6777:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-macro+meltdesc.c b/gcc/melt/generated/warmelt-macro+meltdesc.c index 9b85fe85c05..c845d2f2429 100644 --- a/gcc/melt/generated/warmelt-macro+meltdesc.c +++ b/gcc/melt/generated/warmelt-macro+meltdesc.c @@ -19,7 +19,7 @@ #endif /*__cplusplus */ /* version of the GCC compiler & MELT runtime generating this */ -const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revision 188875] MELT_0.9.6-pre" +const char melt_genversionstr[]="4.8.0 20120702 (experimental) [melt-branch revision 189162] MELT_0.9.6-pre" #ifdef __cplusplus " (in C++)" @@ -28,7 +28,7 @@ const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revi #endif ; -const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_188875]"; +const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_189162]"; /* source name & real path of the module */ /*MELTMODULENAME MELT-STAGE-ZERO/warmelt-macro */ @@ -36,18 +36,18 @@ const char melt_modulename[]="warmelt-macro"; const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.8.0/melt-modules/0.9.6-pre/warmelt-macro"; /* hash of preprocessed melt-run.h generating this */ -const char melt_prepromd5meltrun[]="40fea0fe808f877cf6541857ec8d6c2d"; +const char melt_prepromd5meltrun[]="b3a18a5fcc8e78e7c3ea5bf55f88e347"; /* hexmd5checksum of primary C file */ -const char melt_primaryhexmd5[]="cff3bad81d60df55e57bcff395218109"; +const char melt_primaryhexmd5[]="a24bc8251cadcbb1ab897001753a6416"; /* hexmd5checksum of secondary C files */ const char* const melt_secondaryhexmd5tab[]={ /*nosecfile*/ (const char*)0, - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+01.c #1 */ "5712e57a454e7b4b231d988e7bc307ac", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+02.c #2 */ "ecf43bd989d7a3d2a30526929e498c65", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+03.c #3 */ "c0651e2a73154334892cdcfe24104a59", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+04.c #4 */ "928c526183e4032e7bc876ddc6779593", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+05.c #5 */ "4ddbd6aaf913afd17677434c930bd2ab", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+01.c #1 */ "ee5e93f4b4c2f2aad3bc90fee7c639d2", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+02.c #2 */ "bbc0f194b89b543e11c3f59e177559b1", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+03.c #3 */ "5ebc04a3aa9adaa4351185d170322803", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+04.c #4 */ "588c69467f600d66de6e7fdb8bcb21f7", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-macro+05.c #5 */ "58858cfb7cf27e34b35eab58ef580832", /*nosecfile*/ (const char*)0, (const char*)0 }; @@ -55,10 +55,10 @@ const char* const melt_secondaryhexmd5tab[]={ const int melt_lastsecfileindex=5; /* cumulated checksum of primary & secondary files */ -const char melt_cumulated_hexmd5[]="6920f87a2bad3d5a8db10cf5ecd2805d" ; +const char melt_cumulated_hexmd5[]="146ed78820a630bee786e16761b1dde4" ; /* include the timestamp file */ -#define meltmod_warmelt_macro_mds__6920f87a2bad3d5a8db10cf5ecd2805d 1 +#define meltmod_warmelt_macro_mds__146ed78820a630bee786e16761b1dde4 1 #include "warmelt-macro+melttime.h" diff --git a/gcc/melt/generated/warmelt-macro+melttime.h b/gcc/melt/generated/warmelt-macro+melttime.h index 33aba1131a3..f7fead815f8 100644 --- a/gcc/melt/generated/warmelt-macro+melttime.h +++ b/gcc/melt/generated/warmelt-macro+melttime.h @@ -5,7 +5,7 @@ /* This warmelt-macro+melttime.h is included from warmelt-macro+meltdesc.c only. */ -#if meltmod_warmelt_macro_mds__6920f87a2bad3d5a8db10cf5ecd2805d +#if meltmod_warmelt_macro_mds__146ed78820a630bee786e16761b1dde4 /* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-macro */ #ifdef __cplusplus @@ -18,8 +18,8 @@ extern "C" { /*MELT BOOTSTRAP*/ -const char melt_gen_timestamp[]="Fri Jun 22 15:20:03 2012 CEST"; -const long long melt_gen_timenum=1340371203; +const char melt_gen_timestamp[]="Mon Jul 2 17:04:55 2012 MEST"; +const long long melt_gen_timenum=1341241495; const char melt_build_timestamp[]= __DATE__ "@" __TIME__ #ifdef __cplusplus @@ -34,7 +34,7 @@ const long long melt_gen_timenum=1340371203; } ; /* end extern C */ #endif /*__cplusplus */ - #else /* ! meltmod_warmelt_macro_mds__6920f87a2bad3d5a8db10cf5ecd2805d */ + #else /* ! meltmod_warmelt_macro_mds__146ed78820a630bee786e16761b1dde4 */ #error invalid timestamp file for MELT-STAGE-ZERO/warmelt-macro - #endif /* meltmod_warmelt_macro_mds__6920f87a2bad3d5a8db10cf5ecd2805d */ + #endif /* meltmod_warmelt_macro_mds__146ed78820a630bee786e16761b1dde4 */ diff --git a/gcc/melt/generated/warmelt-macro.c b/gcc/melt/generated/warmelt-macro.c index cf48be11668..12d7b2240da 100644 --- a/gcc/melt/generated/warmelt-macro.c +++ b/gcc/melt/generated/warmelt-macro.c @@ -2970,7 +2970,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.EXPRESLIST__V15*/ meltfptr[14];; - MELT_LOCATION ("warmelt-macro.melt:894:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:894:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V14*/ meltfptr[12] = /*_.RETURN___V29*/ meltfptr[27];; @@ -2988,7 +3000,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:855:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:855:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3433,7 +3457,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:899:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:899:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4131,7 +4167,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.EXPRESLIST__V13*/ meltfptr[12];; - MELT_LOCATION ("warmelt-macro.melt:945:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:945:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[10] = /*_.RETURN___V30*/ meltfptr[28];; @@ -4149,7 +4197,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-macro.melt:911:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:911:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4563,7 +4623,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-macro.melt:950:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-macro.melt:950:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4654,7 +4726,7 @@ initialize_module_meltdata_warmelt_macro (initial_frame_st * iniframp__, dbgprintf ("start initialize_module_meltdata_warmelt_macro iniframp__=%p", (void *) iniframp__); melt_assertmsg ("check module initial frame", - iniframp__->mcfr_nbvar == /*minihash */ -3435); + iniframp__->mcfr_nbvar == /*minihash */ -3578); struct cdata_st { @@ -28036,7 +28108,7 @@ start_module_melt (void *modargp_) /**initial routine prologue**/ /* set initial frame marking */ ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = - /*minihash */ -3435; + /*minihash */ -3578; ((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout = meltmod__warmelt_macro__forward_or_mark_module_start_frame; /**COMMENT: get previous environment **/ ; @@ -93269,7 +93341,7 @@ meltmod__warmelt_macro__forward_or_mark_module_start_frame (struct int ix = 0; initial_frame_st *meltframptr_ = (initial_frame_st *) fp; melt_assertmsg ("check module frame", - meltframptr_->mcfr_nbvar == /*minihash */ -3435); + meltframptr_->mcfr_nbvar == /*minihash */ -3578); if (!marking && melt_is_forwarding) { dbgprintf diff --git a/gcc/melt/generated/warmelt-modes+01.c b/gcc/melt/generated/warmelt-modes+01.c index ec0215a99d4..d5db3d01d67 100644 --- a/gcc/melt/generated/warmelt-modes+01.c +++ b/gcc/melt/generated/warmelt-modes+01.c @@ -1495,7 +1495,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-modes.melt:217:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:217:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -2106,7 +2118,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MAPOBJECT_GET__V11*/ meltfptr[5];; - MELT_LOCATION ("warmelt-modes.melt:237:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:237:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6390,7 +6414,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:474:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:474:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V9*/ meltfptr[8] = /*_.RETURN___V10*/ meltfptr[9];; @@ -7273,7 +7309,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:525:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:525:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V6*/ meltfptr[4] = /*_.RETURN___V7*/ meltfptr[6];; @@ -9749,7 +9797,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V11*/ meltfptr[9];; - MELT_LOCATION ("warmelt-modes.melt:559:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:559:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11021,7 +11081,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.COMPARE_NAMED_ALPHA__V6*/ meltfptr[5];; - MELT_LOCATION ("warmelt-modes.melt:697:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:697:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -12389,7 +12461,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.COMPARE_NAMED_ALPHA__V6*/ meltfptr[5];; - MELT_LOCATION ("warmelt-modes.melt:766:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:766:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13623,7 +13707,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.CBIND_CLASS__V6*/ meltfptr[5];; - MELT_LOCATION ("warmelt-modes.melt:832:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:832:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14169,7 +14265,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-modes.melt:837:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:837:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14604,7 +14712,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-modes.melt:867:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:867:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14918,7 +15038,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.COMPARE_NAMED_ALPHA__V10*/ meltfptr[9];; - MELT_LOCATION ("warmelt-modes.melt:890:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:890:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16567,7 +16699,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.COMPARE_NAMED_ALPHA__V6*/ meltfptr[5];; - MELT_LOCATION ("warmelt-modes.melt:993:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:993:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18123,7 +18267,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.COMPARE_NAMED_ALPHA__V6*/ meltfptr[5];; - MELT_LOCATION ("warmelt-modes.melt:1056:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:1056:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19335,7 +19491,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETVAL___V39*/ meltfptr[19];; - MELT_LOCATION ("warmelt-modes.melt:1135:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:1135:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; @@ -19522,7 +19690,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.COMPARE_NAMED_ALPHA__V6*/ meltfptr[5];; - MELT_LOCATION ("warmelt-modes.melt:1092:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:1092:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20976,7 +21156,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.COMPARE_NAMED_ALPHA__V6*/ meltfptr[5];; - MELT_LOCATION ("warmelt-modes.melt:1154:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:1154:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -21885,7 +22077,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-modes.melt:1217:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:1217:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -23356,7 +23560,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!konst_18_TRUE */ meltfrout->tabval[18]);; - MELT_LOCATION ("warmelt-modes.melt:1362:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:1362:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V63*/ meltfptr[59] = /*_.RETURN___V64*/ meltfptr[63];; @@ -23474,7 +23690,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-modes.melt:1301:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:1301:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -23800,7 +24028,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-modes.melt:1341:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:1341:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -24312,7 +24552,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:1397:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:1397:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:1394:/ quasiblock"); @@ -24994,7 +25246,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-modes.melt:1454:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:1454:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V11*/ meltfptr[9] = /*_.RETURN___V23*/ meltfptr[19];; @@ -25026,7 +25290,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-modes.melt:1405:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:1405:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25255,7 +25531,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!konst_1_TRUE */ meltfrout->tabval[1]);; - MELT_LOCATION ("warmelt-modes.melt:1469:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:1469:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:1467:/ checksignal"); @@ -25265,7 +25553,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-modes.melt:1467:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:1467:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30611,7 +30911,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V78*/ meltfptr[77];; - MELT_LOCATION ("warmelt-modes.melt:1574:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:1574:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-modes+02.c b/gcc/melt/generated/warmelt-modes+02.c index 4d41b8c4799..3554ab738a0 100644 --- a/gcc/melt/generated/warmelt-modes+02.c +++ b/gcc/melt/generated/warmelt-modes+02.c @@ -6447,7 +6447,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V53*/ meltfptr[41];; - MELT_LOCATION ("warmelt-modes.melt:2777:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:2777:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10771,7 +10783,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V78*/ meltfptr[72];; - MELT_LOCATION ("warmelt-modes.melt:2977:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:2977:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11874,7 +11898,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V29*/ meltfptr[26];; - MELT_LOCATION ("warmelt-modes.melt:3354:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3354:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13535,7 +13571,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!konst_22_TRUE */ meltfrout->tabval[22]);; - MELT_LOCATION ("warmelt-modes.melt:3548:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3548:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V45*/ meltfptr[41] = /*_.RETURN___V72*/ meltfptr[68];; @@ -13634,7 +13682,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-modes.melt:3412:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3412:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14011,7 +14071,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:3577:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3577:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:3575:/ quasiblock"); @@ -15187,7 +15259,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V11*/ meltfptr[7];; - MELT_LOCATION ("warmelt-modes.melt:3565:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3565:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15721,7 +15805,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!konst_8_TRUE */ meltfrout->tabval[8]);; - MELT_LOCATION ("warmelt-modes.melt:3628:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3628:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V8*/ meltfptr[4] = /*_.RETURN___V21*/ meltfptr[20];; @@ -15757,7 +15853,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-modes.melt:3613:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3613:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16231,7 +16339,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!konst_6_TRUE */ meltfrout->tabval[6]);; - MELT_LOCATION ("warmelt-modes.melt:3654:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3654:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:3642:/ checksignal"); @@ -16241,7 +16361,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V19*/ meltfptr[15];; - MELT_LOCATION ("warmelt-modes.melt:3642:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3642:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16695,7 +16827,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!konst_6_TRUE */ meltfrout->tabval[6]);; - MELT_LOCATION ("warmelt-modes.melt:3683:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3683:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V8*/ meltfptr[4] = /*_.RETURN___V19*/ meltfptr[15];; @@ -16729,7 +16873,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-modes.melt:3671:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3671:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17182,7 +17338,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!konst_6_TRUE */ meltfrout->tabval[6]);; - MELT_LOCATION ("warmelt-modes.melt:3711:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3711:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V8*/ meltfptr[4] = /*_.RETURN___V19*/ meltfptr[15];; @@ -17216,7 +17384,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-modes.melt:3699:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3699:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17827,7 +18007,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:3752:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3752:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:3750:/ quasiblock"); @@ -18092,7 +18284,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:3763:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3763:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:3760:/ quasiblock"); @@ -18146,7 +18350,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!konst_6_TRUE */ meltfrout->tabval[6]);; - MELT_LOCATION ("warmelt-modes.melt:3766:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3766:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V19*/ meltfptr[14] = /*_.RETURN___V35*/ meltfptr[32];; @@ -18195,7 +18411,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-modes.melt:3728:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3728:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18584,7 +18812,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:3801:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3801:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:3799:/ quasiblock"); @@ -18693,7 +18933,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:3808:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3808:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:3806:/ quasiblock"); @@ -18926,7 +19178,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:3818:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3818:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:3815:/ quasiblock"); @@ -19247,7 +19511,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!konst_10_TRUE */ meltfrout->tabval[10]);; - MELT_LOCATION ("warmelt-modes.melt:3839:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3839:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V8*/ meltfptr[4] = /*_.RETURN___V43*/ meltfptr[29];; @@ -19293,7 +19569,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-modes.melt:3782:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3782:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19683,7 +19971,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-modes.melt:3825:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3825:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19938,7 +20238,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:3873:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3873:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:3871:/ quasiblock"); @@ -20047,7 +20359,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:3880:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3880:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:3878:/ quasiblock"); @@ -20287,7 +20611,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:3890:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3890:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:3887:/ quasiblock"); @@ -21528,7 +21864,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-modes.melt:3856:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3856:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -21917,7 +22265,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-modes.melt:3897:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3897:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -22257,7 +22617,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.TRANSLATEINIT_FLAVORED__V10*/ meltfptr[5];; - MELT_LOCATION ("warmelt-modes.melt:3943:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3943:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -22518,7 +22890,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.TRANSLATEINIT_FLAVORED__V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-modes.melt:3963:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3963:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -22777,7 +23161,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.TRANSLATEINIT_FLAVORED__V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-modes.melt:3981:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3981:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -23036,7 +23432,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.TRANSLATEINIT_FLAVORED__V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-modes.melt:3999:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:3999:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -23369,7 +23777,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:4046:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:4046:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V9*/ meltfptr[5] = /*_.RETURN___V10*/ meltfptr[9];; @@ -23895,7 +24315,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:4082:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:4082:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*^quasiblock */ @@ -25641,7 +26073,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V11*/ meltfptr[10];; - MELT_LOCATION ("warmelt-modes.melt:4162:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:4162:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V10*/ meltfptr[9] = @@ -25690,7 +26134,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-modes.melt:4133:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:4133:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25930,7 +26386,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:4169:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:4169:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*^quasiblock */ @@ -26038,7 +26506,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:4172:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:4172:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:4170:/ quasiblock"); @@ -26204,7 +26684,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:4185:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:4185:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:4179:/ quasiblock"); @@ -26732,7 +27224,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:4207:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:4207:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*^quasiblock */ @@ -26907,7 +27411,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:4220:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:4220:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:4218:/ quasiblock"); @@ -28684,7 +29200,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:4326:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:4326:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V15*/ meltfptr[11] = @@ -29117,7 +29646,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.CHPH__V19*/ meltfptr[18];; - MELT_LOCATION ("warmelt-modes.melt:4346:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:4346:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V17*/ meltfptr[12] = @@ -29180,7 +29721,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-modes.melt:4310:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:4310:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -29464,7 +30017,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V7*/ meltfptr[3];; - MELT_LOCATION ("warmelt-modes.melt:4354:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:4354:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-modes+meltdesc.c b/gcc/melt/generated/warmelt-modes+meltdesc.c index 219f8437785..685ebe0a1ba 100644 --- a/gcc/melt/generated/warmelt-modes+meltdesc.c +++ b/gcc/melt/generated/warmelt-modes+meltdesc.c @@ -19,7 +19,7 @@ #endif /*__cplusplus */ /* version of the GCC compiler & MELT runtime generating this */ -const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revision 188875] MELT_0.9.6-pre" +const char melt_genversionstr[]="4.8.0 20120702 (experimental) [melt-branch revision 189162] MELT_0.9.6-pre" #ifdef __cplusplus " (in C++)" @@ -28,7 +28,7 @@ const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revi #endif ; -const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_188875]"; +const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_189162]"; /* source name & real path of the module */ /*MELTMODULENAME MELT-STAGE-ZERO/warmelt-modes */ @@ -36,15 +36,15 @@ const char melt_modulename[]="warmelt-modes"; const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.8.0/melt-modules/0.9.6-pre/warmelt-modes"; /* hash of preprocessed melt-run.h generating this */ -const char melt_prepromd5meltrun[]="40fea0fe808f877cf6541857ec8d6c2d"; +const char melt_prepromd5meltrun[]="b3a18a5fcc8e78e7c3ea5bf55f88e347"; /* hexmd5checksum of primary C file */ -const char melt_primaryhexmd5[]="48542e724cca396352c493f1544e0278"; +const char melt_primaryhexmd5[]="5be702ab39f918b1ea79fc161509b2cf"; /* hexmd5checksum of secondary C files */ const char* const melt_secondaryhexmd5tab[]={ /*nosecfile*/ (const char*)0, - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-modes+01.c #1 */ "a352c1dd85bb9548d2ddddf815994f2a", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-modes+02.c #2 */ "8bb61a5ccd3591146e6220545a27a410", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-modes+01.c #1 */ "5c7f3a66656c07bc1d7ab9c2ebc36676", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-modes+02.c #2 */ "1c35ab05395c3e284c92e07ab82cfba0", /*nosecfile*/ (const char*)0, (const char*)0 }; @@ -52,10 +52,10 @@ const char* const melt_secondaryhexmd5tab[]={ const int melt_lastsecfileindex=2; /* cumulated checksum of primary & secondary files */ -const char melt_cumulated_hexmd5[]="2117027bd928e4314e7aca36046edd3b" ; +const char melt_cumulated_hexmd5[]="6084cc7eb54402a8b4b7ea7a0afe0513" ; /* include the timestamp file */ -#define meltmod_warmelt_modes_mds__2117027bd928e4314e7aca36046edd3b 1 +#define meltmod_warmelt_modes_mds__6084cc7eb54402a8b4b7ea7a0afe0513 1 #include "warmelt-modes+melttime.h" diff --git a/gcc/melt/generated/warmelt-modes+melttime.h b/gcc/melt/generated/warmelt-modes+melttime.h index 10442478496..278d522c742 100644 --- a/gcc/melt/generated/warmelt-modes+melttime.h +++ b/gcc/melt/generated/warmelt-modes+melttime.h @@ -5,7 +5,7 @@ /* This warmelt-modes+melttime.h is included from warmelt-modes+meltdesc.c only. */ -#if meltmod_warmelt_modes_mds__2117027bd928e4314e7aca36046edd3b +#if meltmod_warmelt_modes_mds__6084cc7eb54402a8b4b7ea7a0afe0513 /* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-modes */ #ifdef __cplusplus @@ -18,8 +18,8 @@ extern "C" { /*MELT BOOTSTRAP*/ -const char melt_gen_timestamp[]="Fri Jun 22 15:20:09 2012 CEST"; -const long long melt_gen_timenum=1340371209; +const char melt_gen_timestamp[]="Mon Jul 2 17:04:56 2012 MEST"; +const long long melt_gen_timenum=1341241496; const char melt_build_timestamp[]= __DATE__ "@" __TIME__ #ifdef __cplusplus @@ -34,7 +34,7 @@ const long long melt_gen_timenum=1340371209; } ; /* end extern C */ #endif /*__cplusplus */ - #else /* ! meltmod_warmelt_modes_mds__2117027bd928e4314e7aca36046edd3b */ + #else /* ! meltmod_warmelt_modes_mds__6084cc7eb54402a8b4b7ea7a0afe0513 */ #error invalid timestamp file for MELT-STAGE-ZERO/warmelt-modes - #endif /* meltmod_warmelt_modes_mds__2117027bd928e4314e7aca36046edd3b */ + #endif /* meltmod_warmelt_modes_mds__6084cc7eb54402a8b4b7ea7a0afe0513 */ diff --git a/gcc/melt/generated/warmelt-modes.c b/gcc/melt/generated/warmelt-modes.c index 8b56d819fbf..742c39f5f85 100644 --- a/gcc/melt/generated/warmelt-modes.c +++ b/gcc/melt/generated/warmelt-modes.c @@ -2365,7 +2365,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:81:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:81:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:79:/ quasiblock"); @@ -2957,7 +2969,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!konst_7_TRUE */ meltfrout->tabval[7]);; - MELT_LOCATION ("warmelt-modes.melt:99:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:99:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V43*/ meltfptr[21] = /*_.RETURN___V63*/ meltfptr[59];; @@ -3016,7 +3040,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-modes.melt:51:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:51:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3596,7 +3632,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:137:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:137:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:135:/ quasiblock"); @@ -3723,7 +3771,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-modes.melt:146:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:146:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-modes.melt:144:/ quasiblock"); @@ -4242,7 +4302,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!konst_8_TRUE */ meltfrout->tabval[8]);; - MELT_LOCATION ("warmelt-modes.melt:164:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:164:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V19*/ meltfptr[14] = /*_.RETURN___V57*/ meltfptr[53];; @@ -4301,7 +4373,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-modes.melt:114:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-modes.melt:114:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4639,7 +4723,7 @@ initialize_module_meltdata_warmelt_modes (initial_frame_st * iniframp__, dbgprintf ("start initialize_module_meltdata_warmelt_modes iniframp__=%p", (void *) iniframp__); melt_assertmsg ("check module initial frame", - iniframp__->mcfr_nbvar == /*minihash */ -3274); + iniframp__->mcfr_nbvar == /*minihash */ -2689); struct cdata_st { @@ -11164,7 +11248,7 @@ start_module_melt (void *modargp_) /**initial routine prologue**/ /* set initial frame marking */ ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = - /*minihash */ -3274; + /*minihash */ -2689; ((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout = meltmod__warmelt_modes__forward_or_mark_module_start_frame; /**COMMENT: get previous environment **/ ; @@ -27138,7 +27222,7 @@ meltmod__warmelt_modes__forward_or_mark_module_start_frame (struct int ix = 0; initial_frame_st *meltframptr_ = (initial_frame_st *) fp; melt_assertmsg ("check module frame", - meltframptr_->mcfr_nbvar == /*minihash */ -3274); + meltframptr_->mcfr_nbvar == /*minihash */ -2689); if (!marking && melt_is_forwarding) { dbgprintf diff --git a/gcc/melt/generated/warmelt-normal+01.c b/gcc/melt/generated/warmelt-normal+01.c index 02bfc540319..5721f7e4f3e 100644 --- a/gcc/melt/generated/warmelt-normal+01.c +++ b/gcc/melt/generated/warmelt-normal+01.c @@ -2880,7 +2880,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[8];; - MELT_LOCATION ("warmelt-normal.melt:902:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:902:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3352,7 +3364,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:912:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:912:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3949,7 +3973,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normal.melt:950:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:950:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:945:/ quasiblock"); @@ -4187,7 +4223,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[8];; - MELT_LOCATION ("warmelt-normal.melt:926:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:926:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4304,7 +4352,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!CTYPE_VALUE */ meltfrout->tabval[0]);; - MELT_LOCATION ("warmelt-normal.melt:978:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:978:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; } @@ -4412,7 +4472,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!CTYPE_VALUE */ meltfrout->tabval[0]);; - MELT_LOCATION ("warmelt-normal.melt:981:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:981:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; } @@ -4636,7 +4708,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!CTYPE_LONG */ meltfrout->tabval[1]);; - MELT_LOCATION ("warmelt-normal.melt:985:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:985:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4749,7 +4833,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!CTYPE_CSTRING */ meltfrout->tabval[0]);; - MELT_LOCATION ("warmelt-normal.melt:991:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:991:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; } @@ -5524,7 +5620,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-normal.melt:996:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:996:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6145,7 +6253,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MULTI___V7*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normal.melt:1006:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1006:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6823,7 +6943,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V11*/ meltfptr[9];; - MELT_LOCATION ("warmelt-normal.melt:1034:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1034:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7163,7 +7295,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-normal.melt:1038:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1038:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7728,7 +7872,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.WNLETN__V16*/ meltfptr[15];; - MELT_LOCATION ("warmelt-normal.melt:1072:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1072:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V15*/ meltfptr[14] = /*_.RETURN___V21*/ meltfptr[17];; @@ -8027,8 +8183,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.WNLET1__V28*/ meltfptr[15];; - MELT_LOCATION - ("warmelt-normal.melt:1081:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1081:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V26*/ meltfptr[14] = @@ -8548,8 +8716,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.WNLET__V46*/ meltfptr[45];; - MELT_LOCATION - ("warmelt-normal.melt:1111:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1111:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V44*/ meltfptr[43] = @@ -8637,7 +8817,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normal.melt:1059:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1059:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8973,7 +9165,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-normal.melt:1097:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1097:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9162,7 +9366,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MULTIPLE_EVERY__V7*/ meltfptr[6];; - MELT_LOCATION ("warmelt-normal.melt:1116:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1116:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9887,7 +10103,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V11*/ meltfptr[7];; - MELT_LOCATION ("warmelt-normal.melt:1134:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1134:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11039,7 +11267,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.KOCC__V22*/ meltfptr[21];; - MELT_LOCATION ("warmelt-normal.melt:1180:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1180:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V21*/ meltfptr[17] = /*_.RETURN___V48*/ meltfptr[45];; @@ -11075,7 +11315,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V11*/ meltfptr[7];; - MELT_LOCATION ("warmelt-normal.melt:1144:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1144:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11636,7 +11888,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normal.melt:1186:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1186:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -12200,7 +12464,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normal.melt:1209:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1209:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13194,7 +13470,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-normal.melt:1231:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1231:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14137,7 +14425,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SYCONST__V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-normal.melt:1288:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1288:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V17*/ meltfptr[15] = /*_.RETURN___V34*/ meltfptr[32];; @@ -14167,7 +14467,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[15];; - MELT_LOCATION ("warmelt-normal.melt:1258:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1258:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15283,7 +15595,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OURLOCSYM__V25*/ meltfptr[24];; - MELT_LOCATION ("warmelt-normal.melt:1322:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1322:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V23*/ meltfptr[18] = /*_.RETURN___V45*/ meltfptr[41];; @@ -15323,7 +15647,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normal.melt:1293:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1293:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15862,7 +16198,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-normal.melt:1349:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1349:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:1345:/ quasiblock"); @@ -18361,8 +18709,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RESNORMBIND__V105*/ meltfptr[34];; - MELT_LOCATION - ("warmelt-normal.melt:1496:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1496:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V104*/ meltfptr[36] = @@ -18459,7 +18819,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MULTI___V10*/ meltfptr[6];; - MELT_LOCATION ("warmelt-normal.melt:1334:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1334:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18959,7 +19331,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normal.melt:1396:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1396:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19459,7 +19843,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normal.melt:1452:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1452:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19962,7 +20358,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normal.melt:1480:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1480:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20152,7 +20560,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NOCC_CTYP__V6*/ meltfptr[4];; - MELT_LOCATION ("warmelt-normal.melt:1503:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1503:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20984,7 +21404,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NORMCLA__V26*/ meltfptr[25];; - MELT_LOCATION ("warmelt-normal.melt:1530:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1530:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V25*/ meltfptr[21] = /*_.RETURN___V33*/ meltfptr[28];; @@ -21326,7 +21758,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NORMCLA__V39*/ meltfptr[27];; - MELT_LOCATION ("warmelt-normal.melt:1538:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1538:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V38*/ meltfptr[21] = @@ -21502,7 +21946,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normal.melt:1548:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1548:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:1540:/ quasiblock"); @@ -21560,7 +22016,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normal.melt:1513:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1513:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -22256,7 +22724,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-normal.melt:1582:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1582:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:1579:/ quasiblock"); @@ -23253,7 +23733,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normal.melt:1557:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1557:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25437,7 +25929,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normal.melt:1682:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1682:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25756,7 +26260,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normal.melt:1699:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1699:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -26525,7 +27041,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normal.melt:1764:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1764:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:1761:/ quasiblock"); @@ -27348,7 +27876,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normal.melt:1733:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1733:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30152,7 +30692,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normal.melt:1863:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1863:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-normal+02.c b/gcc/melt/generated/warmelt-normal+02.c index a83c8e453fd..ef2d7c36a25 100644 --- a/gcc/melt/generated/warmelt-normal+02.c +++ b/gcc/melt/generated/warmelt-normal+02.c @@ -4615,7 +4615,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normal.melt:1935:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:1935:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7513,7 +7525,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:2029:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2029:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9148,7 +9172,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normal.melt:2155:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2155:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10816,7 +10852,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:2243:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2243:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10948,7 +10996,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PUT_ENV__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normal.melt:2282:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2282:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13333,7 +13393,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:2318:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2318:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13465,7 +13537,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PUT_ENV__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normal.melt:2358:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2358:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13589,7 +13673,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PUT_ENV__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normal.melt:2371:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2371:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15317,7 +15413,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:2429:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2429:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15449,7 +15557,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PUT_ENV__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normal.melt:2449:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2449:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15573,7 +15693,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PUT_ENV__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normal.melt:2462:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2462:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16559,7 +16691,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:2503:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2503:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17834,7 +17978,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MULTI___V7*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normal.melt:2521:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2521:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17960,7 +18116,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PUT_ENV__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normal.melt:2528:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2528:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18587,7 +18755,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.ONULL__V22*/ meltfptr[21];; - MELT_LOCATION ("warmelt-normal.melt:2600:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2600:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V21*/ meltfptr[20] = /*_.RETURN___V28*/ meltfptr[24];; @@ -19464,7 +19644,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:2586:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2586:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19612,7 +19804,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.GET_CTYPE__V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-normal.melt:2640:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2640:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20983,7 +21187,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:2645:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2645:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -22108,7 +22324,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normal.melt:2658:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2658:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -22433,7 +22661,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normal.melt:2786:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2786:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -23392,7 +23632,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:2795:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2795:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -24696,7 +24948,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:2832:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2832:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25867,7 +26131,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:2882:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2882:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -26584,7 +26860,19 @@ lab_endgetargs:; { /*_.RETVAL___V1*/ meltfptr[0] = ( /*!CTYPE_VOID */ meltfrout->tabval[0]);; - MELT_LOCATION ("warmelt-normal.melt:2954:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2954:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; } @@ -28828,7 +29116,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:2958:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:2958:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30171,7 +30471,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:3069:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3069:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30319,7 +30631,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.GET_CTYPE__V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-normal.melt:3121:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3121:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -31176,7 +31500,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-normal.melt:3154:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3154:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:3151:/ quasiblock"); @@ -31380,7 +31716,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-normal.melt:3160:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3160:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:3156:/ quasiblock"); @@ -31906,7 +32254,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:3128:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3128:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -32424,7 +32784,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normal.melt:3181:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3181:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:3175:/ quasiblock"); @@ -32726,7 +33098,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normal.melt:3194:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3194:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:3182:/ quasiblock"); @@ -33173,7 +33557,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V9*/ meltfptr[4];; - MELT_LOCATION ("warmelt-normal.melt:3166:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3166:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -33290,7 +33686,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!CTYPE_VALUE */ meltfrout->tabval[0]);; - MELT_LOCATION ("warmelt-normal.melt:3240:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3240:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; } @@ -35497,7 +35905,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:3245:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3245:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -36511,7 +36931,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:3319:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3319:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -37421,7 +37853,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:3361:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3361:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -38345,7 +38789,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normal.melt:3415:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3415:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:3412:/ quasiblock"); @@ -41218,7 +41674,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:3393:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3393:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -41887,7 +42355,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:3531:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3531:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -42035,7 +42515,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.GET_CTYPE__V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-normal.melt:3550:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3550:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -42351,7 +42843,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.TUP__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-normal.melt:3562:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3562:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V12*/ meltfptr[10] = /*_.RETURN___V13*/ meltfptr[12];; @@ -42478,7 +42982,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.TUP__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-normal.melt:3572:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3572:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:3565:/ quasiblock"); @@ -42588,8 +43104,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.TUP__V2*/ meltfptr[1];; - MELT_LOCATION - ("warmelt-normal.melt:3581:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3581:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:3575:/ quasiblock"); @@ -42644,8 +43172,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.TUP__V2*/ meltfptr[1];; - MELT_LOCATION - ("warmelt-normal.melt:3585:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-normal.melt:3585:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V25*/ meltfptr[15] = @@ -42847,8 +43389,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.TUP__V2*/ meltfptr[1];; - MELT_LOCATION - ("warmelt-normal.melt:3601:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-normal.melt:3601:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V28*/ meltfptr[22] = @@ -43319,8 +43875,23 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.TUP__V2*/ meltfptr[1];; - MELT_LOCATION - ("warmelt-normal.melt:3635:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-normal.melt:3635:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V44*/ meltfptr[34] = @@ -43479,7 +44050,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.TUP__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-normal.melt:3637:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3637:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V9*/ meltfptr[7] = /*_.RETURN___V59*/ meltfptr[35];; @@ -43503,7 +44086,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V9*/ meltfptr[7];; - MELT_LOCATION ("warmelt-normal.melt:3554:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3554:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -43637,7 +44232,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PUT_ENV__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normal.melt:3596:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3596:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -44541,7 +45148,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normal.melt:3694:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3694:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:3690:/ quasiblock"); @@ -45666,7 +46285,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:3645:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3645:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -45804,7 +46435,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PUT_ENV__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normal.melt:3713:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3713:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -46016,7 +46659,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normal.melt:3726:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3726:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -47745,7 +48400,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V19*/ meltfptr[15];; - MELT_LOCATION ("warmelt-normal.melt:3751:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3751:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -47967,7 +48634,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normal.melt:3832:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3832:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -48949,7 +49628,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:3846:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3846:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -51596,7 +52287,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-normal.melt:3992:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3992:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:3990:/ quasiblock"); @@ -51728,7 +52431,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:3882:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3882:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-normal+03.c b/gcc/melt/generated/warmelt-normal+03.c index d8ba505adea..20d91d2b2e4 100644 --- a/gcc/melt/generated/warmelt-normal+03.c +++ b/gcc/melt/generated/warmelt-normal+03.c @@ -2754,7 +2754,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V6*/ meltfptr[5];; - MELT_LOCATION ("warmelt-normal.melt:3909:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3909:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -2890,7 +2902,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PUT_ENV__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normal.melt:3920:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:3920:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4639,7 +4663,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normal.melt:4075:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4075:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:4072:/ quasiblock"); @@ -4915,7 +4951,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:4001:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4001:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6210,7 +6258,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normal.melt:4138:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4138:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:4135:/ quasiblock"); @@ -8058,7 +8118,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:4087:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4087:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8469,7 +8541,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.INST___V12*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normal.melt:4105:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4105:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8858,7 +8942,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V13*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:4234:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4234:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9271,7 +9367,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V15*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normal.melt:4252:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4252:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9779,7 +9887,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.CONSLAM__V14*/ meltfptr[13];; - MELT_LOCATION ("warmelt-normal.melt:4273:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4273:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[7] = /*_.RETURN___V20*/ meltfptr[16];; @@ -9799,7 +9919,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[7];; - MELT_LOCATION ("warmelt-normal.melt:4263:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4263:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11357,7 +11489,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.CONSTUP__V18*/ meltfptr[17];; - MELT_LOCATION ("warmelt-normal.melt:4328:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4328:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[7] = /*_.RETURN___V24*/ meltfptr[20];; @@ -11387,7 +11531,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[7];; - MELT_LOCATION ("warmelt-normal.melt:4312:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4312:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13828,7 +13984,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RESLIST__V13*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:4404:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4404:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[7] = /*_.RETURN___V38*/ meltfptr[29];; @@ -13860,7 +14028,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[7];; - MELT_LOCATION ("warmelt-normal.melt:4368:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4368:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14424,7 +14604,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.CURLOCSYM__V14*/ meltfptr[13];; - MELT_LOCATION ("warmelt-normal.melt:4423:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4423:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:4421:/ quasiblock"); @@ -14582,7 +14774,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normal.melt:4425:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4425:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[10] = /*_.RETURN___V27*/ meltfptr[17];; @@ -14600,7 +14804,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normal.melt:4411:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4411:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17568,7 +17784,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normal.melt:4429:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4429:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18290,7 +18518,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.CONSINST__V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-normal.melt:4523:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4523:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[7] = /*_.RETURN___V29*/ meltfptr[25];; @@ -18328,7 +18568,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[7];; - MELT_LOCATION ("warmelt-normal.melt:4503:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4503:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18978,7 +19230,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-normal.melt:4548:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4548:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:4546:/ quasiblock"); @@ -19792,7 +20056,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[8];; - MELT_LOCATION ("warmelt-normal.melt:4530:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4530:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20327,7 +20603,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normal.melt:4552:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4552:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25707,7 +25995,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:4599:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4599:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -26281,7 +26581,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[8];; - MELT_LOCATION ("warmelt-normal.melt:4796:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4796:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -26796,7 +27108,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OSYDATA__V16*/ meltfptr[15];; - MELT_LOCATION ("warmelt-normal.melt:4824:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4824:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:4822:/ quasiblock"); @@ -27218,7 +27542,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SYDATA__V33*/ meltfptr[32];; - MELT_LOCATION ("warmelt-normal.melt:4848:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4848:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V24*/ meltfptr[17] = /*_.RETURN___V42*/ meltfptr[38];; @@ -27279,7 +27615,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normal.melt:4814:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4814:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -27851,7 +28199,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SYDATA__V23*/ meltfptr[22];; - MELT_LOCATION ("warmelt-normal.melt:4883:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4883:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V14*/ meltfptr[13] = /*_.RETURN___V28*/ meltfptr[27];; @@ -27910,7 +28270,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V10*/ meltfptr[6];; - MELT_LOCATION ("warmelt-normal.melt:4854:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4854:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -28340,7 +28712,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V9*/ meltfptr[5];; - MELT_LOCATION ("warmelt-normal.melt:4888:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4888:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -29815,7 +30199,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NCONST__V44*/ meltfptr[27];; - MELT_LOCATION ("warmelt-normal.melt:4956:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4956:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V43*/ meltfptr[21] = /*_.RETURN___V51*/ meltfptr[47];; @@ -29963,7 +30359,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NDATA__V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-normal.melt:4959:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4959:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:4957:/ quasiblock"); @@ -30012,7 +30420,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:4909:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4909:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30904,7 +31324,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:4964:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4964:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -31761,7 +32193,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NCONST__V24*/ meltfptr[23];; - MELT_LOCATION ("warmelt-normal.melt:5018:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5018:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V22*/ meltfptr[21] = /*_.RETURN___V34*/ meltfptr[27];; @@ -31912,7 +32356,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.KDATA__V17*/ meltfptr[13];; - MELT_LOCATION ("warmelt-normal.melt:5022:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5022:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:5020:/ quasiblock"); @@ -31953,7 +32409,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:4997:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:4997:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -32473,7 +32941,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.FARGDATA__V15*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normal.melt:5050:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5050:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V9*/ meltfptr[7] = /*_.RETURN___V24*/ meltfptr[23];; @@ -32513,7 +32993,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V9*/ meltfptr[7];; - MELT_LOCATION ("warmelt-normal.melt:5029:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5029:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -33034,7 +33526,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MULTIPLE_EVERY__V8*/ meltfptr[7];; - MELT_LOCATION ("warmelt-normal.melt:5067:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5067:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-normal+04.c b/gcc/melt/generated/warmelt-normal+04.c index 10a5c4d3cdf..929a25c84fa 100644 --- a/gcc/melt/generated/warmelt-normal+04.c +++ b/gcc/melt/generated/warmelt-normal+04.c @@ -3987,7 +3987,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-normal.melt:5151:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5151:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[10] = /*_.RETURN___V49*/ meltfptr[48];; @@ -4079,7 +4091,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normal.melt:5092:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5092:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5784,7 +5808,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.INSDATA__V39*/ meltfptr[38];; - MELT_LOCATION ("warmelt-normal.melt:5257:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5257:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[10] = /*_.RETURN___V72*/ meltfptr[59];; @@ -5886,7 +5922,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normal.melt:5158:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5158:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6812,7 +6860,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normal.melt:5294:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5294:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:5292:/ quasiblock"); @@ -7327,7 +7387,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normal.melt:5330:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5330:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:5328:/ quasiblock"); @@ -9181,7 +9253,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normal.melt:5265:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5265:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10603,7 +10687,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PUT_ENV__V31*/ meltfptr[17];; - MELT_LOCATION ("warmelt-normal.melt:5333:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5333:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10871,7 +10967,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MULTIPLE_MAP__V9*/ meltfptr[8];; - MELT_LOCATION ("warmelt-normal.melt:5398:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5398:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11239,7 +11347,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normal.melt:5402:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5402:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14256,7 +14376,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.INSDATA__V61*/ meltfptr[60];; - MELT_LOCATION ("warmelt-normal.melt:5611:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5611:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V16*/ meltfptr[12] = /*_.RETURN___V98*/ meltfptr[92];; @@ -14362,7 +14494,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:5482:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5482:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17068,7 +17212,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normal.melt:5620:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5620:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19736,7 +19892,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normal.melt:5742:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5742:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20620,7 +20788,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-normal.melt:5946:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5946:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:5944:/ quasiblock"); @@ -20736,8 +20916,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION - ("warmelt-normal.melt:5953:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5953:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:5951:/ quasiblock"); @@ -21507,7 +21699,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:5919:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5919:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -21943,7 +22147,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normal.melt:5990:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:5990:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:5985:/ quasiblock"); @@ -23488,7 +23704,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normal.melt:6050:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6050:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:6048:/ quasiblock"); @@ -25318,7 +25546,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:6016:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6016:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25450,7 +25690,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.PUT_ENV__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normal.melt:6073:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6073:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -26225,7 +26477,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-normal.melt:6134:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6134:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:6132:/ quasiblock"); @@ -26337,7 +26601,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-normal.melt:6138:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6138:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:6137:/ quasiblock"); @@ -27570,7 +27846,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:6106:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6106:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -28629,7 +28917,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LOCSYM__V20*/ meltfptr[19];; - MELT_LOCATION ("warmelt-normal.melt:6252:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6252:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[10] = /*_.RETURN___V22*/ meltfptr[21];; @@ -28653,7 +28953,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normal.melt:6229:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6229:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30157,7 +30469,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V25*/ meltfptr[23];; - MELT_LOCATION ("warmelt-normal.melt:6264:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6264:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -31627,7 +31951,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:6318:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6318:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -32791,7 +33127,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:6361:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6361:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -33649,7 +33997,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:6402:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6402:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -34079,7 +34439,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normal.melt:6430:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6430:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:6427:/ quasiblock"); @@ -34871,7 +35243,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normal.melt:6419:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6419:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -35544,7 +35928,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normal.melt:6452:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6452:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -36314,7 +36710,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LOCSYM__V24*/ meltfptr[23];; - MELT_LOCATION ("warmelt-normal.melt:6505:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6505:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V16*/ meltfptr[12] = /*_.RETURN___V30*/ meltfptr[26];; @@ -36340,7 +36748,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:6480:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6480:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -37120,7 +37540,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LOCSYM__V24*/ meltfptr[23];; - MELT_LOCATION ("warmelt-normal.melt:6535:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6535:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V16*/ meltfptr[12] = /*_.RETURN___V30*/ meltfptr[26];; @@ -37146,7 +37578,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:6510:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6510:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -38664,7 +39108,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V25*/ meltfptr[23];; - MELT_LOCATION ("warmelt-normal.melt:6542:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6542:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -39631,7 +40087,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:6592:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6592:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -41185,7 +41653,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V26*/ meltfptr[24];; - MELT_LOCATION ("warmelt-normal.melt:6629:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6629:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -42577,7 +43057,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:6680:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6680:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -43346,7 +43838,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NQUASI__V22*/ meltfptr[21];; - MELT_LOCATION ("warmelt-normal.melt:6743:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6743:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V16*/ meltfptr[12] = /*_.RETURN___V31*/ meltfptr[27];; @@ -43378,7 +43882,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:6717:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6717:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -44113,7 +44629,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NQUASI__V20*/ meltfptr[19];; - MELT_LOCATION ("warmelt-normal.melt:6769:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6769:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V16*/ meltfptr[12] = /*_.RETURN___V29*/ meltfptr[25];; @@ -44141,7 +44669,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:6749:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6749:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -44681,7 +45221,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normal.melt:6791:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6791:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normal.melt:6789:/ quasiblock"); @@ -45524,7 +46076,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:6775:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6775:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -46554,7 +47118,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NPRE__V33*/ meltfptr[22];; - MELT_LOCATION ("warmelt-normal.melt:6896:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6896:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V32*/ meltfptr[25] = /*_.RETURN___V39*/ meltfptr[26];; @@ -46586,7 +47162,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:6858:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6858:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -48052,7 +48640,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normal.melt:6904:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6904:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-normal+05.c b/gcc/melt/generated/warmelt-normal+05.c index 830572e0c54..94d4672d115 100644 --- a/gcc/melt/generated/warmelt-normal+05.c +++ b/gcc/melt/generated/warmelt-normal+05.c @@ -3260,7 +3260,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normal.melt:6979:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6979:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V16*/ meltfptr[14] = /*_.RETURN___V24*/ meltfptr[22];; @@ -3284,7 +3296,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normal.melt:6966:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6966:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4520,7 +4544,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normal.melt:6987:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:6987:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-normal+meltdesc.c b/gcc/melt/generated/warmelt-normal+meltdesc.c index c71db404047..6d7acbeb171 100644 --- a/gcc/melt/generated/warmelt-normal+meltdesc.c +++ b/gcc/melt/generated/warmelt-normal+meltdesc.c @@ -19,7 +19,7 @@ #endif /*__cplusplus */ /* version of the GCC compiler & MELT runtime generating this */ -const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revision 188875] MELT_0.9.6-pre" +const char melt_genversionstr[]="4.8.0 20120702 (experimental) [melt-branch revision 189162] MELT_0.9.6-pre" #ifdef __cplusplus " (in C++)" @@ -28,7 +28,7 @@ const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revi #endif ; -const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_188875]"; +const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_189162]"; /* source name & real path of the module */ /*MELTMODULENAME MELT-STAGE-ZERO/warmelt-normal */ @@ -36,18 +36,18 @@ const char melt_modulename[]="warmelt-normal"; const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.8.0/melt-modules/0.9.6-pre/warmelt-normal"; /* hash of preprocessed melt-run.h generating this */ -const char melt_prepromd5meltrun[]="40fea0fe808f877cf6541857ec8d6c2d"; +const char melt_prepromd5meltrun[]="b3a18a5fcc8e78e7c3ea5bf55f88e347"; /* hexmd5checksum of primary C file */ -const char melt_primaryhexmd5[]="ca765b01a0727bd5d5e4113ceb836c95"; +const char melt_primaryhexmd5[]="103ff87a7f640e4d2bf596b678202c1e"; /* hexmd5checksum of secondary C files */ const char* const melt_secondaryhexmd5tab[]={ /*nosecfile*/ (const char*)0, - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+01.c #1 */ "5323ed67fbf3ed2cc6adfe2434a18d55", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+02.c #2 */ "6b9ff7e5f11f3b8a1229473bd48d7990", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+03.c #3 */ "3111fee9b67b19d7cd4d27dbb343800f", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+04.c #4 */ "bce9ce29c89724e3d4cd54e7c13b3da8", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+05.c #5 */ "8a8b3f5ff019705d9f73cee6bee1ea45", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+01.c #1 */ "e2d84a9ad12bd97cfb67ebaec95aac4a", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+02.c #2 */ "45ff7018e32d11e263e3d0fc6a749880", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+03.c #3 */ "2aa47f92107f5f96ca6b2d3091177c28", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+04.c #4 */ "e59fb2b1eacd00cab499114854f41e97", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normal+05.c #5 */ "9acfd75f800e0a3119abac82e2b121da", /*nosecfile*/ (const char*)0, (const char*)0 }; @@ -55,10 +55,10 @@ const char* const melt_secondaryhexmd5tab[]={ const int melt_lastsecfileindex=5; /* cumulated checksum of primary & secondary files */ -const char melt_cumulated_hexmd5[]="66aed4c1bcac8cc57ccf6806487651ee" ; +const char melt_cumulated_hexmd5[]="1bd9bcf1185eceb174c213397b6bd592" ; /* include the timestamp file */ -#define meltmod_warmelt_normal_mds__66aed4c1bcac8cc57ccf6806487651ee 1 +#define meltmod_warmelt_normal_mds__1bd9bcf1185eceb174c213397b6bd592 1 #include "warmelt-normal+melttime.h" diff --git a/gcc/melt/generated/warmelt-normal+melttime.h b/gcc/melt/generated/warmelt-normal+melttime.h index 66bafdaf531..179dda2e7d9 100644 --- a/gcc/melt/generated/warmelt-normal+melttime.h +++ b/gcc/melt/generated/warmelt-normal+melttime.h @@ -5,7 +5,7 @@ /* This warmelt-normal+melttime.h is included from warmelt-normal+meltdesc.c only. */ -#if meltmod_warmelt_normal_mds__66aed4c1bcac8cc57ccf6806487651ee +#if meltmod_warmelt_normal_mds__1bd9bcf1185eceb174c213397b6bd592 /* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-normal */ #ifdef __cplusplus @@ -18,8 +18,8 @@ extern "C" { /*MELT BOOTSTRAP*/ -const char melt_gen_timestamp[]="Fri Jun 22 15:20:04 2012 CEST"; -const long long melt_gen_timenum=1340371204; +const char melt_gen_timestamp[]="Mon Jul 2 17:04:55 2012 MEST"; +const long long melt_gen_timenum=1341241495; const char melt_build_timestamp[]= __DATE__ "@" __TIME__ #ifdef __cplusplus @@ -34,7 +34,7 @@ const long long melt_gen_timenum=1340371204; } ; /* end extern C */ #endif /*__cplusplus */ - #else /* ! meltmod_warmelt_normal_mds__66aed4c1bcac8cc57ccf6806487651ee */ + #else /* ! meltmod_warmelt_normal_mds__1bd9bcf1185eceb174c213397b6bd592 */ #error invalid timestamp file for MELT-STAGE-ZERO/warmelt-normal - #endif /* meltmod_warmelt_normal_mds__66aed4c1bcac8cc57ccf6806487651ee */ + #endif /* meltmod_warmelt_normal_mds__1bd9bcf1185eceb174c213397b6bd592 */ diff --git a/gcc/melt/generated/warmelt-normal.c b/gcc/melt/generated/warmelt-normal.c index 4483ae931d0..ec7a23c4029 100644 --- a/gcc/melt/generated/warmelt-normal.c +++ b/gcc/melt/generated/warmelt-normal.c @@ -3064,7 +3064,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V11*/ meltfptr[8];; - MELT_LOCATION ("warmelt-normal.melt:798:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:798:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5580,7 +5592,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NCX__V30*/ meltfptr[29];; - MELT_LOCATION ("warmelt-normal.melt:869:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:869:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V13*/ meltfptr[9] = /*_.RETURN___V36*/ meltfptr[32];; @@ -5643,7 +5667,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normal.melt:826:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:826:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6017,7 +6053,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RECV__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-normal.melt:890:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normal.melt:890:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6114,7 +6162,7 @@ initialize_module_meltdata_warmelt_normal (initial_frame_st * iniframp__, dbgprintf ("start initialize_module_meltdata_warmelt_normal iniframp__=%p", (void *) iniframp__); melt_assertmsg ("check module initial frame", - iniframp__->mcfr_nbvar == /*minihash */ -3438); + iniframp__->mcfr_nbvar == /*minihash */ -4011); struct cdata_st { @@ -34159,7 +34207,7 @@ start_module_melt (void *modargp_) /**initial routine prologue**/ /* set initial frame marking */ ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = - /*minihash */ -3438; + /*minihash */ -4011; ((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout = meltmod__warmelt_normal__forward_or_mark_module_start_frame; /**COMMENT: get previous environment **/ ; @@ -110627,7 +110675,7 @@ meltmod__warmelt_normal__forward_or_mark_module_start_frame (struct int ix = 0; initial_frame_st *meltframptr_ = (initial_frame_st *) fp; melt_assertmsg ("check module frame", - meltframptr_->mcfr_nbvar == /*minihash */ -3438); + meltframptr_->mcfr_nbvar == /*minihash */ -4011); if (!marking && melt_is_forwarding) { dbgprintf diff --git a/gcc/melt/generated/warmelt-normatch+01.c b/gcc/melt/generated/warmelt-normatch+01.c index cc59d54c31e..e107b0f9fc8 100644 --- a/gcc/melt/generated/warmelt-normatch+01.c +++ b/gcc/melt/generated/warmelt-normatch+01.c @@ -3886,7 +3886,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normatch.melt:165:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:165:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4781,7 +4793,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normatch.melt:217:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:217:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5634,7 +5658,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normatch.melt:267:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:267:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:262:/ quasiblock"); @@ -5862,7 +5898,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normatch.melt:242:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:242:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7133,7 +7181,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normatch.melt:314:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:314:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:306:/ quasiblock"); @@ -8164,7 +8224,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normatch.melt:280:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:280:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9974,7 +10046,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normatch.melt:342:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:342:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10997,7 +11081,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normatch.melt:416:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:416:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11759,7 +11855,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normatch.melt:590:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:590:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V19*/ meltfptr[17] = /*_.RETURN___V32*/ meltfptr[20];; @@ -11793,7 +11901,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normatch.melt:568:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:568:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13108,7 +13228,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V42*/ meltfptr[38];; - MELT_LOCATION ("warmelt-normatch.melt:598:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:598:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14109,7 +14241,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normatch.melt:628:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:628:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15893,7 +16037,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.UPDATLIST__V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normatch.melt:707:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:707:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:653:/ checksignal"); @@ -15903,7 +16059,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V59*/ meltfptr[50];; - MELT_LOCATION ("warmelt-normatch.melt:653:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:653:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16391,7 +16559,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[7];; - MELT_LOCATION ("warmelt-normatch.melt:717:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:717:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17049,7 +17229,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normatch.melt:733:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:733:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18036,7 +18228,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normatch.melt:753:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:753:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -22211,7 +22415,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normatch.melt:805:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:805:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -22596,7 +22812,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V12*/ meltfptr[7];; - MELT_LOCATION ("warmelt-normatch.melt:949:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:949:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -27095,7 +27323,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V168*/ meltfptr[132];; - MELT_LOCATION ("warmelt-normatch.melt:963:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:963:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -27834,7 +28074,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-normatch.melt:1042:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1042:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -28420,7 +28672,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V16*/ meltfptr[4];; - MELT_LOCATION ("warmelt-normatch.melt:1069:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1069:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -32974,7 +33238,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normatch.melt:1156:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1156:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -33586,7 +33862,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normatch.melt:1246:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1246:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -34168,7 +34456,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V16*/ meltfptr[4];; - MELT_LOCATION ("warmelt-normatch.melt:1267:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1267:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -35093,7 +35393,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normatch.melt:1343:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1343:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -35953,7 +36265,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normatch.melt:1352:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1352:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -39683,7 +40007,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normatch.melt:1392:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1392:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -40183,7 +40519,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.CURORVAR__V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-normatch.melt:1438:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1438:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V3*/ meltfptr[2] = /*_.RETURN___V17*/ meltfptr[10];; @@ -40204,7 +40552,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normatch.melt:1421:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1421:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -40891,7 +41251,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normatch.melt:1501:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1501:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -41289,7 +41661,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.ORLOCSY__V6*/ meltfptr[5];; - MELT_LOCATION ("warmelt-normatch.melt:1565:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1565:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V5*/ meltfptr[3] = /*_.RETURN___V16*/ meltfptr[10];; @@ -41315,7 +41699,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normatch.melt:1555:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1555:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -48015,7 +48411,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V9*/ meltfptr[4];; - MELT_LOCATION ("warmelt-normatch.melt:1751:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1751:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -48270,7 +48678,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.SET_NEW_TESTER_LAST_THEN__V7*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normatch.melt:1822:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1822:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -50003,7 +50423,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normatch.melt:1848:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1848:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -50693,7 +51125,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*!MATCH_GRAPHIC_DOT_PREFIX */ meltfrout->tabval[2]);; - MELT_LOCATION ("warmelt-normatch.melt:1932:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1932:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V7*/ meltfptr[3] = /*_.RETURN___V13*/ meltfptr[9];; @@ -50711,7 +51155,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normatch.melt:1927:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1927:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -51417,7 +51873,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normatch.melt:1982:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1982:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -52547,7 +53015,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normatch.melt:1992:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:1992:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-normatch+02.c b/gcc/melt/generated/warmelt-normatch+02.c index 7e2f99ed259..35f50e461e0 100644 --- a/gcc/melt/generated/warmelt-normatch+02.c +++ b/gcc/melt/generated/warmelt-normatch+02.c @@ -3551,7 +3551,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normatch.melt:2052:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:2052:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4478,7 +4490,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normatch.melt:2117:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:2117:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15016,7 +15040,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normatch.melt:2278:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:2278:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16229,7 +16265,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[13];; - MELT_LOCATION ("warmelt-normatch.melt:2688:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:2688:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17096,7 +17144,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];; - MELT_LOCATION ("warmelt-normatch.melt:2892:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:2892:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17437,7 +17497,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-normatch.melt:2937:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:2937:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17771,7 +17843,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-normatch.melt:2945:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:2945:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18105,7 +18189,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-normatch.melt:2953:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:2953:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18348,7 +18444,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETVAL___V9*/ meltfptr[5];; - MELT_LOCATION ("warmelt-normatch.melt:2961:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:2961:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; @@ -21974,7 +22082,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normatch.melt:3025:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3025:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -22327,7 +22447,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normatch.melt:3069:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3069:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -22445,7 +22577,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normatch.melt:3081:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3081:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V3*/ meltfptr[2] = /*_.RETURN___V4*/ meltfptr[3];; @@ -22793,7 +22937,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.STASTEP__V7*/ meltfptr[6];; - MELT_LOCATION ("warmelt-normatch.melt:3089:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3089:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V6*/ meltfptr[5] = /*_.RETURN___V18*/ meltfptr[13];; @@ -23012,7 +23168,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.STEP__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-normatch.melt:3093:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3093:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:3090:/ quasiblock"); @@ -23053,7 +23221,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normatch.melt:3078:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3078:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -23820,7 +24000,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normatch.melt:3115:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3115:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:3113:/ quasiblock"); @@ -23979,7 +24171,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normatch.melt:3119:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3119:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:3117:/ quasiblock"); @@ -24583,7 +24787,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V20*/ meltfptr[18];; - MELT_LOCATION ("warmelt-normatch.melt:3097:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3097:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25102,7 +25318,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normatch.melt:3145:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3145:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V19*/ meltfptr[18] = /*_.RETURN___V20*/ meltfptr[19];; @@ -25617,7 +25845,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[16];; - MELT_LOCATION ("warmelt-normatch.melt:3136:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3136:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25972,7 +26212,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normatch.melt:3171:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3171:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -26648,7 +26900,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normatch.melt:3196:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3196:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:3194:/ quasiblock"); @@ -26812,7 +27076,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normatch.melt:3199:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3199:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:3197:/ quasiblock"); @@ -26987,8 +27263,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION - ("warmelt-normatch.melt:3202:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3202:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION @@ -27788,7 +28076,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-normatch.melt:3181:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3181:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -28480,7 +28780,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normatch.melt:3232:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3232:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:3230:/ quasiblock"); @@ -28644,7 +28956,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normatch.melt:3235:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3235:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:3233:/ quasiblock"); @@ -28818,8 +29142,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION - ("warmelt-normatch.melt:3238:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3238:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION @@ -29004,8 +29340,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION - ("warmelt-normatch.melt:3241:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-normatch.melt:3241:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION @@ -29187,8 +29537,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION - ("warmelt-normatch.melt:3244:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-normatch.melt:3244:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION @@ -29378,8 +29742,23 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION - ("warmelt-normatch.melt:3247:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-normatch.melt:3247:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ + && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION @@ -30316,7 +30695,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[16];; - MELT_LOCATION ("warmelt-normatch.melt:3216:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3216:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -32247,7 +32638,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normatch.melt:3270:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3270:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-normatch+03.c b/gcc/melt/generated/warmelt-normatch+03.c index e946941a463..7f9c04a1c5e 100644 --- a/gcc/melt/generated/warmelt-normatch+03.c +++ b/gcc/melt/generated/warmelt-normatch+03.c @@ -3088,7 +3088,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-normatch.melt:3342:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3342:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3621,7 +3633,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-normatch.melt:3359:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3359:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4260,7 +4284,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V9*/ meltfptr[5];; - MELT_LOCATION ("warmelt-normatch.melt:3386:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3386:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4835,7 +4871,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[8];; - MELT_LOCATION ("warmelt-normatch.melt:3402:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3402:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5159,7 +5207,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normatch.melt:3415:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3415:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:3412:/ checksignal"); @@ -5169,7 +5229,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V13*/ meltfptr[9];; - MELT_LOCATION ("warmelt-normatch.melt:3412:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3412:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7046,7 +7118,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V25*/ meltfptr[20];; - MELT_LOCATION ("warmelt-normatch.melt:3420:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3420:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7447,7 +7531,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V13*/ meltfptr[9];; - MELT_LOCATION ("warmelt-normatch.melt:3473:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3473:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11715,7 +11811,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[15];; - MELT_LOCATION ("warmelt-normatch.melt:3484:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3484:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -12033,7 +12141,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normatch.melt:3513:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3513:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -13181,7 +13301,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normatch.melt:3684:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3684:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:3679:/ quasiblock"); @@ -16024,7 +16156,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V25*/ meltfptr[20];; - MELT_LOCATION ("warmelt-normatch.melt:3652:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3652:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19240,7 +19384,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[15];; - MELT_LOCATION ("warmelt-normatch.melt:3810:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3810:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -21312,7 +21468,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normatch.melt:3974:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3974:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:3971:/ quasiblock"); @@ -21593,7 +21761,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V25*/ meltfptr[20];; - MELT_LOCATION ("warmelt-normatch.melt:3903:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3903:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25181,7 +25361,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V25*/ meltfptr[20];; - MELT_LOCATION ("warmelt-normatch.melt:3987:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:3987:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25894,7 +26086,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V21*/ meltfptr[19];; - MELT_LOCATION ("warmelt-normatch.melt:4026:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:4026:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -26022,7 +26226,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MAPOBJECT_GET__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normatch.melt:4064:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:4064:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -28604,7 +28820,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normatch.melt:4171:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:4171:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:4163:/ quasiblock"); @@ -32844,7 +33072,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V25*/ meltfptr[20];; - MELT_LOCATION ("warmelt-normatch.melt:4111:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:4111:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -33198,7 +33438,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normatch.melt:4337:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:4337:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -35366,7 +35618,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normatch.melt:4414:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:4414:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -36969,7 +37233,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normatch.melt:4485:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:4485:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -37731,7 +38007,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normatch.melt:4555:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:4555:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-normatch+04.c b/gcc/melt/generated/warmelt-normatch+04.c index 041f9326b28..74050318c9a 100644 --- a/gcc/melt/generated/warmelt-normatch+04.c +++ b/gcc/melt/generated/warmelt-normatch+04.c @@ -8041,7 +8041,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V11*/ meltfptr[6];; - MELT_LOCATION ("warmelt-normatch.melt:4949:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:4949:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8230,7 +8242,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.COMPARE_NAMED_ALPHA__V6*/ meltfptr[5];; - MELT_LOCATION ("warmelt-normatch.melt:5034:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5034:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8754,7 +8778,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NFLA__V14*/ meltfptr[13];; - MELT_LOCATION ("warmelt-normatch.melt:5183:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5183:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V12*/ meltfptr[10] = /*_.RETURN___V21*/ meltfptr[17];; @@ -8778,7 +8814,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normatch.melt:5164:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5164:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10025,7 +10073,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V9*/ meltfptr[4];; - MELT_LOCATION ("warmelt-normatch.melt:5196:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5196:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10438,7 +10498,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normatch.melt:5236:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5236:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:5234:/ quasiblock"); @@ -10557,7 +10629,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MATINDEX__V17*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normatch.melt:5242:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5242:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:5240:/ quasiblock"); @@ -11050,7 +11134,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.MATINDEX__V17*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normatch.melt:5251:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5251:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V23*/ meltfptr[18] = /*_.RETURN___V42*/ meltfptr[37];; @@ -11096,7 +11192,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[9];; - MELT_LOCATION ("warmelt-normatch.melt:5230:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5230:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11829,7 +11937,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NORMSTEP__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normatch.melt:5265:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5265:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:5262:/ quasiblock"); @@ -12727,7 +12847,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NORMSTEP__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normatch.melt:5289:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5289:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:5287:/ quasiblock"); @@ -13362,7 +13494,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NORMSTEPTUP__V84*/ meltfptr[83];; - MELT_LOCATION ("warmelt-normatch.melt:5304:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5304:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V83*/ meltfptr[79] = @@ -13607,8 +13751,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.STEPTUPN__V93*/ meltfptr[84];; - MELT_LOCATION - ("warmelt-normatch.melt:5308:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5308:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V92*/ meltfptr[83] = @@ -13855,8 +14011,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NEWNORMSTEP__V104*/ meltfptr[83];; - MELT_LOCATION - ("warmelt-normatch.melt:5316:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-normatch.melt:5316:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V103*/ meltfptr[86] = @@ -14073,8 +14243,22 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NORMSTEP__V3*/ meltfptr[2];; - MELT_LOCATION - ("warmelt-normatch.melt:5322:/ finalreturn"); + + { + MELT_LOCATION + ("warmelt-normatch.melt:5322:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results + (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION @@ -14518,7 +14702,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NORMSTEP__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normatch.melt:5330:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5330:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:5327:/ quasiblock"); @@ -14601,7 +14797,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V28*/ meltfptr[17];; - MELT_LOCATION ("warmelt-normatch.melt:5256:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5256:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15133,7 +15341,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V11*/ meltfptr[6];; - MELT_LOCATION ("warmelt-normatch.melt:5335:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5335:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -15691,7 +15911,7 @@ lab_endgetargs:; ; /*^putpairtail */ /*putpairtail */ - melt_assertmsg ("putpairtail /151c6e1e checkpair", + melt_assertmsg ("putpairtail /3249662c checkpair", melt_magic_discr ((melt_ptr_t) ( /*_.NSETFLAG__V25*/ meltfptr[24])) == MELTOBMAG_PAIR); @@ -15996,7 +16216,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V33*/ meltfptr[26];; - MELT_LOCATION ("warmelt-normatch.melt:5368:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5368:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V32*/ meltfptr[25] = /*_.RETURN___V38*/ meltfptr[34];; @@ -16038,7 +16270,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normatch.melt:5348:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5348:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16608,7 +16852,7 @@ lab_endgetargs:; ; /*^putpairtail */ /*putpairtail */ - melt_assertmsg ("putpairtail /325aca55 checkpair", + melt_assertmsg ("putpairtail /f6a8a51 checkpair", melt_magic_discr ((melt_ptr_t) ( /*_.NSETFLAG__V26*/ meltfptr[25])) == MELTOBMAG_PAIR); @@ -17844,7 +18088,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RES__V59*/ meltfptr[49];; - MELT_LOCATION ("warmelt-normatch.melt:5429:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5429:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V58*/ meltfptr[34] = /*_.RETURN___V64*/ meltfptr[43];; @@ -17896,7 +18152,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normatch.melt:5372:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5372:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -21576,7 +21844,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NIFISA__V59*/ meltfptr[58];; - MELT_LOCATION ("warmelt-normatch.melt:5539:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5539:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V45*/ meltfptr[40] = /*_.RETURN___V138*/ meltfptr[81];; @@ -21666,7 +21946,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normatch.melt:5435:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5435:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -24577,7 +24869,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NIFISTUPLE__V40*/ meltfptr[39];; - MELT_LOCATION ("warmelt-normatch.melt:5647:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5647:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V92*/ meltfptr[65] = /*_.RETURN___V111*/ meltfptr[101];; @@ -24671,7 +24975,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[5];; - MELT_LOCATION ("warmelt-normatch.melt:5546:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5546:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -27510,7 +27826,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NTESTSAME__V49*/ meltfptr[48];; - MELT_LOCATION ("warmelt-normatch.melt:5727:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5727:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V37*/ meltfptr[30] = /*_.RETURN___V109*/ meltfptr[99];; @@ -27596,7 +27924,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normatch.melt:5655:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5655:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30460,7 +30800,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normatch.melt:5732:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5732:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30594,7 +30946,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.ALTMATCH_NORMALIZE_STEP__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normatch.melt:5755:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5755:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30722,7 +31086,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.ALTMATCH_NORMALIZE_STEP__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normatch.melt:5758:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5758:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30850,7 +31226,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.ALTMATCH_NORMALIZE_STEP__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normatch.melt:5771:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5771:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -30978,7 +31366,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.ALTMATCH_NORMALIZE_STEP__V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normatch.melt:5774:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5774:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -33690,7 +34090,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NIFSUCC__V99*/ meltfptr[98];; - MELT_LOCATION ("warmelt-normatch.melt:5887:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5887:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V97*/ meltfptr[90] = /*_.RETURN___V105*/ meltfptr[101];; @@ -33772,7 +34184,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normatch.melt:5800:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5800:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -34601,7 +35025,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V28*/ meltfptr[21];; - MELT_LOCATION ("warmelt-normatch.melt:5905:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5905:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -35120,7 +35556,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normatch.melt:5919:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5919:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -38351,7 +38799,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V32*/ meltfptr[27];; - MELT_LOCATION ("warmelt-normatch.melt:5931:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:5931:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -40873,7 +41333,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V37*/ meltfptr[35];; - MELT_LOCATION ("warmelt-normatch.melt:6016:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6016:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -46392,7 +46864,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RESTUP__V201*/ meltfptr[197];; - MELT_LOCATION ("warmelt-normatch.melt:6246:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6246:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V200*/ meltfptr[196] = /*_.RETURN___V207*/ meltfptr[203];; @@ -46560,7 +47044,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normatch.melt:6092:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6092:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -47000,7 +47496,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.ENDLAB__V12*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normatch.melt:6261:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6261:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V11*/ meltfptr[10] = /*_.RETURN___V17*/ meltfptr[13];; @@ -47538,7 +48046,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NLAB__V22*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normatch.melt:6282:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6282:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V20*/ meltfptr[12] = /*_.RETURN___V41*/ meltfptr[29];; @@ -47568,7 +48088,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V20*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normatch.melt:6253:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6253:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -48121,7 +48653,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NDATA__V15*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normatch.melt:6301:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6301:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:6299:/ quasiblock"); @@ -48346,7 +48890,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NDATA__V15*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normatch.melt:6315:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6315:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:6306:/ quasiblock"); @@ -48883,7 +49439,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NDATA__V15*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normatch.melt:6344:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6344:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V35*/ meltfptr[29] = /*_.RETURN___V55*/ meltfptr[46];; @@ -48944,7 +49512,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[4];; - MELT_LOCATION ("warmelt-normatch.melt:6288:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6288:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -50893,7 +51473,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V17*/ meltfptr[15];; - MELT_LOCATION ("warmelt-normatch.melt:6348:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6348:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -51749,7 +52341,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NMCTXT__V29*/ meltfptr[28];; - MELT_LOCATION ("warmelt-normatch.melt:6445:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6445:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V13*/ meltfptr[6] = /*_.RETURN___V35*/ meltfptr[31];; @@ -51789,7 +52393,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[6];; - MELT_LOCATION ("warmelt-normatch.melt:6386:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6386:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -54490,7 +55106,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V19*/ meltfptr[14];; - MELT_LOCATION ("warmelt-normatch.melt:6450:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6450:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -55026,7 +55654,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-normatch.melt:6498:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6498:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -61732,7 +62372,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normatch.melt:6528:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6528:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-normatch+05.c b/gcc/melt/generated/warmelt-normatch+05.c index 287481ae965..4847fad0035 100644 --- a/gcc/melt/generated/warmelt-normatch+05.c +++ b/gcc/melt/generated/warmelt-normatch+05.c @@ -2688,7 +2688,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V12*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normatch.melt:6707:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6707:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -2968,7 +2980,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.INSTALL_METHOD__V7*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normatch.melt:6771:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6771:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6082,7 +6106,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OLDNAME__V11*/ meltfptr[10];; - MELT_LOCATION ("warmelt-normatch.melt:6832:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6832:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:6830:/ quasiblock"); @@ -6483,7 +6519,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NEWNAME__V30*/ meltfptr[27];; - MELT_LOCATION ("warmelt-normatch.melt:6853:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6853:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V29*/ meltfptr[26] = /*_.RETURN___V38*/ meltfptr[37];; @@ -6523,7 +6571,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V19*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normatch.melt:6824:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6824:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6945,7 +7005,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.OLDNAME__V10*/ meltfptr[9];; - MELT_LOCATION ("warmelt-normatch.melt:6865:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6865:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:6863:/ quasiblock"); @@ -7409,7 +7481,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V18*/ meltfptr[11];; - MELT_LOCATION ("warmelt-normatch.melt:6857:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6857:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7901,7 +7985,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normatch.melt:6893:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6893:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8114,7 +8210,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normatch.melt:6933:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6933:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8325,7 +8433,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-normatch.melt:6952:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:6952:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-normatch+meltdesc.c b/gcc/melt/generated/warmelt-normatch+meltdesc.c index a3aa7d58e37..9dac170162d 100644 --- a/gcc/melt/generated/warmelt-normatch+meltdesc.c +++ b/gcc/melt/generated/warmelt-normatch+meltdesc.c @@ -19,7 +19,7 @@ #endif /*__cplusplus */ /* version of the GCC compiler & MELT runtime generating this */ -const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revision 188875] MELT_0.9.6-pre" +const char melt_genversionstr[]="4.8.0 20120702 (experimental) [melt-branch revision 189162] MELT_0.9.6-pre" #ifdef __cplusplus " (in C++)" @@ -28,7 +28,7 @@ const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revi #endif ; -const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_188875]"; +const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_189162]"; /* source name & real path of the module */ /*MELTMODULENAME MELT-STAGE-ZERO/warmelt-normatch */ @@ -36,18 +36,18 @@ const char melt_modulename[]="warmelt-normatch"; const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.8.0/melt-modules/0.9.6-pre/warmelt-normatch"; /* hash of preprocessed melt-run.h generating this */ -const char melt_prepromd5meltrun[]="40fea0fe808f877cf6541857ec8d6c2d"; +const char melt_prepromd5meltrun[]="b3a18a5fcc8e78e7c3ea5bf55f88e347"; /* hexmd5checksum of primary C file */ -const char melt_primaryhexmd5[]="b1ae9e1f35b7100907c643db2a20228f"; +const char melt_primaryhexmd5[]="ba1f38e78ab7bbd0d213303b147ff669"; /* hexmd5checksum of secondary C files */ const char* const melt_secondaryhexmd5tab[]={ /*nosecfile*/ (const char*)0, - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+01.c #1 */ "5db0c24a7fb2f0414bdadcc8e683b981", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+02.c #2 */ "010773fd535ac06b41a2a559391e60e9", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+03.c #3 */ "c5addbe7d0c4da2bc7b36de4357a35fd", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+04.c #4 */ "a0d5030fda1ba91ac1b9b2f88fb3cc4e", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+05.c #5 */ "f908657d60921868948b2b63e86d0532", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+01.c #1 */ "e5c39e61a69e2eb4e19cc201e4fcfd01", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+02.c #2 */ "9d4ae844032a8cd7913049db9a417f40", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+03.c #3 */ "718b31b97775dfb256760e2dcd692776", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+04.c #4 */ "2baa0d5e61514fd7b020e248cd42bb73", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-normatch+05.c #5 */ "073e37afdce9b2c3f10ab26621c3a027", /*nosecfile*/ (const char*)0, (const char*)0 }; @@ -55,10 +55,10 @@ const char* const melt_secondaryhexmd5tab[]={ const int melt_lastsecfileindex=5; /* cumulated checksum of primary & secondary files */ -const char melt_cumulated_hexmd5[]="4e4f1643c9c6ad0344dc406b04aa72fe" ; +const char melt_cumulated_hexmd5[]="3b5c508cbdcb4fcd6871df60acb426b9" ; /* include the timestamp file */ -#define meltmod_warmelt_normatch_mds__4e4f1643c9c6ad0344dc406b04aa72fe 1 +#define meltmod_warmelt_normatch_mds__3b5c508cbdcb4fcd6871df60acb426b9 1 #include "warmelt-normatch+melttime.h" diff --git a/gcc/melt/generated/warmelt-normatch+melttime.h b/gcc/melt/generated/warmelt-normatch+melttime.h index 68246dbe88a..392260a6ed7 100644 --- a/gcc/melt/generated/warmelt-normatch+melttime.h +++ b/gcc/melt/generated/warmelt-normatch+melttime.h @@ -5,7 +5,7 @@ /* This warmelt-normatch+melttime.h is included from warmelt-normatch+meltdesc.c only. */ -#if meltmod_warmelt_normatch_mds__4e4f1643c9c6ad0344dc406b04aa72fe +#if meltmod_warmelt_normatch_mds__3b5c508cbdcb4fcd6871df60acb426b9 /* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-normatch */ #ifdef __cplusplus @@ -18,8 +18,8 @@ extern "C" { /*MELT BOOTSTRAP*/ -const char melt_gen_timestamp[]="Fri Jun 22 15:20:06 2012 CEST"; -const long long melt_gen_timenum=1340371206; +const char melt_gen_timestamp[]="Mon Jul 2 17:04:55 2012 MEST"; +const long long melt_gen_timenum=1341241495; const char melt_build_timestamp[]= __DATE__ "@" __TIME__ #ifdef __cplusplus @@ -34,7 +34,7 @@ const long long melt_gen_timenum=1340371206; } ; /* end extern C */ #endif /*__cplusplus */ - #else /* ! meltmod_warmelt_normatch_mds__4e4f1643c9c6ad0344dc406b04aa72fe */ + #else /* ! meltmod_warmelt_normatch_mds__3b5c508cbdcb4fcd6871df60acb426b9 */ #error invalid timestamp file for MELT-STAGE-ZERO/warmelt-normatch - #endif /* meltmod_warmelt_normatch_mds__4e4f1643c9c6ad0344dc406b04aa72fe */ + #endif /* meltmod_warmelt_normatch_mds__3b5c508cbdcb4fcd6871df60acb426b9 */ diff --git a/gcc/melt/generated/warmelt-normatch.c b/gcc/melt/generated/warmelt-normatch.c index 23af48c409c..b7139d333c9 100644 --- a/gcc/melt/generated/warmelt-normatch.c +++ b/gcc/melt/generated/warmelt-normatch.c @@ -2729,7 +2729,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[7];; - MELT_LOCATION ("warmelt-normatch.melt:86:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:86:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3323,7 +3335,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normatch.melt:101:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:101:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4600,7 +4624,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-normatch.melt:156:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:156:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-normatch.melt:151:/ checksignal"); @@ -4610,7 +4646,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-normatch.melt:151:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-normatch.melt:151:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4674,7 +4722,7 @@ initialize_module_meltdata_warmelt_normatch (initial_frame_st * iniframp__, ("start initialize_module_meltdata_warmelt_normatch iniframp__=%p", (void *) iniframp__); melt_assertmsg ("check module initial frame", - iniframp__->mcfr_nbvar == /*minihash */ -1496); + iniframp__->mcfr_nbvar == /*minihash */ -1879); struct cdata_st { @@ -24924,7 +24972,7 @@ start_module_melt (void *modargp_) /**initial routine prologue**/ /* set initial frame marking */ ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = - /*minihash */ -1496; + /*minihash */ -1879; ((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout = meltmod__warmelt_normatch__forward_or_mark_module_start_frame; /**COMMENT: get previous environment **/ ; @@ -78718,7 +78766,7 @@ meltmod__warmelt_normatch__forward_or_mark_module_start_frame (struct int ix = 0; initial_frame_st *meltframptr_ = (initial_frame_st *) fp; melt_assertmsg ("check module frame", - meltframptr_->mcfr_nbvar == /*minihash */ -1496); + meltframptr_->mcfr_nbvar == /*minihash */ -1879); if (!marking && melt_is_forwarding) { dbgprintf diff --git a/gcc/melt/generated/warmelt-outobj+01.c b/gcc/melt/generated/warmelt-outobj+01.c index 4eccd6e3283..c6c9c09800d 100644 --- a/gcc/melt/generated/warmelt-outobj+01.c +++ b/gcc/melt/generated/warmelt-outobj+01.c @@ -3199,7 +3199,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:90:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:90:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3501,7 +3513,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V9*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:113:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:113:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3747,7 +3771,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-outobj.melt:123:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:123:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; MELT_LOCATION ("warmelt-outobj.melt:121:/ checksignal"); @@ -3757,7 +3793,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETURN___V9*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:121:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:121:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4527,7 +4575,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V15*/ meltfptr[7];; - MELT_LOCATION ("warmelt-outobj.melt:128:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:128:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4775,7 +4835,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:154:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:154:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7808,7 +7880,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[8];; - MELT_LOCATION ("warmelt-outobj.melt:179:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:179:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8486,7 +8570,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-outobj.melt:345:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:345:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V27*/ meltfptr[23] = /*_.RETURN___V28*/ meltfptr[24];; @@ -8525,7 +8621,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-outobj.melt:346:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:346:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V29*/ meltfptr[24] = /*_.RETURN___V30*/ meltfptr[29];; @@ -9415,7 +9523,20 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-outobj.melt:411:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:411:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] + && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IFELSE___V50*/ meltfptr[36] = @@ -9714,7 +9835,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V15*/ meltfptr[13];; - MELT_LOCATION ("warmelt-outobj.melt:332:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:332:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10892,7 +11025,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[8];; - MELT_LOCATION ("warmelt-outobj.melt:433:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:433:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -12194,7 +12339,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[8];; - MELT_LOCATION ("warmelt-outobj.melt:487:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:487:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14225,7 +14382,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V43*/ meltfptr[19];; - MELT_LOCATION ("warmelt-outobj.melt:558:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:558:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17311,7 +17480,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[8];; - MELT_LOCATION ("warmelt-outobj.melt:666:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:666:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18490,7 +18671,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[8];; - MELT_LOCATION ("warmelt-outobj.melt:865:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:865:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19602,7 +19795,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[8];; - MELT_LOCATION ("warmelt-outobj.melt:924:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:924:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20714,7 +20919,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V13*/ meltfptr[8];; - MELT_LOCATION ("warmelt-outobj.melt:973:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:973:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -21178,7 +21395,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V16*/ meltfptr[12];; - MELT_LOCATION ("warmelt-outobj.melt:1015:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:1015:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-outobj+02.c b/gcc/melt/generated/warmelt-outobj+02.c index 7a3d7f91d26..57f93070251 100644 --- a/gcc/melt/generated/warmelt-outobj+02.c +++ b/gcc/melt/generated/warmelt-outobj+02.c @@ -2552,7 +2552,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V12*/ meltfptr[6];; - MELT_LOCATION ("warmelt-outobj.melt:1032:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:1032:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3351,7 +3363,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-outobj.melt:1045:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:1045:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3419,8 +3443,8 @@ meltrout_32_warmelt_outobj_LINE_AND_FILE_OF_LOCATION (meltclosure_ptr_t struct meltclosure_st *mcfr_clos; struct excepth_melt_st *mcfr_exh; struct melt_callframe_st *mcfr_prev; -#define MELTFRAM_NBVARPTR 10 - melt_ptr_t mcfr_varptr[10]; +#define MELTFRAM_NBVARPTR 12 + melt_ptr_t mcfr_varptr[12]; #define MELTFRAM_NBVARNUM 4 long mcfr_varnum[4]; /*others*/ @@ -3435,13 +3459,13 @@ meltrout_32_warmelt_outobj_LINE_AND_FILE_OF_LOCATION (meltclosure_ptr_t (struct frame_meltrout_32_warmelt_outobj_LINE_AND_FILE_OF_LOCATION_st *) meltfirstargp_; gt_ggc_mx_melt_un (meltframptr_->mcfr_clos); - for (ix = 0; ix < 10; ix++) + for (ix = 0; ix < 12; ix++) if (meltframptr_->mcfr_varptr[ix]) gt_ggc_mx_melt_un (meltframptr_->mcfr_varptr[ix]); return NULL; } /*end markggc */ ; memset (&meltfram__, 0, sizeof (meltfram__)); - meltfram__.mcfr_nbvar = 10; + meltfram__.mcfr_nbvar = 12; meltfram__.mcfr_clos = meltclosp_; meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe; melt_topframe = (struct melt_callframe_st *) &meltfram__; @@ -3600,11 +3624,48 @@ lab_endgetargs:; else { /*^cond.else */ - /*_.IFELSE___V7*/ meltfptr[3] = NULL;; + /*^block */ + /*anyblock */ + { + + MELT_LOCATION ("warmelt-outobj.melt:1103:/ checksignal"); + MELT_CHECK_SIGNAL (); + ; + /*^quasiblock */ + + + /*_.RETVAL___V1*/ meltfptr[0] = ( /*nil */ NULL);; + MELT_LOCATION ("warmelt-outobj.melt:1103:/ putxtraresult"); + if (!meltxrestab_ || !meltxresdescr_) + goto labend_rout; + if (meltxresdescr_[0] != MELTBPAR_PTR) + goto labend_rout; + if (meltxrestab_[0].meltbp_aptr) + *(meltxrestab_[0].meltbp_aptr) = + (melt_ptr_t) (( /*nil */ NULL)); + ; + /*^finalreturn */ + ; + /*finalret */ goto labend_rout; + MELT_LOCATION ("warmelt-outobj.melt:1102:/ quasiblock"); + + + /*_.PROGN___V12*/ meltfptr[5] = + /*_.RETURN___V11*/ meltfptr[4];; + /*^compute */ + + /*_.IFELSE___V7*/ meltfptr[3] = + /*_.PROGN___V12*/ meltfptr[5];; + /*epilog */ + + MELT_LOCATION ("warmelt-outobj.melt:1099:/ clear"); + /*clear *//*_.RETURN___V11*/ meltfptr[4] = 0; + /*^clear */ + /*clear *//*_.PROGN___V12*/ meltfptr[5] = 0; + } + ; } ; - /*^compute */ - /*_.IFELSE___V3*/ meltfptr[2] = /*_.IFELSE___V7*/ meltfptr[3];; /*epilog */ @@ -3620,7 +3681,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-outobj.melt:1093:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:1093:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3715,7 +3788,7 @@ meltrout_33_warmelt_outobj_OUTPUT_LOCATION (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:1106:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:1108:/ getarg"); /*_.LOC__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -3747,7 +3820,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-outobj.melt:1107:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1109:/ quasiblock"); /*^getslot */ @@ -3758,7 +3831,7 @@ lab_endgetargs:; meltfptr[4] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1108:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1110:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) (( /*!PREVIMPLBUF_CONTAINER */ meltfrout->tabval[1])), 0, "REFERENCED_VALUE"); @@ -3766,12 +3839,12 @@ lab_endgetargs:; meltfptr[5] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1110:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1112:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L2*/ meltfnum[1] = (( /*_.PREVBUF__V6*/ meltfptr[5]) == ( /*_.IMPLBUF__V3*/ meltfptr[2]));; - MELT_LOCATION ("warmelt-outobj.melt:1110:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1112:/ cond"); /*cond */ if ( /*_#__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -3779,13 +3852,13 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:1111:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1113:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L3*/ meltfnum[2] = (( /*_.PREVLOC__V5*/ meltfptr[4]) == ( /*_.LOC__V2*/ meltfptr[1]));; - MELT_LOCATION ("warmelt-outobj.melt:1111:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1113:/ cond"); /*cond */ if ( /*_#__L3*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -3793,13 +3866,13 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1111:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1113:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:1112:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1114:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#GET_INT__L5*/ meltfnum[4] = @@ -3814,7 +3887,7 @@ lab_endgetargs:; /*_#I__L7*/ meltfnum[6] = (( /*_#GET_INT__L5*/ meltfnum[4]) == ( /*_#GET_INT__L6*/ meltfnum[5]));; - MELT_LOCATION ("warmelt-outobj.melt:1112:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1114:/ cond"); /*cond */ if ( /*_#I__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -3840,7 +3913,7 @@ lab_endgetargs:; /*_#IF___L8*/ meltfnum[7] = /*_#__L9*/ meltfnum[8];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1112:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1114:/ clear"); /*clear *//*_.MIXLOC_VAL__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.MIXLOC_VAL__V9*/ meltfptr[8] = 0; @@ -3860,7 +3933,7 @@ lab_endgetargs:; /*_#OR___L4*/ meltfnum[3] = /*_#IF___L8*/ meltfnum[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1111:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1113:/ clear"); /*clear *//*_#GET_INT__L5*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_#GET_INT__L6*/ meltfnum[5] = 0; @@ -3880,7 +3953,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:1115:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1117:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -3893,7 +3966,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1116:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1118:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), @@ -3902,7 +3975,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1117:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1119:/ locexp"); /*add2sbuf_ccomconst */ meltgc_add_strbuf_ccomment ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ @@ -3913,14 +3986,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1118:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1120:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), ("*/")); } ; - MELT_LOCATION ("warmelt-outobj.melt:1115:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1117:/ quasiblock"); /*epilog */ @@ -3930,7 +4003,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1120:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1122:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (0), 0); @@ -3938,7 +4011,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1121:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1123:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), @@ -3947,20 +4020,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1122:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1124:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1123:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1125:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_MIXINT__L10*/ meltfnum[8] = (melt_magic_discr ((melt_ptr_t) ( /*_.LOC__V2*/ meltfptr[1])) == MELTOBMAG_MIXINT);; - MELT_LOCATION ("warmelt-outobj.melt:1123:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1125:/ cond"); /*cond */ if ( /*_#IS_MIXINT__L10*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -3970,7 +4043,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1127:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1129:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), @@ -3979,7 +4052,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1128:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1130:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), @@ -3991,7 +4064,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.LOC__V2*/ meltfptr[1])));; { - MELT_LOCATION ("warmelt-outobj.melt:1129:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1131:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), @@ -3999,7 +4072,7 @@ lab_endgetargs:; meltfnum[4])); } ; - MELT_LOCATION ("warmelt-outobj.melt:1123:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1125:/ quasiblock"); /*epilog */ @@ -4017,14 +4090,14 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:1131:/ checksignal"); + ("warmelt-outobj.melt:1133:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_MIXLOC__L12*/ meltfnum[5] = (melt_magic_discr ((melt_ptr_t) ( /*_.LOC__V2*/ meltfptr[1])) == MELTOBMAG_MIXLOC);; - MELT_LOCATION ("warmelt-outobj.melt:1131:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1133:/ cond"); /*cond */ if ( /*_#IS_MIXLOC__L12*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -4035,7 +4108,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:1132:/ locexp"); + ("warmelt-outobj.melt:1134:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ @@ -4045,7 +4118,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:1133:/ locexp"); + ("warmelt-outobj.melt:1135:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ @@ -4059,7 +4132,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:1134:/ locexp"); + ("warmelt-outobj.melt:1136:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), @@ -4067,7 +4140,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:1131:/ quasiblock"); + ("warmelt-outobj.melt:1133:/ quasiblock"); /*epilog */ @@ -4090,7 +4163,7 @@ lab_endgetargs:; /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1123:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1125:/ clear"); /*clear *//*_#IS_MIXLOC__L12*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -4100,7 +4173,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1137:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1139:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (0), 0); @@ -4108,7 +4181,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1138:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1140:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), @@ -4117,20 +4190,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1139:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1141:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1141:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1143:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#STRBUF_USEDLENGTH__L14*/ meltfnum[7] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]));; - MELT_LOCATION ("warmelt-outobj.melt:1141:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1143:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -4170,7 +4243,7 @@ lab_endgetargs:; /*_#I__L17*/ meltfnum[5] = (( /*_#STRBUF_USEDLENGTH__L14*/ meltfnum[7]) > ( /*_#IRAW__L16*/ meltfnum[6]));; - MELT_LOCATION ("warmelt-outobj.melt:1141:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1143:/ cond"); /*cond */ if ( /*_#I__L17*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -4180,7 +4253,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1142:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1144:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -4191,7 +4264,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1143:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1145:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4217,7 +4290,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:1143:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1145:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[17]) /*then */ { /*^cond.then */ @@ -4233,7 +4306,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-outobj.melt:1143:/ checksignal"); + ("warmelt-outobj.melt:1145:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -4248,7 +4321,7 @@ lab_endgetargs:; argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 1143; + argtab[2].meltbp_long = 1145; /*^apply.arg */ argtab[3].meltbp_cstring = "output_location huge implbuf="; @@ -4274,7 +4347,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:1143:/ clear"); + ("warmelt-outobj.melt:1145:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[18] = 0; /*^clear */ @@ -4290,7 +4363,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:1143:/ quasiblock"); + ("warmelt-outobj.melt:1145:/ quasiblock"); /*_.PROGN___V18*/ meltfptr[16] = @@ -4301,7 +4374,7 @@ lab_endgetargs:; /*_.PROGN___V18*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1143:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1145:/ clear"); /*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[17] = 0; /*^clear */ /*clear *//*_.IF___V16*/ meltfptr[15] = 0; @@ -4316,7 +4389,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1144:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1146:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4328,7 +4401,7 @@ lab_endgetargs:; melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]));; - MELT_LOCATION ("warmelt-outobj.melt:1145:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1147:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -4363,7 +4436,7 @@ lab_endgetargs:; /*_#I__L22*/ meltfnum[21] = (( /*_#STRBUF_USEDLENGTH__L20*/ meltfnum[18]) < ( /*_#GET_INT__L21*/ meltfnum[17]));; - MELT_LOCATION ("warmelt-outobj.melt:1144:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1146:/ cond"); /*cond */ if ( /*_#I__L22*/ meltfnum[21]) /*then */ { /*^cond.then */ @@ -4373,7 +4446,7 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-outobj.melt:1144:/ cond.else"); + ("warmelt-outobj.melt:1146:/ cond.else"); /*^block */ /*anyblock */ @@ -4388,7 +4461,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1144) ? (1144) : + (1146) ? (1146) : __LINE__, __FUNCTION__); ; } @@ -4405,7 +4478,7 @@ lab_endgetargs:; /*_.IFELSE___V21*/ meltfptr[20];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1144:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1146:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L20*/ meltfnum[18] = 0; /*^clear */ @@ -4424,7 +4497,7 @@ lab_endgetargs:; /*_.IFCPP___V19*/ meltfptr[15] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1141:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1143:/ quasiblock"); /*_.PROGN___V22*/ meltfptr[16] = @@ -4435,7 +4508,7 @@ lab_endgetargs:; /*_.PROGN___V22*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1141:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1143:/ clear"); /*clear *//*_.IFCPP___V15*/ meltfptr[14] = 0; /*^clear */ /*clear *//*_.IFCPP___V19*/ meltfptr[15] = 0; @@ -4450,14 +4523,26 @@ lab_endgetargs:; /*_.IFELSE___V14*/ meltfptr[13] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1146:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1148:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-outobj.melt:1146:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:1148:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-outobj.melt:1114:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1116:/ quasiblock"); /*_.PROGN___V24*/ meltfptr[14] = @@ -4467,7 +4552,7 @@ lab_endgetargs:; /*_.IF___V10*/ meltfptr[7] = /*_.PROGN___V24*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1111:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1113:/ clear"); /*clear *//*_#IS_MIXINT__L10*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.IFELSE___V11*/ meltfptr[8] = 0; @@ -4501,7 +4586,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = /*_.IF___V10*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1110:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1112:/ clear"); /*clear *//*_#__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_#OR___L4*/ meltfnum[3] = 0; @@ -4516,7 +4601,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1150:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1152:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -4536,7 +4621,7 @@ lab_endgetargs:; meltgc_touch (( /*!PREVLOC_CONTAINER */ meltfrout->tabval[0])); ; - MELT_LOCATION ("warmelt-outobj.melt:1151:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1153:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -4558,13 +4643,13 @@ lab_endgetargs:; meltgc_touch (( /*!PREVIMPLBUF_CONTAINER */ meltfrout->tabval[1])); ; - MELT_LOCATION ("warmelt-outobj.melt:1154:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1156:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_MIXINT__L23*/ meltfnum[18] = (melt_magic_discr ((melt_ptr_t) ( /*_.LOC__V2*/ meltfptr[1])) == MELTOBMAG_MIXINT);; - MELT_LOCATION ("warmelt-outobj.melt:1154:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1156:/ cond"); /*cond */ if ( /*_#IS_MIXINT__L23*/ meltfnum[18]) /*then */ { /*^cond.then */ @@ -4574,7 +4659,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1155:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1157:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), @@ -4585,7 +4670,7 @@ lab_endgetargs:; (melt_val_mixint ((melt_ptr_t) ( /*_.LOC__V2*/ meltfptr[1])));; { - MELT_LOCATION ("warmelt-outobj.melt:1156:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1158:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), @@ -4596,7 +4681,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1157:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1159:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (":")); @@ -4606,13 +4691,13 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.LOC__V2*/ meltfptr[1])));; { - MELT_LOCATION ("warmelt-outobj.melt:1158:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1160:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), ( /*_#GET_INT__L24*/ meltfnum[17])); } ; - MELT_LOCATION ("warmelt-outobj.melt:1159:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1161:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -4625,7 +4710,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1160:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1162:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), @@ -4634,14 +4719,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1161:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1163:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), ( /*_?*/ meltfram__.loc_CSTRING__o0)); } ; - MELT_LOCATION ("warmelt-outobj.melt:1159:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1161:/ quasiblock"); /*epilog */ @@ -4651,13 +4736,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1163:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1165:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), ("\");")); } ; - MELT_LOCATION ("warmelt-outobj.melt:1154:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1156:/ quasiblock"); /*epilog */ @@ -4676,13 +4761,13 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:1165:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1167:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_MIXLOC__L25*/ meltfnum[21] = (melt_magic_discr ((melt_ptr_t) ( /*_.LOC__V2*/ meltfptr[1])) == MELTOBMAG_MIXLOC);; - MELT_LOCATION ("warmelt-outobj.melt:1165:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1167:/ cond"); /*cond */ if ( /*_#IS_MIXLOC__L25*/ meltfnum[21]) /*then */ { /*^cond.then */ @@ -4692,7 +4777,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1166:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1168:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), @@ -4704,7 +4789,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.LOC__V2*/ meltfptr[1])));; { - MELT_LOCATION ("warmelt-outobj.melt:1167:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1169:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), @@ -4714,7 +4799,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1168:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1170:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), @@ -4725,13 +4810,13 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.LOC__V2*/ meltfptr[1])));; { - MELT_LOCATION ("warmelt-outobj.melt:1169:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1171:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), ( /*_#GET_INT__L26*/ meltfnum[8])); } ; - MELT_LOCATION ("warmelt-outobj.melt:1170:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1172:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -4744,7 +4829,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1171:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1173:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), @@ -4753,7 +4838,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1172:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1174:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), @@ -4761,7 +4846,7 @@ lab_endgetargs:; loc_CSTRING__o0)); } ; - MELT_LOCATION ("warmelt-outobj.melt:1170:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1172:/ quasiblock"); /*epilog */ @@ -4771,14 +4856,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1174:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1176:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), ("\");")); } ; - MELT_LOCATION ("warmelt-outobj.melt:1165:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1167:/ quasiblock"); /*epilog */ @@ -4801,7 +4886,7 @@ lab_endgetargs:; /*_.IFELSE___V25*/ meltfptr[15] = /*_.IFELSE___V27*/ meltfptr[8];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1154:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1156:/ clear"); /*clear *//*_#IS_MIXLOC__L25*/ meltfnum[21] = 0; /*^clear */ /*clear *//*_.IFELSE___V27*/ meltfptr[8] = 0; @@ -4809,7 +4894,7 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-outobj.melt:1177:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1179:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -4833,7 +4918,7 @@ lab_endgetargs:; ; /*_.LET___V4*/ meltfptr[3] = /*_.OUTPUT_RAW_LOCATION__V29*/ meltfptr[13];; - MELT_LOCATION ("warmelt-outobj.melt:1107:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1109:/ clear"); /*clear *//*_.PREVLOC__V5*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.PREVBUF__V6*/ meltfptr[5] = 0; @@ -4847,11 +4932,23 @@ lab_endgetargs:; /*clear *//*_.IFELSE___V25*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_.OUTPUT_RAW_LOCATION__V29*/ meltfptr[13] = 0; - MELT_LOCATION ("warmelt-outobj.melt:1106:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1108:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-outobj.melt:1106:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:1108:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4949,7 +5046,7 @@ meltrout_34_warmelt_outobj_OUTPUT_CURFRAME_DECLSTRUCT (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:1182:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:1184:/ getarg"); /*_.ROU__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -4969,10 +5066,10 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-outobj.melt:1183:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1185:/ quasiblock"); - MELT_LOCATION ("warmelt-outobj.melt:1184:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1186:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.ROU__V2*/ meltfptr[1]), 3, "OBROUT_BODY"); @@ -4980,7 +5077,7 @@ lab_endgetargs:; meltfptr[3] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1185:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1187:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.ROU__V2*/ meltfptr[1]), 4, "OBROUT_NBVAL"); @@ -4988,7 +5085,7 @@ lab_endgetargs:; meltfptr[4] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1186:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1188:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.ROU__V2*/ meltfptr[1]), 5, "OBROUT_NBLONG"); @@ -5008,7 +5105,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.ROU__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:1190:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1192:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.ROU__V2*/ meltfptr[1]), 6, "OBROUT_OTHERS"); @@ -5018,27 +5115,27 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1193:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1195:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1194:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1196:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (" struct ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:1195:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1197:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L4*/ meltfnum[3] = melt_is_instance_of ((melt_ptr_t) ( /*_.ROU__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout-> tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:1195:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1197:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -5048,13 +5145,13 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1197:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1199:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ("frame_")); } ; - MELT_LOCATION ("warmelt-outobj.melt:1198:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1200:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.ROU__V2*/ meltfptr[1]), 1, "NAMED_NAME"); @@ -5074,18 +5171,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1199:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1201:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ("_st ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:1196:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1198:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1195:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1197:/ clear"); /*clear *//*_.NAMED_NAME__V8*/ meltfptr[7] = 0; } ; @@ -5093,7 +5190,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1200:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1202:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ("{")); @@ -5101,14 +5198,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1201:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1203:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1202:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1204:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (" int mcfr_nbvar;")); @@ -5116,14 +5213,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1203:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1205:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1204:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1206:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ("#if MELT_HAVE_DEBUG")); @@ -5131,14 +5228,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1205:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1207:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1206:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1208:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (" const char* mcfr_flocs;")); @@ -5146,14 +5243,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1207:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1209:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1208:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1210:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ("#else /*!MELT_HAVE_DEBUG*/")); @@ -5161,14 +5258,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1209:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1211:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1210:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1212:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (" const char* mcfr_unusedflocs;")); @@ -5176,14 +5273,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1211:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1213:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1212:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1214:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ("#endif /*MELT_HAVE_DEBUG*/")); @@ -5191,12 +5288,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1213:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1215:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1216:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1218:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -5209,7 +5306,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1217:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1219:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (" void (*mcfr_initforwmarkrout) ( struct melt_callframe_st*, int);")); @@ -5221,7 +5318,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1216:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1218:/ cond.else"); /*^block */ /*anyblock */ @@ -5229,7 +5326,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1219:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1221:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (" struct meltclosure_st *mcfr_clos;")); @@ -5242,14 +5339,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1220:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1222:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1221:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1223:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (" struct excepth_melt_st *mcfr_exh;")); @@ -5257,14 +5354,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1222:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1224:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1223:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1225:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (" struct melt_callframe_st *mcfr_prev;")); @@ -5272,17 +5369,17 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1224:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1226:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1225:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1227:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L5*/ meltfnum[4] = (( /*_#NBVAL__L1*/ meltfnum[0]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:1225:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1227:/ cond"); /*cond */ if ( /*_#I__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -5292,7 +5389,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1227:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1229:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ("#define MELTFRAM_NBVARPTR ")); @@ -5300,7 +5397,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1228:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1230:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ( /*_#NBVAL__L1*/ meltfnum[0])); @@ -5308,14 +5405,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1229:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1231:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1230:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1232:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (" melt_ptr_t mcfr_varptr[")); @@ -5323,7 +5420,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1231:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1233:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ( /*_#NBVAL__L1*/ meltfnum[0])); @@ -5331,7 +5428,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1232:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1234:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ("];")); @@ -5339,12 +5436,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1233:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1235:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1226:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1228:/ quasiblock"); /*epilog */ @@ -5353,7 +5450,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1225:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1227:/ cond.else"); /*^block */ /*anyblock */ @@ -5361,7 +5458,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1235:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1237:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ("/*no varptr*/")); @@ -5369,14 +5466,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1236:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1238:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1237:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1239:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ("#define MELTFRAM_NBVARPTR /*none*/0")); @@ -5384,12 +5481,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1238:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1240:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1234:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1236:/ quasiblock"); /*epilog */ @@ -5397,12 +5494,12 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-outobj.melt:1239:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1241:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L6*/ meltfnum[5] = (( /*_#NBLONG__L2*/ meltfnum[1]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:1239:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1241:/ cond"); /*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -5412,7 +5509,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1241:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1243:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ("#define MELTFRAM_NBVARNUM ")); @@ -5420,7 +5517,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1242:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1244:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ( /*_#NBLONG__L2*/ meltfnum[1])); @@ -5428,14 +5525,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1243:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1245:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1244:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1246:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (" long mcfr_varnum[")); @@ -5443,7 +5540,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1245:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1247:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ( /*_#NBLONG__L2*/ meltfnum[1])); @@ -5451,7 +5548,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1246:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1248:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ("];")); @@ -5459,12 +5556,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1247:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1249:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1240:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1242:/ quasiblock"); /*epilog */ @@ -5473,7 +5570,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1239:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1241:/ cond.else"); /*^block */ /*anyblock */ @@ -5481,7 +5578,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1249:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1251:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ("/*no varnum*/")); @@ -5489,14 +5586,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1250:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1252:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1251:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1253:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ("#define MELTFRAM_NBVARNUM /*none*/0")); @@ -5504,12 +5601,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1252:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1254:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1248:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1250:/ quasiblock"); /*epilog */ @@ -5517,7 +5614,7 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-outobj.melt:1253:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1255:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -5530,7 +5627,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1255:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1257:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ("/*others*/")); @@ -5538,12 +5635,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1256:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1258:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1259:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1261:/ quasiblock"); /*^newclosure */ @@ -5572,7 +5669,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]); ; /*_.LAMBDA___V10*/ meltfptr[9] = /*_.LAMBDA___V11*/ meltfptr[10];; - MELT_LOCATION ("warmelt-outobj.melt:1257:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1259:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -5591,7 +5688,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1254:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1256:/ quasiblock"); /*_.PROGN___V13*/ meltfptr[12] = @@ -5601,7 +5698,7 @@ lab_endgetargs:; /*_.IFELSE___V9*/ meltfptr[7] = /*_.PROGN___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1253:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1255:/ clear"); /*clear *//*_.LAMBDA___V10*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.LIST_EVERY__V12*/ meltfptr[11] = 0; @@ -5619,7 +5716,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1279:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1281:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ("/*no others*/")); @@ -5627,12 +5724,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1280:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1282:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1278:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1280:/ quasiblock"); /*epilog */ @@ -5642,7 +5739,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1282:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1284:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (" long _spare_; }")); @@ -5650,13 +5747,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1283:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1285:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1183:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1185:/ clear"); /*clear *//*_.OBODY__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.ONBVAL__V5*/ meltfptr[4] = 0; @@ -5763,7 +5860,7 @@ meltrout_35_warmelt_outobj_LAMBDA___1__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:1259:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:1261:/ getarg"); /*_.OLOC__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -5775,7 +5872,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1260:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1262:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5787,7 +5884,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OLOC__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJLOCV */ meltfrout-> tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:1260:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1262:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -5795,7 +5892,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1260:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1262:/ cond.else"); /*^block */ /*anyblock */ @@ -5809,7 +5906,7 @@ lab_endgetargs:; melt_assert_failed (("check other oloc"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1260) ? (1260) : __LINE__, __FUNCTION__); + (1262) ? (1262) : __LINE__, __FUNCTION__); ; } ; @@ -5824,7 +5921,7 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = /*_.IFELSE___V4*/ meltfptr[3];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1260:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1262:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V4*/ meltfptr[3] = 0; @@ -5835,7 +5932,7 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1261:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1263:/ quasiblock"); /*^getslot */ @@ -5846,7 +5943,7 @@ lab_endgetargs:; meltfptr[3] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1262:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1264:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OLOC__V2*/ meltfptr[1]), 3, "OBL_CNAME"); @@ -5856,7 +5953,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1264:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1266:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5868,7 +5965,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OCTYP__V5*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout-> tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:1264:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1266:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -5876,7 +5973,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1264:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1266:/ cond.else"); /*^block */ /*anyblock */ @@ -5890,7 +5987,7 @@ lab_endgetargs:; melt_assert_failed (("check octyp"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1264) ? (1264) : __LINE__, __FUNCTION__); + (1266) ? (1266) : __LINE__, __FUNCTION__); ; } ; @@ -5905,7 +6002,7 @@ lab_endgetargs:; /*_.IFCPP___V7*/ meltfptr[6] = /*_.IFELSE___V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1264:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1266:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0; @@ -5916,7 +6013,7 @@ lab_endgetargs:; /*_.IFCPP___V7*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1265:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1267:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OCTYP__V5*/ meltfptr[3]), 3, "CTYPE_CNAME"); @@ -5936,7 +6033,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1266:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1268:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~DSBUF */ meltfclos->tabval[0])), (" ")); @@ -5944,7 +6041,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1267:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1269:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) (( /*~DSBUF */ meltfclos->tabval[0])), melt_string_str ((melt_ptr_t) @@ -5953,7 +6050,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1268:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1270:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~DSBUF */ meltfclos->tabval[0])), (";")); @@ -5961,14 +6058,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1269:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1271:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) (( /*~DSBUF */ meltfclos->tabval[0])), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1261:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1263:/ clear"); /*clear *//*_.OCTYP__V5*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.ONAME__V6*/ meltfptr[5] = 0; @@ -5976,13 +6073,13 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V7*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_.CTYPE_CNAME__V9*/ meltfptr[7] = 0; - MELT_LOCATION ("warmelt-outobj.melt:1271:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1273:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[0] = melt_strbuf_usedlength ((melt_ptr_t) (( /*~DSBUF */ meltfclos->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:1271:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1273:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -6022,7 +6119,7 @@ lab_endgetargs:; /*_#I__L6*/ meltfnum[5] = (( /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[0]) > ( /*_#IRAW__L5*/ meltfnum[4]));; - MELT_LOCATION ("warmelt-outobj.melt:1271:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1273:/ cond"); /*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -6032,7 +6129,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1272:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1274:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -6043,7 +6140,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1273:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1275:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6069,7 +6166,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:1273:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1275:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -6084,7 +6181,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:1273:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1275:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -6098,7 +6195,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 1273; + argtab[2].meltbp_long = 1275; /*^apply.arg */ argtab[3].meltbp_cstring = "output_curframe_declstruct huge dsbuf="; @@ -6120,7 +6217,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1273:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1275:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V14*/ meltfptr[13] = 0; @@ -6133,7 +6230,7 @@ lab_endgetargs:; /*_.IF___V13*/ meltfptr[7] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1273:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1275:/ quasiblock"); /*_.PROGN___V15*/ meltfptr[13] = /*_.IF___V13*/ meltfptr[7];; @@ -6142,7 +6239,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[6] = /*_.PROGN___V15*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1273:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1275:/ clear"); /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.IF___V13*/ meltfptr[7] = 0; @@ -6157,7 +6254,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1274:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1276:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6168,7 +6265,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L9*/ meltfnum[7] = melt_strbuf_usedlength ((melt_ptr_t) (( /*~DSBUF */ meltfclos->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:1275:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1277:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -6203,7 +6300,7 @@ lab_endgetargs:; /*_#I__L11*/ meltfnum[10] = (( /*_#STRBUF_USEDLENGTH__L9*/ meltfnum[7]) < ( /*_#GET_INT__L10*/ meltfnum[6]));; - MELT_LOCATION ("warmelt-outobj.melt:1274:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1276:/ cond"); /*cond */ if ( /*_#I__L11*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -6211,7 +6308,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1274:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1276:/ cond.else"); /*^block */ /*anyblock */ @@ -6225,7 +6322,7 @@ lab_endgetargs:; melt_assert_failed (("check limited dsbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1274) ? (1274) : __LINE__, + (1276) ? (1276) : __LINE__, __FUNCTION__); ; } @@ -6241,7 +6338,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[7] = /*_.IFELSE___V18*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1274:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1276:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L9*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V17*/ meltfptr[13] = 0; @@ -6258,7 +6355,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[7] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1271:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1273:/ quasiblock"); /*_.PROGN___V19*/ meltfptr[13] = /*_.IFCPP___V16*/ meltfptr[7];; @@ -6267,7 +6364,7 @@ lab_endgetargs:; /*_.IFELSE___V11*/ meltfptr[5] = /*_.PROGN___V19*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1271:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1273:/ clear"); /*clear *//*_.IFCPP___V12*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_.IFCPP___V16*/ meltfptr[7] = 0; @@ -6282,14 +6379,26 @@ lab_endgetargs:; /*_.IFELSE___V11*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1259:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1261:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V11*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:1259:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:1261:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6393,7 +6502,7 @@ meltrout_36_warmelt_outobj_OUTPUCOD_MARKER (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:1289:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:1291:/ getarg"); /*_.ROU__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -6415,7 +6524,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1290:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1292:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6427,7 +6536,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.ROU__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_ROUTINEOBJ */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:1290:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1292:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -6435,7 +6544,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1290:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1292:/ cond.else"); /*^block */ /*anyblock */ @@ -6449,7 +6558,7 @@ lab_endgetargs:; melt_assert_failed (("check rou"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1290) ? (1290) : __LINE__, __FUNCTION__); + (1292) ? (1292) : __LINE__, __FUNCTION__); ; } ; @@ -6464,7 +6573,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1290:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1292:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -6475,7 +6584,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1291:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1293:/ quasiblock"); /*^cond */ @@ -6503,7 +6612,7 @@ lab_endgetargs:; /*_.OTHERS__V7*/ meltfptr[6] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1292:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1294:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -6532,14 +6641,14 @@ lab_endgetargs:; /*_#NBVAL__L2*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) ( /*_.OBROUT_NBVAL__V8*/ meltfptr[7])));; - MELT_LOCATION ("warmelt-outobj.melt:1294:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1296:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_NOT_A__L3*/ meltfnum[2] = !melt_is_instance_of ((melt_ptr_t) ( /*_.ROU__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:1294:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1296:/ cond"); /*cond */ if ( /*_#IS_NOT_A__L3*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -6547,7 +6656,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:1296:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1298:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -6574,7 +6683,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1296:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1298:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), @@ -6585,7 +6694,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1297:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1299:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), @@ -6594,18 +6703,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1298:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1300:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (3), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1295:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1297:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1294:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1296:/ clear"); /*clear *//*_.CTYPE_MARKER__V9*/ meltfptr[8] = 0; } ; @@ -6613,7 +6722,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1299:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1301:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), ("for(ix=0; ix<")); @@ -6621,14 +6730,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1300:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1302:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), ( /*_#NBVAL__L2*/ meltfnum[0])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1301:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1303:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), ("; ix++)")); @@ -6636,14 +6745,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1302:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1304:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (4), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1303:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1305:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), ("if (meltframptr_->mcfr_varptr[ix])")); @@ -6651,12 +6760,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1304:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1306:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (5), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1305:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1307:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -6684,7 +6793,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1305:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1307:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), melt_string_str ((melt_ptr_t) @@ -6694,7 +6803,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1306:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1308:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (" (meltframptr_->mcfr_varptr[ix]);")); @@ -6702,12 +6811,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1307:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1309:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (3), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1310:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1312:/ quasiblock"); /*^newclosure */ @@ -6732,7 +6841,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]); ; /*_.LAMBDA___V11*/ meltfptr[10] = /*_.LAMBDA___V12*/ meltfptr[11];; - MELT_LOCATION ("warmelt-outobj.melt:1308:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1310:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -6753,7 +6862,7 @@ lab_endgetargs:; ; /*_.LET___V6*/ meltfptr[4] = /*_.LIST_EVERY__V13*/ meltfptr[12];; - MELT_LOCATION ("warmelt-outobj.melt:1291:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1293:/ clear"); /*clear *//*_.OTHERS__V7*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_.OBROUT_NBVAL__V8*/ meltfptr[7] = 0; @@ -6767,14 +6876,26 @@ lab_endgetargs:; /*clear *//*_.LAMBDA___V11*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_.LIST_EVERY__V13*/ meltfptr[12] = 0; - MELT_LOCATION ("warmelt-outobj.melt:1289:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1291:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V6*/ meltfptr[4];; - MELT_LOCATION ("warmelt-outobj.melt:1289:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:1291:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6867,7 +6988,7 @@ meltrout_37_warmelt_outobj_LAMBDA___2__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:1310:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:1312:/ getarg"); /*_.OLOC__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -6879,7 +7000,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1311:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1313:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6891,7 +7012,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OLOC__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJLOCV */ meltfrout-> tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:1311:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1313:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -6899,7 +7020,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1311:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1313:/ cond.else"); /*^block */ /*anyblock */ @@ -6913,7 +7034,7 @@ lab_endgetargs:; melt_assert_failed (("check other oloc"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1311) ? (1311) : __LINE__, __FUNCTION__); + (1313) ? (1313) : __LINE__, __FUNCTION__); ; } ; @@ -6928,7 +7049,7 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = /*_.IFELSE___V4*/ meltfptr[3];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1311:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1313:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V4*/ meltfptr[3] = 0; @@ -6939,7 +7060,7 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1312:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1314:/ quasiblock"); /*^cond */ @@ -6967,7 +7088,7 @@ lab_endgetargs:; /*_.OCTYP__V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1313:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1315:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -6992,7 +7113,7 @@ lab_endgetargs:; /*_.ONAME__V7*/ meltfptr[6] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1314:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1316:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -7019,7 +7140,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1316:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1318:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7031,7 +7152,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OCTYP__V6*/ meltfptr[5]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout-> tabval[2])));; - MELT_LOCATION ("warmelt-outobj.melt:1316:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1318:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -7039,7 +7160,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1316:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1318:/ cond.else"); /*^block */ /*anyblock */ @@ -7053,7 +7174,7 @@ lab_endgetargs:; melt_assert_failed (("check octyp"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1316) ? (1316) : __LINE__, __FUNCTION__); + (1318) ? (1318) : __LINE__, __FUNCTION__); ; } ; @@ -7068,7 +7189,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[8] = /*_.IFELSE___V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1316:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1318:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[9] = 0; @@ -7079,13 +7200,13 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[8] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1318:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1320:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_STRING__L3*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.OMARKER__V8*/ meltfptr[7])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:1318:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1320:/ cond"); /*cond */ if ( /*_#IS_STRING__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -7095,7 +7216,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1319:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1321:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), @@ -7104,7 +7225,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1320:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1322:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), @@ -7115,7 +7236,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1321:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1323:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), @@ -7124,7 +7245,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1322:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1324:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), @@ -7135,7 +7256,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1323:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1325:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), @@ -7144,7 +7265,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1324:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1326:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), @@ -7155,7 +7276,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1325:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1327:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), @@ -7164,13 +7285,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1326:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1328:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), (3), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1318:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1320:/ quasiblock"); /*epilog */ @@ -7184,7 +7305,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:1328:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1330:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L4*/ meltfnum[3] = @@ -7192,7 +7313,7 @@ lab_endgetargs:; ( /*_.OMARKER__V8*/ meltfptr[7]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout-> tabval[3])));; - MELT_LOCATION ("warmelt-outobj.melt:1328:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1330:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -7202,7 +7323,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1329:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1331:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos-> @@ -7211,7 +7332,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1330:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1332:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos-> @@ -7223,14 +7344,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1331:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1333:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos-> tabval[0])), (") ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:1332:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1334:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -7257,7 +7378,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1332:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1334:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos-> @@ -7268,7 +7389,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1333:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1335:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos-> @@ -7277,7 +7398,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1334:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1336:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos-> @@ -7289,7 +7410,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1335:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1337:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos-> @@ -7298,13 +7419,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1336:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1338:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos-> tabval[0])), (3), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1328:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1330:/ quasiblock"); /*epilog */ @@ -7325,7 +7446,7 @@ lab_endgetargs:; /*_.IFELSE___V11*/ meltfptr[9] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1318:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1320:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -7335,7 +7456,7 @@ lab_endgetargs:; ; /*_.LET___V5*/ meltfptr[3] = /*_.IFELSE___V11*/ meltfptr[9];; - MELT_LOCATION ("warmelt-outobj.melt:1312:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1314:/ clear"); /*clear *//*_.OCTYP__V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.ONAME__V7*/ meltfptr[6] = 0; @@ -7349,7 +7470,7 @@ lab_endgetargs:; /*clear *//*_.IFELSE___V11*/ meltfptr[9] = 0; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1339:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1341:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7360,7 +7481,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[3] = melt_strbuf_usedlength ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:1340:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1342:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -7395,7 +7516,7 @@ lab_endgetargs:; /*_#I__L7*/ meltfnum[6] = (( /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[3]) < ( /*_#GET_INT__L6*/ meltfnum[0]));; - MELT_LOCATION ("warmelt-outobj.melt:1339:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1341:/ cond"); /*cond */ if ( /*_#I__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -7403,7 +7524,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1339:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1341:/ cond.else"); /*^block */ /*anyblock */ @@ -7417,7 +7538,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1339) ? (1339) : __LINE__, __FUNCTION__); + (1341) ? (1341) : __LINE__, __FUNCTION__); ; } ; @@ -7432,7 +7553,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[12] = /*_.IFELSE___V16*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1339:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1341:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L5*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V15*/ meltfptr[11] = 0; @@ -7449,14 +7570,26 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[12] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1310:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1312:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V14*/ meltfptr[12];; - MELT_LOCATION ("warmelt-outobj.melt:1310:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:1312:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7559,7 +7692,7 @@ meltrout_38_warmelt_outobj_OUTPUT_CURFRAME_DECLSTRUCT_INIT (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:1346:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:1348:/ getarg"); /*_.DECLSTRUCT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -7588,10 +7721,10 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-outobj.melt:1347:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1349:/ quasiblock"); - MELT_LOCATION ("warmelt-outobj.melt:1348:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1350:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.ROU__V3*/ meltfptr[2]), 3, "OBROUT_BODY"); @@ -7599,7 +7732,7 @@ lab_endgetargs:; meltfptr[5] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1349:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1351:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.ROU__V3*/ meltfptr[2]), 4, "OBROUT_NBVAL"); @@ -7607,7 +7740,7 @@ lab_endgetargs:; meltfptr[6] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1350:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1352:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.ROU__V3*/ meltfptr[2]), 5, "OBROUT_NBLONG"); @@ -7627,7 +7760,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.ROU__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:1354:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1356:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.ROU__V3*/ meltfptr[2]), 6, "OBROUT_OTHERS"); @@ -7635,7 +7768,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1355:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1357:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -7662,14 +7795,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1358:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1360:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1359:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1361:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#if MELT_HAVE_DEBUG")); @@ -7677,14 +7810,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1360:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1362:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1361:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1363:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" static long call_counter__;")); @@ -7692,14 +7825,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1362:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1364:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1363:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1365:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" long thiscallcounter__ ATTRIBUTE_UNUSED = ++ call_counter__;")); @@ -7707,14 +7840,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1364:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1366:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1365:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1367:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#undef meltcallcount")); @@ -7722,14 +7855,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1366:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1368:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1367:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1369:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#define meltcallcount thiscallcounter__")); @@ -7737,14 +7870,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1368:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1370:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1369:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1371:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#else")); @@ -7752,14 +7885,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1370:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1372:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1371:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1373:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#undef meltcallcount")); @@ -7767,14 +7900,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1372:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1374:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1373:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1375:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#define meltcallcount 0L")); @@ -7782,14 +7915,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1374:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1376:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1375:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1377:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#endif")); @@ -7797,12 +7930,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1376:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1378:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1377:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1379:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7819,12 +7952,12 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1378:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1380:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NOT__L4*/ meltfnum[3] = (!( /*_#ISINITIAL__L3*/ meltfnum[2]));; - MELT_LOCATION ("warmelt-outobj.melt:1378:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1380:/ cond"); /*cond */ if ( /*_#NOT__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -7834,7 +7967,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1379:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1381:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -7848,7 +7981,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1380:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1382:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" meltfram__;")); @@ -7856,25 +7989,25 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1381:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1383:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1382:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1384:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#define meltframe meltfram__")); } ; - MELT_LOCATION ("warmelt-outobj.melt:1383:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1385:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NOT__L5*/ meltfnum[4] = (!( /*_#ISINITIAL__L3*/ meltfnum[2]));; - MELT_LOCATION ("warmelt-outobj.melt:1383:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1385:/ cond"); /*cond */ if ( /*_#NOT__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -7884,7 +8017,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1385:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1387:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (2), 0); @@ -7892,7 +8025,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1386:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1388:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -7901,7 +8034,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1387:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1389:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (3), 0); @@ -7909,7 +8042,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1388:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1390:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -7918,13 +8051,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1389:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1391:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (3), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1390:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1392:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -7935,7 +8068,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:1391:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1393:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7963,7 +8096,7 @@ lab_endgetargs:; /*_.ADD2OUT__V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1390:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1392:/ clear"); /*clear *//*_.ADD2OUT__V13*/ meltfptr[12] = 0; } ; @@ -7979,7 +8112,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1392:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1394:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -7994,13 +8127,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1393:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1395:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (3), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1394:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1396:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -8021,7 +8154,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1395:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1397:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -8030,7 +8163,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1396:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1398:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (2), 0); @@ -8038,19 +8171,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1397:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1399:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("}/*end markggc*/;")); } ; - MELT_LOCATION ("warmelt-outobj.melt:1384:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1386:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1383:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1385:/ clear"); /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_.OUTPUCOD_MARKER__V14*/ meltfptr[12] = 0; @@ -8060,14 +8193,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1400:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1402:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1401:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1403:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" memset(&meltfram__, 0, sizeof(meltfram__));")); @@ -8075,14 +8208,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1402:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1404:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1403:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1405:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" meltfram__.mcfr_nbvar = ")); @@ -8090,14 +8223,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1404:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1406:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#NBVAL__L1*/ meltfnum[0])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1405:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1407:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); @@ -8105,17 +8238,17 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1406:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1408:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1407:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1409:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NOT__L6*/ meltfnum[5] = (!( /*_#ISINITIAL__L3*/ meltfnum[2]));; - MELT_LOCATION ("warmelt-outobj.melt:1407:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1409:/ cond"); /*cond */ if ( /*_#NOT__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -8125,7 +8258,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1409:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1411:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -8134,13 +8267,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1410:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1412:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1408:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1410:/ quasiblock"); /*epilog */ @@ -8150,7 +8283,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1411:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1413:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" meltfram__.mcfr_prev = (struct melt_callframe_st *) melt_topframe;")); @@ -8158,14 +8291,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1412:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1414:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1413:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1415:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" melt_topframe = (struct melt_callframe_st *) &meltfram__;")); @@ -8173,14 +8306,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1414:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1416:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1415:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1417:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8191,7 +8324,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:1416:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1418:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -8226,7 +8359,7 @@ lab_endgetargs:; /*_#I__L9*/ meltfnum[8] = (( /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6]) < ( /*_#GET_INT__L8*/ meltfnum[7]));; - MELT_LOCATION ("warmelt-outobj.melt:1415:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1417:/ cond"); /*cond */ if ( /*_#I__L9*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -8234,7 +8367,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1415:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1417:/ cond.else"); /*^block */ /*anyblock */ @@ -8248,7 +8381,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1415) ? (1415) : __LINE__, __FUNCTION__); + (1417) ? (1417) : __LINE__, __FUNCTION__); ; } ; @@ -8263,7 +8396,7 @@ lab_endgetargs:; /*_.IFCPP___V15*/ meltfptr[11] = /*_.IFELSE___V17*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1415:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1417:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V16*/ meltfptr[12] = 0; @@ -8284,7 +8417,7 @@ lab_endgetargs:; /*_.LET___V5*/ meltfptr[4] = /*_.IFCPP___V15*/ meltfptr[11];; - MELT_LOCATION ("warmelt-outobj.melt:1347:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1349:/ clear"); /*clear *//*_.OBODY__V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.ONBVAL__V7*/ meltfptr[6] = 0; @@ -8310,11 +8443,23 @@ lab_endgetargs:; /*clear *//*_#NOT__L6*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.IFCPP___V15*/ meltfptr[11] = 0; - MELT_LOCATION ("warmelt-outobj.melt:1346:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1348:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-outobj.melt:1346:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:1348:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8408,7 +8553,7 @@ meltrout_39_warmelt_outobj_OUTPUCOD_PROCROUTINE (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:1420:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ getarg"); /*_.PROU__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -8446,7 +8591,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1421:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1423:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8458,7 +8603,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.PROU__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_PROCROUTINEOBJ */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:1421:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1423:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -8466,7 +8611,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1421:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1423:/ cond.else"); /*^block */ /*anyblock */ @@ -8480,7 +8625,7 @@ lab_endgetargs:; melt_assert_failed (("check prou"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1421) ? (1421) : __LINE__, __FUNCTION__); + (1423) ? (1423) : __LINE__, __FUNCTION__); ; } ; @@ -8495,7 +8640,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1421:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1423:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -8506,7 +8651,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1422:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1424:/ quasiblock"); /*^getslot */ @@ -8517,7 +8662,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1423:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1425:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.PROU__V2*/ meltfptr[1]), 3, "OBROUT_BODY"); @@ -8525,7 +8670,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1424:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1426:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.PROU__V2*/ meltfptr[1]), 4, "OBROUT_NBVAL"); @@ -8533,7 +8678,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1425:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1427:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.PROU__V2*/ meltfptr[1]), 5, "OBROUT_NBLONG"); @@ -8547,7 +8692,7 @@ lab_endgetargs:; /*_#NBLONG__L4*/ meltfnum[3] = (melt_get_int ((melt_ptr_t) ( /*_.ONBLONG__V11*/ meltfptr[10])));; - MELT_LOCATION ("warmelt-outobj.melt:1428:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1430:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.PROU__V2*/ meltfptr[1]), 6, "OBROUT_OTHERS"); @@ -8555,7 +8700,7 @@ lab_endgetargs:; meltfptr[11] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1429:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1431:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.PROU__V2*/ meltfptr[1]), 10, "OPROUT_GETARGS"); @@ -8563,7 +8708,7 @@ lab_endgetargs:; meltfptr[12] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1430:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1432:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.PROU__V2*/ meltfptr[1]), 7, "OBROUT_RETVAL"); @@ -8571,7 +8716,7 @@ lab_endgetargs:; meltfptr[13] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1431:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1433:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.PROU__V2*/ meltfptr[1]), 11, "OPROUT_LOC"); @@ -8579,7 +8724,7 @@ lab_endgetargs:; meltfptr[14] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1432:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1434:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.PROU__V2*/ meltfptr[1]), 12, "OPROUT_FUNAM"); @@ -8587,7 +8732,7 @@ lab_endgetargs:; meltfptr[15] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1433:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1435:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.PROU__V2*/ meltfptr[1]), 13, "OPROUT_RESTNAM"); @@ -8595,7 +8740,7 @@ lab_endgetargs:; meltfptr[16] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1435:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1437:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_STRING__L5*/ meltfnum[4] = @@ -8605,7 +8750,7 @@ lab_endgetargs:; /*_#NOT__L6*/ meltfnum[5] = (!( /*_#IS_STRING__L5*/ meltfnum[4]));; - MELT_LOCATION ("warmelt-outobj.melt:1435:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1437:/ cond"); /*cond */ if ( /*_#NOT__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -8613,13 +8758,13 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:1436:/ compute"); + MELT_LOCATION ("warmelt-outobj.melt:1438:/ compute"); /*_.OFUNAM__V16*/ meltfptr[15] = /*_.SETQ___V19*/ meltfptr[18] = ( /*!konst_1 */ meltfrout->tabval[1]);; /*_.IF___V18*/ meltfptr[17] = /*_.SETQ___V19*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1435:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1437:/ clear"); /*clear *//*_.SETQ___V19*/ meltfptr[18] = 0; } ; @@ -8632,19 +8777,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1438:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1440:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1439:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1441:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1440:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1442:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -8668,18 +8813,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1441:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1443:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1442:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1444:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_MIXINT__L7*/ meltfnum[6] = (melt_magic_discr ((melt_ptr_t) ( /*_.ORLOC__V15*/ meltfptr[14])) == MELTOBMAG_MIXINT);; - MELT_LOCATION ("warmelt-outobj.melt:1442:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1444:/ cond"); /*cond */ if ( /*_#IS_MIXINT__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -8687,7 +8832,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1442:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1444:/ cond.else"); /*^block */ /*anyblock */ @@ -8701,7 +8846,7 @@ lab_endgetargs:; /*_#OR___L8*/ meltfnum[7] = /*_#IS_MIXLOC__L9*/ meltfnum[8];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1442:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1444:/ clear"); /*clear *//*_#IS_MIXLOC__L9*/ meltfnum[8] = 0; } ; @@ -8715,7 +8860,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:1443:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1445:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -8743,7 +8888,7 @@ lab_endgetargs:; /*_.OUTPUT_RAW_LOCATION__V22*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1442:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1444:/ clear"); /*clear *//*_.OUTPUT_RAW_LOCATION__V22*/ meltfptr[21] = 0; } ; @@ -8756,7 +8901,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1445:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1447:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("melt_ptr_t MELT_MODULE_VISIBILITY ")); @@ -8764,7 +8909,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1446:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1448:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), melt_string_str ((melt_ptr_t) @@ -8773,7 +8918,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1447:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1449:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("(meltclosure_ptr_t meltclosp_,")); @@ -8781,7 +8926,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1448:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1450:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (" melt_ptr_t meltfirstargp_,")); @@ -8789,7 +8934,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1449:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1451:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (" const melt_argdescr_cell_t meltxargdescr_[],")); @@ -8797,7 +8942,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1450:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1452:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (" union meltparam_un *meltxargtab_,")); @@ -8805,7 +8950,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1451:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1453:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (" const melt_argdescr_cell_t meltxresdescr_[],")); @@ -8813,7 +8958,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1452:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1454:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (" union meltparam_un *meltxrestab_);")); @@ -8821,35 +8966,35 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1453:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1455:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1455:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1457:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1456:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1458:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1457:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1459:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1458:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1460:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_ptr_t MELT_MODULE_VISIBILITY ")); @@ -8857,14 +9002,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1459:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1461:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1460:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1462:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -8873,7 +9018,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1461:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1463:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("(meltclosure_ptr_t meltclosp_,")); @@ -8881,7 +9026,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1462:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1464:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" melt_ptr_t meltfirstargp_,")); @@ -8889,7 +9034,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1463:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1465:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" const melt_argdescr_cell_t meltxargdescr_[],")); @@ -8897,7 +9042,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1464:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1466:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" union meltparam_un *meltxargtab_,")); @@ -8905,14 +9050,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1465:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1467:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (5), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1466:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1468:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" const melt_argdescr_cell_t meltxresdescr_[],")); @@ -8920,7 +9065,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1467:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1469:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" union meltparam_un *meltxrestab_)")); @@ -8928,20 +9073,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1468:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1470:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1469:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1471:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("{")); } ; - MELT_LOCATION ("warmelt-outobj.melt:1470:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1472:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -8952,7 +9097,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:1471:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1473:/ quasiblock"); /*^checksignal */ @@ -8970,7 +9115,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1472:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1474:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -8987,7 +9132,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1474:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1476:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); @@ -8995,7 +9140,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1475:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1477:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -9004,7 +9149,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1476:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1478:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -9015,7 +9160,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1477:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1479:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -9024,7 +9169,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1478:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1480:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -9035,7 +9180,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1479:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1481:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -9044,7 +9189,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1480:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1482:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); @@ -9052,7 +9197,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1487:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1489:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -9061,7 +9206,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1488:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1490:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -9072,7 +9217,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1489:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1491:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (")")); @@ -9080,7 +9225,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1490:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1492:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); @@ -9088,7 +9233,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1491:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1493:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -9097,7 +9242,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1492:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1494:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -9108,14 +9253,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1493:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1495:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1471:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1473:/ clear"); /*clear *//*_.OVARIADICINDEX__V23*/ meltfptr[21] = 0; /*^clear */ /*clear *//*_.OVARIADICLENGTH__V24*/ meltfptr[23] = 0; @@ -9126,12 +9271,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1496:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1498:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (2), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1497:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1499:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -9155,12 +9300,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1498:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1500:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1499:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1501:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -9184,7 +9329,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1500:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1502:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_trace_start(\"")); @@ -9192,7 +9337,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1501:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1503:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -9202,7 +9347,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1502:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1504:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("\", meltcallcount);")); @@ -9210,14 +9355,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1503:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1505:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1505:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1507:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*getargs*/")); @@ -9225,14 +9370,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1506:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1508:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1507:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1509:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9246,7 +9391,7 @@ lab_endgetargs:; (melt_unsafe_magic_discr ((melt_ptr_t) ( /*_.OGARGS__V13*/ meltfptr[12])) == MELTOBMAG_MULTIPLE));; - MELT_LOCATION ("warmelt-outobj.melt:1507:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1509:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE_OR_NULL__L10*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -9254,7 +9399,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1507:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1509:/ cond.else"); /*^block */ /*anyblock */ @@ -9268,7 +9413,7 @@ lab_endgetargs:; melt_assert_failed (("check ogargs"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1507) ? (1507) : __LINE__, __FUNCTION__); + (1509) ? (1509) : __LINE__, __FUNCTION__); ; } ; @@ -9283,7 +9428,7 @@ lab_endgetargs:; /*_.IFCPP___V27*/ meltfptr[26] = /*_.IFELSE___V28*/ meltfptr[27];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1507:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1509:/ clear"); /*clear *//*_#IS_MULTIPLE_OR_NULL__L10*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.IFELSE___V28*/ meltfptr[27] = 0; @@ -9312,7 +9457,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1511:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1513:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); @@ -9320,7 +9465,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1512:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1514:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -9329,7 +9474,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1513:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1515:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#CURANK__L11*/ meltfnum[8])); @@ -9337,7 +9482,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1514:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1516:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/")); @@ -9345,13 +9490,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1515:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1517:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1516:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1518:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -9375,13 +9520,13 @@ lab_endgetargs:; ""), argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1518:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1520:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#STRBUF_USEDLENGTH__L12*/ meltfnum[11] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:1518:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1520:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -9420,7 +9565,7 @@ lab_endgetargs:; /*_#I__L15*/ meltfnum[14] = (( /*_#STRBUF_USEDLENGTH__L12*/ meltfnum[11]) > ( /*_#IRAW__L14*/ meltfnum[13]));; - MELT_LOCATION ("warmelt-outobj.melt:1518:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1520:/ cond"); /*cond */ if ( /*_#I__L15*/ meltfnum[14]) /*then */ { /*^cond.then */ @@ -9430,7 +9575,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1519:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1521:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -9441,7 +9586,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1520:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1522:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9467,7 +9612,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:1520:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1522:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[15]) /*then */ { /*^cond.then */ @@ -9483,7 +9628,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-outobj.melt:1520:/ checksignal"); + ("warmelt-outobj.melt:1522:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -9497,7 +9642,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 1520; + argtab[2].meltbp_long = 1522; /*^apply.arg */ argtab[3].meltbp_cstring = "outpucod_procroutine huge implbuf="; @@ -9519,7 +9664,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V35*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1520:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1522:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[16] = 0; /*^clear */ @@ -9533,7 +9678,7 @@ lab_endgetargs:; /*_.IF___V34*/ meltfptr[33] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1520:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1522:/ quasiblock"); /*_.PROGN___V36*/ meltfptr[34] = @@ -9544,7 +9689,7 @@ lab_endgetargs:; /*_.PROGN___V36*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1520:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1522:/ clear"); /*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.IF___V34*/ meltfptr[33] = 0; @@ -9559,7 +9704,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1521:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1523:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9571,7 +9716,7 @@ lab_endgetargs:; melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:1522:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1524:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -9606,7 +9751,7 @@ lab_endgetargs:; /*_#I__L20*/ meltfnum[19] = (( /*_#STRBUF_USEDLENGTH__L18*/ meltfnum[16]) < ( /*_#GET_INT__L19*/ meltfnum[15]));; - MELT_LOCATION ("warmelt-outobj.melt:1521:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1523:/ cond"); /*cond */ if ( /*_#I__L20*/ meltfnum[19]) /*then */ { /*^cond.then */ @@ -9614,7 +9759,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1521:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1523:/ cond.else"); /*^block */ /*anyblock */ @@ -9629,7 +9774,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1521) ? (1521) : __LINE__, + (1523) ? (1523) : __LINE__, __FUNCTION__); ; } @@ -9646,7 +9791,7 @@ lab_endgetargs:; /*_.IFELSE___V39*/ meltfptr[38];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1521:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1523:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L18*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V38*/ meltfptr[34] = 0; @@ -9663,7 +9808,7 @@ lab_endgetargs:; /*_.IFCPP___V37*/ meltfptr[33] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1518:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1520:/ quasiblock"); /*_.PROGN___V40*/ meltfptr[34] = @@ -9674,7 +9819,7 @@ lab_endgetargs:; /*_.PROGN___V40*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1518:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1520:/ clear"); /*clear *//*_.IFCPP___V33*/ meltfptr[32] = 0; /*^clear */ /*clear *//*_.IFCPP___V37*/ meltfptr[33] = 0; @@ -9695,7 +9840,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:1508:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1510:/ clear"); /*clear *//*_.CURGET__V29*/ meltfptr[27] = 0; /*^clear */ /*clear *//*_#CURANK__L11*/ meltfnum[8] = 0; @@ -9717,7 +9862,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1524:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1526:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); @@ -9725,14 +9870,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1525:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1527:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1526:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1528:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" goto lab_endgetargs;")); @@ -9740,14 +9885,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1527:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1529:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1528:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1530:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("lab_endgetargs:;")); @@ -9755,14 +9900,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1529:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1531:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1531:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1533:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9773,7 +9918,7 @@ lab_endgetargs:; /*_#IS_LIST__L21*/ meltfnum[16] = (melt_magic_discr ((melt_ptr_t) ( /*_.OBODY__V9*/ meltfptr[8])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:1531:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1533:/ cond"); /*cond */ if ( /*_#IS_LIST__L21*/ meltfnum[16]) /*then */ { /*^cond.then */ @@ -9781,7 +9926,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1531:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1533:/ cond.else"); /*^block */ /*anyblock */ @@ -9795,7 +9940,7 @@ lab_endgetargs:; melt_assert_failed (("check obody"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1531) ? (1531) : __LINE__, __FUNCTION__); + (1533) ? (1533) : __LINE__, __FUNCTION__); ; } ; @@ -9810,7 +9955,7 @@ lab_endgetargs:; /*_.IFCPP___V41*/ meltfptr[38] = /*_.IFELSE___V42*/ meltfptr[32];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1531:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1533:/ clear"); /*clear *//*_#IS_LIST__L21*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.IFELSE___V42*/ meltfptr[32] = 0; @@ -9823,7 +9968,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1532:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1534:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*body*/")); @@ -9831,12 +9976,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1533:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1535:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1536:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1538:/ quasiblock"); /*^newclosure */ @@ -9874,7 +10019,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]); ; /*_.LAMBDA___V43*/ meltfptr[33] = /*_.LAMBDA___V44*/ meltfptr[34];; - MELT_LOCATION ("warmelt-outobj.melt:1534:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1536:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -9895,7 +10040,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1545:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1547:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); @@ -9903,14 +10048,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1546:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1548:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1547:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1549:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" goto labend_rout;")); @@ -9918,14 +10063,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1548:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1550:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1549:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1551:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("labend_rout:")); @@ -9933,14 +10078,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1550:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1552:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1551:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1553:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_trace_end(\"")); @@ -9948,7 +10093,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1552:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1554:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -9958,7 +10103,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1553:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1555:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("\", meltcallcount);")); @@ -9966,12 +10111,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1554:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1556:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1555:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1557:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -9996,14 +10141,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1556:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1558:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1557:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1559:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" melt_topframe = (struct melt_callframe_st*) meltfram__.mcfr_prev;")); @@ -10011,20 +10156,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1558:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1560:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1559:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1561:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" return (melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:1560:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1562:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -10035,7 +10180,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:1561:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1563:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -10063,7 +10208,7 @@ lab_endgetargs:; /*_.OUTPUT_C_CODE__V48*/ meltfptr[47];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1560:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1562:/ clear"); /*clear *//*_.OUTPUT_C_CODE__V48*/ meltfptr[47] = 0; } ; @@ -10079,7 +10224,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1562:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1564:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -10094,13 +10239,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1563:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1565:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); } ; - MELT_LOCATION ("warmelt-outobj.melt:1564:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1566:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -10113,7 +10258,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1566:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1568:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); @@ -10121,7 +10266,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1567:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1569:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -10130,7 +10275,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1568:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1570:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); @@ -10138,7 +10283,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1569:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1571:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -10147,13 +10292,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1570:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1572:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1565:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1567:/ quasiblock"); /*epilog */ @@ -10163,14 +10308,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1571:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1573:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1572:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1574:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#undef meltcallcount")); @@ -10178,14 +10323,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1573:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1575:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1574:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1576:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#undef meltfram__")); @@ -10193,14 +10338,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1575:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1577:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1576:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1578:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#undef MELTFRAM_NBVARNUM")); @@ -10208,14 +10353,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1577:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1579:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1578:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1580:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#undef MELTFRAM_NBVARPTR")); @@ -10223,14 +10368,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1579:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1581:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1580:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1582:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("} /*end ")); @@ -10238,7 +10383,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1581:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1583:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -10247,7 +10392,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1582:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1584:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/")); @@ -10255,24 +10400,24 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1583:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1585:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1584:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1586:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1586:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1588:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#STRBUF_USEDLENGTH__L22*/ meltfnum[15] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]));; - MELT_LOCATION ("warmelt-outobj.melt:1586:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1588:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -10313,7 +10458,7 @@ lab_endgetargs:; /*_#I__L25*/ meltfnum[24] = (( /*_#STRBUF_USEDLENGTH__L22*/ meltfnum[15]) > ( /*_#IRAW__L24*/ meltfnum[16]));; - MELT_LOCATION ("warmelt-outobj.melt:1586:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1588:/ cond"); /*cond */ if ( /*_#I__L25*/ meltfnum[24]) /*then */ { /*^cond.then */ @@ -10323,7 +10468,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1587:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1589:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -10335,7 +10480,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1588:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1590:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10361,7 +10506,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:1588:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1590:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[25]) /*then */ { /*^cond.then */ @@ -10376,7 +10521,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:1588:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1590:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10390,7 +10535,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 1588; + argtab[2].meltbp_long = 1590; /*^apply.arg */ argtab[3].meltbp_cstring = "outpucod_procroutine huge declbuf="; @@ -10412,7 +10557,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V53*/ meltfptr[52];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1588:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1590:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[26] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V53*/ meltfptr[52] = 0; @@ -10425,7 +10570,7 @@ lab_endgetargs:; /*_.IF___V52*/ meltfptr[51] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1588:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1590:/ quasiblock"); /*_.PROGN___V54*/ meltfptr[52] = /*_.IF___V52*/ meltfptr[51];; @@ -10434,7 +10579,7 @@ lab_endgetargs:; /*_.IFCPP___V51*/ meltfptr[50] = /*_.PROGN___V54*/ meltfptr[52];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1588:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1590:/ clear"); /*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[25] = 0; /*^clear */ /*clear *//*_.IF___V52*/ meltfptr[51] = 0; @@ -10449,7 +10594,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1589:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1591:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10460,7 +10605,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L28*/ meltfnum[26] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]));; - MELT_LOCATION ("warmelt-outobj.melt:1590:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1592:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -10495,7 +10640,7 @@ lab_endgetargs:; /*_#I__L30*/ meltfnum[29] = (( /*_#STRBUF_USEDLENGTH__L28*/ meltfnum[26]) < ( /*_#GET_INT__L29*/ meltfnum[25]));; - MELT_LOCATION ("warmelt-outobj.melt:1589:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1591:/ cond"); /*cond */ if ( /*_#I__L30*/ meltfnum[29]) /*then */ { /*^cond.then */ @@ -10503,7 +10648,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1589:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1591:/ cond.else"); /*^block */ /*anyblock */ @@ -10517,7 +10662,7 @@ lab_endgetargs:; melt_assert_failed (("check limited declbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1589) ? (1589) : __LINE__, + (1591) ? (1591) : __LINE__, __FUNCTION__); ; } @@ -10533,7 +10678,7 @@ lab_endgetargs:; /*_.IFCPP___V55*/ meltfptr[51] = /*_.IFELSE___V57*/ meltfptr[56];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1589:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1591:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L28*/ meltfnum[26] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V56*/ meltfptr[52] = 0; @@ -10550,7 +10695,7 @@ lab_endgetargs:; /*_.IFCPP___V55*/ meltfptr[51] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1586:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1588:/ quasiblock"); /*_.PROGN___V58*/ meltfptr[52] = /*_.IFCPP___V55*/ meltfptr[51];; @@ -10559,7 +10704,7 @@ lab_endgetargs:; /*_.IFELSE___V50*/ meltfptr[49] = /*_.PROGN___V58*/ meltfptr[52];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1586:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1588:/ clear"); /*clear *//*_.IFCPP___V51*/ meltfptr[50] = 0; /*^clear */ /*clear *//*_.IFCPP___V55*/ meltfptr[51] = 0; @@ -10574,12 +10719,12 @@ lab_endgetargs:; /*_.IFELSE___V50*/ meltfptr[49] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1592:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1594:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#STRBUF_USEDLENGTH__L31*/ meltfnum[26] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:1592:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1594:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -10620,7 +10765,7 @@ lab_endgetargs:; /*_#I__L34*/ meltfnum[33] = (( /*_#STRBUF_USEDLENGTH__L31*/ meltfnum[26]) > ( /*_#IRAW__L33*/ meltfnum[29]));; - MELT_LOCATION ("warmelt-outobj.melt:1592:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1594:/ cond"); /*cond */ if ( /*_#I__L34*/ meltfnum[33]) /*then */ { /*^cond.then */ @@ -10630,7 +10775,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1593:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1595:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -10642,7 +10787,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1594:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1596:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10668,7 +10813,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:1594:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1596:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L35*/ meltfnum[34]) /*then */ { /*^cond.then */ @@ -10683,7 +10828,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:1594:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1596:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10697,7 +10842,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 1594; + argtab[2].meltbp_long = 1596; /*^apply.arg */ argtab[3].meltbp_cstring = "outpucod_procroutine huge implbuf="; @@ -10719,7 +10864,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V63*/ meltfptr[62];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1594:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1596:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L36*/ meltfnum[35] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V63*/ meltfptr[62] = 0; @@ -10732,7 +10877,7 @@ lab_endgetargs:; /*_.IF___V62*/ meltfptr[52] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1594:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1596:/ quasiblock"); /*_.PROGN___V64*/ meltfptr[62] = /*_.IF___V62*/ meltfptr[52];; @@ -10741,7 +10886,7 @@ lab_endgetargs:; /*_.IFCPP___V61*/ meltfptr[51] = /*_.PROGN___V64*/ meltfptr[62];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1594:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1596:/ clear"); /*clear *//*_#MELT_NEED_DBG__L35*/ meltfnum[34] = 0; /*^clear */ /*clear *//*_.IF___V62*/ meltfptr[52] = 0; @@ -10756,7 +10901,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1595:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1597:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10767,7 +10912,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L37*/ meltfnum[35] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:1596:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1598:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -10802,7 +10947,7 @@ lab_endgetargs:; /*_#I__L39*/ meltfnum[38] = (( /*_#STRBUF_USEDLENGTH__L37*/ meltfnum[35]) < ( /*_#GET_INT__L38*/ meltfnum[34]));; - MELT_LOCATION ("warmelt-outobj.melt:1595:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1597:/ cond"); /*cond */ if ( /*_#I__L39*/ meltfnum[38]) /*then */ { /*^cond.then */ @@ -10810,7 +10955,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1595:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1597:/ cond.else"); /*^block */ /*anyblock */ @@ -10824,7 +10969,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1595) ? (1595) : __LINE__, + (1597) ? (1597) : __LINE__, __FUNCTION__); ; } @@ -10840,7 +10985,7 @@ lab_endgetargs:; /*_.IFCPP___V65*/ meltfptr[52] = /*_.IFELSE___V67*/ meltfptr[66];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1595:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1597:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L37*/ meltfnum[35] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V66*/ meltfptr[62] = 0; @@ -10857,7 +11002,7 @@ lab_endgetargs:; /*_.IFCPP___V65*/ meltfptr[52] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1592:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1594:/ quasiblock"); /*_.PROGN___V68*/ meltfptr[62] = /*_.IFCPP___V65*/ meltfptr[52];; @@ -10866,7 +11011,7 @@ lab_endgetargs:; /*_.IFELSE___V60*/ meltfptr[50] = /*_.PROGN___V68*/ meltfptr[62];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1592:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1594:/ clear"); /*clear *//*_.IFCPP___V61*/ meltfptr[51] = 0; /*^clear */ /*clear *//*_.IFCPP___V65*/ meltfptr[52] = 0; @@ -10885,7 +11030,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFELSE___V60*/ meltfptr[50];; - MELT_LOCATION ("warmelt-outobj.melt:1422:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1424:/ clear"); /*clear *//*_.ONAM__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.OBODY__V9*/ meltfptr[8] = 0; @@ -10963,14 +11108,26 @@ lab_endgetargs:; /*clear *//*_#I__L34*/ meltfnum[33] = 0; /*^clear */ /*clear *//*_.IFELSE___V60*/ meltfptr[50] = 0; - MELT_LOCATION ("warmelt-outobj.melt:1420:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:1420:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:1422:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11063,7 +11220,7 @@ meltrout_40_warmelt_outobj_LAMBDA___3__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:1536:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:1538:/ getarg"); /*_.CURBODY__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -11073,7 +11230,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-outobj.melt:1537:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1539:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^checksignal */ @@ -11101,7 +11258,7 @@ lab_endgetargs:; /*_#IF___L1*/ meltfnum[0] = /*_#NOT__L3*/ meltfnum[2];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1537:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1539:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#NOT__L3*/ meltfnum[2] = 0; @@ -11114,7 +11271,7 @@ lab_endgetargs:; /*_#IF___L1*/ meltfnum[0] = 0;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1537:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1539:/ cond"); /*cond */ if ( /*_#IF___L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -11122,7 +11279,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:1539:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1541:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -11148,18 +11305,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1540:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1542:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1538:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1540:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1537:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1539:/ clear"); /*clear *//*_.OUTPUT_C_CODE__V3*/ meltfptr[2] = 0; } ; @@ -11167,7 +11324,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1541:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1543:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11178,7 +11335,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:1542:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1544:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -11213,7 +11370,7 @@ lab_endgetargs:; /*_#I__L6*/ meltfnum[5] = (( /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1]) < ( /*_#GET_INT__L5*/ meltfnum[2]));; - MELT_LOCATION ("warmelt-outobj.melt:1541:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1543:/ cond"); /*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -11221,7 +11378,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1541:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1543:/ cond.else"); /*^block */ /*anyblock */ @@ -11235,7 +11392,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1541) ? (1541) : __LINE__, __FUNCTION__); + (1543) ? (1543) : __LINE__, __FUNCTION__); ; } ; @@ -11250,7 +11407,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[2] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1541:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1543:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V5*/ meltfptr[4] = 0; @@ -11267,14 +11424,26 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[2] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1536:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1538:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V4*/ meltfptr[2];; - MELT_LOCATION ("warmelt-outobj.melt:1536:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:1538:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11375,7 +11544,7 @@ meltrout_41_warmelt_outobj_OUTPUT_CURFRAME_CDAT_STRUCT (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:1604:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:1606:/ getarg"); /*_.IDATUP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -11397,14 +11566,14 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1605:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1607:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1606:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1608:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), ("struct cdata_st {")); @@ -11428,13 +11597,13 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1610:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1612:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (1), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1611:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1613:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -11458,7 +11627,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:1607:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1609:/ clear"); /*clear *//*_.CURDAT__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_#CURK__L1*/ meltfnum[0] = 0; @@ -11468,14 +11637,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1612:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1614:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1613:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1615:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (" long spare_;")); @@ -11483,25 +11652,25 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1614:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1616:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1615:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1617:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), ("}")); } ; - MELT_LOCATION ("warmelt-outobj.melt:1616:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1618:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]));; - MELT_LOCATION ("warmelt-outobj.melt:1616:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1618:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -11541,7 +11710,7 @@ lab_endgetargs:; /*_#I__L5*/ meltfnum[4] = (( /*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1]) > ( /*_#IRAW__L4*/ meltfnum[3]));; - MELT_LOCATION ("warmelt-outobj.melt:1616:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1618:/ cond"); /*cond */ if ( /*_#I__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -11551,7 +11720,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1617:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1619:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -11562,7 +11731,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1618:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1620:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11588,7 +11757,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:1618:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1620:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -11603,7 +11772,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:1618:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1620:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11617,7 +11786,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 1618; + argtab[2].meltbp_long = 1620; /*^apply.arg */ argtab[3].meltbp_cstring = "output_curframe_cdat_struct huge implbuf="; @@ -11639,7 +11808,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1618:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1620:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V10*/ meltfptr[9] = 0; @@ -11652,7 +11821,7 @@ lab_endgetargs:; /*_.IF___V9*/ meltfptr[8] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1618:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1620:/ quasiblock"); /*_.PROGN___V11*/ meltfptr[9] = /*_.IF___V9*/ meltfptr[8];; @@ -11661,7 +11830,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[7] = /*_.PROGN___V11*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1618:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1620:/ clear"); /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.IF___V9*/ meltfptr[8] = 0; @@ -11676,7 +11845,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1619:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1621:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11687,7 +11856,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L8*/ meltfnum[6] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]));; - MELT_LOCATION ("warmelt-outobj.melt:1620:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1622:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -11722,7 +11891,7 @@ lab_endgetargs:; /*_#I__L10*/ meltfnum[9] = (( /*_#STRBUF_USEDLENGTH__L8*/ meltfnum[6]) < ( /*_#GET_INT__L9*/ meltfnum[5]));; - MELT_LOCATION ("warmelt-outobj.melt:1619:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1621:/ cond"); /*cond */ if ( /*_#I__L10*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -11730,7 +11899,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1619:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1621:/ cond.else"); /*^block */ /*anyblock */ @@ -11744,7 +11913,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1619) ? (1619) : __LINE__, + (1621) ? (1621) : __LINE__, __FUNCTION__); ; } @@ -11760,7 +11929,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[8] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1619:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1621:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L8*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V13*/ meltfptr[9] = 0; @@ -11777,7 +11946,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[8] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1616:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1618:/ quasiblock"); /*_.PROGN___V15*/ meltfptr[9] = /*_.IFCPP___V12*/ meltfptr[8];; @@ -11786,7 +11955,7 @@ lab_endgetargs:; /*_.IFELSE___V7*/ meltfptr[6] = /*_.PROGN___V15*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1616:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1618:/ clear"); /*clear *//*_.IFCPP___V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.IFCPP___V12*/ meltfptr[8] = 0; @@ -11801,14 +11970,26 @@ lab_endgetargs:; /*_.IFELSE___V7*/ meltfptr[6] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1604:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1606:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V7*/ meltfptr[6];; - MELT_LOCATION ("warmelt-outobj.melt:1604:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:1606:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11916,7 +12097,7 @@ meltrout_42_warmelt_outobj_OUTPUT_CURFRAME_CDAT_FILL (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:1626:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:1628:/ getarg"); /*_.IDATUP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -11938,7 +12119,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1628:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1630:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (" cdat = (struct cdata_st*) meltgc_allocate(sizeof(*cdat),0);")); @@ -11946,14 +12127,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1629:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1631:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1630:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1632:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (" melt_prohibit_garbcoll = TRUE;")); @@ -11961,14 +12142,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1631:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1633:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1634:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1636:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), ("/*initial routine predef*/")); @@ -11976,7 +12157,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1635:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1637:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (1), 0); } @@ -11997,7 +12178,7 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-outobj.melt:1639:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1641:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -12027,7 +12208,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:1636:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1638:/ clear"); /*clear *//*_.CURPDAT__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_#CURK__L1*/ meltfnum[0] = 0; @@ -12037,7 +12218,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1642:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1644:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), ("/*initial routine fill*/")); @@ -12045,7 +12226,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1643:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1645:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (1), 0); } @@ -12068,13 +12249,13 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1647:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1649:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (1), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1648:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1650:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -12104,7 +12285,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:1644:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1646:/ clear"); /*clear *//*_.CURFIL__V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_#CURK__L2*/ meltfnum[1] = 0; @@ -12114,7 +12295,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1653:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1655:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (" cdat = NULL;")); @@ -12122,14 +12303,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1654:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1656:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1655:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1657:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (" melt_prohibit_garbcoll = FALSE;")); @@ -12137,17 +12318,17 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1656:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1658:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1658:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1660:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[2] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]));; - MELT_LOCATION ("warmelt-outobj.melt:1658:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1660:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -12187,7 +12368,7 @@ lab_endgetargs:; /*_#I__L6*/ meltfnum[5] = (( /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[2]) > ( /*_#IRAW__L5*/ meltfnum[4]));; - MELT_LOCATION ("warmelt-outobj.melt:1658:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1660:/ cond"); /*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -12197,7 +12378,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1659:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1661:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -12209,7 +12390,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1660:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1662:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12235,7 +12416,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:1660:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1662:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -12250,7 +12431,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:1660:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1662:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12264,7 +12445,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 1660; + argtab[2].meltbp_long = 1662; /*^apply.arg */ argtab[3].meltbp_cstring = "output_curframe_cdat_fill huge implbuf="; @@ -12286,7 +12467,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1660:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1662:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V12*/ meltfptr[11] = 0; @@ -12299,7 +12480,7 @@ lab_endgetargs:; /*_.IF___V11*/ meltfptr[10] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1660:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1662:/ quasiblock"); /*_.PROGN___V13*/ meltfptr[11] = /*_.IF___V11*/ meltfptr[10];; @@ -12308,7 +12489,7 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[9] = /*_.PROGN___V13*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1660:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1662:/ clear"); /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.IF___V11*/ meltfptr[10] = 0; @@ -12323,7 +12504,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1661:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1663:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12334,7 +12515,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L9*/ meltfnum[7] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V3*/ meltfptr[2]));; - MELT_LOCATION ("warmelt-outobj.melt:1662:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1664:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -12369,7 +12550,7 @@ lab_endgetargs:; /*_#I__L11*/ meltfnum[10] = (( /*_#STRBUF_USEDLENGTH__L9*/ meltfnum[7]) < ( /*_#GET_INT__L10*/ meltfnum[6]));; - MELT_LOCATION ("warmelt-outobj.melt:1661:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1663:/ cond"); /*cond */ if ( /*_#I__L11*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -12377,7 +12558,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1661:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1663:/ cond.else"); /*^block */ /*anyblock */ @@ -12391,7 +12572,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1661) ? (1661) : __LINE__, + (1663) ? (1663) : __LINE__, __FUNCTION__); ; } @@ -12407,7 +12588,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[10] = /*_.IFELSE___V16*/ meltfptr[15];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1661:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1663:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L9*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V15*/ meltfptr[11] = 0; @@ -12424,7 +12605,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[10] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1658:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1660:/ quasiblock"); /*_.PROGN___V17*/ meltfptr[11] = /*_.IFCPP___V14*/ meltfptr[10];; @@ -12433,7 +12614,7 @@ lab_endgetargs:; /*_.IFELSE___V9*/ meltfptr[8] = /*_.PROGN___V17*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1658:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1660:/ clear"); /*clear *//*_.IFCPP___V10*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.IFCPP___V14*/ meltfptr[10] = 0; @@ -12448,14 +12629,26 @@ lab_endgetargs:; /*_.IFELSE___V9*/ meltfptr[8] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1626:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1628:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V9*/ meltfptr[8];; - MELT_LOCATION ("warmelt-outobj.melt:1626:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:1628:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -12560,7 +12753,7 @@ meltrout_43_warmelt_outobj_OUTPUCOD_INITIALROUTINE (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:1669:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ getarg"); /*_.PINI__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -12598,7 +12791,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1670:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1672:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12610,7 +12803,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.PINI__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_INITIALROUTINEOBJ */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:1670:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1672:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -12618,7 +12811,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1670:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1672:/ cond.else"); /*^block */ /*anyblock */ @@ -12632,7 +12825,7 @@ lab_endgetargs:; melt_assert_failed (("check pini"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1670) ? (1670) : __LINE__, __FUNCTION__); + (1672) ? (1672) : __LINE__, __FUNCTION__); ; } ; @@ -12647,7 +12840,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1670:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1672:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -12658,10 +12851,10 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1671:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1673:/ quasiblock"); - MELT_LOCATION ("warmelt-outobj.melt:1672:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1674:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.PINI__V2*/ meltfptr[1]), 10, "OIROUT_DATA"); @@ -12669,7 +12862,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1673:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1675:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.PINI__V2*/ meltfptr[1]), 12, "OIROUT_FILL"); @@ -12677,7 +12870,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1674:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1676:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.PINI__V2*/ meltfptr[1]), 11, "OIROUT_PROLOG"); @@ -12685,7 +12878,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1675:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1677:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.PINI__V2*/ meltfptr[1]), 7, "OBROUT_RETVAL"); @@ -12693,7 +12886,7 @@ lab_endgetargs:; meltfptr[10] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1676:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:1678:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.PINI__V2*/ meltfptr[1]), 13, "OIROUT_MODULENAME"); @@ -12701,7 +12894,7 @@ lab_endgetargs:; meltfptr[11] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:1677:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1679:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -12744,19 +12937,19 @@ lab_endgetargs:; ((1) + ( /*_#IRAW__L5*/ meltfnum[4]));; { - MELT_LOCATION ("warmelt-outobj.melt:1681:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1683:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1682:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1684:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1683:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1685:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12777,34 +12970,34 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1689:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1691:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1690:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1692:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1691:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1693:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1692:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1694:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("typedef ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:1693:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1695:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12824,7 +13017,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1694:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1696:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" initial_frame_st;")); @@ -12832,28 +13025,28 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1695:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1697:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1696:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1698:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1697:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1699:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1698:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1700:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("static void initialize_module_meltdata_")); @@ -12861,7 +13054,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1699:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1701:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -12870,7 +13063,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1700:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1702:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" (initial_frame_st *iniframp__, char predefinited[])")); @@ -12878,14 +13071,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1701:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1703:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1702:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1704:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("{")); @@ -12893,14 +13086,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1703:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1705:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1704:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1706:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#define meltfram__ (*iniframp__)")); @@ -12908,14 +13101,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1705:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1707:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1706:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1708:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" dbgprintf (\"start initialize_module_meltdata_")); @@ -12923,7 +13116,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1707:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1709:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -12932,7 +13125,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1708:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1710:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" iniframp__=%p\", (void*) iniframp__);")); @@ -12940,14 +13133,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1709:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1711:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1710:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1712:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" melt_assertmsg (\"check module initial frame\", iniframp__->mcfr_nbvar == /*minihash*/ -")); @@ -12955,14 +13148,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1711:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1713:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#MINIHASH__L6*/ meltfnum[5])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1712:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1714:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -12970,12 +13163,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1713:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1715:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1714:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1716:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12996,7 +13189,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1715:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1717:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" *cdat = NULL;")); @@ -13004,12 +13197,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1716:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1718:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1718:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1720:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13029,14 +13222,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1719:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1721:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1720:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1722:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#undef meltfram__")); @@ -13044,14 +13237,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1721:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1723:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1722:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1724:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("} /*end initialize_module_meltdata_")); @@ -13059,7 +13252,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1723:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1725:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -13068,7 +13261,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1724:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1726:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/")); @@ -13076,28 +13269,28 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1725:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1727:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1726:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1728:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1729:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1731:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1730:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1732:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("/* define different names when debugging or not */")); @@ -13105,14 +13298,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1732:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1734:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1733:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1735:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("#if MELT_HAVE_DEBUG")); @@ -13120,14 +13313,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1734:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1736:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1735:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1737:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("extern")); @@ -13135,12 +13328,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1736:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1738:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1737:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1739:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13161,7 +13354,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1742:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1744:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("const char meltmodule_")); @@ -13169,7 +13362,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1743:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1745:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -13178,7 +13371,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1744:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1746:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("__melt_have_debug_enabled[];")); @@ -13186,14 +13379,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1745:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1747:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1746:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1748:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("#define melt_have_debug_string meltmodule_")); @@ -13201,7 +13394,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1747:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1749:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -13210,7 +13403,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1748:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1750:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("__melt_have_debug_enabled")); @@ -13218,14 +13411,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1749:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1751:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1750:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1752:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("#else /*!MELT_HAVE_DEBUG*/")); @@ -13233,14 +13426,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1751:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1753:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1752:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1754:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("extern")); @@ -13248,12 +13441,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1753:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1755:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1754:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1756:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13274,7 +13467,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1759:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1761:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("const char meltmodule_")); @@ -13282,7 +13475,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1760:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1762:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -13291,7 +13484,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1761:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1763:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("__melt_have_debug_disabled[];")); @@ -13299,14 +13492,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1762:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1764:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1763:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1765:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("#define melt_have_debug_string meltmodule_")); @@ -13314,7 +13507,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1764:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1766:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -13323,7 +13516,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1765:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1767:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("__melt_have_debug_disabled")); @@ -13331,14 +13524,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1766:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1768:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1767:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1769:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("#endif /*!MELT_HAVE_DEBUG*/")); @@ -13346,28 +13539,28 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1768:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1770:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1769:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1771:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1771:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1773:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1772:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1774:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#if MELT_HAVE_DEBUG")); @@ -13375,14 +13568,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1773:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1775:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1774:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1776:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("const char meltmodule_")); @@ -13390,7 +13583,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1775:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1777:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -13399,7 +13592,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1776:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1778:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("__melt_have_debug_enabled[] = \"MELT module ")); @@ -13407,7 +13600,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1777:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1779:/ locexp"); meltgc_add_strbuf_cstr ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -13416,7 +13609,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1778:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1780:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" have debug enabled\";")); @@ -13424,14 +13617,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1779:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1781:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1780:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1782:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#else /*!MELT_HAVE_DEBUG*/")); @@ -13439,14 +13632,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1781:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1783:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1782:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1784:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("const char meltmodule_")); @@ -13454,7 +13647,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1783:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1785:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -13463,7 +13656,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1784:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1786:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("__melt_have_debug_disabled[] = \"MELT module ")); @@ -13471,7 +13664,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1785:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1787:/ locexp"); meltgc_add_strbuf_cstr ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -13480,7 +13673,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1786:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1788:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" have debug disabled\";")); @@ -13488,14 +13681,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1787:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1789:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1788:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1790:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#endif /*MELT_HAVE_DEBUG*/")); @@ -13503,31 +13696,31 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1789:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1791:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1728:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1730:/ quasiblock"); { - MELT_LOCATION ("warmelt-outobj.melt:1792:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1794:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1793:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1795:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1794:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1796:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("void* start_module_melt(void* modargp_) {")); @@ -13535,21 +13728,21 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1795:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1797:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1797:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1799:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1798:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1800:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("char predefinited[MELTGLOB__LASTGLOB+8];")); @@ -13557,12 +13750,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1799:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1801:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1802:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1804:/ quasiblock"); /*^newclosure */ @@ -13574,7 +13767,7 @@ lab_endgetargs:; tabval[7])), (0)); ; /*_.LAMBDA___V20*/ meltfptr[19] = /*_.LAMBDA___V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-outobj.melt:1801:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1803:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13597,7 +13790,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1809:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1811:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/**initial routine prologue**/")); @@ -13605,14 +13798,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1810:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1812:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1811:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1813:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/* set initial frame marking */")); @@ -13620,14 +13813,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1812:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1814:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1813:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1815:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("((struct melt_callframe_st*)&meltfram__)->mcfr_nbvar = /*minihash*/ -")); @@ -13635,14 +13828,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1814:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1816:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#MINIHASH__L6*/ meltfnum[5])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1815:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1817:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); @@ -13650,14 +13843,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1816:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1818:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1817:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1819:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("((struct melt_callframe_st*)&meltfram__)->mcfr_forwmarkrout = meltmod__")); @@ -13665,7 +13858,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1818:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1820:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -13674,7 +13867,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1819:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1821:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("__forward_or_mark_module_start_frame;")); @@ -13682,12 +13875,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1820:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1822:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1823:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1825:/ quasiblock"); /*^newclosure */ @@ -13725,7 +13918,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]); ; /*_.LAMBDA___V23*/ meltfptr[22] = /*_.LAMBDA___V24*/ meltfptr[23];; - MELT_LOCATION ("warmelt-outobj.melt:1821:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1823:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13746,7 +13939,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1829:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1831:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/**initial routine cdata initializer**/")); @@ -13754,21 +13947,21 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1830:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1832:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1832:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1834:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1833:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1835:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("memset(predefinited, 0, sizeof(predefinited));")); @@ -13776,14 +13969,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1834:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1836:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1835:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1837:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("initialize_module_meltdata_")); @@ -13791,7 +13984,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1836:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1838:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -13800,7 +13993,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1837:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1839:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" (&meltfram__, predefinited);")); @@ -13808,14 +14001,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1838:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1840:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1841:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1843:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/**initial routine body**/")); @@ -13823,12 +14016,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1842:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1844:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1844:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1846:/ quasiblock"); /*^getslot */ @@ -13861,7 +14054,7 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.CURPAIR__V29*/ meltfptr[28]); - MELT_LOCATION ("warmelt-outobj.melt:1851:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1853:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^checksignal */ @@ -13888,7 +14081,7 @@ lab_endgetargs:; /*_#IF___L7*/ meltfnum[6] = /*_#NOT__L9*/ meltfnum[8];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1851:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1853:/ clear"); /*clear *//*_#IS_A__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_#NOT__L9*/ meltfnum[8] = 0; @@ -13901,7 +14094,7 @@ lab_endgetargs:; /*_#IF___L7*/ meltfnum[6] = 0;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1851:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1853:/ cond"); /*cond */ if ( /*_#IF___L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -13911,7 +14104,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1852:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1854:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.BODYLIST__V27*/ meltfptr[26]), (melt_ptr_t) ( /*_.CURBODY__V30*/ @@ -13930,7 +14123,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:1848:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1850:/ clear"); /*clear *//*_.CURPAIR__V29*/ meltfptr[28] = 0; /*^clear */ /*clear *//*_.CURBODY__V30*/ meltfptr[29] = 0; @@ -13938,7 +14131,7 @@ lab_endgetargs:; /*clear *//*_#IF___L7*/ meltfnum[6] = 0; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-outobj.melt:1853:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1855:/ quasiblock"); /*^checksignal */ @@ -13985,7 +14178,7 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-outobj.melt:1862:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1864:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IRAW__L13*/ meltfnum[12] = @@ -13994,7 +14187,7 @@ lab_endgetargs:; /*_#I__L14*/ meltfnum[13] = (( /*_#IRAW__L13*/ meltfnum[12]) == (0));; - MELT_LOCATION ("warmelt-outobj.melt:1862:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1864:/ cond"); /*cond */ if ( /*_#I__L14*/ meltfnum[13]) /*then */ { /*^cond.then */ @@ -14002,7 +14195,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:1863:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1865:/ quasiblock"); /*_#CHUNKIX__L15*/ meltfnum[14] = @@ -14016,27 +14209,27 @@ lab_endgetargs:; tabval[16])), (const char *) 0);; { - MELT_LOCATION ("warmelt-outobj.melt:1867:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1869:/ locexp"); /*increment *//*_#CHUNKCOUNT__L11*/ meltfnum[8] += 1; ; } ; { - MELT_LOCATION ("warmelt-outobj.melt:1868:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1870:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.CHUNKBUFLIST__V28*/ meltfptr[27]), (melt_ptr_t) ( /*_.NEWCHUNKBUF__V36*/ meltfptr[35])); } ; - MELT_LOCATION ("warmelt-outobj.melt:1869:/ compute"); + MELT_LOCATION ("warmelt-outobj.melt:1871:/ compute"); /*_.CHUNKBUF__V32*/ meltfptr[31] = /*_.SETQ___V37*/ meltfptr[36] = /*_.NEWCHUNKBUF__V36*/ meltfptr[35];; /*_.LET___V35*/ meltfptr[34] = /*_.SETQ___V37*/ meltfptr[36];; - MELT_LOCATION ("warmelt-outobj.melt:1863:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1865:/ clear"); /*clear *//*_#CHUNKIX__L15*/ meltfnum[14] = 0; /*^clear */ /*clear *//*_.NEWCHUNKBUF__V36*/ meltfptr[35] = 0; @@ -14045,7 +14238,7 @@ lab_endgetargs:; /*_.IF___V34*/ meltfptr[33] = /*_.LET___V35*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1862:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1864:/ clear"); /*clear *//*_.LET___V35*/ meltfptr[34] = 0; } ; @@ -14056,7 +14249,7 @@ lab_endgetargs:; /*_.IF___V34*/ meltfptr[33] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1871:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1873:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -14077,7 +14270,7 @@ lab_endgetargs:; meltgc_touch (( /*!PREVLOC_CONTAINER */ meltfrout->tabval[17])); ; - MELT_LOCATION ("warmelt-outobj.melt:1872:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1874:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -14098,7 +14291,7 @@ lab_endgetargs:; meltgc_touch (( /*!PREVIMPLBUF_CONTAINER */ meltfrout->tabval[18])); ; - MELT_LOCATION ("warmelt-outobj.melt:1873:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1875:/ quasiblock"); /*^cond */ @@ -14126,7 +14319,7 @@ lab_endgetargs:; /*_.CURLOC__V39*/ meltfptr[36] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1875:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1877:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -14137,7 +14330,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:1876:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1878:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14167,7 +14360,7 @@ lab_endgetargs:; /*_.OUTPUT_LOCATION__V41*/ meltfptr[40];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1875:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1877:/ clear"); /*clear *//*_.OUTPUT_LOCATION__V41*/ meltfptr[40] = 0; } ; @@ -14182,11 +14375,11 @@ lab_endgetargs:; /*_.LET___V38*/ meltfptr[35] = /*_.IF___V40*/ meltfptr[34];; - MELT_LOCATION ("warmelt-outobj.melt:1873:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1875:/ clear"); /*clear *//*_.CURLOC__V39*/ meltfptr[36] = 0; /*^clear */ /*clear *//*_.IF___V40*/ meltfptr[34] = 0; - MELT_LOCATION ("warmelt-outobj.melt:1878:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1880:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -14212,19 +14405,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1879:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1881:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.CHUNKBUF__V32*/ meltfptr[31]), (1), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1880:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1882:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#STRBUF_USEDLENGTH__L16*/ meltfnum[14] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.CHUNKBUF__V32*/ meltfptr[31]));; - MELT_LOCATION ("warmelt-outobj.melt:1880:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1882:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -14263,7 +14456,7 @@ lab_endgetargs:; /*_#I__L19*/ meltfnum[18] = (( /*_#STRBUF_USEDLENGTH__L16*/ meltfnum[14]) > ( /*_#IRAW__L18*/ meltfnum[17]));; - MELT_LOCATION ("warmelt-outobj.melt:1880:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1882:/ cond"); /*cond */ if ( /*_#I__L19*/ meltfnum[18]) /*then */ { /*^cond.then */ @@ -14273,7 +14466,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1881:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1883:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -14284,7 +14477,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1882:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1884:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14310,7 +14503,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:1882:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1884:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L20*/ meltfnum[19]) /*then */ { /*^cond.then */ @@ -14326,7 +14519,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-outobj.melt:1882:/ checksignal"); + ("warmelt-outobj.melt:1884:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14340,7 +14533,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 1882; + argtab[2].meltbp_long = 1884; /*^apply.arg */ argtab[3].meltbp_cstring = "outpucod_initialroutine huge chunkbuf="; @@ -14362,7 +14555,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V47*/ meltfptr[46];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1882:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1884:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L21*/ meltfnum[20] = 0; /*^clear */ @@ -14376,7 +14569,7 @@ lab_endgetargs:; /*_.IF___V46*/ meltfptr[45] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1882:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1884:/ quasiblock"); /*_.PROGN___V48*/ meltfptr[46] = @@ -14387,7 +14580,7 @@ lab_endgetargs:; /*_.PROGN___V48*/ meltfptr[46];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1882:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1884:/ clear"); /*clear *//*_#MELT_NEED_DBG__L20*/ meltfnum[19] = 0; /*^clear */ /*clear *//*_.IF___V46*/ meltfptr[45] = 0; @@ -14402,7 +14595,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1883:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1885:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14414,7 +14607,7 @@ lab_endgetargs:; melt_strbuf_usedlength ((melt_ptr_t) ( /*_.CHUNKBUF__V32*/ meltfptr[31]));; - MELT_LOCATION ("warmelt-outobj.melt:1884:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1886:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -14449,7 +14642,7 @@ lab_endgetargs:; /*_#I__L24*/ meltfnum[23] = (( /*_#STRBUF_USEDLENGTH__L22*/ meltfnum[20]) < ( /*_#GET_INT__L23*/ meltfnum[19]));; - MELT_LOCATION ("warmelt-outobj.melt:1883:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1885:/ cond"); /*cond */ if ( /*_#I__L24*/ meltfnum[23]) /*then */ { /*^cond.then */ @@ -14457,7 +14650,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1883:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1885:/ cond.else"); /*^block */ /*anyblock */ @@ -14472,7 +14665,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1883) ? (1883) : __LINE__, + (1885) ? (1885) : __LINE__, __FUNCTION__); ; } @@ -14489,7 +14682,7 @@ lab_endgetargs:; /*_.IFELSE___V51*/ meltfptr[50];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1883:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1885:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L22*/ meltfnum[20] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V50*/ meltfptr[46] = 0; @@ -14506,7 +14699,7 @@ lab_endgetargs:; /*_.IFCPP___V49*/ meltfptr[45] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1880:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1882:/ quasiblock"); /*_.PROGN___V52*/ meltfptr[46] = @@ -14517,7 +14710,7 @@ lab_endgetargs:; /*_.PROGN___V52*/ meltfptr[46];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1880:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1882:/ clear"); /*clear *//*_.IFCPP___V45*/ meltfptr[44] = 0; /*^clear */ /*clear *//*_.IFCPP___V49*/ meltfptr[45] = 0; @@ -14538,7 +14731,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:1858:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1860:/ clear"); /*clear *//*_.CURBODY__V33*/ meltfptr[32] = 0; /*^clear */ /*clear *//*_#BODIX__L12*/ meltfnum[11] = 0; @@ -14567,7 +14760,7 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-outobj.melt:1853:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1855:/ clear"); /*clear *//*_.BODTUP__V31*/ meltfptr[30] = 0; /*^clear */ /*clear *//*_.CHUNKBUF__V32*/ meltfptr[31] = 0; @@ -14575,7 +14768,7 @@ lab_endgetargs:; /*clear *//*_#NBBODY__L10*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_#CHUNKCOUNT__L11*/ meltfnum[8] = 0; - MELT_LOCATION ("warmelt-outobj.melt:1888:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1890:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -14594,7 +14787,7 @@ lab_endgetargs:; meltgc_touch (( /*!PREVLOC_CONTAINER */ meltfrout->tabval[17])); ; - MELT_LOCATION ("warmelt-outobj.melt:1889:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1891:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -14615,7 +14808,7 @@ lab_endgetargs:; meltgc_touch (( /*!PREVIMPLBUF_CONTAINER */ meltfrout->tabval[18])); ; - MELT_LOCATION ("warmelt-outobj.melt:1890:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1892:/ quasiblock"); /*^checksignal */ @@ -14639,14 +14832,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1893:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1895:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1894:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1896:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("struct frame_start_module_melt_st;")); @@ -14671,7 +14864,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1898:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1900:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); @@ -14679,7 +14872,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1899:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1901:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), @@ -14688,7 +14881,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1900:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1902:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), melt_string_str ((melt_ptr_t) @@ -14698,7 +14891,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1901:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1903:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), @@ -14707,7 +14900,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1902:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1904:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ( /*_#CHUNKIX__L25*/ meltfnum[20])); @@ -14715,7 +14908,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1903:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1905:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), @@ -14724,7 +14917,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1904:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1906:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); @@ -14732,7 +14925,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1905:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1907:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -14741,7 +14934,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1906:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1908:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -14751,7 +14944,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1907:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1909:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -14760,7 +14953,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1908:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1910:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#CHUNKIX__L25*/ meltfnum[20])); @@ -14768,7 +14961,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1909:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1911:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -14781,7 +14974,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:1895:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1897:/ clear"); /*clear *//*_.CURCHUNK__V54*/ meltfptr[44] = 0; /*^clear */ /*clear *//*_#CHUNKIX__L25*/ meltfnum[20] = 0; @@ -14789,14 +14982,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1911:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1913:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1914:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1916:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); @@ -14804,14 +14997,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1915:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1917:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1916:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1918:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" goto labend_rout;")); @@ -14819,14 +15012,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1917:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1919:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1918:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1920:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("labend_rout:;")); @@ -14834,14 +15027,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1919:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1921:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1920:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1922:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" melt_topframe = (struct melt_callframe_st *) meltfram__.mcfr_prev;")); @@ -14849,14 +15042,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1921:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1923:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1922:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1924:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/* popped initial frame */")); @@ -14864,14 +15057,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1923:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1925:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1924:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1926:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("{ /* clear initial frame & return */")); @@ -14879,13 +15072,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1925:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1927:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" melt_ptr_t retval = ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:1926:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1928:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -14896,7 +15089,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:1927:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1929:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -14924,7 +15117,7 @@ lab_endgetargs:; /*_.OUTPUT_C_CODE__V56*/ meltfptr[46];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1926:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1928:/ clear"); /*clear *//*_.OUTPUT_C_CODE__V56*/ meltfptr[46] = 0; } ; @@ -14940,7 +15133,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1928:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1930:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -14955,7 +15148,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1929:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1931:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); @@ -14963,14 +15156,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1930:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1932:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1931:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1933:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" memset((void*) &meltfram__, 0, sizeof(meltfram__));")); @@ -14978,14 +15171,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1932:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1934:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1933:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1935:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" return retval;}")); @@ -14993,14 +15186,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1934:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1936:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1935:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1937:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#undef meltcallcount")); @@ -15008,14 +15201,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1936:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1938:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1937:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1939:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#undef meltfram__")); @@ -15023,14 +15216,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1938:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1940:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1939:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1941:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#undef MELTFRAM_NBVARNUM")); @@ -15038,14 +15231,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1940:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1942:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1941:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1943:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#undef MELTFRAM_NBVARPTR")); @@ -15053,21 +15246,21 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1942:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1944:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1943:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1945:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1944:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1946:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("} /* end start_module_melt */")); @@ -15075,7 +15268,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1945:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1947:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } @@ -15099,7 +15292,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1950:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1952:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); @@ -15107,7 +15300,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1951:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1953:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -15116,7 +15309,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1952:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1954:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -15126,7 +15319,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1953:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1955:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -15135,7 +15328,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1954:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1956:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#CHUNKIX__L26*/ meltfnum[19])); @@ -15143,7 +15336,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1955:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1957:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -15152,7 +15345,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1956:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1958:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); @@ -15160,7 +15353,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1957:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1959:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -15169,7 +15362,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1958:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1960:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); @@ -15177,7 +15370,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1959:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1961:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -15186,7 +15379,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1960:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1962:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); @@ -15194,7 +15387,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1961:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1963:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -15203,7 +15396,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1962:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1964:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); @@ -15211,7 +15404,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1963:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1965:/ locexp"); /*add2sbuf_sbuf */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -15222,7 +15415,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1964:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1966:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); @@ -15230,7 +15423,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1965:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1967:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -15239,7 +15432,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1966:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1968:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); @@ -15247,7 +15440,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1967:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1969:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -15256,7 +15449,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1968:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1970:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -15266,7 +15459,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1969:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1971:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -15275,7 +15468,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1970:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1972:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#CHUNKIX__L26*/ meltfnum[19])); @@ -15283,7 +15476,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1971:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1973:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/")); @@ -15291,19 +15484,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1972:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1974:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1974:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1976:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#STRBUF_USEDLENGTH__L27*/ meltfnum[23] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:1974:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1976:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -15342,7 +15535,7 @@ lab_endgetargs:; /*_#I__L30*/ meltfnum[29] = (( /*_#STRBUF_USEDLENGTH__L27*/ meltfnum[23]) > ( /*_#IRAW__L29*/ meltfnum[8]));; - MELT_LOCATION ("warmelt-outobj.melt:1974:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1976:/ cond"); /*cond */ if ( /*_#I__L30*/ meltfnum[29]) /*then */ { /*^cond.then */ @@ -15352,7 +15545,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1975:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1977:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -15363,7 +15556,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1976:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1978:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15389,7 +15582,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:1976:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1978:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L31*/ meltfnum[30]) /*then */ { /*^cond.then */ @@ -15405,7 +15598,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-outobj.melt:1976:/ checksignal"); + ("warmelt-outobj.melt:1978:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15419,7 +15612,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 1976; + argtab[2].meltbp_long = 1978; /*^apply.arg */ argtab[3].meltbp_cstring = "outpucod_initialroutine huge implbuf="; @@ -15441,7 +15634,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V62*/ meltfptr[61];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1976:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1978:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L32*/ meltfnum[31] = 0; /*^clear */ @@ -15455,7 +15648,7 @@ lab_endgetargs:; /*_.IF___V61*/ meltfptr[60] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1976:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1978:/ quasiblock"); /*_.PROGN___V63*/ meltfptr[61] = @@ -15466,7 +15659,7 @@ lab_endgetargs:; /*_.PROGN___V63*/ meltfptr[61];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1976:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1978:/ clear"); /*clear *//*_#MELT_NEED_DBG__L31*/ meltfnum[30] = 0; /*^clear */ /*clear *//*_.IF___V61*/ meltfptr[60] = 0; @@ -15481,7 +15674,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:1977:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:1979:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15493,7 +15686,7 @@ lab_endgetargs:; melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:1978:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1980:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -15528,7 +15721,7 @@ lab_endgetargs:; /*_#I__L35*/ meltfnum[34] = (( /*_#STRBUF_USEDLENGTH__L33*/ meltfnum[31]) < ( /*_#GET_INT__L34*/ meltfnum[30]));; - MELT_LOCATION ("warmelt-outobj.melt:1977:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1979:/ cond"); /*cond */ if ( /*_#I__L35*/ meltfnum[34]) /*then */ { /*^cond.then */ @@ -15536,7 +15729,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:1977:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:1979:/ cond.else"); /*^block */ /*anyblock */ @@ -15551,7 +15744,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (1977) ? (1977) : __LINE__, + (1979) ? (1979) : __LINE__, __FUNCTION__); ; } @@ -15568,7 +15761,7 @@ lab_endgetargs:; /*_.IFELSE___V66*/ meltfptr[65];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1977:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1979:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L33*/ meltfnum[31] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V65*/ meltfptr[61] = 0; @@ -15585,7 +15778,7 @@ lab_endgetargs:; /*_.IFCPP___V64*/ meltfptr[60] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:1974:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1976:/ quasiblock"); /*_.PROGN___V67*/ meltfptr[61] = @@ -15596,7 +15789,7 @@ lab_endgetargs:; /*_.PROGN___V67*/ meltfptr[61];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1974:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1976:/ clear"); /*clear *//*_.IFCPP___V60*/ meltfptr[59] = 0; /*^clear */ /*clear *//*_.IFCPP___V64*/ meltfptr[60] = 0; @@ -15617,7 +15810,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:1947:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1949:/ clear"); /*clear *//*_.CURCHUNK__V57*/ meltfptr[30] = 0; /*^clear */ /*clear *//*_#CHUNKIX__L26*/ meltfnum[19] = 0; @@ -15636,12 +15829,12 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-outobj.melt:1890:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1892:/ clear"); /*clear *//*_.CHUNKTUP__V53*/ meltfptr[50] = 0; /*^clear */ /*clear *//*_.IFELSE___V55*/ meltfptr[45] = 0; - MELT_LOCATION ("warmelt-outobj.melt:1844:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1846:/ clear"); /*clear *//*_.RAWBODY__V26*/ meltfptr[25] = 0; /*^clear */ /*clear *//*_.BODYLIST__V27*/ meltfptr[26] = 0; @@ -15649,14 +15842,14 @@ lab_endgetargs:; /*clear *//*_.CHUNKBUFLIST__V28*/ meltfptr[27] = 0; { - MELT_LOCATION ("warmelt-outobj.melt:1983:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1985:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1984:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1986:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("void MELT_MODULE_VISIBILITY meltmod__")); @@ -15664,7 +15857,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1985:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1987:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -15673,7 +15866,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1986:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1988:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), ("__forward_or_mark_module_start_frame (struct melt_callframe_st* fp, int marking);")); @@ -15681,14 +15874,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1987:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1989:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1988:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1990:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("void meltmod__")); @@ -15696,7 +15889,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1989:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1991:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -15705,7 +15898,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1990:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1992:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("__forward_or_mark_module_start_frame (struct melt_callframe_st* fp, int marking)")); @@ -15713,14 +15906,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1991:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1993:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1992:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1994:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("{")); @@ -15728,14 +15921,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1993:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1995:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1994:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1996:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("int ix=0;")); @@ -15743,14 +15936,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1995:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1997:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1996:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1998:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("initial_frame_st* meltframptr_= (initial_frame_st*)fp;")); @@ -15758,14 +15951,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1997:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1999:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1998:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2000:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" melt_assertmsg (\"check module frame\", meltframptr_->mcfr_nbvar == /*minihash*/ -")); @@ -15773,14 +15966,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1999:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2001:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#MINIHASH__L6*/ meltfnum[5])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2000:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2002:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -15788,14 +15981,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2001:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2003:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2003:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2005:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("if (!marking && melt_is_forwarding) {")); @@ -15803,14 +15996,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2004:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2006:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2005:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2007:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("dbgprintf (\"forward_or_mark_module_start_frame_")); @@ -15818,7 +16011,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2006:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2008:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -15827,7 +16020,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2007:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2009:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" forwarding %d pointers in frame %p\", ")); @@ -15835,14 +16028,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2008:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2010:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#NBVAL__L3*/ meltfnum[1])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2009:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2011:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (", (void*) meltframptr_);")); @@ -15850,14 +16043,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2010:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2012:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2011:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2013:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("for (ix = 0; ix < ")); @@ -15865,14 +16058,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2012:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2014:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#NBVAL__L3*/ meltfnum[1])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2013:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2015:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("; ix++) MELT_FORWARDED(meltframptr_->mcfr_varptr[ix]);")); @@ -15880,14 +16073,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2014:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2016:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2015:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2017:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" return;")); @@ -15895,14 +16088,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2016:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2018:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2017:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2019:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("} /*end forwarding*/")); @@ -15910,14 +16103,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2018:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2020:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2020:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2022:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("dbgprintf (\"forward_or_mark_module_start_frame_")); @@ -15925,7 +16118,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2021:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2023:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -15934,7 +16127,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2022:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2024:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" marking in frame %p\", (void*) meltframptr_);")); @@ -15942,12 +16135,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2023:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2025:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2024:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2026:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15967,14 +16160,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2025:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2027:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2026:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2028:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("} /* end meltmod__")); @@ -15982,7 +16175,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2027:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2029:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.OMODNAM__V12*/ @@ -15991,7 +16184,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2028:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2030:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("__forward_or_mark_module_start_frame */")); @@ -15999,21 +16192,21 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2029:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2031:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2030:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2032:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2031:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2033:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16024,7 +16217,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L36*/ meltfnum[31] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2032:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2034:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -16059,7 +16252,7 @@ lab_endgetargs:; /*_#I__L38*/ meltfnum[34] = (( /*_#STRBUF_USEDLENGTH__L36*/ meltfnum[31]) < ( /*_#GET_INT__L37*/ meltfnum[30]));; - MELT_LOCATION ("warmelt-outobj.melt:2031:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2033:/ cond"); /*cond */ if ( /*_#I__L38*/ meltfnum[34]) /*then */ { /*^cond.then */ @@ -16067,7 +16260,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2031:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2033:/ cond.else"); /*^block */ /*anyblock */ @@ -16081,7 +16274,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2031) ? (2031) : __LINE__, __FUNCTION__); + (2033) ? (2033) : __LINE__, __FUNCTION__); ; } ; @@ -16096,7 +16289,7 @@ lab_endgetargs:; /*_.IFCPP___V69*/ meltfptr[59] = /*_.IFELSE___V71*/ meltfptr[61];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2031:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2033:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L36*/ meltfnum[31] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V70*/ meltfptr[60] = 0; @@ -16115,7 +16308,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2033:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2035:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16126,7 +16319,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L39*/ meltfnum[31] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]));; - MELT_LOCATION ("warmelt-outobj.melt:2034:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2036:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -16161,7 +16354,7 @@ lab_endgetargs:; /*_#I__L41*/ meltfnum[34] = (( /*_#STRBUF_USEDLENGTH__L39*/ meltfnum[31]) < ( /*_#GET_INT__L40*/ meltfnum[30]));; - MELT_LOCATION ("warmelt-outobj.melt:2033:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2035:/ cond"); /*cond */ if ( /*_#I__L41*/ meltfnum[34]) /*then */ { /*^cond.then */ @@ -16169,7 +16362,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2033:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2035:/ cond.else"); /*^block */ /*anyblock */ @@ -16183,7 +16376,7 @@ lab_endgetargs:; melt_assert_failed (("check limited declbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2033) ? (2033) : __LINE__, __FUNCTION__); + (2035) ? (2035) : __LINE__, __FUNCTION__); ; } ; @@ -16198,7 +16391,7 @@ lab_endgetargs:; /*_.IFCPP___V72*/ meltfptr[50] = /*_.IFELSE___V74*/ meltfptr[25];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2033:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2035:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L39*/ meltfnum[31] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V73*/ meltfptr[45] = 0; @@ -16219,7 +16412,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V72*/ meltfptr[50];; - MELT_LOCATION ("warmelt-outobj.melt:1671:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1673:/ clear"); /*clear *//*_.IDATUP__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.IRFILL__V9*/ meltfptr[8] = 0; @@ -16265,14 +16458,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V69*/ meltfptr[59] = 0; /*^clear */ /*clear *//*_.IFCPP___V72*/ meltfptr[50] = 0; - MELT_LOCATION ("warmelt-outobj.melt:1669:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:1669:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:1671:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16365,7 +16570,7 @@ meltrout_44_warmelt_outobj_LAMBDA___4__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:1802:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:1804:/ getarg"); /*_.ROU__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -16387,20 +16592,20 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:1803:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1805:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:1804:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1806:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DSBUF__V3*/ meltfptr[2]), ("initial_frame_st ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:1802:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1804:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -16488,7 +16693,7 @@ meltrout_45_warmelt_outobj_LAMBDA___5__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:1823:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:1825:/ getarg"); /*_.CURPROL__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -16498,7 +16703,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-outobj.melt:1824:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1826:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^checksignal */ @@ -16526,7 +16731,7 @@ lab_endgetargs:; /*_#IF___L1*/ meltfnum[0] = /*_#NOT__L3*/ meltfnum[2];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1824:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1826:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#NOT__L3*/ meltfnum[2] = 0; @@ -16539,7 +16744,7 @@ lab_endgetargs:; /*_#IF___L1*/ meltfnum[0] = 0;; } ; - MELT_LOCATION ("warmelt-outobj.melt:1824:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:1826:/ cond"); /*cond */ if ( /*_#IF___L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -16547,7 +16752,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:1826:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:1828:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -16573,18 +16778,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:1827:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:1829:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), (1), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:1825:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:1827:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1824:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1826:/ clear"); /*clear *//*_.OUTPUT_C_CODE__V3*/ meltfptr[2] = 0; } ; @@ -16592,7 +16797,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:1823:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:1825:/ clear"); /*clear *//*_#IF___L1*/ meltfnum[0] = 0; } @@ -16679,7 +16884,7 @@ meltrout_46_warmelt_outobj_OUTPUCOD_GETARG (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2041:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2043:/ getarg"); /*_.GARG__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -16717,7 +16922,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2042:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2044:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16729,7 +16934,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GARG__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJGETARG */ meltfrout-> tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2042:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2044:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -16737,7 +16942,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2042:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2044:/ cond.else"); /*^block */ /*anyblock */ @@ -16751,7 +16956,7 @@ lab_endgetargs:; melt_assert_failed (("check garg"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2042) ? (2042) : __LINE__, __FUNCTION__); + (2044) ? (2044) : __LINE__, __FUNCTION__); ; } ; @@ -16766,7 +16971,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2042:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2044:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -16777,7 +16982,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2043:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2045:/ quasiblock"); /*^getslot */ @@ -16788,7 +16993,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2044:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2046:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GARG__V2*/ meltfptr[1]), 0, "OBI_LOC"); @@ -16796,7 +17001,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2045:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2047:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GARG__V2*/ meltfptr[1]), 2, "OBARG_BIND"); @@ -16806,7 +17011,7 @@ lab_endgetargs:; ; /*_#RKBIND__L3*/ meltfnum[1] = (melt_get_int ((melt_ptr_t) ( /*_.OBIND__V10*/ meltfptr[9])));; - MELT_LOCATION ("warmelt-outobj.melt:2047:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2049:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBIND__V10*/ meltfptr[9]), 1, "FBIND_TYPE"); @@ -16816,7 +17021,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2049:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2051:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16828,7 +17033,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OBIND__V10*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:2049:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2051:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -16836,7 +17041,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2049:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2051:/ cond.else"); /*^block */ /*anyblock */ @@ -16850,7 +17055,7 @@ lab_endgetargs:; melt_assert_failed (("check obind"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2049) ? (2049) : __LINE__, __FUNCTION__); + (2051) ? (2051) : __LINE__, __FUNCTION__); ; } ; @@ -16865,7 +17070,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2049:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2051:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; @@ -16876,7 +17081,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2050:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2052:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -16900,7 +17105,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2051:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2053:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16912,7 +17117,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OLOC__V8*/ meltfptr[7]), (melt_ptr_t) (( /*!CLASS_OBJLOCV */ meltfrout-> tabval[3])));; - MELT_LOCATION ("warmelt-outobj.melt:2051:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2053:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -16920,7 +17125,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2051:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2053:/ cond.else"); /*^block */ /*anyblock */ @@ -16934,7 +17139,7 @@ lab_endgetargs:; melt_assert_failed (("check oloc"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2051) ? (2051) : __LINE__, __FUNCTION__); + (2053) ? (2053) : __LINE__, __FUNCTION__); ; } ; @@ -16949,7 +17154,7 @@ lab_endgetargs:; /*_.IFCPP___V15*/ meltfptr[14] = /*_.IFELSE___V16*/ meltfptr[15];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2051:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2053:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0; @@ -16962,7 +17167,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2052:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2054:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16974,7 +17179,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CTYBIND__V11*/ meltfptr[10]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout-> tabval[4])));; - MELT_LOCATION ("warmelt-outobj.melt:2052:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2054:/ cond"); /*cond */ if ( /*_#IS_A__L6*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -16982,7 +17187,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2052:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2054:/ cond.else"); /*^block */ /*anyblock */ @@ -16996,7 +17201,7 @@ lab_endgetargs:; melt_assert_failed (("check ctybind"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2052) ? (2052) : __LINE__, __FUNCTION__); + (2054) ? (2054) : __LINE__, __FUNCTION__); ; } ; @@ -17011,7 +17216,7 @@ lab_endgetargs:; /*_.IFCPP___V17*/ meltfptr[15] = /*_.IFELSE___V18*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2052:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2054:/ clear"); /*clear *//*_#IS_A__L6*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V18*/ meltfptr[17] = 0; @@ -17022,12 +17227,12 @@ lab_endgetargs:; /*_.IFCPP___V17*/ meltfptr[15] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2053:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2055:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L7*/ meltfnum[3] = (( /*_#RKBIND__L3*/ meltfnum[1]) == (0));; - MELT_LOCATION ("warmelt-outobj.melt:2053:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2055:/ cond"); /*cond */ if ( /*_#I__L7*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -17037,7 +17242,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2055:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2057:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17048,7 +17253,7 @@ lab_endgetargs:; /*_#__L8*/ meltfnum[7] = (( /*_.CTYBIND__V11*/ meltfptr[10]) == (( /*!CTYPE_VALUE */ meltfrout->tabval[5])));; - MELT_LOCATION ("warmelt-outobj.melt:2055:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2057:/ cond"); /*cond */ if ( /*_#__L8*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -17056,7 +17261,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2055:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2057:/ cond.else"); /*^block */ /*anyblock */ @@ -17070,7 +17275,7 @@ lab_endgetargs:; melt_assert_failed (("check ctybind first"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2055) ? (2055) : __LINE__, + (2057) ? (2057) : __LINE__, __FUNCTION__); ; } @@ -17086,7 +17291,7 @@ lab_endgetargs:; /*_.IFCPP___V19*/ meltfptr[17] = /*_.IFELSE___V20*/ meltfptr[19];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2055:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2057:/ clear"); /*clear *//*_#__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IFELSE___V20*/ meltfptr[19] = 0; @@ -17097,7 +17302,7 @@ lab_endgetargs:; /*_.IFCPP___V19*/ meltfptr[17] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2056:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2058:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -17123,7 +17328,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2057:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2059:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -17132,18 +17337,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2058:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2060:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2054:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2056:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2053:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2055:/ clear"); /*clear *//*_.IFCPP___V19*/ meltfptr[17] = 0; /*^clear */ /*clear *//*_.OUTPUT_C_CODE__V21*/ meltfptr[19] = 0; @@ -17157,10 +17362,10 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2060:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2062:/ quasiblock"); - MELT_LOCATION ("warmelt-outobj.melt:2062:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2064:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CTYBIND__V11*/ meltfptr[10]), 4, "CTYPE_PARCHAR"); @@ -17168,7 +17373,7 @@ lab_endgetargs:; meltfptr[17] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2063:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2065:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CTYBIND__V11*/ meltfptr[10]), 6, "CTYPE_ARGFIELD"); @@ -17176,7 +17381,7 @@ lab_endgetargs:; meltfptr[19] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2065:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2067:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_STRING__L9*/ meltfnum[7] = @@ -17186,7 +17391,7 @@ lab_endgetargs:; /*_#NOT__L10*/ meltfnum[9] = (!( /*_#IS_STRING__L9*/ meltfnum[7]));; - MELT_LOCATION ("warmelt-outobj.melt:2065:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2067:/ cond"); /*cond */ if ( /*_#NOT__L10*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -17194,7 +17399,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2067:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2069:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CTYBIND__V11*/ meltfptr[10]), 1, "NAMED_NAME"); @@ -17204,7 +17409,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2066:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2068:/ locexp"); melt_error_str ((melt_ptr_t) ( /*_.OLOC__V8*/ meltfptr[7]), ("impossible argument ctype"), (melt_ptr_t) ( /*_.NAMED_NAME__V24*/ @@ -17213,7 +17418,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2065:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2067:/ clear"); /*clear *//*_.NAMED_NAME__V24*/ meltfptr[23] = 0; } ; @@ -17221,7 +17426,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2068:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2070:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -17232,7 +17437,7 @@ lab_endgetargs:; (( /*_#RKBIND__L3*/ meltfnum[1]) - (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2069:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2071:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L11*/ meltfnum[10])); @@ -17240,7 +17445,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2070:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2072:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("] != ")); @@ -17248,7 +17453,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2071:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2073:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -17259,7 +17464,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2072:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2074:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -17268,19 +17473,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2073:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2075:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2074:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2076:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L12*/ meltfnum[11] = (( /*_.CTYBIND__V11*/ meltfptr[10]) == (( /*!CTYPE_VALUE */ meltfrout->tabval[5])));; - MELT_LOCATION ("warmelt-outobj.melt:2074:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2076:/ cond"); /*cond */ if ( /*_#__L12*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -17288,7 +17493,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2076:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2078:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -17315,7 +17520,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2077:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2079:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -17326,7 +17531,7 @@ lab_endgetargs:; (( /*_#RKBIND__L3*/ meltfnum[1]) - (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2078:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2080:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L13*/ meltfnum[12])); @@ -17334,7 +17539,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2079:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2081:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -17345,7 +17550,7 @@ lab_endgetargs:; (( /*_#RKBIND__L3*/ meltfnum[1]) - (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2080:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2082:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L14*/ meltfnum[13])); @@ -17353,7 +17558,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2081:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2083:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -17362,7 +17567,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2082:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2084:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), @@ -17371,14 +17576,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2083:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2085:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("gcc_assert(melt_discr((melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2084:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2086:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -17405,7 +17610,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2085:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2087:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -17414,19 +17619,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2086:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2088:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2075:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2077:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2074:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2076:/ clear"); /*clear *//*_.OUTPUT_C_CODE__V25*/ meltfptr[23] = 0; /*^clear */ /*clear *//*_#I__L13*/ meltfnum[12] = 0; @@ -17444,7 +17649,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2089:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2091:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -17471,7 +17676,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2090:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2092:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -17482,7 +17687,7 @@ lab_endgetargs:; (( /*_#RKBIND__L3*/ meltfnum[1]) - (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2091:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2093:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L15*/ meltfnum[12])); @@ -17490,7 +17695,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2092:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2094:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -17499,7 +17704,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2093:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2095:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -17510,19 +17715,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2094:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2096:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2088:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2090:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2074:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2076:/ clear"); /*clear *//*_.OUTPUT_C_CODE__V27*/ meltfptr[23] = 0; /*^clear */ /*clear *//*_#I__L15*/ meltfnum[12] = 0; @@ -17532,14 +17737,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2097:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2099:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2060:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2062:/ clear"); /*clear *//*_.PARC__V22*/ meltfptr[17] = 0; /*^clear */ /*clear *//*_.ARGF__V23*/ meltfptr[19] = 0; @@ -17558,7 +17763,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2099:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2101:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17569,7 +17774,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L16*/ meltfnum[13] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2100:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2102:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -17604,7 +17809,7 @@ lab_endgetargs:; /*_#I__L18*/ meltfnum[7] = (( /*_#STRBUF_USEDLENGTH__L16*/ meltfnum[13]) < ( /*_#GET_INT__L17*/ meltfnum[12]));; - MELT_LOCATION ("warmelt-outobj.melt:2099:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2101:/ cond"); /*cond */ if ( /*_#I__L18*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -17612,7 +17817,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2099:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2101:/ cond.else"); /*^block */ /*anyblock */ @@ -17626,7 +17831,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2099) ? (2099) : __LINE__, __FUNCTION__); + (2101) ? (2101) : __LINE__, __FUNCTION__); ; } ; @@ -17641,7 +17846,7 @@ lab_endgetargs:; /*_.IFCPP___V28*/ meltfptr[25] = /*_.IFELSE___V30*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2099:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2101:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L16*/ meltfnum[13] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V29*/ meltfptr[23] = 0; @@ -17662,7 +17867,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V28*/ meltfptr[25];; - MELT_LOCATION ("warmelt-outobj.melt:2043:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2045:/ clear"); /*clear *//*_.OLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.NLOC__V9*/ meltfptr[8] = 0; @@ -17684,14 +17889,26 @@ lab_endgetargs:; /*clear *//*_#I__L7*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFCPP___V28*/ meltfptr[25] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2041:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2043:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:2041:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2043:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -17787,7 +18004,7 @@ meltrout_47_warmelt_outobj_OUTPUCOD_GETARGREST (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2106:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2108:/ getarg"); /*_.GARG__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -17825,7 +18042,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2107:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2109:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17837,7 +18054,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.GARG__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJGETARGREST */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2107:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2109:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -17845,7 +18062,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2107:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2109:/ cond.else"); /*^block */ /*anyblock */ @@ -17859,7 +18076,7 @@ lab_endgetargs:; melt_assert_failed (("check garg"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2107) ? (2107) : __LINE__, __FUNCTION__); + (2109) ? (2109) : __LINE__, __FUNCTION__); ; } ; @@ -17874,7 +18091,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2107:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2109:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -17885,7 +18102,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2108:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2110:/ quasiblock"); /*^getslot */ @@ -17896,7 +18113,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2109:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2111:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GARG__V2*/ meltfptr[1]), 0, "OBI_LOC"); @@ -17904,7 +18121,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2110:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2112:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.GARG__V2*/ meltfptr[1]), 2, "OBARG_BIND"); @@ -17912,7 +18129,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2111:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2113:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -17940,7 +18157,7 @@ lab_endgetargs:; /*_#RKBIND__L3*/ meltfnum[1] = (melt_get_int ((melt_ptr_t) ( /*_.OBIND__V10*/ meltfptr[9])));; - MELT_LOCATION ("warmelt-outobj.melt:2113:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2115:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBIND__V10*/ meltfptr[9]), 1, "FBIND_TYPE"); @@ -17948,7 +18165,7 @@ lab_endgetargs:; meltfptr[11] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2114:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2116:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17961,7 +18178,7 @@ lab_endgetargs:; (union meltparam_un *) 0, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2115:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2117:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17976,7 +18193,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2117:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2119:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17988,7 +18205,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OBIND__V10*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-outobj.melt:2117:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2119:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -17996,7 +18213,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2117:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2119:/ cond.else"); /*^block */ /*anyblock */ @@ -18010,7 +18227,7 @@ lab_endgetargs:; melt_assert_failed (("check obind"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2117) ? (2117) : __LINE__, __FUNCTION__); + (2119) ? (2119) : __LINE__, __FUNCTION__); ; } ; @@ -18025,7 +18242,7 @@ lab_endgetargs:; /*_.IFCPP___V15*/ meltfptr[14] = /*_.IFELSE___V16*/ meltfptr[15];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2117:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2119:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0; @@ -18036,7 +18253,7 @@ lab_endgetargs:; /*_.IFCPP___V15*/ meltfptr[14] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2118:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2120:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -18060,7 +18277,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2119:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2121:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18072,7 +18289,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OLOC__V8*/ meltfptr[7]), (melt_ptr_t) (( /*!CLASS_OBJLOCV */ meltfrout-> tabval[5])));; - MELT_LOCATION ("warmelt-outobj.melt:2119:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2121:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -18080,7 +18297,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2119:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2121:/ cond.else"); /*^block */ /*anyblock */ @@ -18094,7 +18311,7 @@ lab_endgetargs:; melt_assert_failed (("check oloc"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2119) ? (2119) : __LINE__, __FUNCTION__); + (2121) ? (2121) : __LINE__, __FUNCTION__); ; } ; @@ -18109,7 +18326,7 @@ lab_endgetargs:; /*_.IFCPP___V18*/ meltfptr[17] = /*_.IFELSE___V19*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2119:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2121:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0; @@ -18122,7 +18339,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2120:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2122:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18134,7 +18351,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CTYBIND__V12*/ meltfptr[11]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout-> tabval[6])));; - MELT_LOCATION ("warmelt-outobj.melt:2120:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2122:/ cond"); /*cond */ if ( /*_#IS_A__L6*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -18142,7 +18359,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2120:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2122:/ cond.else"); /*^block */ /*anyblock */ @@ -18156,7 +18373,7 @@ lab_endgetargs:; melt_assert_failed (("check ctybind"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2120) ? (2120) : __LINE__, __FUNCTION__); + (2122) ? (2122) : __LINE__, __FUNCTION__); ; } ; @@ -18171,7 +18388,7 @@ lab_endgetargs:; /*_.IFCPP___V20*/ meltfptr[18] = /*_.IFELSE___V21*/ meltfptr[20];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2120:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2122:/ clear"); /*clear *//*_#IS_A__L6*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V21*/ meltfptr[20] = 0; @@ -18182,12 +18399,12 @@ lab_endgetargs:; /*_.IFCPP___V20*/ meltfptr[18] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2121:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2123:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L7*/ meltfnum[3] = (( /*_#RKBIND__L3*/ meltfnum[1]) == (0));; - MELT_LOCATION ("warmelt-outobj.melt:2121:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2123:/ cond"); /*cond */ if ( /*_#I__L7*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -18197,7 +18414,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2123:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2125:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18208,7 +18425,7 @@ lab_endgetargs:; /*_#__L8*/ meltfnum[7] = (( /*_.CTYBIND__V12*/ meltfptr[11]) == (( /*!CTYPE_VALUE */ meltfrout->tabval[7])));; - MELT_LOCATION ("warmelt-outobj.melt:2123:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2125:/ cond"); /*cond */ if ( /*_#__L8*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -18216,7 +18433,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2123:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2125:/ cond.else"); /*^block */ /*anyblock */ @@ -18230,7 +18447,7 @@ lab_endgetargs:; melt_assert_failed (("check ctybind first"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2123) ? (2123) : __LINE__, + (2125) ? (2125) : __LINE__, __FUNCTION__); ; } @@ -18246,7 +18463,7 @@ lab_endgetargs:; /*_.IFCPP___V22*/ meltfptr[20] = /*_.IFELSE___V23*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2123:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2125:/ clear"); /*clear *//*_#__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IFELSE___V23*/ meltfptr[22] = 0; @@ -18257,7 +18474,7 @@ lab_endgetargs:; /*_.IFCPP___V22*/ meltfptr[20] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2124:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2126:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -18283,7 +18500,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2125:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2127:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18292,18 +18509,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2126:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2128:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2122:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2124:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2121:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2123:/ clear"); /*clear *//*_.IFCPP___V22*/ meltfptr[20] = 0; /*^clear */ /*clear *//*_.OUTPUT_C_CODE__V24*/ meltfptr[22] = 0; @@ -18317,10 +18534,10 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2128:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2130:/ quasiblock"); - MELT_LOCATION ("warmelt-outobj.melt:2130:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2132:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CTYBIND__V12*/ meltfptr[11]), 4, "CTYPE_PARCHAR"); @@ -18328,7 +18545,7 @@ lab_endgetargs:; meltfptr[20] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2131:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2133:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CTYBIND__V12*/ meltfptr[11]), 6, "CTYPE_ARGFIELD"); @@ -18336,7 +18553,7 @@ lab_endgetargs:; meltfptr[22] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2133:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2135:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_STRING__L9*/ meltfnum[7] = @@ -18346,7 +18563,7 @@ lab_endgetargs:; /*_#NOT__L10*/ meltfnum[9] = (!( /*_#IS_STRING__L9*/ meltfnum[7]));; - MELT_LOCATION ("warmelt-outobj.melt:2133:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2135:/ cond"); /*cond */ if ( /*_#NOT__L10*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -18354,7 +18571,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2135:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2137:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CTYBIND__V12*/ meltfptr[11]), 1, "NAMED_NAME"); @@ -18364,7 +18581,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2134:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2136:/ locexp"); melt_error_str ((melt_ptr_t) ( /*_.OLOC__V8*/ meltfptr[7]), ("impossible argument ctype"), (melt_ptr_t) ( /*_.NAMED_NAME__V27*/ @@ -18373,7 +18590,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2133:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2135:/ clear"); /*clear *//*_.NAMED_NAME__V27*/ meltfptr[26] = 0; } ; @@ -18381,7 +18598,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2136:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2138:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18392,7 +18609,7 @@ lab_endgetargs:; (( /*_#RKBIND__L3*/ meltfnum[1]) - (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2137:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2139:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L11*/ meltfnum[10])); @@ -18400,7 +18617,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2138:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2140:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("] != ")); @@ -18408,7 +18625,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2139:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2141:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18419,7 +18636,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2140:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2142:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18430,7 +18647,7 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:2141:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2143:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L12*/ meltfnum[11]), 0); @@ -18438,7 +18655,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2142:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2144:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18449,7 +18666,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2143:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2145:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" = ")); @@ -18457,7 +18674,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2144:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2146:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18468,7 +18685,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2145:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2147:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); @@ -18478,7 +18695,7 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:2146:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2148:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L13*/ meltfnum[12]), 0); @@ -18486,7 +18703,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2147:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2149:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18495,7 +18712,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2148:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2150:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); @@ -18503,7 +18720,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2149:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2151:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("}")); @@ -18511,7 +18728,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2150:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2152:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); @@ -18519,7 +18736,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2151:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2153:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18530,7 +18747,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2152:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2154:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" = ")); @@ -18538,7 +18755,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2153:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2155:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#RKBIND__L3*/ meltfnum[1])); @@ -18546,7 +18763,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2154:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2156:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); @@ -18554,19 +18771,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2155:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2157:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2156:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2158:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L14*/ meltfnum[13] = (( /*_.CTYBIND__V12*/ meltfptr[11]) == (( /*!CTYPE_VALUE */ meltfrout->tabval[7])));; - MELT_LOCATION ("warmelt-outobj.melt:2156:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2158:/ cond"); /*cond */ if ( /*_#__L14*/ meltfnum[13]) /*then */ { /*^cond.then */ @@ -18574,7 +18791,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2158:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2160:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -18601,7 +18818,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2159:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2161:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18612,7 +18829,7 @@ lab_endgetargs:; (( /*_#RKBIND__L3*/ meltfnum[1]) - (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2160:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2162:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L15*/ meltfnum[14])); @@ -18620,7 +18837,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2161:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2163:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18631,7 +18848,7 @@ lab_endgetargs:; (( /*_#RKBIND__L3*/ meltfnum[1]) - (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2162:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2164:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L16*/ meltfnum[15])); @@ -18639,7 +18856,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2163:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2165:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18648,7 +18865,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2164:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2166:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), @@ -18657,14 +18874,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2165:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2167:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("gcc_assert(melt_discr((melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2166:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2168:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -18691,7 +18908,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2167:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2169:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18700,19 +18917,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2168:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2170:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2157:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2159:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2156:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2158:/ clear"); /*clear *//*_.OUTPUT_C_CODE__V28*/ meltfptr[26] = 0; /*^clear */ /*clear *//*_#I__L15*/ meltfnum[14] = 0; @@ -18730,7 +18947,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2171:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2173:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -18757,7 +18974,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2172:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2174:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18768,7 +18985,7 @@ lab_endgetargs:; (( /*_#RKBIND__L3*/ meltfnum[1]) - (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2173:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2175:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L17*/ meltfnum[14])); @@ -18776,7 +18993,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2174:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2176:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18785,7 +19002,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2175:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2177:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18796,19 +19013,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2176:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2178:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2170:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2172:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2156:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2158:/ clear"); /*clear *//*_.OUTPUT_C_CODE__V30*/ meltfptr[26] = 0; /*^clear */ /*clear *//*_#I__L17*/ meltfnum[14] = 0; @@ -18818,14 +19035,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2179:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2181:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2128:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2130:/ clear"); /*clear *//*_.PARC__V25*/ meltfptr[20] = 0; /*^clear */ /*clear *//*_.ARGF__V26*/ meltfptr[22] = 0; @@ -18848,7 +19065,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2181:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2183:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18859,7 +19076,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L18*/ meltfnum[15] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2182:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2184:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -18894,7 +19111,7 @@ lab_endgetargs:; /*_#I__L20*/ meltfnum[7] = (( /*_#STRBUF_USEDLENGTH__L18*/ meltfnum[15]) < ( /*_#GET_INT__L19*/ meltfnum[14]));; - MELT_LOCATION ("warmelt-outobj.melt:2181:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2183:/ cond"); /*cond */ if ( /*_#I__L20*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -18902,7 +19119,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2181:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2183:/ cond.else"); /*^block */ /*anyblock */ @@ -18916,7 +19133,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2181) ? (2181) : __LINE__, __FUNCTION__); + (2183) ? (2183) : __LINE__, __FUNCTION__); ; } ; @@ -18931,7 +19148,7 @@ lab_endgetargs:; /*_.IFCPP___V31*/ meltfptr[28] = /*_.IFELSE___V33*/ meltfptr[20];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2181:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2183:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L18*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V32*/ meltfptr[26] = 0; @@ -18952,7 +19169,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V31*/ meltfptr[28];; - MELT_LOCATION ("warmelt-outobj.melt:2108:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2110:/ clear"); /*clear *//*_.OLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.NLOC__V9*/ meltfptr[8] = 0; @@ -18980,14 +19197,26 @@ lab_endgetargs:; /*clear *//*_#I__L7*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFCPP___V31*/ meltfptr[28] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2106:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2108:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:2106:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2108:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19083,7 +19312,7 @@ meltrout_48_warmelt_outobj_OUTPUCOD_OBJLOCV (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2189:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2191:/ getarg"); /*_.LOCV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -19121,7 +19350,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2190:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2192:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19133,7 +19362,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.LOCV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJLOCV */ meltfrout-> tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2190:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2192:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -19141,7 +19370,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2190:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2192:/ cond.else"); /*^block */ /*anyblock */ @@ -19155,7 +19384,7 @@ lab_endgetargs:; melt_assert_failed (("check locv"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2190) ? (2190) : __LINE__, __FUNCTION__); + (2192) ? (2192) : __LINE__, __FUNCTION__); ; } ; @@ -19170,7 +19399,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2190:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2192:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -19181,10 +19410,10 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2191:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2193:/ quasiblock"); - MELT_LOCATION ("warmelt-outobj.melt:2192:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2194:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.LOCV__V2*/ meltfptr[1]), 0, "OBV_TYPE"); @@ -19192,7 +19421,7 @@ lab_endgetargs:; meltfptr[5] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2193:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2195:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.LOCV__V2*/ meltfptr[1]), 1, "OBL_OFF"); @@ -19200,7 +19429,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2194:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2196:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.LOCV__V2*/ meltfptr[1]), 3, "OBL_CNAME"); @@ -19208,13 +19437,13 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2197:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2199:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L3*/ meltfnum[1] = (( /*_.LTYP__V7*/ meltfptr[5]) == (( /*!CTYPE_VALUE */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:2197:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2199:/ cond"); /*cond */ if ( /*_#__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -19224,7 +19453,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:2198:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2200:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*_.")); @@ -19232,7 +19461,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2199:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2201:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -19243,7 +19472,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2200:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2202:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -19254,7 +19483,7 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.LOFF__V8*/ meltfptr[7])));; { - MELT_LOCATION ("warmelt-outobj.melt:2201:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2203:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L4*/ meltfnum[3])); @@ -19262,13 +19491,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2202:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2204:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("]")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2197:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2199:/ quasiblock"); /*epilog */ @@ -19285,13 +19514,13 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2203:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2205:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L5*/ meltfnum[3] = (( /*_.LTYP__V7*/ meltfptr[5]) == (( /*!CTYPE_LONG */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-outobj.melt:2203:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2205:/ cond"); /*cond */ if ( /*_#__L5*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -19301,7 +19530,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:2204:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2206:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -19310,7 +19539,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2205:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2207:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -19321,7 +19550,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2206:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2208:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -19333,7 +19562,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.LOFF__V8*/ meltfptr[7])));; { - MELT_LOCATION ("warmelt-outobj.melt:2207:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2209:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L6*/ meltfnum[5])); @@ -19341,14 +19570,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2208:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2210:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("]")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2203:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2205:/ quasiblock"); /*epilog */ @@ -19367,7 +19596,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:2210:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2212:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -19376,7 +19605,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2211:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2213:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -19385,7 +19614,7 @@ lab_endgetargs:; meltfptr[8]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:2209:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2211:/ quasiblock"); /*epilog */ @@ -19395,14 +19624,14 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2197:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2199:/ clear"); /*clear *//*_#__L5*/ meltfnum[3] = 0; } ; } ; - MELT_LOCATION ("warmelt-outobj.melt:2191:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2193:/ clear"); /*clear *//*_.LTYP__V7*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.LOFF__V8*/ meltfptr[7] = 0; @@ -19412,7 +19641,7 @@ lab_endgetargs:; /*clear *//*_#__L3*/ meltfnum[1] = 0; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2213:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2215:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19423,7 +19652,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[5] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2214:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2216:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -19458,7 +19687,7 @@ lab_endgetargs:; /*_#I__L9*/ meltfnum[1] = (( /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[5]) < ( /*_#GET_INT__L8*/ meltfnum[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2213:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2215:/ cond"); /*cond */ if ( /*_#I__L9*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -19466,7 +19695,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2213:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2215:/ cond.else"); /*^block */ /*anyblock */ @@ -19480,7 +19709,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2213) ? (2213) : __LINE__, __FUNCTION__); + (2215) ? (2215) : __LINE__, __FUNCTION__); ; } ; @@ -19495,7 +19724,7 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[5] = /*_.IFELSE___V12*/ meltfptr[8];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2213:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2215:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L7*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V11*/ meltfptr[7] = 0; @@ -19512,14 +19741,26 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[5] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2189:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2191:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V10*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:2189:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2191:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19615,7 +19856,7 @@ meltrout_49_warmelt_outobj_OUTPUCOD_OBJCLOCCV (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2220:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2222:/ getarg"); /*_.OCCV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -19653,7 +19894,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2221:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2223:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19665,7 +19906,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OCCV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJCLOCCV */ meltfrout-> tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2221:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2223:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -19673,7 +19914,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2221:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2223:/ cond.else"); /*^block */ /*anyblock */ @@ -19687,7 +19928,7 @@ lab_endgetargs:; melt_assert_failed (("check occv"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2221) ? (2221) : __LINE__, __FUNCTION__); + (2223) ? (2223) : __LINE__, __FUNCTION__); ; } ; @@ -19702,7 +19943,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2221:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2223:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -19713,7 +19954,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2222:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2224:/ quasiblock"); /*^getslot */ @@ -19724,7 +19965,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2223:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2225:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OCCV__V2*/ meltfptr[1]), 3, "OBC_NAME"); @@ -19734,7 +19975,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2224:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2226:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19742,7 +19983,7 @@ lab_endgetargs:; /*^checksignal */ MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-outobj.melt:2225:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2227:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OCCV__V2*/ meltfptr[1]), 0, "OBV_TYPE"); @@ -19753,7 +19994,7 @@ lab_endgetargs:; /*_#__L3*/ meltfnum[1] = (( /*_.OBV_TYPE__V11*/ meltfptr[10]) == (( /*!CTYPE_VALUE */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:2224:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2226:/ cond"); /*cond */ if ( /*_#__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -19761,7 +20002,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2224:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2226:/ cond.else"); /*^block */ /*anyblock */ @@ -19775,7 +20016,7 @@ lab_endgetargs:; melt_assert_failed (("check valueness of closed occurrence"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2224) ? (2224) : __LINE__, __FUNCTION__); + (2226) ? (2226) : __LINE__, __FUNCTION__); ; } ; @@ -19790,7 +20031,7 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[9] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2224:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2226:/ clear"); /*clear *//*_.OBV_TYPE__V11*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_#__L3*/ meltfnum[1] = 0; @@ -19805,7 +20046,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2226:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2228:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("(/*~")); @@ -19813,7 +20054,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2227:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2229:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -19822,7 +20063,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2228:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2230:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/ meltfclos->tabval[")); @@ -19832,14 +20073,14 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.OOFF__V8*/ meltfptr[7])));; { - MELT_LOCATION ("warmelt-outobj.melt:2229:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2231:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L4*/ meltfnum[1])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2230:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2232:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("])")); @@ -19847,7 +20088,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2231:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2233:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19858,7 +20099,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[4] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2232:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2234:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -19893,7 +20134,7 @@ lab_endgetargs:; /*_#I__L7*/ meltfnum[6] = (( /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[4]) < ( /*_#GET_INT__L6*/ meltfnum[5]));; - MELT_LOCATION ("warmelt-outobj.melt:2231:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2233:/ cond"); /*cond */ if ( /*_#I__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -19901,7 +20142,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2231:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2233:/ cond.else"); /*^block */ /*anyblock */ @@ -19915,7 +20156,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2231) ? (2231) : __LINE__, __FUNCTION__); + (2233) ? (2233) : __LINE__, __FUNCTION__); ; } ; @@ -19930,7 +20171,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[10] = /*_.IFELSE___V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2231:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2233:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L5*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V14*/ meltfptr[11] = 0; @@ -19951,7 +20192,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V13*/ meltfptr[10];; - MELT_LOCATION ("warmelt-outobj.melt:2222:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2224:/ clear"); /*clear *//*_.OOFF__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.ONAM__V9*/ meltfptr[8] = 0; @@ -19961,14 +20202,26 @@ lab_endgetargs:; /*clear *//*_#GET_INT__L4*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFCPP___V13*/ meltfptr[10] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2220:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2222:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:2220:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2222:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20064,7 +20317,7 @@ meltrout_50_warmelt_outobj_OUTPUCOD_OBJCONSTV (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2239:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2241:/ getarg"); /*_.OCNSTV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -20102,7 +20355,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2240:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2242:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20114,7 +20367,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OCNSTV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJCONSTV */ meltfrout-> tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2240:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2242:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -20122,7 +20375,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2240:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2242:/ cond.else"); /*^block */ /*anyblock */ @@ -20136,7 +20389,7 @@ lab_endgetargs:; melt_assert_failed (("check ocnstv"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2240) ? (2240) : __LINE__, __FUNCTION__); + (2242) ? (2242) : __LINE__, __FUNCTION__); ; } ; @@ -20151,7 +20404,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2240:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2242:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -20162,7 +20415,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2241:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2243:/ quasiblock"); /*^getslot */ @@ -20173,7 +20426,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2242:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2244:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OCNSTV__V2*/ meltfptr[1]), 3, "OBC_NAME"); @@ -20183,7 +20436,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2243:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2245:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20191,7 +20444,7 @@ lab_endgetargs:; /*^checksignal */ MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-outobj.melt:2244:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2246:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OCNSTV__V2*/ meltfptr[1]), 0, "OBV_TYPE"); @@ -20202,7 +20455,7 @@ lab_endgetargs:; /*_#__L3*/ meltfnum[1] = (( /*_.OBV_TYPE__V11*/ meltfptr[10]) == (( /*!CTYPE_VALUE */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:2243:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2245:/ cond"); /*cond */ if ( /*_#__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -20210,7 +20463,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2243:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2245:/ cond.else"); /*^block */ /*anyblock */ @@ -20224,7 +20477,7 @@ lab_endgetargs:; melt_assert_failed (("check valueness of const occurrence"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2243) ? (2243) : __LINE__, __FUNCTION__); + (2245) ? (2245) : __LINE__, __FUNCTION__); ; } ; @@ -20239,7 +20492,7 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[9] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2243:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2245:/ clear"); /*clear *//*_.OBV_TYPE__V11*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_#__L3*/ meltfnum[1] = 0; @@ -20254,7 +20507,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2245:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2247:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("(/*!")); @@ -20262,7 +20515,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2246:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2248:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -20271,7 +20524,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2248:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2250:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/ meltfrout->tabval[")); @@ -20281,14 +20534,14 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.OOFF__V8*/ meltfptr[7])));; { - MELT_LOCATION ("warmelt-outobj.melt:2249:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2251:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L4*/ meltfnum[1])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2250:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2252:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("])")); @@ -20296,7 +20549,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2251:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2253:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20307,7 +20560,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[4] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2252:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2254:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20342,7 +20595,7 @@ lab_endgetargs:; /*_#I__L7*/ meltfnum[6] = (( /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[4]) < ( /*_#GET_INT__L6*/ meltfnum[5]));; - MELT_LOCATION ("warmelt-outobj.melt:2251:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2253:/ cond"); /*cond */ if ( /*_#I__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -20350,7 +20603,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2251:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2253:/ cond.else"); /*^block */ /*anyblock */ @@ -20364,7 +20617,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2251) ? (2251) : __LINE__, __FUNCTION__); + (2253) ? (2253) : __LINE__, __FUNCTION__); ; } ; @@ -20379,7 +20632,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[10] = /*_.IFELSE___V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2251:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2253:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L5*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V14*/ meltfptr[11] = 0; @@ -20400,7 +20653,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V13*/ meltfptr[10];; - MELT_LOCATION ("warmelt-outobj.melt:2241:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2243:/ clear"); /*clear *//*_.OOFF__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.ONAM__V9*/ meltfptr[8] = 0; @@ -20410,14 +20663,26 @@ lab_endgetargs:; /*clear *//*_#GET_INT__L4*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFCPP___V13*/ meltfptr[10] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2239:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2241:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:2239:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2241:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20518,7 +20783,7 @@ meltrout_51_warmelt_outobj_OUTPUT_CODE_INSTRUCTIONS_LIST (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2258:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2260:/ getarg"); /*_.LIS__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -20560,7 +20825,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2259:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2261:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20573,7 +20838,7 @@ lab_endgetargs:; || (melt_unsafe_magic_discr ((melt_ptr_t) ( /*_.LIS__V2*/ meltfptr[1])) == MELTOBMAG_LIST));; - MELT_LOCATION ("warmelt-outobj.melt:2259:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2261:/ cond"); /*cond */ if ( /*_#IS_LIST_OR_NULL__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -20581,7 +20846,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2259:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2261:/ cond.else"); /*^block */ /*anyblock */ @@ -20595,7 +20860,7 @@ lab_endgetargs:; melt_assert_failed (("check lis"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2259) ? (2259) : __LINE__, __FUNCTION__); + (2261) ? (2261) : __LINE__, __FUNCTION__); ; } ; @@ -20610,7 +20875,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[5] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2259:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2261:/ clear"); /*clear *//*_#IS_LIST_OR_NULL__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -20623,7 +20888,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2260:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2262:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20634,7 +20899,7 @@ lab_endgetargs:; /*_#IS_INTEGERBOX__L2*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.BOXEDDEPTH__V5*/ meltfptr[4])) == MELTOBMAG_INT);; - MELT_LOCATION ("warmelt-outobj.melt:2260:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2262:/ cond"); /*cond */ if ( /*_#IS_INTEGERBOX__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -20642,7 +20907,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2260:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2262:/ cond.else"); /*^block */ /*anyblock */ @@ -20656,7 +20921,7 @@ lab_endgetargs:; melt_assert_failed (("check boxeddepth"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2260) ? (2260) : __LINE__, __FUNCTION__); + (2262) ? (2262) : __LINE__, __FUNCTION__); ; } ; @@ -20671,7 +20936,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = /*_.IFELSE___V9*/ meltfptr[8];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2260:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2262:/ clear"); /*clear *//*_#IS_INTEGERBOX__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V9*/ meltfptr[8] = 0; @@ -20682,14 +20947,14 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2261:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2263:/ quasiblock"); /*_#DEPTH__L3*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) ( /*_.BOXEDDEPTH__V5*/ meltfptr[4])));; { - MELT_LOCATION ("warmelt-outobj.melt:2262:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2264:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L3*/ meltfnum[0]), 0); } @@ -20708,14 +20973,14 @@ lab_endgetargs:; melt_pair_head ((melt_ptr_t) /*_.PAIR__V10*/ meltfptr[8]); - MELT_LOCATION ("warmelt-outobj.melt:2267:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2269:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L4*/ meltfnum[3] = melt_is_instance_of ((melt_ptr_t) ( /*_.CUR__V11*/ meltfptr[10]), (melt_ptr_t) (( /*!CLASS_OBJPLAINBLOCK */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2267:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2269:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -20725,14 +20990,14 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:2268:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2270:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L3*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2269:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2271:/ quasiblock"); /*^getslot */ @@ -20743,7 +21008,7 @@ lab_endgetargs:; meltfptr[13] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2270:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2272:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CUR__V11*/ meltfptr[10]), 1, "OBLO_BODYL"); @@ -20751,7 +21016,7 @@ lab_endgetargs:; meltfptr[14] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2271:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2273:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CUR__V11*/ meltfptr[10]), 2, "OBLO_EPIL"); @@ -20759,7 +21024,7 @@ lab_endgetargs:; meltfptr[15] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2273:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2275:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -20800,7 +21065,7 @@ lab_endgetargs:; /*_.OUTPUT_LOCATION__V18*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2273:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2275:/ clear"); /*clear *//*_.OUTPUT_LOCATION__V18*/ meltfptr[17] = 0; } ; @@ -20811,7 +21076,7 @@ lab_endgetargs:; /*_.IF___V17*/ meltfptr[16] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:2274:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2276:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -20856,7 +21121,7 @@ lab_endgetargs:; meltfptr[19];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2274:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2276:/ clear"); /*clear *//*_.OUTPUT_CODE_INSTRUCTIONS_LIST__V20*/ meltfptr[19] = 0; } @@ -20868,7 +21133,7 @@ lab_endgetargs:; /*_.IF___V19*/ meltfptr[17] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:2275:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2277:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -20913,7 +21178,7 @@ lab_endgetargs:; meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2275:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2277:/ clear"); /*clear *//*_.OUTPUT_CODE_INSTRUCTIONS_LIST__V22*/ meltfptr[21] = 0; } @@ -20929,7 +21194,7 @@ lab_endgetargs:; /*_.LET___V13*/ meltfptr[12] = /*_.IF___V21*/ meltfptr[19];; - MELT_LOCATION ("warmelt-outobj.melt:2269:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2271:/ clear"); /*clear *//*_.BLOC__V14*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.BODYL__V15*/ meltfptr[14] = 0; @@ -20941,7 +21206,7 @@ lab_endgetargs:; /*clear *//*_.IF___V19*/ meltfptr[17] = 0; /*^clear */ /*clear *//*_.IF___V21*/ meltfptr[19] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2267:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2269:/ quasiblock"); /*_.PROGN___V23*/ meltfptr[21] = @@ -20952,7 +21217,7 @@ lab_endgetargs:; /*_.PROGN___V23*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2267:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2269:/ clear"); /*clear *//*_.LET___V13*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.PROGN___V23*/ meltfptr[21] = 0; @@ -20966,7 +21231,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2278:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2280:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^checksignal */ @@ -20990,7 +21255,7 @@ lab_endgetargs:; /*_#IS_NOT_A__L6*/ meltfnum[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2278:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2280:/ clear"); /*clear *//*_#IS_NOT_A__L6*/ meltfnum[5] = 0; } ; @@ -21001,7 +21266,7 @@ lab_endgetargs:; /*_#IF___L5*/ meltfnum[4] = 0;; } ; - MELT_LOCATION ("warmelt-outobj.melt:2278:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2280:/ cond"); /*cond */ if ( /*_#IF___L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -21011,7 +21276,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:2279:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2281:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -21020,7 +21285,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:2280:/ checksignal"); + ("warmelt-outobj.melt:2282:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -21048,14 +21313,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2281:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2283:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2278:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2280:/ quasiblock"); /*epilog */ @@ -21077,7 +21342,7 @@ lab_endgetargs:; /*_.IFELSE___V24*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2267:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2269:/ clear"); /*clear *//*_#IF___L5*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.IFELSE___V24*/ meltfptr[13] = 0; @@ -21087,7 +21352,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2283:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2285:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21098,7 +21363,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[5] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2284:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2286:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -21133,7 +21398,7 @@ lab_endgetargs:; /*_#I__L9*/ meltfnum[8] = (( /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[5]) < ( /*_#GET_INT__L8*/ meltfnum[4]));; - MELT_LOCATION ("warmelt-outobj.melt:2283:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2285:/ cond"); /*cond */ if ( /*_#I__L9*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -21141,7 +21406,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2283:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2285:/ cond.else"); /*^block */ /*anyblock */ @@ -21155,7 +21420,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2283) ? (2283) : __LINE__, + (2285) ? (2285) : __LINE__, __FUNCTION__); ; } @@ -21171,7 +21436,7 @@ lab_endgetargs:; /*_.IFCPP___V26*/ meltfptr[15] = /*_.IFELSE___V28*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2283:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2285:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L7*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V27*/ meltfptr[16] = 0; @@ -21190,7 +21455,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2285:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2287:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21201,7 +21466,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L10*/ meltfnum[5] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]));; - MELT_LOCATION ("warmelt-outobj.melt:2286:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2288:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -21236,7 +21501,7 @@ lab_endgetargs:; /*_#I__L12*/ meltfnum[8] = (( /*_#STRBUF_USEDLENGTH__L10*/ meltfnum[5]) < ( /*_#GET_INT__L11*/ meltfnum[4]));; - MELT_LOCATION ("warmelt-outobj.melt:2285:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2287:/ cond"); /*cond */ if ( /*_#I__L12*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -21244,7 +21509,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2285:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2287:/ cond.else"); /*^block */ /*anyblock */ @@ -21258,7 +21523,7 @@ lab_endgetargs:; melt_assert_failed (("check limited declbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2285) ? (2285) : __LINE__, + (2287) ? (2287) : __LINE__, __FUNCTION__); ; } @@ -21274,7 +21539,7 @@ lab_endgetargs:; /*_.IFCPP___V29*/ meltfptr[19] = /*_.IFELSE___V31*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2285:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2287:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L10*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V30*/ meltfptr[12] = 0; @@ -21298,7 +21563,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:2263:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2265:/ clear"); /*clear *//*_.PAIR__V10*/ meltfptr[8] = 0; /*^clear */ /*clear *//*_.CUR__V11*/ meltfptr[10] = 0; @@ -21313,9 +21578,9 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-outobj.melt:2261:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2263:/ clear"); /*clear *//*_#DEPTH__L3*/ meltfnum[0] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2258:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2260:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -21412,7 +21677,7 @@ meltrout_52_warmelt_outobj_OUTPUCOD_OBJCHECKSIGNAL (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2292:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2294:/ getarg"); /*_.OBCHI__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -21450,7 +21715,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2293:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2295:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21462,7 +21727,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OBCHI__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJCHECKSIGNAL */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2293:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2295:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -21470,7 +21735,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2293:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2295:/ cond.else"); /*^block */ /*anyblock */ @@ -21484,7 +21749,7 @@ lab_endgetargs:; melt_assert_failed (("check ochi"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2293) ? (2293) : __LINE__, __FUNCTION__); + (2295) ? (2295) : __LINE__, __FUNCTION__); ; } ; @@ -21499,7 +21764,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2293:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2295:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -21510,7 +21775,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2294:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2296:/ quasiblock"); /*^getslot */ @@ -21521,7 +21786,7 @@ lab_endgetargs:; meltfptr[5] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2296:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2298:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -21559,7 +21824,7 @@ lab_endgetargs:; /*_.IF___V8*/ meltfptr[7] = /*_.OUTPUT_LOCATION__V9*/ meltfptr[8];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2296:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2298:/ clear"); /*clear *//*_.OUTPUT_LOCATION__V9*/ meltfptr[8] = 0; } ; @@ -21570,7 +21835,7 @@ lab_endgetargs:; /*_.IF___V8*/ meltfptr[7] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:2297:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2299:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21590,19 +21855,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2298:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2300:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2294:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2296:/ clear"); /*clear *//*_.OLOC__V7*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.IF___V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V10*/ meltfptr[8] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2292:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2294:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -21696,7 +21961,7 @@ meltrout_53_warmelt_outobj_OUTPUCOD_OBJANYBLOCK (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2303:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2305:/ getarg"); /*_.OBLO__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -21734,7 +21999,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2304:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2306:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21746,7 +22011,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OBLO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJANYBLOCK */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2304:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2306:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -21754,7 +22019,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2304:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2306:/ cond.else"); /*^block */ /*anyblock */ @@ -21768,7 +22033,7 @@ lab_endgetargs:; melt_assert_failed (("check oblo"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2304) ? (2304) : __LINE__, __FUNCTION__); + (2306) ? (2306) : __LINE__, __FUNCTION__); ; } ; @@ -21783,7 +22048,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2304:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2306:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -21794,7 +22059,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2305:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2307:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBLO__V2*/ meltfptr[1]), 0, "OBI_LOC"); @@ -21824,7 +22089,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2306:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2308:/ quasiblock"); /*^getslot */ @@ -21835,7 +22100,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2307:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2309:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBLO__V2*/ meltfptr[1]), 2, "OBLO_EPIL"); @@ -21853,19 +22118,19 @@ lab_endgetargs:; ( /*_#I__L3*/ meltfnum[1])));; { - MELT_LOCATION ("warmelt-outobj.melt:2310:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2312:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*anyblock*/{")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2311:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2313:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L4*/ meltfnum[3] = (melt_magic_discr ((melt_ptr_t) ( /*_.BODYL__V10*/ meltfptr[9])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:2311:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2313:/ cond"); /*cond */ if ( /*_#IS_LIST__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -21873,7 +22138,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2312:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2314:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21903,7 +22168,7 @@ lab_endgetargs:; /*_.OUTPUT_CODE_INSTRUCTIONS_LIST__V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2311:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2313:/ clear"); /*clear *//*_.OUTPUT_CODE_INSTRUCTIONS_LIST__V14*/ meltfptr[13] = 0; } ; @@ -21914,13 +22179,13 @@ lab_endgetargs:; /*_.IF___V13*/ meltfptr[12] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:2313:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2315:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L5*/ meltfnum[4] = (melt_magic_discr ((melt_ptr_t) ( /*_.EPIL__V11*/ meltfptr[10])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:2313:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2315:/ cond"); /*cond */ if ( /*_#IS_LIST__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -21933,7 +22198,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.BOXDEPTHP1__V12*/ meltfptr[11])));; { - MELT_LOCATION ("warmelt-outobj.melt:2315:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2317:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L6*/ meltfnum[5]), 0); @@ -21941,14 +22206,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2316:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2318:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*epilog*/")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2317:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2319:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21974,7 +22239,7 @@ lab_endgetargs:; ""), argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2314:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2316:/ quasiblock"); /*_.PROGN___V17*/ meltfptr[16] = @@ -21984,7 +22249,7 @@ lab_endgetargs:; /*_.IF___V15*/ meltfptr[13] = /*_.PROGN___V17*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2313:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2315:/ clear"); /*clear *//*_#GET_INT__L6*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.OUTPUT_CODE_INSTRUCTIONS_LIST__V16*/ meltfptr[15] = 0; @@ -22001,7 +22266,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2318:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2320:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("}")); @@ -22009,14 +22274,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2319:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2321:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2320:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2322:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22027,7 +22292,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[5] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2321:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2323:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22062,7 +22327,7 @@ lab_endgetargs:; /*_#I__L9*/ meltfnum[8] = (( /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[5]) < ( /*_#GET_INT__L8*/ meltfnum[7]));; - MELT_LOCATION ("warmelt-outobj.melt:2320:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2322:/ cond"); /*cond */ if ( /*_#I__L9*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -22070,7 +22335,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2320:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2322:/ cond.else"); /*^block */ /*anyblock */ @@ -22084,7 +22349,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2320) ? (2320) : __LINE__, __FUNCTION__); + (2322) ? (2322) : __LINE__, __FUNCTION__); ; } ; @@ -22099,7 +22364,7 @@ lab_endgetargs:; /*_.IFCPP___V18*/ meltfptr[15] = /*_.IFELSE___V20*/ meltfptr[19];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2320:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2322:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L7*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V19*/ meltfptr[16] = 0; @@ -22120,7 +22385,7 @@ lab_endgetargs:; /*_.LET___V9*/ meltfptr[8] = /*_.IFCPP___V18*/ meltfptr[15];; - MELT_LOCATION ("warmelt-outobj.melt:2306:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2308:/ clear"); /*clear *//*_.BODYL__V10*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.EPIL__V11*/ meltfptr[10] = 0; @@ -22138,14 +22403,26 @@ lab_endgetargs:; /*clear *//*_.IF___V15*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.IFCPP___V18*/ meltfptr[15] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2303:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2305:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V9*/ meltfptr[8];; - MELT_LOCATION ("warmelt-outobj.melt:2303:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2305:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -22250,7 +22527,7 @@ meltrout_54_warmelt_outobj_OUTPUCOD_OBJMULTIALLOCBLOCK (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2327:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2329:/ getarg"); /*_.OBLO__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -22288,7 +22565,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2328:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2330:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22300,7 +22577,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OBLO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJMULTIALLOCBLOCK */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2328:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2330:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -22308,7 +22585,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2328:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2330:/ cond.else"); /*^block */ /*anyblock */ @@ -22322,7 +22599,7 @@ lab_endgetargs:; melt_assert_failed (("check oblo"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2328) ? (2328) : __LINE__, __FUNCTION__); + (2330) ? (2330) : __LINE__, __FUNCTION__); ; } ; @@ -22337,7 +22614,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2328:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2330:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -22348,7 +22625,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2329:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2331:/ quasiblock"); /*^getslot */ @@ -22359,7 +22636,7 @@ lab_endgetargs:; meltfptr[5] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2330:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2332:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBLO__V2*/ meltfptr[1]), 3, "OMALBLO_ALLSTRUCT"); @@ -22367,7 +22644,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2331:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2333:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBLO__V2*/ meltfptr[1]), 4, "OMALBLO_NAME"); @@ -22375,7 +22652,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2332:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2334:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBLO__V2*/ meltfptr[1]), 2, "OBLO_EPIL"); @@ -22383,7 +22660,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2333:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2335:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBLO__V2*/ meltfptr[1]), 1, "OBLO_BODYL"); @@ -22399,7 +22676,7 @@ lab_endgetargs:; (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[1])), ( /*_#DEPTHP1__L3*/ meltfnum[1])));; - MELT_LOCATION ("warmelt-outobj.melt:2336:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2338:/ quasiblock"); /*_.PTRBUF__V14*/ meltfptr[13] = @@ -22409,7 +22686,7 @@ lab_endgetargs:; (const char *) 0);; { - MELT_LOCATION ("warmelt-outobj.melt:2337:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2339:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.PTRBUF__V14*/ meltfptr[13]), melt_string_str ((melt_ptr_t) @@ -22418,7 +22695,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2338:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2340:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.PTRBUF__V14*/ meltfptr[13]), ("_ptr")); @@ -22433,12 +22710,12 @@ lab_endgetargs:; /*_.LET___V13*/ meltfptr[12] = /*_.STRBUF2STRING__V15*/ meltfptr[14];; - MELT_LOCATION ("warmelt-outobj.melt:2336:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2338:/ clear"); /*clear *//*_.PTRBUF__V14*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.STRBUF2STRING__V15*/ meltfptr[14] = 0; /*_.ONAMEPTR__V16*/ meltfptr[13] = /*_.LET___V13*/ meltfptr[12];; - MELT_LOCATION ("warmelt-outobj.melt:2341:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2343:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -22462,7 +22739,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2342:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2344:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22476,7 +22753,7 @@ lab_endgetargs:; (melt_unsafe_magic_discr ((melt_ptr_t) ( /*_.OALLSTRUCT__V8*/ meltfptr[7])) == MELTOBMAG_MULTIPLE));; - MELT_LOCATION ("warmelt-outobj.melt:2342:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2344:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE_OR_NULL__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -22484,7 +22761,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2342:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2344:/ cond.else"); /*^block */ /*anyblock */ @@ -22498,7 +22775,7 @@ lab_endgetargs:; melt_assert_failed (("check oallstruct"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2342) ? (2342) : __LINE__, __FUNCTION__); + (2344) ? (2344) : __LINE__, __FUNCTION__); ; } ; @@ -22513,7 +22790,7 @@ lab_endgetargs:; /*_.IFCPP___V18*/ meltfptr[17] = /*_.IFELSE___V19*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2342:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2344:/ clear"); /*clear *//*_#IS_MULTIPLE_OR_NULL__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0; @@ -22526,7 +22803,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2343:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2345:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*multiallocblock*/{")); @@ -22534,14 +22811,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2344:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2346:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTHP1__L3*/ meltfnum[1]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2345:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2347:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("struct ")); @@ -22549,7 +22826,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2346:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2348:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -22558,7 +22835,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2347:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2349:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("_st {")); @@ -22583,7 +22860,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2351:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2353:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22596,7 +22873,7 @@ lab_endgetargs:; ( /*_.CURSTRU__V20*/ meltfptr[18]), (melt_ptr_t) (( /*!CLASS_OBJINITELEM */ meltfrout->tabval[5])));; - MELT_LOCATION ("warmelt-outobj.melt:2351:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2353:/ cond"); /*cond */ if ( /*_#IS_A__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -22604,7 +22881,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2351:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2353:/ cond.else"); /*^block */ /*anyblock */ @@ -22618,7 +22895,7 @@ lab_endgetargs:; melt_assert_failed (("check curstru"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2351) ? (2351) : __LINE__, + (2353) ? (2353) : __LINE__, __FUNCTION__); ; } @@ -22634,7 +22911,7 @@ lab_endgetargs:; /*_.IFCPP___V21*/ meltfptr[20] = /*_.IFELSE___V22*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2351:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2353:/ clear"); /*clear *//*_#IS_A__L6*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.IFELSE___V22*/ meltfptr[21] = 0; @@ -22647,13 +22924,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2352:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2354:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTHP1__L3*/ meltfnum[1]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2353:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2355:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -22673,7 +22950,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2354:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2356:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22684,7 +22961,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[5] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2355:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2357:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22719,7 +22996,7 @@ lab_endgetargs:; /*_#I__L9*/ meltfnum[8] = (( /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[5]) < ( /*_#GET_INT__L8*/ meltfnum[7]));; - MELT_LOCATION ("warmelt-outobj.melt:2354:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2356:/ cond"); /*cond */ if ( /*_#I__L9*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -22727,7 +23004,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2354:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2356:/ cond.else"); /*^block */ /*anyblock */ @@ -22741,7 +23018,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2354) ? (2354) : __LINE__, + (2356) ? (2356) : __LINE__, __FUNCTION__); ; } @@ -22757,7 +23034,7 @@ lab_endgetargs:; /*_.IFCPP___V24*/ meltfptr[23] = /*_.IFELSE___V26*/ meltfptr[25];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2354:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2356:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L7*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V25*/ meltfptr[24] = 0; @@ -22780,7 +23057,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:2348:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2350:/ clear"); /*clear *//*_.CURSTRU__V20*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_#STRIX__L5*/ meltfnum[3] = 0; @@ -22794,7 +23071,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2357:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2359:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" long ")); @@ -22802,7 +23079,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2358:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2360:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -22811,7 +23088,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2359:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2361:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("_endgap; } *")); @@ -22819,7 +23096,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2360:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2362:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -22828,7 +23105,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2361:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2363:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("_ptr = 0;")); @@ -22836,14 +23113,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2362:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2364:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTHP1__L3*/ meltfnum[1]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2363:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2365:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -22852,7 +23129,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2364:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2366:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("_ptr = (struct ")); @@ -22860,7 +23137,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2365:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2367:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -22869,7 +23146,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2366:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2368:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("_st *) meltgc_allocate (sizeof (struct ")); @@ -22877,7 +23154,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2367:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2369:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -22886,7 +23163,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2368:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2370:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("_st), 0);")); @@ -22894,12 +23171,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2369:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2371:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTHP1__L3*/ meltfnum[1]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2371:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2373:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -22938,7 +23215,7 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-outobj.melt:2375:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2377:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -22964,7 +23241,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2376:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2378:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22975,7 +23252,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L11*/ meltfnum[7] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2377:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2379:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -23010,7 +23287,7 @@ lab_endgetargs:; /*_#I__L13*/ meltfnum[12] = (( /*_#STRBUF_USEDLENGTH__L11*/ meltfnum[7]) < ( /*_#GET_INT__L12*/ meltfnum[8]));; - MELT_LOCATION ("warmelt-outobj.melt:2376:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2378:/ cond"); /*cond */ if ( /*_#I__L13*/ meltfnum[12]) /*then */ { /*^cond.then */ @@ -23018,7 +23295,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2376:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2378:/ cond.else"); /*^block */ /*anyblock */ @@ -23032,7 +23309,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2376) ? (2376) : __LINE__, + (2378) ? (2378) : __LINE__, __FUNCTION__); ; } @@ -23048,7 +23325,7 @@ lab_endgetargs:; /*_.IFCPP___V30*/ meltfptr[29] = /*_.IFELSE___V32*/ meltfptr[31];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2376:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2378:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L11*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V31*/ meltfptr[30] = 0; @@ -23067,7 +23344,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2378:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2380:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTHP1__L3*/ meltfnum[1]), 0); @@ -23079,7 +23356,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:2372:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2374:/ clear"); /*clear *//*_.CURSTRU__V28*/ meltfptr[25] = 0; /*^clear */ /*clear *//*_#STRIX__L10*/ meltfnum[5] = 0; @@ -23089,13 +23366,13 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V30*/ meltfptr[29] = 0; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-outobj.melt:2381:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2383:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L14*/ meltfnum[7] = (melt_magic_discr ((melt_ptr_t) ( /*_.BODYL__V11*/ meltfptr[10])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:2381:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2383:/ cond"); /*cond */ if ( /*_#IS_LIST__L14*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -23103,7 +23380,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2382:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2384:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23133,7 +23410,7 @@ lab_endgetargs:; /*_.OUTPUT_CODE_INSTRUCTIONS_LIST__V34*/ meltfptr[31];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2381:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2383:/ clear"); /*clear *//*_.OUTPUT_CODE_INSTRUCTIONS_LIST__V34*/ meltfptr[31] = 0; } ; @@ -23144,13 +23421,13 @@ lab_endgetargs:; /*_.IF___V33*/ meltfptr[30] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:2384:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2386:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L15*/ meltfnum[8] = (melt_magic_discr ((melt_ptr_t) ( /*_.EPIL__V10*/ meltfptr[9])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:2384:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2386:/ cond"); /*cond */ if ( /*_#IS_LIST__L15*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -23163,7 +23440,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.BOXDEPTHP1__V12*/ meltfptr[11])));; { - MELT_LOCATION ("warmelt-outobj.melt:2386:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2388:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L16*/ meltfnum[12]), 0); @@ -23171,14 +23448,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2387:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2389:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*epilog*/")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2388:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2390:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23204,7 +23481,7 @@ lab_endgetargs:; ""), argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2385:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2387:/ quasiblock"); /*_.PROGN___V37*/ meltfptr[36] = @@ -23214,7 +23491,7 @@ lab_endgetargs:; /*_.IF___V35*/ meltfptr[31] = /*_.PROGN___V37*/ meltfptr[36];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2384:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2386:/ clear"); /*clear *//*_#GET_INT__L16*/ meltfnum[12] = 0; /*^clear */ /*clear *//*_.OUTPUT_CODE_INSTRUCTIONS_LIST__V36*/ meltfptr[35] = 0; @@ -23231,7 +23508,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2390:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2392:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("} /*end multiallocblock*/")); @@ -23239,13 +23516,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2391:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2393:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2329:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2331:/ clear"); /*clear *//*_.OLOC__V7*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.OALLSTRUCT__V8*/ meltfptr[7] = 0; @@ -23279,7 +23556,7 @@ lab_endgetargs:; /*clear *//*_.IF___V35*/ meltfptr[31] = 0; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2393:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2395:/ cppif.then"); /*^block */ /*anyblock */ { @@ -23290,7 +23567,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L17*/ meltfnum[12] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2394:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2396:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -23325,7 +23602,7 @@ lab_endgetargs:; /*_#I__L19*/ meltfnum[7] = (( /*_#STRBUF_USEDLENGTH__L17*/ meltfnum[12]) < ( /*_#GET_INT__L18*/ meltfnum[1]));; - MELT_LOCATION ("warmelt-outobj.melt:2393:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2395:/ cond"); /*cond */ if ( /*_#I__L19*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -23333,7 +23610,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2393:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2395:/ cond.else"); /*^block */ /*anyblock */ @@ -23347,7 +23624,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2393) ? (2393) : __LINE__, __FUNCTION__); + (2395) ? (2395) : __LINE__, __FUNCTION__); ; } ; @@ -23362,7 +23639,7 @@ lab_endgetargs:; /*_.IFCPP___V38*/ meltfptr[35] = /*_.IFELSE___V40*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2393:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2395:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L17*/ meltfnum[12] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V39*/ meltfptr[36] = 0; @@ -23379,14 +23656,26 @@ lab_endgetargs:; /*_.IFCPP___V38*/ meltfptr[35] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2327:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2329:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V38*/ meltfptr[35];; - MELT_LOCATION ("warmelt-outobj.melt:2327:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2329:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -23483,7 +23772,7 @@ meltrout_55_warmelt_outobj_OUTPUCOD_OBJCITERBLOCK (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2399:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2401:/ getarg"); /*_.OBCIT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -23521,7 +23810,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2400:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2402:/ cppif.then"); /*^block */ /*anyblock */ { @@ -23533,7 +23822,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OBCIT__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJCITERBLOCK */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2400:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2402:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -23541,7 +23830,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2400:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2402:/ cond.else"); /*^block */ /*anyblock */ @@ -23555,7 +23844,7 @@ lab_endgetargs:; melt_assert_failed (("check obcit"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2400) ? (2400) : __LINE__, __FUNCTION__); + (2402) ? (2402) : __LINE__, __FUNCTION__); ; } ; @@ -23570,7 +23859,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2400:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2402:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -23581,7 +23870,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2401:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2403:/ quasiblock"); /*^getslot */ @@ -23592,7 +23881,7 @@ lab_endgetargs:; meltfptr[5] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2402:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2404:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBCIT__V2*/ meltfptr[1]), 1, "OBLO_BODYL"); @@ -23600,7 +23889,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2403:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2405:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBCIT__V2*/ meltfptr[1]), 2, "OBLO_EPIL"); @@ -23616,7 +23905,7 @@ lab_endgetargs:; (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[1])), ( /*_#I__L3*/ meltfnum[1])));; - MELT_LOCATION ("warmelt-outobj.melt:2405:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2407:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBCIT__V2*/ meltfptr[1]), 4, "OBCITER_BEFORE"); @@ -23624,7 +23913,7 @@ lab_endgetargs:; meltfptr[10] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2406:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2408:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBCIT__V2*/ meltfptr[1]), 5, "OBCITER_AFTER"); @@ -23632,7 +23921,7 @@ lab_endgetargs:; meltfptr[11] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2407:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2409:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBCIT__V2*/ meltfptr[1]), 3, "OBCITER_CITER"); @@ -23642,7 +23931,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2409:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2411:/ cppif.then"); /*^block */ /*anyblock */ { @@ -23654,7 +23943,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CITER__V13*/ meltfptr[12]), (melt_ptr_t) (( /*!CLASS_CITERATOR */ meltfrout-> tabval[2])));; - MELT_LOCATION ("warmelt-outobj.melt:2409:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2411:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -23662,7 +23951,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2409:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2411:/ cond.else"); /*^block */ /*anyblock */ @@ -23676,7 +23965,7 @@ lab_endgetargs:; melt_assert_failed (("check citer"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2409) ? (2409) : __LINE__, __FUNCTION__); + (2411) ? (2411) : __LINE__, __FUNCTION__); ; } ; @@ -23691,7 +23980,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[13] = /*_.IFELSE___V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2409:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2411:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0; @@ -23702,7 +23991,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[13] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2410:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2412:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23722,13 +24011,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2411:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2413:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*citerblock ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2412:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2414:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CITER__V13*/ meltfptr[12]), 1, "NAMED_NAME"); @@ -23748,7 +24037,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2413:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2415:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/ {")); @@ -23756,12 +24045,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2414:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2416:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2415:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2417:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23799,7 +24088,7 @@ lab_endgetargs:; /*_#GET_INT__L6*/ meltfnum[5] = (melt_get_int ((melt_ptr_t) ( /*_.BOXDEPTHP1__V10*/ meltfptr[9])));; - MELT_LOCATION ("warmelt-outobj.melt:2419:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2421:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -23825,7 +24114,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2420:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2422:/ cppif.then"); /*^block */ /*anyblock */ { @@ -23836,7 +24125,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2421:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2423:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -23871,7 +24160,7 @@ lab_endgetargs:; /*_#I__L9*/ meltfnum[8] = (( /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6]) < ( /*_#GET_INT__L8*/ meltfnum[7]));; - MELT_LOCATION ("warmelt-outobj.melt:2420:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2422:/ cond"); /*cond */ if ( /*_#I__L9*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -23879,7 +24168,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2420:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2422:/ cond.else"); /*^block */ /*anyblock */ @@ -23893,7 +24182,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2420) ? (2420) : __LINE__, + (2422) ? (2422) : __LINE__, __FUNCTION__); ; } @@ -23909,7 +24198,7 @@ lab_endgetargs:; /*_.IFCPP___V21*/ meltfptr[20] = /*_.IFELSE___V23*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2420:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2422:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V22*/ meltfptr[21] = 0; @@ -23932,7 +24221,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:2416:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2418:/ clear"); /*clear *//*_.OBEF__V19*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_#IX__L5*/ meltfnum[3] = 0; @@ -23946,12 +24235,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2423:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2425:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2424:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2426:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23969,13 +24258,13 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2425:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2427:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L10*/ meltfnum[6] = (melt_magic_discr ((melt_ptr_t) ( /*_.BODYL__V8*/ meltfptr[7])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:2425:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2427:/ cond"); /*cond */ if ( /*_#IS_LIST__L10*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -23983,7 +24272,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2426:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2428:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24013,7 +24302,7 @@ lab_endgetargs:; /*_.OUTPUT_CODE_INSTRUCTIONS_LIST__V26*/ meltfptr[25];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2425:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2427:/ clear"); /*clear *//*_.OUTPUT_CODE_INSTRUCTIONS_LIST__V26*/ meltfptr[25] = 0; } ; @@ -24026,12 +24315,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2427:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2429:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2428:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2430:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24068,7 +24357,7 @@ lab_endgetargs:; /*_#GET_INT__L12*/ meltfnum[8] = (melt_get_int ((melt_ptr_t) ( /*_.BOXDEPTHP1__V10*/ meltfptr[9])));; - MELT_LOCATION ("warmelt-outobj.melt:2432:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2434:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -24094,7 +24383,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2433:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2435:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24105,7 +24394,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L13*/ meltfnum[12] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2434:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2436:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -24140,7 +24429,7 @@ lab_endgetargs:; /*_#I__L15*/ meltfnum[14] = (( /*_#STRBUF_USEDLENGTH__L13*/ meltfnum[12]) < ( /*_#GET_INT__L14*/ meltfnum[13]));; - MELT_LOCATION ("warmelt-outobj.melt:2433:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2435:/ cond"); /*cond */ if ( /*_#I__L15*/ meltfnum[14]) /*then */ { /*^cond.then */ @@ -24148,7 +24437,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2433:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2435:/ cond.else"); /*^block */ /*anyblock */ @@ -24162,7 +24451,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2433) ? (2433) : __LINE__, + (2435) ? (2435) : __LINE__, __FUNCTION__); ; } @@ -24178,7 +24467,7 @@ lab_endgetargs:; /*_.IFCPP___V30*/ meltfptr[29] = /*_.IFELSE___V32*/ meltfptr[31];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2433:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2435:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L13*/ meltfnum[12] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V31*/ meltfptr[30] = 0; @@ -24201,7 +24490,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:2429:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2431:/ clear"); /*clear *//*_.OAFT__V28*/ meltfptr[27] = 0; /*^clear */ /*clear *//*_#IX__L11*/ meltfnum[7] = 0; @@ -24215,12 +24504,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2436:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2438:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2437:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2439:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24238,13 +24527,13 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2438:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2440:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L16*/ meltfnum[12] = (melt_magic_discr ((melt_ptr_t) ( /*_.EPIL__V9*/ meltfptr[8])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:2438:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2440:/ cond"); /*cond */ if ( /*_#IS_LIST__L16*/ meltfnum[12]) /*then */ { /*^cond.then */ @@ -24257,7 +24546,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.BOXDEPTHP1__V10*/ meltfptr[9])));; { - MELT_LOCATION ("warmelt-outobj.melt:2440:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2442:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L17*/ meltfnum[13]), 0); @@ -24265,14 +24554,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2441:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2443:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*citerepilog*/")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2442:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2444:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24298,7 +24587,7 @@ lab_endgetargs:; ""), argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2439:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2441:/ quasiblock"); /*_.PROGN___V36*/ meltfptr[35] = @@ -24308,7 +24597,7 @@ lab_endgetargs:; /*_.IF___V34*/ meltfptr[31] = /*_.PROGN___V36*/ meltfptr[35];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2438:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2440:/ clear"); /*clear *//*_#GET_INT__L17*/ meltfnum[13] = 0; /*^clear */ /*clear *//*_.OUTPUT_CODE_INSTRUCTIONS_LIST__V35*/ meltfptr[34] = 0; @@ -24325,13 +24614,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2443:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2445:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("} /*endciterblock ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2444:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2446:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CITER__V13*/ meltfptr[12]), 1, "NAMED_NAME"); @@ -24351,7 +24640,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2445:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2447:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/")); @@ -24359,13 +24648,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2446:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2448:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2401:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2403:/ clear"); /*clear *//*_.OLOC__V7*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.BODYL__V8*/ meltfptr[7] = 0; @@ -24407,7 +24696,7 @@ lab_endgetargs:; /*clear *//*_.NAMED_NAME__V37*/ meltfptr[34] = 0; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2448:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2450:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24418,7 +24707,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L18*/ meltfnum[14] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2449:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2451:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -24453,7 +24742,7 @@ lab_endgetargs:; /*_#I__L20*/ meltfnum[1] = (( /*_#STRBUF_USEDLENGTH__L18*/ meltfnum[14]) < ( /*_#GET_INT__L19*/ meltfnum[13]));; - MELT_LOCATION ("warmelt-outobj.melt:2448:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2450:/ cond"); /*cond */ if ( /*_#I__L20*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -24461,7 +24750,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2448:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2450:/ cond.else"); /*^block */ /*anyblock */ @@ -24475,7 +24764,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2448) ? (2448) : __LINE__, __FUNCTION__); + (2450) ? (2450) : __LINE__, __FUNCTION__); ; } ; @@ -24490,7 +24779,7 @@ lab_endgetargs:; /*_.IFCPP___V38*/ meltfptr[35] = /*_.IFELSE___V40*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2448:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2450:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L18*/ meltfnum[14] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V39*/ meltfptr[5] = 0; @@ -24507,14 +24796,26 @@ lab_endgetargs:; /*_.IFCPP___V38*/ meltfptr[35] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2399:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2401:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V38*/ meltfptr[35];; - MELT_LOCATION ("warmelt-outobj.melt:2399:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2401:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -24614,7 +24915,7 @@ meltrout_56_warmelt_outobj_OUTPUCOD_OBJCOMMENTINSTR (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2454:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2456:/ getarg"); /*_.OBCI__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -24652,7 +24953,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2455:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2457:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24664,7 +24965,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OBCI__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJCOMMENTINSTR */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2455:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2457:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -24672,7 +24973,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2455:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2457:/ cond.else"); /*^block */ /*anyblock */ @@ -24686,7 +24987,7 @@ lab_endgetargs:; melt_assert_failed (("check obci"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2455) ? (2455) : __LINE__, __FUNCTION__); + (2457) ? (2457) : __LINE__, __FUNCTION__); ; } ; @@ -24701,7 +25002,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2455:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2457:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -24712,7 +25013,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2456:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2458:/ quasiblock"); /*^getslot */ @@ -24723,7 +25024,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2457:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2459:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBCI__V2*/ meltfptr[1]), 1, "OBCI_COMMENT"); @@ -24731,7 +25032,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2458:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2460:/ quasiblock"); /*_.SBU__V11*/ meltfptr[10] = @@ -24741,7 +25042,7 @@ lab_endgetargs:; (const char *) 0);; { - MELT_LOCATION ("warmelt-outobj.melt:2459:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2461:/ locexp"); meltgc_add_strbuf_ccomment ((melt_ptr_t) ( /*_.SBU__V11*/ meltfptr[10]), melt_string_str ((melt_ptr_t) ( /*_.COMS__V9*/ @@ -24756,12 +25057,12 @@ lab_endgetargs:; /*_.LET___V10*/ meltfptr[9] = /*_.STRBUF2STRING__V12*/ meltfptr[11];; - MELT_LOCATION ("warmelt-outobj.melt:2458:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2460:/ clear"); /*clear *//*_.SBU__V11*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_.STRBUF2STRING__V12*/ meltfptr[11] = 0; /*_.COMSTR__V13*/ meltfptr[10] = /*_.LET___V10*/ meltfptr[9];; - MELT_LOCATION ("warmelt-outobj.melt:2463:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2465:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24785,7 +25086,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2464:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2466:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/**COMMENT: ")); @@ -24793,7 +25094,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2465:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2467:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -24803,7 +25104,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2466:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2468:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" **/;")); @@ -24811,14 +25112,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2467:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2469:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2468:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2470:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24829,7 +25130,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2469:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2471:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -24864,7 +25165,7 @@ lab_endgetargs:; /*_#I__L5*/ meltfnum[4] = (( /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1]) < ( /*_#GET_INT__L4*/ meltfnum[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2468:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2470:/ cond"); /*cond */ if ( /*_#I__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -24872,7 +25173,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2468:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2470:/ cond.else"); /*^block */ /*anyblock */ @@ -24886,7 +25187,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2468) ? (2468) : __LINE__, __FUNCTION__); + (2470) ? (2470) : __LINE__, __FUNCTION__); ; } ; @@ -24901,7 +25202,7 @@ lab_endgetargs:; /*_.IFCPP___V15*/ meltfptr[14] = /*_.IFELSE___V17*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2468:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2470:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V16*/ meltfptr[15] = 0; @@ -24922,7 +25223,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V15*/ meltfptr[14];; - MELT_LOCATION ("warmelt-outobj.melt:2456:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2458:/ clear"); /*clear *//*_.OLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.COMS__V9*/ meltfptr[8] = 0; @@ -24934,14 +25235,26 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_LOCATION__V14*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_.IFCPP___V15*/ meltfptr[14] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2454:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2456:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:2454:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2456:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25041,7 +25354,7 @@ meltrout_57_warmelt_outobj_OUTPUCOD_OBJCOMMENTEDBLOCK (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2475:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2477:/ getarg"); /*_.OBLO__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -25079,7 +25392,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2476:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2478:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25091,7 +25404,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OBLO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJCOMMENTEDBLOCK */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2476:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2478:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -25099,7 +25412,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2476:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2478:/ cond.else"); /*^block */ /*anyblock */ @@ -25113,7 +25426,7 @@ lab_endgetargs:; melt_assert_failed (("check oblo"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2476) ? (2476) : __LINE__, __FUNCTION__); + (2478) ? (2478) : __LINE__, __FUNCTION__); ; } ; @@ -25128,7 +25441,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2476:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2478:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -25139,7 +25452,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2477:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2479:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBLO__V2*/ meltfptr[1]), 0, "OBI_LOC"); @@ -25169,7 +25482,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2478:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2480:/ quasiblock"); /*^getslot */ @@ -25180,7 +25493,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2479:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2481:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBLO__V2*/ meltfptr[1]), 2, "OBLO_EPIL"); @@ -25196,7 +25509,7 @@ lab_endgetargs:; (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[2])), ( /*_#I__L3*/ meltfnum[1])));; - MELT_LOCATION ("warmelt-outobj.melt:2481:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2483:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBLO__V2*/ meltfptr[1]), 3, "OCOMBLO_COMMENT"); @@ -25204,7 +25517,7 @@ lab_endgetargs:; meltfptr[12] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2482:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2484:/ quasiblock"); /*_.SBU__V15*/ meltfptr[14] = @@ -25214,7 +25527,7 @@ lab_endgetargs:; (const char *) 0);; { - MELT_LOCATION ("warmelt-outobj.melt:2483:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2485:/ locexp"); meltgc_add_strbuf_ccomment ((melt_ptr_t) ( /*_.SBU__V15*/ meltfptr[14]), melt_string_str ((melt_ptr_t) ( /*_.COMS__V13*/ @@ -25229,14 +25542,14 @@ lab_endgetargs:; /*_.LET___V14*/ meltfptr[13] = /*_.STRBUF2STRING__V16*/ meltfptr[15];; - MELT_LOCATION ("warmelt-outobj.melt:2482:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2484:/ clear"); /*clear *//*_.SBU__V15*/ meltfptr[14] = 0; /*^clear */ /*clear *//*_.STRBUF2STRING__V16*/ meltfptr[15] = 0; /*_.COMSTR__V17*/ meltfptr[14] = /*_.LET___V14*/ meltfptr[13];; { - MELT_LOCATION ("warmelt-outobj.melt:2487:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2489:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*com.block:")); @@ -25244,7 +25557,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2488:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2490:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -25254,19 +25567,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2489:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2491:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/{")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2490:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2492:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L4*/ meltfnum[3] = (melt_magic_discr ((melt_ptr_t) ( /*_.BODYL__V10*/ meltfptr[9])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:2490:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2492:/ cond"); /*cond */ if ( /*_#IS_LIST__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -25274,7 +25587,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2491:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2493:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -25304,7 +25617,7 @@ lab_endgetargs:; /*_.OUTPUT_CODE_INSTRUCTIONS_LIST__V19*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2490:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2492:/ clear"); /*clear *//*_.OUTPUT_CODE_INSTRUCTIONS_LIST__V19*/ meltfptr[18] = 0; } ; @@ -25315,13 +25628,13 @@ lab_endgetargs:; /*_.IF___V18*/ meltfptr[15] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:2492:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2494:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L5*/ meltfnum[4] = (melt_magic_discr ((melt_ptr_t) ( /*_.EPIL__V11*/ meltfptr[10])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:2492:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2494:/ cond"); /*cond */ if ( /*_#IS_LIST__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -25334,7 +25647,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.BOXDEPTHP1__V12*/ meltfptr[11])));; { - MELT_LOCATION ("warmelt-outobj.melt:2494:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2496:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L6*/ meltfnum[5]), 0); @@ -25342,7 +25655,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2495:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2497:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -25351,7 +25664,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2496:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2498:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -25362,13 +25675,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2497:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2499:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2498:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2500:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -25394,7 +25707,7 @@ lab_endgetargs:; ""), argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2493:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2495:/ quasiblock"); /*_.PROGN___V22*/ meltfptr[21] = @@ -25404,7 +25717,7 @@ lab_endgetargs:; /*_.IF___V20*/ meltfptr[18] = /*_.PROGN___V22*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2492:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2494:/ clear"); /*clear *//*_#GET_INT__L6*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.OUTPUT_CODE_INSTRUCTIONS_LIST__V21*/ meltfptr[20] = 0; @@ -25421,7 +25734,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2499:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2501:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("}")); @@ -25429,7 +25742,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2500:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2502:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*com.end block:")); @@ -25437,7 +25750,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2501:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2503:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -25447,7 +25760,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2502:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2504:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/")); @@ -25455,14 +25768,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2503:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2505:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2504:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2506:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25473,7 +25786,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[5] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2505:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2507:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -25508,7 +25821,7 @@ lab_endgetargs:; /*_#I__L9*/ meltfnum[8] = (( /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[5]) < ( /*_#GET_INT__L8*/ meltfnum[7]));; - MELT_LOCATION ("warmelt-outobj.melt:2504:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2506:/ cond"); /*cond */ if ( /*_#I__L9*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -25516,7 +25829,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2504:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2506:/ cond.else"); /*^block */ /*anyblock */ @@ -25530,7 +25843,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2504) ? (2504) : __LINE__, __FUNCTION__); + (2506) ? (2506) : __LINE__, __FUNCTION__); ; } ; @@ -25545,7 +25858,7 @@ lab_endgetargs:; /*_.IFCPP___V23*/ meltfptr[20] = /*_.IFELSE___V25*/ meltfptr[24];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2504:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2506:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L7*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V24*/ meltfptr[21] = 0; @@ -25566,7 +25879,7 @@ lab_endgetargs:; /*_.LET___V9*/ meltfptr[8] = /*_.IFCPP___V23*/ meltfptr[20];; - MELT_LOCATION ("warmelt-outobj.melt:2478:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2480:/ clear"); /*clear *//*_.BODYL__V10*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.EPIL__V11*/ meltfptr[10] = 0; @@ -25590,14 +25903,26 @@ lab_endgetargs:; /*clear *//*_.IF___V20*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_.IFCPP___V23*/ meltfptr[20] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2475:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2477:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V9*/ meltfptr[8];; - MELT_LOCATION ("warmelt-outobj.melt:2475:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2477:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25698,7 +26023,7 @@ meltrout_58_warmelt_outobj_OUTPUCOD_OBJLABELINSTR (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2513:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2515:/ getarg"); /*_.OBLAB__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -25736,7 +26061,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2514:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2516:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25748,7 +26073,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OBLAB__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJLABELINSTR */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2514:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2516:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -25756,7 +26081,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2514:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2516:/ cond.else"); /*^block */ /*anyblock */ @@ -25770,7 +26095,7 @@ lab_endgetargs:; melt_assert_failed (("check oblab"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2514) ? (2514) : __LINE__, __FUNCTION__); + (2516) ? (2516) : __LINE__, __FUNCTION__); ; } ; @@ -25785,7 +26110,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2514:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2516:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -25798,20 +26123,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2515:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2517:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2516:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2518:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*objlabel*/ ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2517:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2519:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBLAB__V2*/ meltfptr[1]), 1, "OBLAB_PREFIX"); @@ -25829,7 +26154,7 @@ lab_endgetargs:; meltfptr[5]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:2518:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2520:/ quasiblock"); /*^getslot */ @@ -25840,7 +26165,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2519:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2521:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -25851,7 +26176,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2520:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2522:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBLAB__V2*/ meltfptr[1]), 2, "OBLAB_RANK"); @@ -25864,7 +26189,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.OBLAB_RANK__V9*/ meltfptr[8])));; { - MELT_LOCATION ("warmelt-outobj.melt:2520:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2522:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L3*/ meltfnum[1])); @@ -25872,7 +26197,7 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2519:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2521:/ clear"); /*clear *//*_.OBLAB_RANK__V9*/ meltfptr[8] = 0; /*^clear */ /*clear *//*_#GET_INT__L3*/ meltfnum[1] = 0; @@ -25881,11 +26206,11 @@ lab_endgetargs:; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:2518:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2520:/ clear"); /*clear *//*_.OBRANK__V8*/ meltfptr[7] = 0; { - MELT_LOCATION ("warmelt-outobj.melt:2521:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2523:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (": ;")); @@ -25893,14 +26218,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2522:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2524:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2523:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2525:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25911,7 +26236,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2524:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2526:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -25946,7 +26271,7 @@ lab_endgetargs:; /*_#I__L6*/ meltfnum[5] = (( /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1]) < ( /*_#GET_INT__L5*/ meltfnum[4]));; - MELT_LOCATION ("warmelt-outobj.melt:2523:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2525:/ cond"); /*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -25954,7 +26279,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2523:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2525:/ cond.else"); /*^block */ /*anyblock */ @@ -25968,7 +26293,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2523) ? (2523) : __LINE__, __FUNCTION__); + (2525) ? (2525) : __LINE__, __FUNCTION__); ; } ; @@ -25983,7 +26308,7 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[8] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2523:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2525:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V11*/ meltfptr[7] = 0; @@ -26000,7 +26325,7 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[8] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2525:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2527:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBLAB__V2*/ meltfptr[1]), 0, "OBI_LOC"); @@ -26030,14 +26355,26 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2513:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2515:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.OUTPUT_LOCATION__V14*/ meltfptr[11];; - MELT_LOCATION ("warmelt-outobj.melt:2513:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2515:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -26140,7 +26477,7 @@ meltrout_59_warmelt_outobj_OUTPUCOD_OBJGOTOINSTR (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2532:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2534:/ getarg"); /*_.OBGOTO__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -26178,7 +26515,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2533:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2535:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26190,7 +26527,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OBGOTO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJGOTOINSTR */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2533:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2535:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -26198,7 +26535,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2533:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2535:/ cond.else"); /*^block */ /*anyblock */ @@ -26212,7 +26549,7 @@ lab_endgetargs:; melt_assert_failed (("check obgoto"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2533) ? (2533) : __LINE__, __FUNCTION__); + (2535) ? (2535) : __LINE__, __FUNCTION__); ; } ; @@ -26227,7 +26564,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2533:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2535:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -26238,7 +26575,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2534:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2536:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBGOTO__V2*/ meltfptr[1]), 0, "OBI_LOC"); @@ -26270,13 +26607,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2535:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2537:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*objgoto*/ goto ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2536:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2538:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBGOTO__V2*/ meltfptr[1]), 1, "OBGOTO_PREFIX"); @@ -26294,7 +26631,7 @@ lab_endgetargs:; meltfptr[8]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:2537:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2539:/ quasiblock"); /*^getslot */ @@ -26305,7 +26642,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2538:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2540:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -26320,7 +26657,7 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.OBRANK__V10*/ meltfptr[9])));; { - MELT_LOCATION ("warmelt-outobj.melt:2539:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2541:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L3*/ meltfnum[1])); @@ -26328,18 +26665,18 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2538:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2540:/ clear"); /*clear *//*_#GET_INT__L3*/ meltfnum[1] = 0; } ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:2537:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2539:/ clear"); /*clear *//*_.OBRANK__V10*/ meltfptr[9] = 0; { - MELT_LOCATION ("warmelt-outobj.melt:2540:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2542:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); @@ -26347,14 +26684,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2541:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2543:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2542:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2544:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26365,7 +26702,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2543:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2545:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -26400,7 +26737,7 @@ lab_endgetargs:; /*_#I__L6*/ meltfnum[5] = (( /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1]) < ( /*_#GET_INT__L5*/ meltfnum[4]));; - MELT_LOCATION ("warmelt-outobj.melt:2542:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2544:/ cond"); /*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -26408,7 +26745,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2542:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2544:/ cond.else"); /*^block */ /*anyblock */ @@ -26422,7 +26759,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2542) ? (2542) : __LINE__, __FUNCTION__); + (2544) ? (2544) : __LINE__, __FUNCTION__); ; } ; @@ -26437,7 +26774,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[9] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2542:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2544:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V12*/ meltfptr[11] = 0; @@ -26454,14 +26791,26 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[9] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2532:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2534:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V11*/ meltfptr[9];; - MELT_LOCATION ("warmelt-outobj.melt:2532:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2534:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-outobj+03.c b/gcc/melt/generated/warmelt-outobj+03.c index d1619de2ef9..db8f4288cf1 100644 --- a/gcc/melt/generated/warmelt-outobj+03.c +++ b/gcc/melt/generated/warmelt-outobj+03.c @@ -2284,7 +2284,7 @@ meltrout_60_warmelt_outobj_ADD2SBUF_CLONSYM (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2549:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2551:/ getarg"); /*_.SBUF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -2305,7 +2305,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2550:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2552:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2316,7 +2316,7 @@ lab_endgetargs:; /*_#IS_STRBUF__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1])) == MELTOBMAG_STRBUF);; - MELT_LOCATION ("warmelt-outobj.melt:2550:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2552:/ cond"); /*cond */ if ( /*_#IS_STRBUF__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -2324,7 +2324,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2550:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2552:/ cond.else"); /*^block */ /*anyblock */ @@ -2338,7 +2338,7 @@ lab_endgetargs:; melt_assert_failed (("check sbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2550) ? (2550) : __LINE__, __FUNCTION__); + (2552) ? (2552) : __LINE__, __FUNCTION__); ; } ; @@ -2353,7 +2353,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2550:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2552:/ clear"); /*clear *//*_#IS_STRBUF__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -2366,7 +2366,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2551:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2553:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2378,7 +2378,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CSY__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2551:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2553:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -2386,7 +2386,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2551:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2553:/ cond.else"); /*^block */ /*anyblock */ @@ -2400,7 +2400,7 @@ lab_endgetargs:; melt_assert_failed (("check csy"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2551) ? (2551) : __LINE__, __FUNCTION__); + (2553) ? (2553) : __LINE__, __FUNCTION__); ; } ; @@ -2415,7 +2415,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2551:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2553:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V7*/ meltfptr[6] = 0; @@ -2426,7 +2426,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2552:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2554:/ quasiblock"); /*^getslot */ @@ -2437,7 +2437,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2553:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2555:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CSY__V3*/ meltfptr[2]), 3, "CSYM_URANK"); @@ -2449,7 +2449,7 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.CSYM_URANK__V10*/ meltfptr[9])));; { - MELT_LOCATION ("warmelt-outobj.melt:2554:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2556:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), melt_string_str ((melt_ptr_t) ( /*_.CNAM__V9*/ @@ -2458,21 +2458,21 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2555:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2557:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), ("_")); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2556:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2558:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), ( /*_#RK__L3*/ meltfnum[0])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2557:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2559:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2482,7 +2482,7 @@ lab_endgetargs:; ; /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[3] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]));; - MELT_LOCATION ("warmelt-outobj.melt:2558:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2560:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -2517,7 +2517,7 @@ lab_endgetargs:; /*_#I__L6*/ meltfnum[5] = (( /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[3]) < ( /*_#GET_INT__L5*/ meltfnum[4]));; - MELT_LOCATION ("warmelt-outobj.melt:2557:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2559:/ cond"); /*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -2525,7 +2525,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2557:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2559:/ cond.else"); /*^block */ /*anyblock */ @@ -2539,7 +2539,7 @@ lab_endgetargs:; melt_assert_failed (("check limited sbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2557) ? (2557) : __LINE__, __FUNCTION__); + (2559) ? (2559) : __LINE__, __FUNCTION__); ; } ; @@ -2554,7 +2554,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[10] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2557:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2559:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V12*/ meltfptr[11] = 0; @@ -2575,7 +2575,7 @@ lab_endgetargs:; /*_.LET___V8*/ meltfptr[6] = /*_.IFCPP___V11*/ meltfptr[10];; - MELT_LOCATION ("warmelt-outobj.melt:2552:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2554:/ clear"); /*clear *//*_.CNAM__V9*/ meltfptr[8] = 0; /*^clear */ /*clear *//*_.CSYM_URANK__V10*/ meltfptr[9] = 0; @@ -2583,14 +2583,26 @@ lab_endgetargs:; /*clear *//*_#RK__L3*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFCPP___V11*/ meltfptr[10] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2549:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2551:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; - MELT_LOCATION ("warmelt-outobj.melt:2549:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2551:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -2688,7 +2700,7 @@ meltrout_61_warmelt_outobj_OUTPUCOD_OBJLOOP (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2562:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ getarg"); /*_.OBLO__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -2726,7 +2738,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2563:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2565:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2738,7 +2750,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OBLO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJLOOP */ meltfrout-> tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2563:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2565:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -2746,7 +2758,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2563:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2565:/ cond.else"); /*^block */ /*anyblock */ @@ -2760,7 +2772,7 @@ lab_endgetargs:; melt_assert_failed (("check oblo"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2563) ? (2563) : __LINE__, __FUNCTION__); + (2565) ? (2565) : __LINE__, __FUNCTION__); ; } ; @@ -2775,7 +2787,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2563:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2565:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -2786,7 +2798,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2564:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2566:/ quasiblock"); /*^getslot */ @@ -2797,7 +2809,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2565:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2567:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBLO__V2*/ meltfptr[1]), 2, "OBLO_EPIL"); @@ -2805,7 +2817,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2566:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2568:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBLO__V2*/ meltfptr[1]), 3, "OBLOOP_LABEL"); @@ -2813,7 +2825,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2567:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2569:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBLO__V2*/ meltfptr[1]), 0, "OBI_LOC"); @@ -2831,7 +2843,7 @@ lab_endgetargs:; ( /*_#I__L3*/ meltfnum[1])));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2570:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2572:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2843,7 +2855,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.LAB__V10*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-outobj.melt:2570:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2572:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -2851,7 +2863,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2570:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2572:/ cond.else"); /*^block */ /*anyblock */ @@ -2865,7 +2877,7 @@ lab_endgetargs:; melt_assert_failed (("check lab"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2570) ? (2570) : __LINE__, __FUNCTION__); + (2572) ? (2572) : __LINE__, __FUNCTION__); ; } ; @@ -2880,7 +2892,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2570:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2572:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -2891,7 +2903,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2571:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2573:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -2915,13 +2927,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2572:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2574:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*loop*/{ labloop_")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2573:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2575:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -2941,19 +2953,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2574:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2576:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (":;")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2575:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2577:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L5*/ meltfnum[3] = (melt_magic_discr ((melt_ptr_t) ( /*_.BODYL__V8*/ meltfptr[7])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:2575:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2577:/ cond"); /*cond */ if ( /*_#IS_LIST__L5*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -2961,7 +2973,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2577:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2579:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -2989,13 +3001,13 @@ lab_endgetargs:; (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2578:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2580:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L6*/ meltfnum[5]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2581:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2583:/ quasiblock"); /*^newclosure */ @@ -3054,7 +3066,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]); ; /*_.LAMBDA___V19*/ meltfptr[18] = /*_.LAMBDA___V20*/ meltfptr[19];; - MELT_LOCATION ("warmelt-outobj.melt:2579:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2581:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3073,7 +3085,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2576:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2578:/ quasiblock"); /*_.PROGN___V22*/ meltfptr[21] = @@ -3083,7 +3095,7 @@ lab_endgetargs:; /*_.IF___V17*/ meltfptr[16] = /*_.PROGN___V22*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2575:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2577:/ clear"); /*clear *//*_.OUTPUT_LOCATION__V18*/ meltfptr[17] = 0; /*^clear */ /*clear *//*_#I__L6*/ meltfnum[5] = 0; @@ -3104,7 +3116,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2587:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2589:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); @@ -3114,20 +3126,20 @@ lab_endgetargs:; (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2588:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2590:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L7*/ meltfnum[5]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2589:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2591:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" goto labloop_")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2590:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2592:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3147,7 +3159,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2591:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2593:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); @@ -3157,20 +3169,20 @@ lab_endgetargs:; (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2592:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2594:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L8*/ meltfnum[7]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2593:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2595:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" labexit_")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2594:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2596:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3190,19 +3202,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2595:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2597:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (":;")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2596:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2598:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L9*/ meltfnum[8] = (melt_magic_discr ((melt_ptr_t) ( /*_.EPIL__V9*/ meltfptr[8])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:2596:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2598:/ cond"); /*cond */ if ( /*_#IS_LIST__L9*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -3210,7 +3222,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2598:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2600:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3236,7 +3248,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2599:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2601:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -3247,13 +3259,13 @@ lab_endgetargs:; (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2600:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2602:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L10*/ meltfnum[9]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2603:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2605:/ quasiblock"); /*^newclosure */ @@ -3312,7 +3324,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]); ; /*_.LAMBDA___V27*/ meltfptr[26] = /*_.LAMBDA___V28*/ meltfptr[27];; - MELT_LOCATION ("warmelt-outobj.melt:2601:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2603:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3331,7 +3343,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2597:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2599:/ quasiblock"); /*_.PROGN___V30*/ meltfptr[29] = @@ -3341,7 +3353,7 @@ lab_endgetargs:; /*_.IF___V25*/ meltfptr[20] = /*_.PROGN___V30*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2596:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2598:/ clear"); /*clear *//*_.OUTPUT_LOCATION__V26*/ meltfptr[21] = 0; /*^clear */ /*clear *//*_#I__L10*/ meltfnum[9] = 0; @@ -3362,7 +3374,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2611:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2613:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("}")); @@ -3370,14 +3382,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2612:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2614:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2613:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2615:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3388,7 +3400,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L11*/ meltfnum[9] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2614:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2616:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -3423,7 +3435,7 @@ lab_endgetargs:; /*_#I__L13*/ meltfnum[12] = (( /*_#STRBUF_USEDLENGTH__L11*/ meltfnum[9]) < ( /*_#GET_INT__L12*/ meltfnum[11]));; - MELT_LOCATION ("warmelt-outobj.melt:2613:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2615:/ cond"); /*cond */ if ( /*_#I__L13*/ meltfnum[12]) /*then */ { /*^cond.then */ @@ -3431,7 +3443,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2613:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2615:/ cond.else"); /*^block */ /*anyblock */ @@ -3445,7 +3457,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2613) ? (2613) : __LINE__, __FUNCTION__); + (2615) ? (2615) : __LINE__, __FUNCTION__); ; } ; @@ -3460,7 +3472,7 @@ lab_endgetargs:; /*_.IFCPP___V31*/ meltfptr[21] = /*_.IFELSE___V33*/ meltfptr[28];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2613:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2615:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L11*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V32*/ meltfptr[26] = 0; @@ -3481,7 +3493,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V31*/ meltfptr[21];; - MELT_LOCATION ("warmelt-outobj.melt:2564:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2566:/ clear"); /*clear *//*_.BODYL__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.EPIL__V9*/ meltfptr[8] = 0; @@ -3517,14 +3529,26 @@ lab_endgetargs:; /*clear *//*_.IF___V25*/ meltfptr[20] = 0; /*^clear */ /*clear *//*_.IFCPP___V31*/ meltfptr[21] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2562:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:2562:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2564:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3617,7 +3641,7 @@ meltrout_62_warmelt_outobj_LAMBDA___6__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2581:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2583:/ getarg"); /*_.CURBODY__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -3627,13 +3651,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-outobj.melt:2582:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2584:/ quasiblock"); /*_#DEPTHP1__L1*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[0]))));; - MELT_LOCATION ("warmelt-outobj.melt:2583:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2585:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^checksignal */ @@ -3661,7 +3685,7 @@ lab_endgetargs:; /*_#IF___L2*/ meltfnum[1] = /*_#NOT__L4*/ meltfnum[3];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2583:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2585:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_#NOT__L4*/ meltfnum[3] = 0; @@ -3674,7 +3698,7 @@ lab_endgetargs:; /*_#IF___L2*/ meltfnum[1] = 0;; } ; - MELT_LOCATION ("warmelt-outobj.melt:2583:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2585:/ cond"); /*cond */ if ( /*_#IF___L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -3682,7 +3706,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2584:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2586:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -3709,7 +3733,7 @@ lab_endgetargs:; /*_.IF___V3*/ meltfptr[2] = /*_.OUTPUT_C_CODE__V4*/ meltfptr[3];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2583:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2585:/ clear"); /*clear *//*_.OUTPUT_C_CODE__V4*/ meltfptr[3] = 0; } ; @@ -3722,7 +3746,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2585:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2587:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[2])), (";")); @@ -3730,14 +3754,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2586:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2588:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[2])), ( /*_#DEPTHP1__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2582:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2584:/ clear"); /*clear *//*_#DEPTHP1__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_#IF___L2*/ meltfnum[1] = 0; @@ -3828,7 +3852,7 @@ meltrout_63_warmelt_outobj_LAMBDA___7__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2603:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2605:/ getarg"); /*_.CUREPIL__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -3838,13 +3862,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-outobj.melt:2604:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2606:/ quasiblock"); /*_#DEPTHP1__L1*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[0]))));; - MELT_LOCATION ("warmelt-outobj.melt:2605:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2607:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^checksignal */ @@ -3872,7 +3896,7 @@ lab_endgetargs:; /*_#IF___L2*/ meltfnum[1] = /*_#NOT__L4*/ meltfnum[3];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2605:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2607:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_#NOT__L4*/ meltfnum[3] = 0; @@ -3885,7 +3909,7 @@ lab_endgetargs:; /*_#IF___L2*/ meltfnum[1] = 0;; } ; - MELT_LOCATION ("warmelt-outobj.melt:2605:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2607:/ cond"); /*cond */ if ( /*_#IF___L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -3893,7 +3917,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2606:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2608:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -3920,7 +3944,7 @@ lab_endgetargs:; /*_.IF___V3*/ meltfptr[2] = /*_.OUTPUT_C_CODE__V4*/ meltfptr[3];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2605:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2607:/ clear"); /*clear *//*_.OUTPUT_C_CODE__V4*/ meltfptr[3] = 0; } ; @@ -3933,7 +3957,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2607:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2609:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[2])), (";")); @@ -3941,7 +3965,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2608:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2610:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3952,7 +3976,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[2] = melt_strbuf_usedlength ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[2])));; - MELT_LOCATION ("warmelt-outobj.melt:2609:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2611:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -3987,7 +4011,7 @@ lab_endgetargs:; /*_#I__L7*/ meltfnum[6] = (( /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[2]) < ( /*_#GET_INT__L6*/ meltfnum[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2608:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2610:/ cond"); /*cond */ if ( /*_#I__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -3995,7 +4019,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2608:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2610:/ cond.else"); /*^block */ /*anyblock */ @@ -4009,7 +4033,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2608) ? (2608) : __LINE__, __FUNCTION__); + (2610) ? (2610) : __LINE__, __FUNCTION__); ; } ; @@ -4024,7 +4048,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[3] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2608:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2610:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L5*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V6*/ meltfptr[5] = 0; @@ -4043,14 +4067,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2610:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2612:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[2])), ( /*_#DEPTHP1__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2604:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2606:/ clear"); /*clear *//*_#DEPTHP1__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_#IF___L2*/ meltfnum[1] = 0; @@ -4146,7 +4170,7 @@ meltrout_64_warmelt_outobj_OUTPUCOD_OBJEXIT (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2621:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2623:/ getarg"); /*_.OBXI__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -4184,7 +4208,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2622:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2624:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4196,7 +4220,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OBXI__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJEXIT */ meltfrout-> tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2622:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2624:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -4204,7 +4228,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2622:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2624:/ cond.else"); /*^block */ /*anyblock */ @@ -4218,7 +4242,7 @@ lab_endgetargs:; melt_assert_failed (("check obxi"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2622) ? (2622) : __LINE__, __FUNCTION__); + (2624) ? (2624) : __LINE__, __FUNCTION__); ; } ; @@ -4233,7 +4257,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2622:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2624:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -4244,7 +4268,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2623:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2625:/ quasiblock"); /*^getslot */ @@ -4255,7 +4279,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2624:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2626:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBXI__V2*/ meltfptr[1]), 0, "OBI_LOC"); @@ -4265,7 +4289,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2626:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2628:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4277,7 +4301,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OLAB__V8*/ meltfptr[7]), (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:2626:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2628:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -4285,7 +4309,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2626:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2628:/ cond.else"); /*^block */ /*anyblock */ @@ -4299,7 +4323,7 @@ lab_endgetargs:; melt_assert_failed (("check olab"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2626) ? (2626) : __LINE__, __FUNCTION__); + (2628) ? (2628) : __LINE__, __FUNCTION__); ; } ; @@ -4314,7 +4338,7 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[9] = /*_.IFELSE___V11*/ meltfptr[10];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2626:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2628:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0; @@ -4325,7 +4349,7 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[9] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2627:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2629:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -4349,7 +4373,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2628:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2630:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*exit*/{")); @@ -4357,20 +4381,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2629:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2631:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2630:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2632:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" goto labexit_")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2631:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2633:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -4390,7 +4414,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2632:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2634:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";}")); @@ -4398,14 +4422,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2633:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2635:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2634:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2636:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4416,7 +4440,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2635:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2637:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -4451,7 +4475,7 @@ lab_endgetargs:; /*_#I__L6*/ meltfnum[5] = (( /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1]) < ( /*_#GET_INT__L5*/ meltfnum[4]));; - MELT_LOCATION ("warmelt-outobj.melt:2634:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2636:/ cond"); /*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -4459,7 +4483,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2634:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2636:/ cond.else"); /*^block */ /*anyblock */ @@ -4473,7 +4497,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2634) ? (2634) : __LINE__, __FUNCTION__); + (2636) ? (2636) : __LINE__, __FUNCTION__); ; } ; @@ -4488,7 +4512,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[13] = /*_.IFELSE___V16*/ meltfptr[15];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2634:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2636:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V15*/ meltfptr[14] = 0; @@ -4509,7 +4533,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V14*/ meltfptr[13];; - MELT_LOCATION ("warmelt-outobj.melt:2623:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2625:/ clear"); /*clear *//*_.OLAB__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.LOC__V9*/ meltfptr[8] = 0; @@ -4521,14 +4545,26 @@ lab_endgetargs:; /*clear *//*_.ADD2SBUF_CLONSYM__V13*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.IFCPP___V14*/ meltfptr[13] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2621:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2623:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:2621:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2623:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4624,7 +4660,7 @@ meltrout_65_warmelt_outobj_OUTPUCOD_OBJAGAIN (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2641:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2643:/ getarg"); /*_.OBAG__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -4662,7 +4698,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2642:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2644:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4674,7 +4710,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OBAG__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJAGAIN */ meltfrout-> tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2642:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2644:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -4682,7 +4718,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2642:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2644:/ cond.else"); /*^block */ /*anyblock */ @@ -4696,7 +4732,7 @@ lab_endgetargs:; melt_assert_failed (("check obag"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2642) ? (2642) : __LINE__, __FUNCTION__); + (2644) ? (2644) : __LINE__, __FUNCTION__); ; } ; @@ -4711,7 +4747,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2642:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2644:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -4722,7 +4758,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2643:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2645:/ quasiblock"); /*^getslot */ @@ -4733,7 +4769,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2644:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2646:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBAG__V2*/ meltfptr[1]), 0, "OBI_LOC"); @@ -4743,7 +4779,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2646:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2648:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4755,7 +4791,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OLAB__V8*/ meltfptr[7]), (melt_ptr_t) (( /*!CLASS_CLONED_SYMBOL */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:2646:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2648:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -4763,7 +4799,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2646:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2648:/ cond.else"); /*^block */ /*anyblock */ @@ -4777,7 +4813,7 @@ lab_endgetargs:; melt_assert_failed (("check olab"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2646) ? (2646) : __LINE__, __FUNCTION__); + (2648) ? (2648) : __LINE__, __FUNCTION__); ; } ; @@ -4792,7 +4828,7 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[9] = /*_.IFELSE___V11*/ meltfptr[10];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2646:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2648:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V11*/ meltfptr[10] = 0; @@ -4803,7 +4839,7 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[9] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2647:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2649:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -4827,7 +4863,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2648:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2650:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*again*/{")); @@ -4835,20 +4871,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2649:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2651:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2650:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2652:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" goto labloop_")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2651:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2653:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -4868,7 +4904,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2652:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2654:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";}")); @@ -4876,14 +4912,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2653:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2655:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2654:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2656:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4894,7 +4930,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2655:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2657:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -4929,7 +4965,7 @@ lab_endgetargs:; /*_#I__L6*/ meltfnum[5] = (( /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1]) < ( /*_#GET_INT__L5*/ meltfnum[4]));; - MELT_LOCATION ("warmelt-outobj.melt:2654:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2656:/ cond"); /*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -4937,7 +4973,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2654:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2656:/ cond.else"); /*^block */ /*anyblock */ @@ -4951,7 +4987,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2654) ? (2654) : __LINE__, __FUNCTION__); + (2656) ? (2656) : __LINE__, __FUNCTION__); ; } ; @@ -4966,7 +5002,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[13] = /*_.IFELSE___V16*/ meltfptr[15];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2654:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2656:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V15*/ meltfptr[14] = 0; @@ -4987,7 +5023,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V14*/ meltfptr[13];; - MELT_LOCATION ("warmelt-outobj.melt:2643:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2645:/ clear"); /*clear *//*_.OLAB__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.LOC__V9*/ meltfptr[8] = 0; @@ -4999,14 +5035,26 @@ lab_endgetargs:; /*clear *//*_.ADD2SBUF_CLONSYM__V13*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.IFCPP___V14*/ meltfptr[13] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2641:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2643:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:2641:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2643:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5102,7 +5150,7 @@ meltrout_66_warmelt_outobj_OUTPUCOD_OBJCOMPUTE (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2660:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ getarg"); /*_.OBCOMP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -5140,7 +5188,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2661:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2663:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5152,7 +5200,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OBCOMP__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJCOMPUTE */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2661:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2663:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -5160,7 +5208,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2661:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2663:/ cond.else"); /*^block */ /*anyblock */ @@ -5174,7 +5222,7 @@ lab_endgetargs:; melt_assert_failed (("check obcomp"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2661) ? (2661) : __LINE__, __FUNCTION__); + (2663) ? (2663) : __LINE__, __FUNCTION__); ; } ; @@ -5189,7 +5237,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2661:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2663:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -5200,7 +5248,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2662:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2664:/ quasiblock"); /*^getslot */ @@ -5211,7 +5259,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2663:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2665:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBCOMP__V2*/ meltfptr[1]), 0, "OBI_LOC"); @@ -5219,7 +5267,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2664:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2666:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBCOMP__V2*/ meltfptr[1]), 2, "OBCPT_EXPR"); @@ -5235,7 +5283,7 @@ lab_endgetargs:; (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[1])), ( /*_#I__L3*/ meltfnum[1])));; - MELT_LOCATION ("warmelt-outobj.melt:2667:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2669:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -5257,13 +5305,13 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2668:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2670:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L4*/ meltfnum[3] = (melt_magic_discr ((melt_ptr_t) ( /*_.CDEST__V8*/ meltfptr[7])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:2668:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2670:/ cond"); /*cond */ if ( /*_#IS_LIST__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -5271,7 +5319,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2671:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2673:/ quasiblock"); /*^newclosure */ @@ -5330,7 +5378,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.BOXDEPTHP1__V11*/ meltfptr[10]); ; /*_.LAMBDA___V14*/ meltfptr[13] = /*_.LAMBDA___V15*/ meltfptr[14];; - MELT_LOCATION ("warmelt-outobj.melt:2669:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2671:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -5352,7 +5400,7 @@ lab_endgetargs:; /*_.IF___V13*/ meltfptr[12] = /*_.LIST_EVERY__V16*/ meltfptr[15];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2668:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2670:/ clear"); /*clear *//*_.LAMBDA___V14*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.LIST_EVERY__V16*/ meltfptr[15] = 0; @@ -5365,13 +5413,13 @@ lab_endgetargs:; /*_.IF___V13*/ meltfptr[12] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:2675:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2677:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L5*/ meltfnum[4] = (melt_magic_discr ((melt_ptr_t) ( /*_.CEXP__V10*/ meltfptr[9])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:2675:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2677:/ cond"); /*cond */ if ( /*_#IS_LIST__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -5379,7 +5427,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2676:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2678:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#LIST_LENGTH__L6*/ meltfnum[5] = @@ -5388,7 +5436,7 @@ lab_endgetargs:; /*_#I__L7*/ meltfnum[6] = (( /*_#LIST_LENGTH__L6*/ meltfnum[5]) > (2));; - MELT_LOCATION ("warmelt-outobj.melt:2676:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2678:/ cond"); /*cond */ if ( /*_#I__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -5400,7 +5448,7 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:2677:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2679:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L8*/ meltfnum[7]), 0); @@ -5408,13 +5456,13 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2676:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2678:/ clear"); /*clear *//*_#I__L8*/ meltfnum[7] = 0; } ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:2680:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2682:/ quasiblock"); /*^newclosure */ @@ -5473,7 +5521,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.BOXDEPTHP1__V11*/ meltfptr[10]); ; /*_.LAMBDA___V18*/ meltfptr[15] = /*_.LAMBDA___V19*/ meltfptr[18];; - MELT_LOCATION ("warmelt-outobj.melt:2678:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2680:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -5492,7 +5540,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2675:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2677:/ quasiblock"); /*_.PROGN___V21*/ meltfptr[20] = @@ -5502,7 +5550,7 @@ lab_endgetargs:; /*_.IFELSE___V17*/ meltfptr[13] = /*_.PROGN___V21*/ meltfptr[20];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2675:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2677:/ clear"); /*clear *//*_#LIST_LENGTH__L6*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_#I__L7*/ meltfnum[6] = 0; @@ -5522,13 +5570,13 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2685:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2687:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_MULTIPLE__L9*/ meltfnum[7] = (melt_magic_discr ((melt_ptr_t) ( /*_.CEXP__V10*/ meltfptr[9])) == MELTOBMAG_MULTIPLE);; - MELT_LOCATION ("warmelt-outobj.melt:2685:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2687:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE__L9*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -5536,7 +5584,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2686:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2688:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#MULTIPLE_LENGTH__L10*/ meltfnum[5] = @@ -5546,7 +5594,7 @@ lab_endgetargs:; /*_#I__L11*/ meltfnum[6] = (( /*_#MULTIPLE_LENGTH__L10*/ meltfnum[5]) > (2));; - MELT_LOCATION ("warmelt-outobj.melt:2686:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2688:/ cond"); /*cond */ if ( /*_#I__L11*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -5558,7 +5606,7 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:2687:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2689:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -5568,13 +5616,13 @@ lab_endgetargs:; ; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2686:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2688:/ clear"); /*clear *//*_#I__L12*/ meltfnum[11] = 0; } ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:2690:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2692:/ quasiblock"); /*^newclosure */ @@ -5636,7 +5684,7 @@ lab_endgetargs:; ; /*_.LAMBDA___V23*/ meltfptr[19] = /*_.LAMBDA___V24*/ meltfptr[20];; - MELT_LOCATION ("warmelt-outobj.melt:2688:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2690:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -5656,7 +5704,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2685:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2687:/ quasiblock"); /*_.PROGN___V26*/ meltfptr[25] = @@ -5667,7 +5715,7 @@ lab_endgetargs:; /*_.PROGN___V26*/ meltfptr[25];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2685:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2687:/ clear"); /*clear *//*_#MULTIPLE_LENGTH__L10*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_#I__L11*/ meltfnum[6] = 0; @@ -5689,7 +5737,7 @@ lab_endgetargs:; /*_#I__L13*/ meltfnum[11] = (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; - MELT_LOCATION ("warmelt-outobj.melt:2696:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2698:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -5714,7 +5762,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2695:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2697:/ quasiblock"); /*_.PROGN___V28*/ meltfptr[24] = @@ -5725,7 +5773,7 @@ lab_endgetargs:; /*_.PROGN___V28*/ meltfptr[24];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2685:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2687:/ clear"); /*clear *//*_#I__L13*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.OUTPUT_C_CODE__V27*/ meltfptr[19] = 0; @@ -5738,7 +5786,7 @@ lab_endgetargs:; /*_.IFELSE___V17*/ meltfptr[13] = /*_.IFELSE___V22*/ meltfptr[15];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2675:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2677:/ clear"); /*clear *//*_#IS_MULTIPLE__L9*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IFELSE___V22*/ meltfptr[15] = 0; @@ -5748,7 +5796,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2698:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2700:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); @@ -5756,7 +5804,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2699:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2701:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5767,7 +5815,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L14*/ meltfnum[5] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2700:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2702:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -5802,7 +5850,7 @@ lab_endgetargs:; /*_#I__L16*/ meltfnum[11] = (( /*_#STRBUF_USEDLENGTH__L14*/ meltfnum[5]) < ( /*_#GET_INT__L15*/ meltfnum[6]));; - MELT_LOCATION ("warmelt-outobj.melt:2699:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2701:/ cond"); /*cond */ if ( /*_#I__L16*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -5810,7 +5858,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2699:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2701:/ cond.else"); /*^block */ /*anyblock */ @@ -5824,7 +5872,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2699) ? (2699) : __LINE__, __FUNCTION__); + (2701) ? (2701) : __LINE__, __FUNCTION__); ; } ; @@ -5839,7 +5887,7 @@ lab_endgetargs:; /*_.IFCPP___V29*/ meltfptr[25] = /*_.IFELSE___V31*/ meltfptr[24];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2699:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2701:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L14*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V30*/ meltfptr[19] = 0; @@ -5860,7 +5908,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V29*/ meltfptr[25];; - MELT_LOCATION ("warmelt-outobj.melt:2662:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2664:/ clear"); /*clear *//*_.CDEST__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.CLOC__V9*/ meltfptr[8] = 0; @@ -5882,14 +5930,26 @@ lab_endgetargs:; /*clear *//*_.IFELSE___V17*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.IFCPP___V29*/ meltfptr[25] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2660:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:2660:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2662:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5982,7 +6042,7 @@ meltrout_67_warmelt_outobj_LAMBDA___8__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2671:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2673:/ getarg"); /*_.DESTCUR__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -5995,7 +6055,7 @@ lab_endgetargs:; /*_#GET_INT__L1*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[2]))));; - MELT_LOCATION ("warmelt-outobj.melt:2672:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2674:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -6021,24 +6081,36 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2673:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2675:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), (" = ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2671:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2673:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V4*/ meltfptr[3] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-outobj.melt:2671:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2673:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.RETVAL___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-outobj.melt:2671:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2673:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; @@ -6134,7 +6206,7 @@ meltrout_68_warmelt_outobj_LAMBDA___9__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2680:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2682:/ getarg"); /*_.EXPCUR__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -6147,7 +6219,7 @@ lab_endgetargs:; /*_#GET_INT__L1*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[2]))));; - MELT_LOCATION ("warmelt-outobj.melt:2681:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2683:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -6173,7 +6245,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2682:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2684:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6184,7 +6256,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:2683:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2685:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -6219,7 +6291,7 @@ lab_endgetargs:; /*_#I__L4*/ meltfnum[3] = (( /*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1]) < ( /*_#GET_INT__L3*/ meltfnum[2]));; - MELT_LOCATION ("warmelt-outobj.melt:2682:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2684:/ cond"); /*cond */ if ( /*_#I__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -6227,7 +6299,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2682:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2684:/ cond.else"); /*^block */ /*anyblock */ @@ -6241,7 +6313,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2682) ? (2682) : __LINE__, __FUNCTION__); + (2684) ? (2684) : __LINE__, __FUNCTION__); ; } ; @@ -6256,7 +6328,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2682:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2684:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V5*/ meltfptr[4] = 0; @@ -6273,14 +6345,26 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2680:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2682:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-outobj.melt:2680:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2682:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6376,7 +6460,7 @@ meltrout_69_warmelt_outobj_LAMBDA___10__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2690:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2692:/ getarg"); /*_.EXPCUR__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -6389,7 +6473,7 @@ lab_endgetargs:; /*_#GET_INT__L1*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[2]))));; - MELT_LOCATION ("warmelt-outobj.melt:2691:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2693:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -6415,7 +6499,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2692:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2694:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6426,7 +6510,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:2693:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2695:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -6461,7 +6545,7 @@ lab_endgetargs:; /*_#I__L4*/ meltfnum[3] = (( /*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1]) < ( /*_#GET_INT__L3*/ meltfnum[2]));; - MELT_LOCATION ("warmelt-outobj.melt:2692:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2694:/ cond"); /*cond */ if ( /*_#I__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -6469,7 +6553,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2692:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2694:/ cond.else"); /*^block */ /*anyblock */ @@ -6483,7 +6567,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2692) ? (2692) : __LINE__, __FUNCTION__); + (2694) ? (2694) : __LINE__, __FUNCTION__); ; } ; @@ -6498,7 +6582,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2692:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2694:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V5*/ meltfptr[4] = 0; @@ -6515,14 +6599,26 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2690:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2692:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V4*/ meltfptr[3];; - MELT_LOCATION ("warmelt-outobj.melt:2690:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2692:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6620,7 +6716,7 @@ meltrout_70_warmelt_outobj_OUTPUCOD_OBJCOND (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2706:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2708:/ getarg"); /*_.OCOND__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -6658,7 +6754,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2707:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2709:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6670,7 +6766,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OCOND__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJCOND */ meltfrout-> tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2707:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2709:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -6678,7 +6774,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2707:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2709:/ cond.else"); /*^block */ /*anyblock */ @@ -6692,7 +6788,7 @@ lab_endgetargs:; melt_assert_failed (("check ocond"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2707) ? (2707) : __LINE__, __FUNCTION__); + (2709) ? (2709) : __LINE__, __FUNCTION__); ; } ; @@ -6707,7 +6803,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2707:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2709:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -6718,7 +6814,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2708:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2710:/ quasiblock"); /*^getslot */ @@ -6729,7 +6825,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2709:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2711:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OCOND__V2*/ meltfptr[1]), 1, "OBCOND_TEST"); @@ -6737,7 +6833,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2710:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2712:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OCOND__V2*/ meltfptr[1]), 2, "OBCOND_THEN"); @@ -6745,7 +6841,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2711:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2713:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OCOND__V2*/ meltfptr[1]), 3, "OBCOND_ELSE"); @@ -6755,7 +6851,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2713:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2715:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6765,7 +6861,7 @@ lab_endgetargs:; ; /*_#NOTNULL__L3*/ meltfnum[1] = (( /*_.CTEST__V9*/ meltfptr[8]) != NULL);; - MELT_LOCATION ("warmelt-outobj.melt:2713:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2715:/ cond"); /*cond */ if ( /*_#NOTNULL__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -6773,7 +6869,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2713:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2715:/ cond.else"); /*^block */ /*anyblock */ @@ -6787,7 +6883,7 @@ lab_endgetargs:; melt_assert_failed (("check ctest"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2713) ? (2713) : __LINE__, __FUNCTION__); + (2715) ? (2715) : __LINE__, __FUNCTION__); ; } ; @@ -6802,7 +6898,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2713:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2715:/ clear"); /*clear *//*_#NOTNULL__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; @@ -6813,7 +6909,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2714:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2716:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -6837,7 +6933,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2715:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2717:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*cond*/ if (")); @@ -6845,7 +6941,7 @@ lab_endgetargs:; ; /*_#I__L4*/ meltfnum[1] = (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; - MELT_LOCATION ("warmelt-outobj.melt:2716:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2718:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -6869,7 +6965,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2717:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2719:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (") /*then*/ {")); @@ -6877,12 +6973,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2718:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2720:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2719:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2721:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^checksignal */ @@ -6909,7 +7005,7 @@ lab_endgetargs:; /*_#IF___L5*/ meltfnum[4] = /*_#NOT__L7*/ meltfnum[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2719:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2721:/ clear"); /*clear *//*_#IS_A__L6*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_#NOT__L7*/ meltfnum[6] = 0; @@ -6922,7 +7018,7 @@ lab_endgetargs:; /*_#IF___L5*/ meltfnum[4] = 0;; } ; - MELT_LOCATION ("warmelt-outobj.melt:2719:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2721:/ cond"); /*cond */ if ( /*_#IF___L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -6930,7 +7026,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2721:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2723:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -6956,7 +7052,7 @@ lab_endgetargs:; ; /*_#I__L8*/ meltfnum[5] = (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; - MELT_LOCATION ("warmelt-outobj.melt:2722:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2724:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -6982,7 +7078,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2723:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2725:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); @@ -6990,18 +7086,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2724:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2726:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2720:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2722:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2719:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2721:/ clear"); /*clear *//*_.OUTPUT_LOCATION__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_#I__L8*/ meltfnum[5] = 0; @@ -7011,7 +7107,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:2727:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2729:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^checksignal */ @@ -7039,7 +7135,7 @@ lab_endgetargs:; /*_#IF___L9*/ meltfnum[6] = /*_#NOT__L11*/ meltfnum[10];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2727:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2729:/ clear"); /*clear *//*_#IS_A__L10*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_#NOT__L11*/ meltfnum[10] = 0; @@ -7052,7 +7148,7 @@ lab_endgetargs:; /*_#IF___L9*/ meltfnum[6] = 0;; } ; - MELT_LOCATION ("warmelt-outobj.melt:2727:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2729:/ cond"); /*cond */ if ( /*_#IF___L9*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -7062,14 +7158,14 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:2729:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2731:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("} else {")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2730:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2732:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7097,7 +7193,7 @@ lab_endgetargs:; (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2731:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2733:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L12*/ meltfnum[5]), 0); @@ -7105,7 +7201,7 @@ lab_endgetargs:; ; /*_#I__L13*/ meltfnum[10] = (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; - MELT_LOCATION ("warmelt-outobj.melt:2732:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2734:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -7131,7 +7227,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2733:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2735:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); @@ -7141,7 +7237,7 @@ lab_endgetargs:; (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2734:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2736:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L14*/ meltfnum[13]), 0); @@ -7149,18 +7245,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2735:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2737:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("}")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2728:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2730:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2727:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2729:/ clear"); /*clear *//*_.OUTPUT_LOCATION__V18*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_#I__L12*/ meltfnum[5] = 0; @@ -7182,7 +7278,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:2737:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2739:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -7196,14 +7292,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2739:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2741:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2740:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2742:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7214,7 +7310,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L15*/ meltfnum[5] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2741:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2743:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -7249,7 +7345,7 @@ lab_endgetargs:; /*_#I__L17*/ meltfnum[13] = (( /*_#STRBUF_USEDLENGTH__L15*/ meltfnum[5]) < ( /*_#GET_INT__L16*/ meltfnum[10]));; - MELT_LOCATION ("warmelt-outobj.melt:2740:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2742:/ cond"); /*cond */ if ( /*_#I__L17*/ meltfnum[13]) /*then */ { /*^cond.then */ @@ -7257,7 +7353,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2740:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2742:/ cond.else"); /*^block */ /*anyblock */ @@ -7271,7 +7367,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2740) ? (2740) : __LINE__, __FUNCTION__); + (2742) ? (2742) : __LINE__, __FUNCTION__); ; } ; @@ -7286,7 +7382,7 @@ lab_endgetargs:; /*_.IFCPP___V20*/ meltfptr[15] = /*_.IFELSE___V22*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2740:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2742:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L15*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V21*/ meltfptr[16] = 0; @@ -7307,7 +7403,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V20*/ meltfptr[15];; - MELT_LOCATION ("warmelt-outobj.melt:2708:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2710:/ clear"); /*clear *//*_.CLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.CTEST__V9*/ meltfptr[8] = 0; @@ -7329,14 +7425,26 @@ lab_endgetargs:; /*clear *//*_#IF___L9*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.IFCPP___V20*/ meltfptr[15] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2706:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2708:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:2706:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2708:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7432,7 +7540,7 @@ meltrout_71_warmelt_outobj_OUTPUCOD_OBJCPPIF (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2748:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2750:/ getarg"); /*_.OPIF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -7470,7 +7578,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2749:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2751:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7482,7 +7590,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OPIF__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJCPPIF */ meltfrout-> tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2749:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2751:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -7490,7 +7598,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2749:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2751:/ cond.else"); /*^block */ /*anyblock */ @@ -7504,7 +7612,7 @@ lab_endgetargs:; melt_assert_failed (("check opif"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2749) ? (2749) : __LINE__, __FUNCTION__); + (2751) ? (2751) : __LINE__, __FUNCTION__); ; } ; @@ -7519,7 +7627,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2749:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2751:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -7530,7 +7638,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2750:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2752:/ quasiblock"); /*^getslot */ @@ -7541,7 +7649,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2751:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2753:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPIF__V2*/ meltfptr[1]), 1, "OBIFP_COND"); @@ -7549,7 +7657,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2752:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2754:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPIF__V2*/ meltfptr[1]), 2, "OBIFP_THEN"); @@ -7557,7 +7665,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2753:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2755:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPIF__V2*/ meltfptr[1]), 3, "OBIFP_ELSE"); @@ -7569,7 +7677,7 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2756:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2758:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7580,7 +7688,7 @@ lab_endgetargs:; /*_#IS_STRING__L4*/ meltfnum[3] = (melt_magic_discr ((melt_ptr_t) ( /*_.CCOND__V9*/ meltfptr[8])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:2756:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2758:/ cond"); /*cond */ if ( /*_#IS_STRING__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -7588,7 +7696,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2756:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2758:/ cond.else"); /*^block */ /*anyblock */ @@ -7602,7 +7710,7 @@ lab_endgetargs:; melt_assert_failed (("check ccond"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2756) ? (2756) : __LINE__, __FUNCTION__); + (2758) ? (2758) : __LINE__, __FUNCTION__); ; } ; @@ -7617,7 +7725,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2756:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2758:/ clear"); /*clear *//*_#IS_STRING__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; @@ -7628,7 +7736,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2757:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2759:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7652,7 +7760,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2758:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2760:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#if ")); @@ -7660,7 +7768,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2759:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2761:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -7669,12 +7777,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2760:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2762:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTHP1__L3*/ meltfnum[1]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2761:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2763:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7696,7 +7804,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2762:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2764:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -7720,14 +7828,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2763:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2765:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTHP1__L3*/ meltfnum[1]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2764:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2766:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#else /*")); @@ -7735,7 +7843,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2765:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2767:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -7744,7 +7852,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2766:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2768:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/")); @@ -7752,12 +7860,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2767:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2769:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTHP1__L3*/ meltfnum[1]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2768:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2770:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7779,7 +7887,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2769:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2771:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -7803,14 +7911,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2770:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2772:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTHP1__L3*/ meltfnum[1]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2771:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2773:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#endif /*")); @@ -7818,7 +7926,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2772:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2774:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -7827,7 +7935,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2773:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2775:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/")); @@ -7835,14 +7943,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2774:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2776:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTHP1__L3*/ meltfnum[1]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2775:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2777:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7853,7 +7961,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[3] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2776:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2778:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -7888,7 +7996,7 @@ lab_endgetargs:; /*_#I__L7*/ meltfnum[6] = (( /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[3]) < ( /*_#GET_INT__L6*/ meltfnum[5]));; - MELT_LOCATION ("warmelt-outobj.melt:2775:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2777:/ cond"); /*cond */ if ( /*_#I__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -7896,7 +8004,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2775:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2777:/ cond.else"); /*^block */ /*anyblock */ @@ -7910,7 +8018,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2775) ? (2775) : __LINE__, __FUNCTION__); + (2777) ? (2777) : __LINE__, __FUNCTION__); ; } ; @@ -7925,7 +8033,7 @@ lab_endgetargs:; /*_.IFCPP___V19*/ meltfptr[18] = /*_.IFELSE___V21*/ meltfptr[20];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2775:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2777:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L5*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V20*/ meltfptr[19] = 0; @@ -7946,7 +8054,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V19*/ meltfptr[18];; - MELT_LOCATION ("warmelt-outobj.melt:2750:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2752:/ clear"); /*clear *//*_.CLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.CCOND__V9*/ meltfptr[8] = 0; @@ -7970,14 +8078,26 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_C_CODE__V18*/ meltfptr[17] = 0; /*^clear */ /*clear *//*_.IFCPP___V19*/ meltfptr[18] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2748:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2750:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:2748:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2750:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8077,7 +8197,7 @@ meltrout_72_warmelt_outobj_OUTPUCOD_OBJINTERNSYMBOL (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2781:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2783:/ getarg"); /*_.OISY__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -8115,7 +8235,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2782:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2784:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8127,7 +8247,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OISY__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJINTERNSYMBOL */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2782:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2784:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -8135,7 +8255,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2782:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2784:/ cond.else"); /*^block */ /*anyblock */ @@ -8149,7 +8269,7 @@ lab_endgetargs:; melt_assert_failed (("check oisy"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2782) ? (2782) : __LINE__, __FUNCTION__); + (2784) ? (2784) : __LINE__, __FUNCTION__); ; } ; @@ -8164,7 +8284,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2782:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2784:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -8175,7 +8295,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2783:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2785:/ quasiblock"); /*^getslot */ @@ -8186,7 +8306,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2784:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2786:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OISY__V2*/ meltfptr[1]), 1, "OBINTERN_IOBJ"); @@ -8194,7 +8314,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2785:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2787:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OIOBJ__V9*/ meltfptr[8]), 2, "OIE_DATA"); @@ -8202,7 +8322,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2786:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2788:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OIOBJ__V9*/ meltfptr[8]), 4, "OIE_LOCVAR"); @@ -8212,7 +8332,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2788:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2790:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8224,7 +8344,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OIOBJ__V9*/ meltfptr[8]), (melt_ptr_t) (( /*!CLASS_OBJINITOBJECT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:2788:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2790:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -8232,7 +8352,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2788:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2790:/ cond.else"); /*^block */ /*anyblock */ @@ -8246,7 +8366,7 @@ lab_endgetargs:; melt_assert_failed (("check oiobj"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2788) ? (2788) : __LINE__, __FUNCTION__); + (2790) ? (2790) : __LINE__, __FUNCTION__); ; } ; @@ -8261,7 +8381,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2788:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2790:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; @@ -8274,7 +8394,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2789:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2791:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8286,7 +8406,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OIDAT__V10*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_NREP_DATASYMBOL */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-outobj.melt:2789:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2791:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -8294,7 +8414,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2789:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2791:/ cond.else"); /*^block */ /*anyblock */ @@ -8308,7 +8428,7 @@ lab_endgetargs:; melt_assert_failed (("check oidat"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2789) ? (2789) : __LINE__, __FUNCTION__); + (2791) ? (2791) : __LINE__, __FUNCTION__); ; } ; @@ -8323,7 +8443,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[12] = /*_.IFELSE___V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2789:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2791:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0; @@ -8334,7 +8454,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[12] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2790:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2792:/ quasiblock"); /*^getslot */ @@ -8345,7 +8465,7 @@ lab_endgetargs:; meltfptr[14] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2791:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2793:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -8356,7 +8476,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2791:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2793:/ cond.else"); /*^block */ /*anyblock */ @@ -8373,7 +8493,7 @@ lab_endgetargs:; /*_.IFELSE___V17*/ meltfptr[16] = /*_.NREP_LOC__V18*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2791:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2793:/ clear"); /*clear *//*_.NREP_LOC__V18*/ meltfptr[17] = 0; } ; @@ -8403,7 +8523,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2792:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2794:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*internsym:")); @@ -8411,7 +8531,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2793:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2795:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -8420,7 +8540,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2794:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2796:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/")); @@ -8428,20 +8548,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2795:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2797:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2796:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2798:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("(void) meltgc_intern_symbol((melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2797:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2799:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -8465,7 +8585,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2798:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2800:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("));")); @@ -8473,13 +8593,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2799:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2801:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2790:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2792:/ clear"); /*clear *//*_.NSY__V16*/ meltfptr[14] = 0; /*^clear */ /*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0; @@ -8489,7 +8609,7 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_C_CODE__V20*/ meltfptr[19] = 0; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2800:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2802:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8500,7 +8620,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2801:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2803:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -8535,7 +8655,7 @@ lab_endgetargs:; /*_#I__L7*/ meltfnum[6] = (( /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[1]) < ( /*_#GET_INT__L6*/ meltfnum[5]));; - MELT_LOCATION ("warmelt-outobj.melt:2800:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2802:/ cond"); /*cond */ if ( /*_#I__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -8543,7 +8663,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2800:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2802:/ cond.else"); /*^block */ /*anyblock */ @@ -8557,7 +8677,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2800) ? (2800) : __LINE__, __FUNCTION__); + (2802) ? (2802) : __LINE__, __FUNCTION__); ; } ; @@ -8572,7 +8692,7 @@ lab_endgetargs:; /*_.IFCPP___V21*/ meltfptr[14] = /*_.IFELSE___V23*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2800:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2802:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V22*/ meltfptr[16] = 0; @@ -8593,7 +8713,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V21*/ meltfptr[14];; - MELT_LOCATION ("warmelt-outobj.melt:2783:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2785:/ clear"); /*clear *//*_.CLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.OIOBJ__V9*/ meltfptr[8] = 0; @@ -8607,14 +8727,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V14*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.IFCPP___V21*/ meltfptr[14] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2781:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2783:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:2781:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2783:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8714,7 +8846,7 @@ meltrout_73_warmelt_outobj_OUTPUCOD_OBJINTERNKEYWORD (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2806:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2808:/ getarg"); /*_.OIKW__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -8752,7 +8884,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2807:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2809:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8764,7 +8896,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OIKW__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJINTERNKEYWORD */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2807:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2809:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -8772,7 +8904,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2807:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2809:/ cond.else"); /*^block */ /*anyblock */ @@ -8786,7 +8918,7 @@ lab_endgetargs:; melt_assert_failed (("check oikw"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2807) ? (2807) : __LINE__, __FUNCTION__); + (2809) ? (2809) : __LINE__, __FUNCTION__); ; } ; @@ -8801,7 +8933,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2807:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2809:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -8812,7 +8944,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2808:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2810:/ quasiblock"); /*^getslot */ @@ -8823,7 +8955,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2809:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2811:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OIKW__V2*/ meltfptr[1]), 1, "OBINTERN_IOBJ"); @@ -8831,7 +8963,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2810:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2812:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OIOBJ__V9*/ meltfptr[8]), 2, "OIE_DATA"); @@ -8839,7 +8971,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2811:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2813:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OIOBJ__V9*/ meltfptr[8]), 4, "OIE_LOCVAR"); @@ -8849,7 +8981,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2813:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2815:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8861,7 +8993,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OIDAT__V10*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_NREP_DATAKEYWORD */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:2813:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2815:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -8869,7 +9001,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2813:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2815:/ cond.else"); /*^block */ /*anyblock */ @@ -8883,7 +9015,7 @@ lab_endgetargs:; melt_assert_failed (("check oidat"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2813) ? (2813) : __LINE__, __FUNCTION__); + (2815) ? (2815) : __LINE__, __FUNCTION__); ; } ; @@ -8898,7 +9030,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2813:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2815:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; @@ -8909,7 +9041,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2814:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2816:/ quasiblock"); /*^getslot */ @@ -8920,7 +9052,7 @@ lab_endgetargs:; meltfptr[12] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2815:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2817:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -8931,7 +9063,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2815:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2817:/ cond.else"); /*^block */ /*anyblock */ @@ -8948,7 +9080,7 @@ lab_endgetargs:; /*_.IFELSE___V15*/ meltfptr[14] = /*_.NREP_LOC__V16*/ meltfptr[15];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2815:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2817:/ clear"); /*clear *//*_.NREP_LOC__V16*/ meltfptr[15] = 0; } ; @@ -8978,7 +9110,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2816:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2818:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*internkeyw:")); @@ -8986,7 +9118,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2817:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2819:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -8995,7 +9127,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2818:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2820:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/")); @@ -9003,20 +9135,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2819:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2821:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2820:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2822:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("(void) meltgc_intern_keyword((melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2821:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2823:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -9040,7 +9172,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2822:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2824:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("));")); @@ -9048,13 +9180,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2823:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2825:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2814:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2816:/ clear"); /*clear *//*_.NSY__V14*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0; @@ -9064,7 +9196,7 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_C_CODE__V18*/ meltfptr[17] = 0; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2824:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2826:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9075,7 +9207,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2825:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2827:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -9110,7 +9242,7 @@ lab_endgetargs:; /*_#I__L6*/ meltfnum[5] = (( /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1]) < ( /*_#GET_INT__L5*/ meltfnum[4]));; - MELT_LOCATION ("warmelt-outobj.melt:2824:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2826:/ cond"); /*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -9118,7 +9250,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2824:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2826:/ cond.else"); /*^block */ /*anyblock */ @@ -9132,7 +9264,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2824) ? (2824) : __LINE__, __FUNCTION__); + (2826) ? (2826) : __LINE__, __FUNCTION__); ; } ; @@ -9147,7 +9279,7 @@ lab_endgetargs:; /*_.IFCPP___V19*/ meltfptr[12] = /*_.IFELSE___V21*/ meltfptr[15];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2824:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2826:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V20*/ meltfptr[14] = 0; @@ -9168,7 +9300,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V19*/ meltfptr[12];; - MELT_LOCATION ("warmelt-outobj.melt:2808:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2810:/ clear"); /*clear *//*_.CLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.OIOBJ__V9*/ meltfptr[8] = 0; @@ -9180,14 +9312,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V12*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_.IFCPP___V19*/ meltfptr[12] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2806:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2808:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:2806:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2808:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9287,7 +9431,7 @@ meltrout_74_warmelt_outobj_OUTPUCOD_OBJGETNAMEDSYMBOL (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2830:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2832:/ getarg"); /*_.OGSY__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -9325,7 +9469,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2831:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2833:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9337,7 +9481,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OGSY__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJGETNAMEDSYMBOL */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2831:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2833:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -9345,7 +9489,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2831:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2833:/ cond.else"); /*^block */ /*anyblock */ @@ -9359,7 +9503,7 @@ lab_endgetargs:; melt_assert_failed (("check ogsy"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2831) ? (2831) : __LINE__, __FUNCTION__); + (2833) ? (2833) : __LINE__, __FUNCTION__); ; } ; @@ -9374,7 +9518,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2831:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2833:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -9385,7 +9529,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2832:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2834:/ quasiblock"); /*^getslot */ @@ -9396,7 +9540,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2833:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2835:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OGSY__V2*/ meltfptr[1]), 1, "OBGNAMED_IOBJ"); @@ -9404,7 +9548,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2834:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2836:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OIOBJ__V9*/ meltfptr[8]), 2, "OIE_DATA"); @@ -9412,7 +9556,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2835:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2837:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OIOBJ__V9*/ meltfptr[8]), 4, "OIE_LOCVAR"); @@ -9422,7 +9566,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2837:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2839:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9434,7 +9578,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OIOBJ__V9*/ meltfptr[8]), (melt_ptr_t) (( /*!CLASS_OBJINITOBJECT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:2837:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2839:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -9442,7 +9586,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2837:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2839:/ cond.else"); /*^block */ /*anyblock */ @@ -9456,7 +9600,7 @@ lab_endgetargs:; melt_assert_failed (("check oiobj"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2837) ? (2837) : __LINE__, __FUNCTION__); + (2839) ? (2839) : __LINE__, __FUNCTION__); ; } ; @@ -9471,7 +9615,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2837:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2839:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; @@ -9484,7 +9628,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2838:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2840:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9496,7 +9640,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OGDAT__V10*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_NREP_DATASYMBOL */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-outobj.melt:2838:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2840:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -9504,7 +9648,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2838:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2840:/ cond.else"); /*^block */ /*anyblock */ @@ -9518,7 +9662,7 @@ lab_endgetargs:; melt_assert_failed (("check ogdat"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2838) ? (2838) : __LINE__, __FUNCTION__); + (2840) ? (2840) : __LINE__, __FUNCTION__); ; } ; @@ -9533,7 +9677,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[12] = /*_.IFELSE___V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2838:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2840:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0; @@ -9544,7 +9688,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[12] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2839:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2841:/ quasiblock"); /*^getslot */ @@ -9555,7 +9699,7 @@ lab_endgetargs:; meltfptr[16] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2841:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2843:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -9566,7 +9710,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2841:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2843:/ cond.else"); /*^block */ /*anyblock */ @@ -9583,7 +9727,7 @@ lab_endgetargs:; /*_.IFELSE___V18*/ meltfptr[17] = /*_.NREP_LOC__V19*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2841:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2843:/ clear"); /*clear *//*_.NREP_LOC__V19*/ meltfptr[18] = 0; } ; @@ -9613,7 +9757,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2842:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2844:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*getnamedsym:")); @@ -9621,7 +9765,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2843:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2845:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -9630,7 +9774,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2844:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2846:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/")); @@ -9638,14 +9782,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2845:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2847:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2846:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2848:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("{ melt_ptr_t sy_")); @@ -9653,7 +9797,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2847:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2849:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.NSY__V17*/ @@ -9662,7 +9806,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2848:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2850:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" = meltgc_named_symbol(\"")); @@ -9670,7 +9814,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2849:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2851:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -9679,7 +9823,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2850:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2852:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("\", MELT_GET);")); @@ -9689,14 +9833,14 @@ lab_endgetargs:; (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2851:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2853:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L5*/ meltfnum[1]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2852:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2854:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("if (sy_")); @@ -9704,7 +9848,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2853:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2855:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.NSY__V17*/ @@ -9713,7 +9857,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2854:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2856:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" && NULL == ")); @@ -9721,7 +9865,7 @@ lab_endgetargs:; ; /*_#I__L6*/ meltfnum[5] = (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; - MELT_LOCATION ("warmelt-outobj.melt:2855:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2857:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -9745,7 +9889,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2856:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2858:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (")")); @@ -9755,14 +9899,14 @@ lab_endgetargs:; (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2857:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2859:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L7*/ meltfnum[6]), 0); } ; /*_#I__L8*/ meltfnum[7] = (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; - MELT_LOCATION ("warmelt-outobj.melt:2858:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2860:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -9786,7 +9930,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2859:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2861:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" = (melt_ptr_t) sy_")); @@ -9794,7 +9938,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2860:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2862:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.NSY__V17*/ @@ -9803,7 +9947,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2861:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2863:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("; }")); @@ -9811,14 +9955,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2862:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2864:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2863:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2865:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9829,7 +9973,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L9*/ meltfnum[8] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2864:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2866:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -9864,7 +10008,7 @@ lab_endgetargs:; /*_#I__L11*/ meltfnum[10] = (( /*_#STRBUF_USEDLENGTH__L9*/ meltfnum[8]) < ( /*_#GET_INT__L10*/ meltfnum[9]));; - MELT_LOCATION ("warmelt-outobj.melt:2863:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2865:/ cond"); /*cond */ if ( /*_#I__L11*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -9872,7 +10016,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2863:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2865:/ cond.else"); /*^block */ /*anyblock */ @@ -9886,7 +10030,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2863) ? (2863) : __LINE__, __FUNCTION__); + (2865) ? (2865) : __LINE__, __FUNCTION__); ; } ; @@ -9901,7 +10045,7 @@ lab_endgetargs:; /*_.IFCPP___V23*/ meltfptr[22] = /*_.IFELSE___V25*/ meltfptr[24];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2863:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2865:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L9*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V24*/ meltfptr[23] = 0; @@ -9922,7 +10066,7 @@ lab_endgetargs:; /*_.LET___V16*/ meltfptr[14] = /*_.IFCPP___V23*/ meltfptr[22];; - MELT_LOCATION ("warmelt-outobj.melt:2839:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2841:/ clear"); /*clear *//*_.NSY__V17*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.IFELSE___V18*/ meltfptr[17] = 0; @@ -9944,7 +10088,7 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V23*/ meltfptr[22] = 0; /*_.LET___V7*/ meltfptr[5] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-outobj.melt:2832:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2834:/ clear"); /*clear *//*_.CLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.OIOBJ__V9*/ meltfptr[8] = 0; @@ -9958,14 +10102,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V14*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.LET___V16*/ meltfptr[14] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2830:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2832:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:2830:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2832:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10066,7 +10222,7 @@ meltrout_75_warmelt_outobj_OUTPUCOD_OBJGETNAMEDKEYWORD (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2869:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2871:/ getarg"); /*_.OGKW__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -10104,7 +10260,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2870:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2872:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10116,7 +10272,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OGKW__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJGETNAMEDKEYWORD */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2870:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2872:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -10124,7 +10280,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2870:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2872:/ cond.else"); /*^block */ /*anyblock */ @@ -10138,7 +10294,7 @@ lab_endgetargs:; melt_assert_failed (("check ogkw"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2870) ? (2870) : __LINE__, __FUNCTION__); + (2872) ? (2872) : __LINE__, __FUNCTION__); ; } ; @@ -10153,7 +10309,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2870:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2872:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -10164,7 +10320,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2871:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2873:/ quasiblock"); /*^getslot */ @@ -10175,7 +10331,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2872:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2874:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OGKW__V2*/ meltfptr[1]), 1, "OBGNAMED_IOBJ"); @@ -10183,7 +10339,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2873:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2875:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OIOBJ__V9*/ meltfptr[8]), 2, "OIE_DATA"); @@ -10191,7 +10347,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2874:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2876:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OIOBJ__V9*/ meltfptr[8]), 4, "OIE_LOCVAR"); @@ -10201,7 +10357,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2876:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2878:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10213,7 +10369,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OIOBJ__V9*/ meltfptr[8]), (melt_ptr_t) (( /*!CLASS_OBJINITOBJECT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:2876:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2878:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -10221,7 +10377,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2876:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2878:/ cond.else"); /*^block */ /*anyblock */ @@ -10235,7 +10391,7 @@ lab_endgetargs:; melt_assert_failed (("check oiobj"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2876) ? (2876) : __LINE__, __FUNCTION__); + (2878) ? (2878) : __LINE__, __FUNCTION__); ; } ; @@ -10250,7 +10406,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2876:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2878:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; @@ -10263,7 +10419,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2877:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2879:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10275,7 +10431,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OGDAT__V10*/ meltfptr[9]), (melt_ptr_t) (( /*!CLASS_NREP_DATAKEYWORD */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-outobj.melt:2877:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2879:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -10283,7 +10439,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2877:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2879:/ cond.else"); /*^block */ /*anyblock */ @@ -10297,7 +10453,7 @@ lab_endgetargs:; melt_assert_failed (("check ogdat"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2877) ? (2877) : __LINE__, __FUNCTION__); + (2879) ? (2879) : __LINE__, __FUNCTION__); ; } ; @@ -10312,7 +10468,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[12] = /*_.IFELSE___V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2877:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2879:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0; @@ -10323,7 +10479,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[12] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2878:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2880:/ quasiblock"); /*^getslot */ @@ -10334,7 +10490,7 @@ lab_endgetargs:; meltfptr[16] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2879:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2881:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -10345,7 +10501,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2879:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2881:/ cond.else"); /*^block */ /*anyblock */ @@ -10362,7 +10518,7 @@ lab_endgetargs:; /*_.IFELSE___V18*/ meltfptr[17] = /*_.NREP_LOC__V19*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2879:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2881:/ clear"); /*clear *//*_.NREP_LOC__V19*/ meltfptr[18] = 0; } ; @@ -10392,7 +10548,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2880:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2882:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*getnamedkeyw:")); @@ -10400,7 +10556,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2881:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2883:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -10409,7 +10565,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2882:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2884:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/")); @@ -10417,14 +10573,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2883:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2885:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2884:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2886:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("{ melt_ptr_t kw_")); @@ -10432,7 +10588,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2885:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2887:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.NKW__V17*/ @@ -10441,7 +10597,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2886:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2888:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" = meltgc_named_keyword(\"")); @@ -10449,7 +10605,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2887:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2889:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -10458,7 +10614,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2888:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2890:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("\", MELT_GET);")); @@ -10468,14 +10624,14 @@ lab_endgetargs:; (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2889:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2891:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L5*/ meltfnum[1]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2890:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2892:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("if (kw_")); @@ -10483,7 +10639,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2891:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2893:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.NKW__V17*/ @@ -10492,7 +10648,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2892:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2894:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (") ")); @@ -10500,7 +10656,7 @@ lab_endgetargs:; ; /*_#I__L6*/ meltfnum[5] = (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; - MELT_LOCATION ("warmelt-outobj.melt:2893:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2895:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -10524,7 +10680,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2894:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2896:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" = (melt_ptr_t) kw_")); @@ -10532,7 +10688,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2895:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2897:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.NKW__V17*/ @@ -10541,7 +10697,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2896:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2898:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("; }")); @@ -10549,14 +10705,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2897:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2899:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2898:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2900:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10567,7 +10723,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2899:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2901:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -10602,7 +10758,7 @@ lab_endgetargs:; /*_#I__L9*/ meltfnum[8] = (( /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6]) < ( /*_#GET_INT__L8*/ meltfnum[7]));; - MELT_LOCATION ("warmelt-outobj.melt:2898:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2900:/ cond"); /*cond */ if ( /*_#I__L9*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -10610,7 +10766,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2898:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2900:/ cond.else"); /*^block */ /*anyblock */ @@ -10624,7 +10780,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2898) ? (2898) : __LINE__, __FUNCTION__); + (2900) ? (2900) : __LINE__, __FUNCTION__); ; } ; @@ -10639,7 +10795,7 @@ lab_endgetargs:; /*_.IFCPP___V22*/ meltfptr[21] = /*_.IFELSE___V24*/ meltfptr[23];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2898:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2900:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V23*/ meltfptr[22] = 0; @@ -10660,7 +10816,7 @@ lab_endgetargs:; /*_.LET___V16*/ meltfptr[14] = /*_.IFCPP___V22*/ meltfptr[21];; - MELT_LOCATION ("warmelt-outobj.melt:2878:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2880:/ clear"); /*clear *//*_.NKW__V17*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.IFELSE___V18*/ meltfptr[17] = 0; @@ -10676,7 +10832,7 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V22*/ meltfptr[21] = 0; /*_.LET___V7*/ meltfptr[5] = /*_.LET___V16*/ meltfptr[14];; - MELT_LOCATION ("warmelt-outobj.melt:2871:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2873:/ clear"); /*clear *//*_.CLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.OIOBJ__V9*/ meltfptr[8] = 0; @@ -10690,14 +10846,26 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V14*/ meltfptr[12] = 0; /*^clear */ /*clear *//*_.LET___V16*/ meltfptr[14] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2869:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2871:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:2869:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2871:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -10793,7 +10961,7 @@ meltrout_76_warmelt_outobj_OUTPUCOD_OBJAPPLY (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2905:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ getarg"); /*_.OAPP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -10831,7 +10999,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2906:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2908:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10843,7 +11011,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OAPP__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJAPPLY */ meltfrout-> tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:2906:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2908:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -10851,7 +11019,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2906:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2908:/ cond.else"); /*^block */ /*anyblock */ @@ -10865,7 +11033,7 @@ lab_endgetargs:; melt_assert_failed (("check oapp"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2906) ? (2906) : __LINE__, __FUNCTION__); + (2908) ? (2908) : __LINE__, __FUNCTION__); ; } ; @@ -10880,7 +11048,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2906:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2908:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -10891,10 +11059,10 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2907:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2909:/ quasiblock"); - MELT_LOCATION ("warmelt-outobj.melt:2908:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2910:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OAPP__V2*/ meltfptr[1]), 0, "OBI_LOC"); @@ -10902,7 +11070,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2909:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2911:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OAPP__V2*/ meltfptr[1]), 1, "OBDI_DESTLIST"); @@ -10910,7 +11078,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2910:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2912:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OAPP__V2*/ meltfptr[1]), 2, "OBAPP_CLOS"); @@ -10918,7 +11086,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:2911:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2913:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OAPP__V2*/ meltfptr[1]), 3, "OBAPP_ARGS"); @@ -10943,7 +11111,7 @@ lab_endgetargs:; (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[2])), ( /*_#I__L4*/ meltfnum[3])));; - MELT_LOCATION ("warmelt-outobj.melt:2916:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2918:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10967,7 +11135,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2917:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2919:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*apply*/{")); @@ -10977,17 +11145,17 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:2918:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2920:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L5*/ meltfnum[4]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:2919:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2921:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L6*/ meltfnum[5] = (( /*_#NBARG__L3*/ meltfnum[1]) > (1));; - MELT_LOCATION ("warmelt-outobj.melt:2919:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2921:/ cond"); /*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -10997,7 +11165,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:2921:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2923:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -11008,7 +11176,7 @@ lab_endgetargs:; (( /*_#NBARG__L3*/ meltfnum[1]) - (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2922:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2924:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L7*/ meltfnum[6])); @@ -11016,7 +11184,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2923:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2925:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("];")); @@ -11026,7 +11194,7 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:2924:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2926:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L8*/ meltfnum[7]), 0); @@ -11034,7 +11202,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2925:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2927:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -11045,7 +11213,7 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:2926:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2928:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L9*/ meltfnum[8]), 0); @@ -11071,7 +11239,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2931:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2933:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11089,7 +11257,7 @@ lab_endgetargs:; /*_#NOT__L12*/ meltfnum[11] = (!( /*_#IS_A__L11*/ meltfnum[10]));; - MELT_LOCATION ("warmelt-outobj.melt:2931:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2933:/ cond"); /*cond */ if ( /*_#NOT__L12*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -11097,7 +11265,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2931:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2933:/ cond.else"); /*^block */ /*anyblock */ @@ -11108,7 +11276,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("outputcod_objapply check curarg not objinstr"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (2931) ? (2931) : __LINE__, __FUNCTION__); + melt_assert_failed (("outputcod_objapply check curarg not objinstr"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (2933) ? (2933) : __LINE__, __FUNCTION__); ; } ; @@ -11124,7 +11292,7 @@ lab_endgetargs:; /*_.IFELSE___V17*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2931:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2933:/ clear"); /*clear *//*_#IS_A__L11*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_#NOT__L12*/ meltfnum[11] = 0; @@ -11137,12 +11305,12 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[15] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:2932:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2934:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L13*/ meltfnum[10] = (( /*_#CURANK__L10*/ meltfnum[9]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:2932:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2934:/ cond"); /*cond */ if ( /*_#I__L13*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -11150,7 +11318,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:2933:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2935:/ quasiblock"); /*^checksignal */ @@ -11174,7 +11342,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2934:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2936:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11187,7 +11355,7 @@ lab_endgetargs:; ( /*_.CURCTYP__V18*/ meltfptr[16]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[6])));; - MELT_LOCATION ("warmelt-outobj.melt:2934:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2936:/ cond"); /*cond */ if ( /*_#IS_A__L14*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -11197,7 +11365,7 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-outobj.melt:2934:/ cond.else"); + ("warmelt-outobj.melt:2936:/ cond.else"); /*^block */ /*anyblock */ @@ -11212,7 +11380,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2934) ? (2934) : + (2936) ? (2936) : __LINE__, __FUNCTION__); ; } @@ -11229,7 +11397,7 @@ lab_endgetargs:; /*_.IFELSE___V20*/ meltfptr[19];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2934:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2936:/ clear"); /*clear *//*_#IS_A__L14*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.IFELSE___V20*/ meltfptr[19] = 0; @@ -11247,7 +11415,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.BOXDEPTHP1__V13*/ meltfptr[12])));; MELT_LOCATION - ("warmelt-outobj.melt:2935:/ checksignal"); + ("warmelt-outobj.melt:2937:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11276,7 +11444,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2936:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2938:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -11287,7 +11455,7 @@ lab_endgetargs:; (( /*_#CURANK__L10*/ meltfnum[9]) - (1));; { - MELT_LOCATION ("warmelt-outobj.melt:2937:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2939:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -11296,14 +11464,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2938:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2940:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("].")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2939:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:2941:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURCTYP__V18*/ meltfptr[16]), 5, "CTYPE_PARSTRING"); @@ -11321,12 +11489,12 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:2940:/ checksignal"); + ("warmelt-outobj.melt:2942:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L17*/ meltfnum[16] = (( /*_.CURARG__V15*/ meltfptr[14]) == NULL);; - MELT_LOCATION ("warmelt-outobj.melt:2940:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2942:/ cond"); /*cond */ if ( /*_#NULL__L17*/ meltfnum[16]) /*then */ { /*^cond.then */ @@ -11339,7 +11507,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:2941:/ locexp"); + ("warmelt-outobj.melt:2943:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ @@ -11355,14 +11523,14 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-outobj.melt:2940:/ cond.else"); + ("warmelt-outobj.melt:2942:/ cond.else"); /*^block */ /*anyblock */ { MELT_LOCATION - ("warmelt-outobj.melt:2942:/ checksignal"); + ("warmelt-outobj.melt:2944:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L18*/ meltfnum[17] = @@ -11370,7 +11538,7 @@ lab_endgetargs:; ( /*_.CURARG__V15*/ meltfptr[14]), (melt_ptr_t) (( /*!CLASS_OBJNIL */ meltfrout->tabval[7])));; - MELT_LOCATION ("warmelt-outobj.melt:2942:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2944:/ cond"); /*cond */ if ( /*_#IS_A__L18*/ meltfnum[17]) /*then */ { /*^cond.then */ @@ -11383,7 +11551,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:2943:/ locexp"); + ("warmelt-outobj.melt:2945:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ @@ -11400,14 +11568,14 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-outobj.melt:2942:/ cond.else"); + ("warmelt-outobj.melt:2944:/ cond.else"); /*^block */ /*anyblock */ { MELT_LOCATION - ("warmelt-outobj.melt:2944:/ checksignal"); + ("warmelt-outobj.melt:2946:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L19*/ meltfnum[18] = @@ -11415,7 +11583,7 @@ lab_endgetargs:; (( /*!CTYPE_VALUE */ meltfrout-> tabval[8])));; MELT_LOCATION - ("warmelt-outobj.melt:2944:/ cond"); + ("warmelt-outobj.melt:2946:/ cond"); /*cond */ if ( /*_#__L19*/ meltfnum[18]) /*then */ { /*^cond.then */ @@ -11426,7 +11594,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:2945:/ locexp"); + ("warmelt-outobj.melt:2947:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("meltbp_aptr = (melt_ptr_t*) &")); @@ -11438,7 +11606,7 @@ lab_endgetargs:; ( /*_.BOXDEPTHP1__V13*/ meltfptr[12])));; MELT_LOCATION - ("warmelt-outobj.melt:2946:/ checksignal"); + ("warmelt-outobj.melt:2948:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -11467,7 +11635,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:2944:/ quasiblock"); + ("warmelt-outobj.melt:2946:/ quasiblock"); /*_.PROGN___V27*/ meltfptr[26] = @@ -11480,7 +11648,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:2944:/ clear"); + ("warmelt-outobj.melt:2946:/ clear"); /*clear *//*_#GET_INT__L20*/ meltfnum[19] = 0; /*^clear */ @@ -11500,7 +11668,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:2949:/ getslot"); + ("warmelt-outobj.melt:2951:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURCTYP__V18*/ meltfptr[16]), 6, "CTYPE_ARGFIELD"); @@ -11522,7 +11690,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:2950:/ locexp"); + ("warmelt-outobj.melt:2952:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" = ")); @@ -11534,7 +11702,7 @@ lab_endgetargs:; ( /*_.BOXDEPTHP1__V13*/ meltfptr[12])));; MELT_LOCATION - ("warmelt-outobj.melt:2951:/ checksignal"); + ("warmelt-outobj.melt:2953:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -11563,7 +11731,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:2948:/ quasiblock"); + ("warmelt-outobj.melt:2950:/ quasiblock"); /*_.PROGN___V30*/ meltfptr[29] = @@ -11576,7 +11744,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:2944:/ clear"); + ("warmelt-outobj.melt:2946:/ clear"); /*clear *//*_.CTYPE_ARGFIELD__V28*/ meltfptr[25] = 0; /*^clear */ @@ -11597,7 +11765,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:2942:/ clear"); + ("warmelt-outobj.melt:2944:/ clear"); /*clear *//*_#__L19*/ meltfnum[18] = 0; /*^clear */ /*clear *//*_.IFELSE___V25*/ meltfptr[24] = @@ -11611,7 +11779,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:2940:/ clear"); + ("warmelt-outobj.melt:2942:/ clear"); /*clear *//*_#IS_A__L18*/ meltfnum[17] = 0; /*^clear */ /*clear *//*_.IFELSE___V24*/ meltfptr[23] = 0; @@ -11621,7 +11789,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2953:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2955:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -11634,7 +11802,7 @@ lab_endgetargs:; ( /*_.BOXDEPTHP1__V13*/ meltfptr[12])));; { - MELT_LOCATION ("warmelt-outobj.melt:2954:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2956:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -11643,7 +11811,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-outobj.melt:2933:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2935:/ clear"); /*clear *//*_.CURCTYP__V18*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.IFCPP___V19*/ meltfptr[18] = 0; @@ -11668,7 +11836,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2956:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2958:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11680,7 +11848,7 @@ lab_endgetargs:; melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2957:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2959:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -11715,7 +11883,7 @@ lab_endgetargs:; /*_#I__L25*/ meltfnum[11] = (( /*_#STRBUF_USEDLENGTH__L23*/ meltfnum[18]) < ( /*_#GET_INT__L24*/ meltfnum[17]));; - MELT_LOCATION ("warmelt-outobj.melt:2956:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2958:/ cond"); /*cond */ if ( /*_#I__L25*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -11723,7 +11891,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2956:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2958:/ cond.else"); /*^block */ /*anyblock */ @@ -11738,7 +11906,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2956) ? (2956) : __LINE__, + (2958) ? (2958) : __LINE__, __FUNCTION__); ; } @@ -11755,7 +11923,7 @@ lab_endgetargs:; /*_.IFELSE___V33*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2956:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2958:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L23*/ meltfnum[18] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V32*/ meltfptr[26] = 0; @@ -11778,7 +11946,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:2928:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2930:/ clear"); /*clear *//*_.CURARG__V15*/ meltfptr[14] = 0; /*^clear */ /*clear *//*_#CURANK__L10*/ meltfnum[9] = 0; @@ -11790,12 +11958,12 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V31*/ meltfptr[25] = 0; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-outobj.melt:2920:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2922:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2919:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2921:/ clear"); /*clear *//*_#I__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_#I__L8*/ meltfnum[7] = 0; @@ -11805,7 +11973,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:2963:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2965:/ quasiblock"); /*^newclosure */ @@ -11856,7 +12024,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.BOXDEPTHP1__V13*/ meltfptr[12]); ; /*_.LAMBDA___V34*/ meltfptr[24] = /*_.LAMBDA___V35*/ meltfptr[23];; - MELT_LOCATION ("warmelt-outobj.melt:2961:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2963:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11877,7 +12045,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2969:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2971:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" melt_apply ((meltclosure_ptr_t)(")); @@ -11885,7 +12053,7 @@ lab_endgetargs:; ; /*_#I__L26*/ meltfnum[15] = ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; - MELT_LOCATION ("warmelt-outobj.melt:2970:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2972:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -11909,13 +12077,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2971:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2973:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("), (melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2973:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2975:/ quasiblock"); /*_.FIRSTARG__V39*/ meltfptr[21] = @@ -11925,7 +12093,7 @@ lab_endgetargs:; /*_#I__L27*/ meltfnum[16] = ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; - MELT_LOCATION ("warmelt-outobj.melt:2974:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2976:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -11949,7 +12117,7 @@ lab_endgetargs:; ; /*_.LET___V38*/ meltfptr[19] = /*_.OUTPUT_C_CODE__V40*/ meltfptr[22];; - MELT_LOCATION ("warmelt-outobj.melt:2973:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2975:/ clear"); /*clear *//*_.FIRSTARG__V39*/ meltfptr[21] = 0; /*^clear */ /*clear *//*_#I__L27*/ meltfnum[16] = 0; @@ -11957,13 +12125,13 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_C_CODE__V40*/ meltfptr[22] = 0; { - MELT_LOCATION ("warmelt-outobj.melt:2976:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2978:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("), (")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2980:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:2982:/ quasiblock"); /*^newclosure */ @@ -11988,7 +12156,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]); ; /*_.LAMBDA___V41*/ meltfptr[26] = /*_.LAMBDA___V42*/ meltfptr[29];; - MELT_LOCATION ("warmelt-outobj.melt:2978:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2980:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12009,18 +12177,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2983:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2985:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("\"\"), ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2985:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2987:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L28*/ meltfnum[19] = (( /*_#NBARG__L3*/ meltfnum[1]) > (1));; - MELT_LOCATION ("warmelt-outobj.melt:2985:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2987:/ cond"); /*cond */ if ( /*_#I__L28*/ meltfnum[19]) /*then */ { /*^cond.then */ @@ -12030,7 +12198,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:2986:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2988:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -12043,7 +12211,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2985:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2987:/ cond.else"); /*^block */ /*anyblock */ @@ -12051,7 +12219,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:2987:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2989:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -12065,7 +12233,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2989:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2991:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" \"\", (union meltparam_un*)0")); @@ -12073,7 +12241,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2990:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2992:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -12083,14 +12251,14 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:2991:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2993:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L29*/ meltfnum[18]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:2992:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2994:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("}")); @@ -12098,14 +12266,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2993:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2995:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2994:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2996:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12116,7 +12284,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L30*/ meltfnum[17] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:2995:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2997:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -12151,7 +12319,7 @@ lab_endgetargs:; /*_#I__L32*/ meltfnum[6] = (( /*_#STRBUF_USEDLENGTH__L30*/ meltfnum[17]) < ( /*_#GET_INT__L31*/ meltfnum[11]));; - MELT_LOCATION ("warmelt-outobj.melt:2994:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2996:/ cond"); /*cond */ if ( /*_#I__L32*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -12159,7 +12327,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2994:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2996:/ cond.else"); /*^block */ /*anyblock */ @@ -12173,7 +12341,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2994) ? (2994) : __LINE__, __FUNCTION__); + (2996) ? (2996) : __LINE__, __FUNCTION__); ; } ; @@ -12188,7 +12356,7 @@ lab_endgetargs:; /*_.IFCPP___V44*/ meltfptr[22] = /*_.IFELSE___V46*/ meltfptr[45];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2994:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2996:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L30*/ meltfnum[17] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V45*/ meltfptr[44] = 0; @@ -12209,7 +12377,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V44*/ meltfptr[22];; - MELT_LOCATION ("warmelt-outobj.melt:2907:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2909:/ clear"); /*clear *//*_.ALOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.ADEST__V9*/ meltfptr[8] = 0; @@ -12251,14 +12419,26 @@ lab_endgetargs:; /*clear *//*_#I__L29*/ meltfnum[18] = 0; /*^clear */ /*clear *//*_.IFCPP___V44*/ meltfptr[22] = 0; - MELT_LOCATION ("warmelt-outobj.melt:2905:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:2905:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:2907:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -12352,7 +12532,7 @@ meltrout_77_warmelt_outobj_LAMBDA___11__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2963:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2965:/ getarg"); /*_.CURDEST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -12365,7 +12545,7 @@ lab_endgetargs:; /*_#GET_INT__L1*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[2]))));; - MELT_LOCATION ("warmelt-outobj.melt:2964:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2966:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -12391,7 +12571,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:2965:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:2967:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12402,7 +12582,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:2966:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2968:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -12437,7 +12617,7 @@ lab_endgetargs:; /*_#I__L4*/ meltfnum[3] = (( /*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1]) < ( /*_#GET_INT__L3*/ meltfnum[2]));; - MELT_LOCATION ("warmelt-outobj.melt:2965:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:2967:/ cond"); /*cond */ if ( /*_#I__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -12445,7 +12625,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:2965:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:2967:/ cond.else"); /*^block */ /*anyblock */ @@ -12459,7 +12639,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (2965) ? (2965) : __LINE__, __FUNCTION__); + (2967) ? (2967) : __LINE__, __FUNCTION__); ; } ; @@ -12474,7 +12654,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:2965:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:2967:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V5*/ meltfptr[4] = 0; @@ -12493,13 +12673,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2967:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2969:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), (" = ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2963:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2965:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -12595,7 +12775,7 @@ meltrout_78_warmelt_outobj_LAMBDA___12__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:2980:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:2982:/ getarg"); /*_.PARD__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -12607,7 +12787,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:2981:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2983:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), @@ -12617,13 +12797,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:2982:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:2984:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), (" ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:2980:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:2982:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -12714,7 +12894,7 @@ meltrout_79_warmelt_outobj_OUTPUCOD_OBJMSEND (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3002:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3004:/ getarg"); /*_.OMSEND__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -12752,7 +12932,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3003:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3005:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12764,7 +12944,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OMSEND__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJMSEND */ meltfrout-> tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:3003:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3005:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -12772,7 +12952,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3003:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3005:/ cond.else"); /*^block */ /*anyblock */ @@ -12786,7 +12966,7 @@ lab_endgetargs:; melt_assert_failed (("check omsend"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3003) ? (3003) : __LINE__, __FUNCTION__); + (3005) ? (3005) : __LINE__, __FUNCTION__); ; } ; @@ -12801,7 +12981,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3003:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3005:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -12812,7 +12992,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3004:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3006:/ quasiblock"); /*^getslot */ @@ -12823,7 +13003,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3005:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3007:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OMSEND__V2*/ meltfptr[1]), 1, "OBDI_DESTLIST"); @@ -12831,7 +13011,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3006:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3008:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OMSEND__V2*/ meltfptr[1]), 2, "OBMSND_SEL"); @@ -12839,7 +13019,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3007:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3009:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OMSEND__V2*/ meltfptr[1]), 3, "OBMSND_RECV"); @@ -12847,7 +13027,7 @@ lab_endgetargs:; meltfptr[10] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3008:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3010:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OMSEND__V2*/ meltfptr[1]), 4, "OBMSND_ARGS"); @@ -12872,7 +13052,7 @@ lab_endgetargs:; (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[2])), ( /*_#I__L4*/ meltfnum[3])));; - MELT_LOCATION ("warmelt-outobj.melt:3013:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3015:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12896,7 +13076,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3014:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3016:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*msend*/{")); @@ -12906,17 +13086,17 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3015:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3017:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L5*/ meltfnum[4]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3016:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3018:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L6*/ meltfnum[5] = (( /*_#NBARG__L3*/ meltfnum[1]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:3016:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3018:/ cond"); /*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -12926,7 +13106,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3021:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3023:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -12935,7 +13115,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3022:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3024:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#NBARG__L3*/ meltfnum[1])); @@ -12943,7 +13123,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3023:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3025:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("];")); @@ -12953,7 +13133,7 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3024:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3026:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L7*/ meltfnum[6]), 0); @@ -12961,7 +13141,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3025:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3027:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -12972,7 +13152,7 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3026:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3028:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L8*/ meltfnum[7]), 0); @@ -12996,7 +13176,7 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-outobj.melt:3031:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3033:/ quasiblock"); /*^checksignal */ @@ -13020,7 +13200,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3032:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3034:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13034,7 +13214,7 @@ lab_endgetargs:; (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout-> tabval[5])));; - MELT_LOCATION ("warmelt-outobj.melt:3032:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3034:/ cond"); /*cond */ if ( /*_#IS_A__L10*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -13042,7 +13222,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3032:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3034:/ cond.else"); /*^block */ /*anyblock */ @@ -13057,7 +13237,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3032) ? (3032) : __LINE__, + (3034) ? (3034) : __LINE__, __FUNCTION__); ; } @@ -13074,7 +13254,7 @@ lab_endgetargs:; /*_.IFELSE___V19*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3032:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3034:/ clear"); /*clear *//*_#IS_A__L10*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0; @@ -13090,7 +13270,7 @@ lab_endgetargs:; /*_#GET_INT__L11*/ meltfnum[9] = (melt_get_int ((melt_ptr_t) ( /*_.BOXDEPTHP1__V14*/ meltfptr[13])));; - MELT_LOCATION ("warmelt-outobj.melt:3033:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3035:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13117,7 +13297,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3034:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3036:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -13126,7 +13306,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3035:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3037:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#CURANK__L9*/ meltfnum[8])); @@ -13134,14 +13314,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3036:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3038:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("].")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3037:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3039:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURCTYP__V17*/ meltfptr[16]), 5, "CTYPE_PARSTRING"); @@ -13158,12 +13338,12 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.CTYPE_PARSTRING__V21*/ meltfptr[20])); } ; - MELT_LOCATION ("warmelt-outobj.melt:3038:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3040:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L12*/ meltfnum[11] = (( /*_.CURARG__V16*/ meltfptr[15]) == NULL);; - MELT_LOCATION ("warmelt-outobj.melt:3038:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3040:/ cond"); /*cond */ if ( /*_#NULL__L12*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -13175,7 +13355,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3039:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3041:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -13189,14 +13369,14 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3038:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3040:/ cond.else"); /*^block */ /*anyblock */ { MELT_LOCATION - ("warmelt-outobj.melt:3041:/ checksignal"); + ("warmelt-outobj.melt:3043:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L13*/ meltfnum[12] = @@ -13204,7 +13384,7 @@ lab_endgetargs:; ( /*_.CURARG__V16*/ meltfptr[15]), (melt_ptr_t) (( /*!CLASS_OBJNIL */ meltfrout->tabval[6])));; - MELT_LOCATION ("warmelt-outobj.melt:3041:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3043:/ cond"); /*cond */ if ( /*_#IS_A__L13*/ meltfnum[12]) /*then */ { /*^cond.then */ @@ -13217,7 +13397,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:3042:/ locexp"); + ("warmelt-outobj.melt:3044:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ @@ -13233,20 +13413,20 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-outobj.melt:3041:/ cond.else"); + ("warmelt-outobj.melt:3043:/ cond.else"); /*^block */ /*anyblock */ { MELT_LOCATION - ("warmelt-outobj.melt:3044:/ checksignal"); + ("warmelt-outobj.melt:3046:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L14*/ meltfnum[13] = (( /*_.CURCTYP__V17*/ meltfptr[16]) == (( /*!CTYPE_VALUE */ meltfrout->tabval[7])));; - MELT_LOCATION ("warmelt-outobj.melt:3044:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3046:/ cond"); /*cond */ if ( /*_#__L14*/ meltfnum[13]) /*then */ { /*^cond.then */ @@ -13257,7 +13437,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:3045:/ locexp"); + ("warmelt-outobj.melt:3047:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ @@ -13271,7 +13451,7 @@ lab_endgetargs:; ( /*_.BOXDEPTHP1__V14*/ meltfptr[13])));; MELT_LOCATION - ("warmelt-outobj.melt:3046:/ checksignal"); + ("warmelt-outobj.melt:3048:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -13298,7 +13478,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:3044:/ quasiblock"); + ("warmelt-outobj.melt:3046:/ quasiblock"); /*_.PROGN___V26*/ meltfptr[25] = @@ -13310,7 +13490,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:3044:/ clear"); + ("warmelt-outobj.melt:3046:/ clear"); /*clear *//*_#GET_INT__L15*/ meltfnum[14] = 0; /*^clear */ @@ -13332,7 +13512,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG MELT_LOCATION - ("warmelt-outobj.melt:3049:/ cppif.then"); + ("warmelt-outobj.melt:3051:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13351,7 +13531,7 @@ lab_endgetargs:; (!( /*_#IS_MULTIPLE__L16*/ meltfnum[14]));; MELT_LOCATION - ("warmelt-outobj.melt:3049:/ cond"); + ("warmelt-outobj.melt:3051:/ cond"); /*cond */ if ( /*_#NOT__L17*/ meltfnum[16]) /*then */ { /*^cond.then */ @@ -13361,7 +13541,7 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-outobj.melt:3049:/ cond.else"); + ("warmelt-outobj.melt:3051:/ cond.else"); /*^block */ /*anyblock */ @@ -13372,7 +13552,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("check curarg is not multiple"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (3049) ? (3049) : __LINE__, __FUNCTION__); + melt_assert_failed (("check curarg is not multiple"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (3051) ? (3051) : __LINE__, __FUNCTION__); ; } ; @@ -13390,7 +13570,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:3049:/ clear"); + ("warmelt-outobj.melt:3051:/ clear"); /*clear *//*_#IS_MULTIPLE__L16*/ meltfnum[14] = 0; /*^clear */ @@ -13407,7 +13587,7 @@ lab_endgetargs:; #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION - ("warmelt-outobj.melt:3050:/ getslot"); + ("warmelt-outobj.melt:3052:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURCTYP__V17*/ meltfptr[16]), 6, "CTYPE_ARGFIELD"); @@ -13428,7 +13608,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:3051:/ locexp"); + ("warmelt-outobj.melt:3053:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ @@ -13442,7 +13622,7 @@ lab_endgetargs:; ( /*_.BOXDEPTHP1__V14*/ meltfptr[13])));; MELT_LOCATION - ("warmelt-outobj.melt:3052:/ checksignal"); + ("warmelt-outobj.melt:3054:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -13469,7 +13649,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:3048:/ quasiblock"); + ("warmelt-outobj.melt:3050:/ quasiblock"); /*_.PROGN___V31*/ meltfptr[30] = @@ -13481,7 +13661,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:3044:/ clear"); + ("warmelt-outobj.melt:3046:/ clear"); /*clear *//*_.IFCPP___V27*/ meltfptr[24] = 0; /*^clear */ @@ -13505,7 +13685,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:3041:/ clear"); + ("warmelt-outobj.melt:3043:/ clear"); /*clear *//*_#__L14*/ meltfnum[13] = 0; /*^clear */ /*clear *//*_.IFELSE___V24*/ meltfptr[23] = 0; @@ -13517,7 +13697,7 @@ lab_endgetargs:; /*_.IFELSE___V23*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3038:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3040:/ clear"); /*clear *//*_#IS_A__L13*/ meltfnum[12] = 0; /*^clear */ /*clear *//*_.IFELSE___V23*/ meltfptr[22] = 0; @@ -13527,7 +13707,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3054:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3056:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -13536,7 +13716,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3055:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3057:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13548,7 +13728,7 @@ lab_endgetargs:; melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3056:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3058:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -13583,7 +13763,7 @@ lab_endgetargs:; /*_#I__L21*/ meltfnum[13] = (( /*_#STRBUF_USEDLENGTH__L19*/ meltfnum[16]) < ( /*_#GET_INT__L20*/ meltfnum[14]));; - MELT_LOCATION ("warmelt-outobj.melt:3055:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3057:/ cond"); /*cond */ if ( /*_#I__L21*/ meltfnum[13]) /*then */ { /*^cond.then */ @@ -13591,7 +13771,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3055:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3057:/ cond.else"); /*^block */ /*anyblock */ @@ -13606,7 +13786,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3055) ? (3055) : __LINE__, + (3057) ? (3057) : __LINE__, __FUNCTION__); ; } @@ -13623,7 +13803,7 @@ lab_endgetargs:; /*_.IFELSE___V34*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3055:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3057:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L19*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V33*/ meltfptr[25] = 0; @@ -13647,7 +13827,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.BOXDEPTHP1__V14*/ meltfptr[13])));; { - MELT_LOCATION ("warmelt-outobj.melt:3057:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3059:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L22*/ @@ -13655,7 +13835,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-outobj.melt:3031:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3033:/ clear"); /*clear *//*_.CURCTYP__V17*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.IFCPP___V18*/ meltfptr[17] = 0; @@ -13679,18 +13859,18 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:3028:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3030:/ clear"); /*clear *//*_.CURARG__V16*/ meltfptr[15] = 0; /*^clear */ /*clear *//*_#CURANK__L9*/ meltfnum[8] = 0; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-outobj.melt:3020:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3022:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3016:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3018:/ clear"); /*clear *//*_#I__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_#I__L8*/ meltfnum[7] = 0; @@ -13715,7 +13895,7 @@ lab_endgetargs:; /*_#GET_INT__L23*/ meltfnum[16] = (melt_get_int ((melt_ptr_t) ( /*_.BOXDEPTHP1__V14*/ meltfptr[13])));; - MELT_LOCATION ("warmelt-outobj.melt:3064:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3066:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -13741,7 +13921,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3065:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3067:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13752,7 +13932,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L24*/ meltfnum[14] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3066:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3068:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -13787,7 +13967,7 @@ lab_endgetargs:; /*_#I__L26*/ meltfnum[9] = (( /*_#STRBUF_USEDLENGTH__L24*/ meltfnum[14]) < ( /*_#GET_INT__L25*/ meltfnum[13]));; - MELT_LOCATION ("warmelt-outobj.melt:3065:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3067:/ cond"); /*cond */ if ( /*_#I__L26*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -13795,7 +13975,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3065:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3067:/ cond.else"); /*^block */ /*anyblock */ @@ -13809,7 +13989,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3065) ? (3065) : __LINE__, + (3067) ? (3067) : __LINE__, __FUNCTION__); ; } @@ -13825,7 +14005,7 @@ lab_endgetargs:; /*_.IFCPP___V38*/ meltfptr[25] = /*_.IFELSE___V40*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3065:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3067:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L24*/ meltfnum[14] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V39*/ meltfptr[29] = 0; @@ -13844,7 +14024,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3067:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3069:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" = ")); @@ -13857,7 +14037,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:3061:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3063:/ clear"); /*clear *//*_.CURPAIR__V35*/ meltfptr[30] = 0; /*^clear */ /*clear *//*_.CURDEST__V36*/ meltfptr[23] = 0; @@ -13871,7 +14051,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3069:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3071:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13882,7 +14062,7 @@ lab_endgetargs:; /*_#IS_OBJECT__L27*/ meltfnum[11] = (melt_magic_discr ((melt_ptr_t) ( /*_.ORECV__V11*/ meltfptr[10])) == MELTOBMAG_OBJECT);; - MELT_LOCATION ("warmelt-outobj.melt:3069:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3071:/ cond"); /*cond */ if ( /*_#IS_OBJECT__L27*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -13890,7 +14070,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3069:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3071:/ cond.else"); /*^block */ /*anyblock */ @@ -13904,7 +14084,7 @@ lab_endgetargs:; melt_assert_failed (("check orecv object"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3069) ? (3069) : __LINE__, __FUNCTION__); + (3071) ? (3071) : __LINE__, __FUNCTION__); ; } ; @@ -13919,7 +14099,7 @@ lab_endgetargs:; /*_.IFCPP___V41*/ meltfptr[17] = /*_.IFELSE___V42*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3069:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3071:/ clear"); /*clear *//*_#IS_OBJECT__L27*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.IFELSE___V42*/ meltfptr[18] = 0; @@ -13932,7 +14112,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3071:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3073:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("meltgc_send((melt_ptr_t)(")); @@ -13940,7 +14120,7 @@ lab_endgetargs:; ; /*_#I__L28*/ meltfnum[12] = (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; - MELT_LOCATION ("warmelt-outobj.melt:3072:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3074:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -13964,7 +14144,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3073:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3075:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("), (melt_ptr_t)(")); @@ -13972,7 +14152,7 @@ lab_endgetargs:; ; /*_#I__L29*/ meltfnum[6] = (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; - MELT_LOCATION ("warmelt-outobj.melt:3074:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3076:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -13996,13 +14176,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3075:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3077:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("), (")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3079:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3081:/ quasiblock"); /*^newclosure */ @@ -14027,7 +14207,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]); ; /*_.LAMBDA___V45*/ meltfptr[24] = /*_.LAMBDA___V46*/ meltfptr[29];; - MELT_LOCATION ("warmelt-outobj.melt:3077:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3079:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14048,18 +14228,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3082:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3084:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("\"\"), ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3083:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3085:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L30*/ meltfnum[7] = (( /*_#NBARG__L3*/ meltfnum[1]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:3083:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3085:/ cond"); /*cond */ if ( /*_#I__L30*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -14069,7 +14249,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3084:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3086:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -14082,7 +14262,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3083:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3085:/ cond.else"); /*^block */ /*anyblock */ @@ -14090,7 +14270,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3085:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3087:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -14104,7 +14284,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3087:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3089:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" \"\", (union meltparam_un*)0")); @@ -14112,7 +14292,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3088:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3090:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -14122,14 +14302,14 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3089:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3091:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L31*/ meltfnum[14]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3090:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3092:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("}")); @@ -14137,14 +14317,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3091:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3093:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3092:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3094:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14155,7 +14335,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L32*/ meltfnum[13] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3093:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3095:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -14190,7 +14370,7 @@ lab_endgetargs:; /*_#I__L34*/ meltfnum[11] = (( /*_#STRBUF_USEDLENGTH__L32*/ meltfnum[13]) < ( /*_#GET_INT__L33*/ meltfnum[9]));; - MELT_LOCATION ("warmelt-outobj.melt:3092:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3094:/ cond"); /*cond */ if ( /*_#I__L34*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -14198,7 +14378,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3092:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3094:/ cond.else"); /*^block */ /*anyblock */ @@ -14212,7 +14392,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3092) ? (3092) : __LINE__, __FUNCTION__); + (3094) ? (3094) : __LINE__, __FUNCTION__); ; } ; @@ -14227,7 +14407,7 @@ lab_endgetargs:; /*_.IFCPP___V48*/ meltfptr[18] = /*_.IFELSE___V50*/ meltfptr[49];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3092:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3094:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L32*/ meltfnum[13] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V49*/ meltfptr[48] = 0; @@ -14248,7 +14428,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V48*/ meltfptr[18];; - MELT_LOCATION ("warmelt-outobj.melt:3004:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3006:/ clear"); /*clear *//*_.OLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.ODEST__V9*/ meltfptr[8] = 0; @@ -14292,14 +14472,26 @@ lab_endgetargs:; /*clear *//*_#I__L31*/ meltfnum[14] = 0; /*^clear */ /*clear *//*_.IFCPP___V48*/ meltfptr[18] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3002:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3004:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:3002:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3004:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -14393,7 +14585,7 @@ meltrout_80_warmelt_outobj_LAMBDA___13__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3079:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3081:/ getarg"); /*_.PARD__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -14405,7 +14597,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3080:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3082:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), @@ -14415,13 +14607,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3081:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3083:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), (" ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3079:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3081:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -14513,7 +14705,7 @@ meltrout_81_warmelt_outobj_OUTPUCOD_OBJMULTIAPPLY (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3100:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ getarg"); /*_.OAPP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -14551,7 +14743,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3101:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3103:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14563,7 +14755,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OAPP__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJMULTIAPPLY */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:3101:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3103:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -14571,7 +14763,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3101:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3103:/ cond.else"); /*^block */ /*anyblock */ @@ -14585,7 +14777,7 @@ lab_endgetargs:; melt_assert_failed (("check oapp"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3101) ? (3101) : __LINE__, __FUNCTION__); + (3103) ? (3103) : __LINE__, __FUNCTION__); ; } ; @@ -14600,7 +14792,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3101:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3103:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -14611,10 +14803,10 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3102:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3104:/ quasiblock"); - MELT_LOCATION ("warmelt-outobj.melt:3103:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3105:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OAPP__V2*/ meltfptr[1]), 0, "OBI_LOC"); @@ -14622,7 +14814,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3104:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3106:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OAPP__V2*/ meltfptr[1]), 1, "OBDI_DESTLIST"); @@ -14630,7 +14822,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3105:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3107:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OAPP__V2*/ meltfptr[1]), 2, "OBAPP_CLOS"); @@ -14638,7 +14830,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3106:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3108:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OAPP__V2*/ meltfptr[1]), 3, "OBAPP_ARGS"); @@ -14646,7 +14838,7 @@ lab_endgetargs:; meltfptr[10] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3107:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3109:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OAPP__V2*/ meltfptr[1]), 4, "OBMULTAPP_XRES"); @@ -14682,7 +14874,7 @@ lab_endgetargs:; ( /*_#I__L5*/ meltfnum[4])));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3114:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3116:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14696,7 +14888,7 @@ lab_endgetargs:; (melt_unsafe_magic_discr ((melt_ptr_t) ( /*_.OARGS__V11*/ meltfptr[10])) == MELTOBMAG_MULTIPLE));; - MELT_LOCATION ("warmelt-outobj.melt:3114:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3116:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE_OR_NULL__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -14704,7 +14896,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3114:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3116:/ cond.else"); /*^block */ /*anyblock */ @@ -14718,7 +14910,7 @@ lab_endgetargs:; melt_assert_failed (("check oargs"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3114) ? (3114) : __LINE__, __FUNCTION__); + (3116) ? (3116) : __LINE__, __FUNCTION__); ; } ; @@ -14733,7 +14925,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[15] = /*_.IFELSE___V17*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3114:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3116:/ clear"); /*clear *//*_#IS_MULTIPLE_OR_NULL__L6*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0; @@ -14746,7 +14938,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3115:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3117:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14760,7 +14952,7 @@ lab_endgetargs:; (melt_unsafe_magic_discr ((melt_ptr_t) ( /*_.OXRES__V12*/ meltfptr[11])) == MELTOBMAG_MULTIPLE));; - MELT_LOCATION ("warmelt-outobj.melt:3115:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3117:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE_OR_NULL__L7*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -14768,7 +14960,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3115:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3117:/ cond.else"); /*^block */ /*anyblock */ @@ -14782,7 +14974,7 @@ lab_endgetargs:; melt_assert_failed (("check oxres"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3115) ? (3115) : __LINE__, __FUNCTION__); + (3117) ? (3117) : __LINE__, __FUNCTION__); ; } ; @@ -14797,7 +14989,7 @@ lab_endgetargs:; /*_.IFCPP___V18*/ meltfptr[16] = /*_.IFELSE___V19*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3115:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3117:/ clear"); /*clear *//*_#IS_MULTIPLE_OR_NULL__L7*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0; @@ -14808,7 +15000,7 @@ lab_endgetargs:; /*_.IFCPP___V18*/ meltfptr[16] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3116:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3118:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14832,7 +15024,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3117:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3119:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*multiapply ")); @@ -14840,14 +15032,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3118:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3120:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#NBARG__L3*/ meltfnum[1])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3119:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3121:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("args, ")); @@ -14855,14 +15047,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3120:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3122:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#NBXRES__L4*/ meltfnum[3])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3121:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3123:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("x.res*/ ")); @@ -14870,7 +15062,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3122:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3124:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("{")); @@ -14880,17 +15072,17 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3123:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3125:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L8*/ meltfnum[5]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3124:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3126:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L9*/ meltfnum[8] = (( /*_#NBARG__L3*/ meltfnum[1]) > (1));; - MELT_LOCATION ("warmelt-outobj.melt:3124:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3126:/ cond"); /*cond */ if ( /*_#I__L9*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -14900,7 +15092,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3126:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3128:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -14911,7 +15103,7 @@ lab_endgetargs:; (( /*_#NBARG__L3*/ meltfnum[1]) - (1));; { - MELT_LOCATION ("warmelt-outobj.melt:3127:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3129:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L10*/ meltfnum[9])); @@ -14919,7 +15111,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3128:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3130:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("];")); @@ -14929,18 +15121,18 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3129:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3131:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L11*/ meltfnum[10]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3125:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3127:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3124:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3126:/ clear"); /*clear *//*_#I__L10*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_#I__L11*/ meltfnum[10] = 0; @@ -14948,12 +15140,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:3131:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3133:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L12*/ meltfnum[9] = (( /*_#NBXRES__L4*/ meltfnum[3]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:3131:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3133:/ cond"); /*cond */ if ( /*_#I__L12*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -14965,7 +15157,7 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3133:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3135:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L13*/ meltfnum[10]), 0); @@ -14973,7 +15165,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3134:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3136:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -14982,7 +15174,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3135:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3137:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#NBXRES__L4*/ meltfnum[3])); @@ -14990,7 +15182,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3136:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3138:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("];")); @@ -15000,18 +15192,18 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3137:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3139:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L14*/ meltfnum[13]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3132:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3134:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3131:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3133:/ clear"); /*clear *//*_#I__L13*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_#I__L14*/ meltfnum[13] = 0; @@ -15019,12 +15211,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:3139:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3141:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L15*/ meltfnum[10] = (( /*_#NBXRES__L4*/ meltfnum[3]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:3139:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3141:/ cond"); /*cond */ if ( /*_#I__L15*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -15034,7 +15226,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3141:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3143:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -15045,13 +15237,13 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3142:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3144:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L16*/ meltfnum[13]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3146:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3148:/ quasiblock"); /*^newclosure */ @@ -15080,7 +15272,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.RESDESCLIST__V14*/ meltfptr[13]); ; /*_.LAMBDA___V22*/ meltfptr[21] = /*_.LAMBDA___V23*/ meltfptr[22];; - MELT_LOCATION ("warmelt-outobj.melt:3144:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3146:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15099,7 +15291,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3140:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3142:/ quasiblock"); /*_.PROGN___V25*/ meltfptr[24] = @@ -15109,7 +15301,7 @@ lab_endgetargs:; /*_.IF___V21*/ meltfptr[20] = /*_.PROGN___V25*/ meltfptr[24];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3139:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3141:/ clear"); /*clear *//*_#I__L16*/ meltfnum[13] = 0; /*^clear */ /*clear *//*_.LAMBDA___V22*/ meltfptr[21] = 0; @@ -15126,12 +15318,12 @@ lab_endgetargs:; /*_.IF___V21*/ meltfptr[20] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:3149:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3151:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L17*/ meltfnum[13] = (( /*_#NBARG__L3*/ meltfnum[1]) > (1));; - MELT_LOCATION ("warmelt-outobj.melt:3149:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3151:/ cond"); /*cond */ if ( /*_#I__L17*/ meltfnum[13]) /*then */ { /*^cond.then */ @@ -15141,7 +15333,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3151:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3153:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -15152,7 +15344,7 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3152:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3154:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L18*/ meltfnum[17]), 0); @@ -15176,12 +15368,12 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-outobj.melt:3157:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3159:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L20*/ meltfnum[19] = (( /*_#CURANK__L19*/ meltfnum[18]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:3157:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3159:/ cond"); /*cond */ if ( /*_#I__L20*/ meltfnum[19]) /*then */ { /*^cond.then */ @@ -15189,7 +15381,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:3158:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3160:/ quasiblock"); /*^checksignal */ @@ -15213,7 +15405,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3159:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3161:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15226,7 +15418,7 @@ lab_endgetargs:; ( /*_.CURCTYP__V27*/ meltfptr[23]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout->tabval[8])));; - MELT_LOCATION ("warmelt-outobj.melt:3159:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3161:/ cond"); /*cond */ if ( /*_#IS_A__L21*/ meltfnum[20]) /*then */ { /*^cond.then */ @@ -15236,7 +15428,7 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-outobj.melt:3159:/ cond.else"); + ("warmelt-outobj.melt:3161:/ cond.else"); /*^block */ /*anyblock */ @@ -15251,7 +15443,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3159) ? (3159) : + (3161) ? (3161) : __LINE__, __FUNCTION__); ; } @@ -15268,7 +15460,7 @@ lab_endgetargs:; /*_.IFELSE___V29*/ meltfptr[28];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3159:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3161:/ clear"); /*clear *//*_#IS_A__L21*/ meltfnum[20] = 0; /*^clear */ /*clear *//*_.IFELSE___V29*/ meltfptr[28] = 0; @@ -15286,7 +15478,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.BOXDEPTHP1__V15*/ meltfptr[14])));; MELT_LOCATION - ("warmelt-outobj.melt:3160:/ checksignal"); + ("warmelt-outobj.melt:3162:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15315,7 +15507,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3161:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3163:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -15326,7 +15518,7 @@ lab_endgetargs:; (( /*_#CURANK__L19*/ meltfnum[18]) - (1));; { - MELT_LOCATION ("warmelt-outobj.melt:3162:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3164:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -15335,14 +15527,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3163:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3165:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("].")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3164:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3166:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURCTYP__V27*/ meltfptr[23]), 5, "CTYPE_PARSTRING"); @@ -15360,12 +15552,12 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:3166:/ checksignal"); + ("warmelt-outobj.melt:3168:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L24*/ meltfnum[23] = (( /*_.CURARG__V26*/ meltfptr[21]) == NULL);; - MELT_LOCATION ("warmelt-outobj.melt:3166:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3168:/ cond"); /*cond */ if ( /*_#NULL__L24*/ meltfnum[23]) /*then */ { /*^cond.then */ @@ -15378,7 +15570,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:3167:/ locexp"); + ("warmelt-outobj.melt:3169:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ @@ -15394,20 +15586,20 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-outobj.melt:3166:/ cond.else"); + ("warmelt-outobj.melt:3168:/ cond.else"); /*^block */ /*anyblock */ { MELT_LOCATION - ("warmelt-outobj.melt:3168:/ checksignal"); + ("warmelt-outobj.melt:3170:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L25*/ meltfnum[24] = (( /*_.CURCTYP__V27*/ meltfptr[23]) == (( /*!CTYPE_VALUE */ meltfrout->tabval[9])));; - MELT_LOCATION ("warmelt-outobj.melt:3168:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3170:/ cond"); /*cond */ if ( /*_#__L25*/ meltfnum[24]) /*then */ { /*^cond.then */ @@ -15418,7 +15610,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:3169:/ locexp"); + ("warmelt-outobj.melt:3171:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ @@ -15432,7 +15624,7 @@ lab_endgetargs:; ( /*_.BOXDEPTHP1__V15*/ meltfptr[14])));; MELT_LOCATION - ("warmelt-outobj.melt:3170:/ checksignal"); + ("warmelt-outobj.melt:3172:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -15459,7 +15651,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:3168:/ quasiblock"); + ("warmelt-outobj.melt:3170:/ quasiblock"); /*_.PROGN___V35*/ meltfptr[34] = @@ -15471,7 +15663,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:3168:/ clear"); + ("warmelt-outobj.melt:3170:/ clear"); /*clear *//*_#GET_INT__L26*/ meltfnum[25] = 0; /*^clear */ @@ -15491,7 +15683,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:3173:/ getslot"); + ("warmelt-outobj.melt:3175:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURCTYP__V27*/ meltfptr[23]), 6, "CTYPE_ARGFIELD"); @@ -15512,7 +15704,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:3174:/ locexp"); + ("warmelt-outobj.melt:3176:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ @@ -15526,7 +15718,7 @@ lab_endgetargs:; ( /*_.BOXDEPTHP1__V15*/ meltfptr[14])));; MELT_LOCATION - ("warmelt-outobj.melt:3175:/ checksignal"); + ("warmelt-outobj.melt:3177:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -15553,7 +15745,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:3172:/ quasiblock"); + ("warmelt-outobj.melt:3174:/ quasiblock"); /*_.PROGN___V38*/ meltfptr[37] = @@ -15565,7 +15757,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:3168:/ clear"); + ("warmelt-outobj.melt:3170:/ clear"); /*clear *//*_.CTYPE_ARGFIELD__V36*/ meltfptr[33] = 0; /*^clear */ @@ -15586,7 +15778,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:3166:/ clear"); + ("warmelt-outobj.melt:3168:/ clear"); /*clear *//*_#__L25*/ meltfnum[24] = 0; /*^clear */ /*clear *//*_.IFELSE___V33*/ meltfptr[32] = 0; @@ -15596,7 +15788,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3177:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3179:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -15604,7 +15796,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-outobj.melt:3158:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3160:/ clear"); /*clear *//*_.CURCTYP__V27*/ meltfptr[23] = 0; /*^clear */ /*clear *//*_.IFCPP___V28*/ meltfptr[24] = 0; @@ -15627,7 +15819,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3179:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3181:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15639,7 +15831,7 @@ lab_endgetargs:; melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3180:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3182:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -15674,7 +15866,7 @@ lab_endgetargs:; /*_#I__L30*/ meltfnum[20] = (( /*_#STRBUF_USEDLENGTH__L28*/ meltfnum[25]) < ( /*_#GET_INT__L29*/ meltfnum[24]));; - MELT_LOCATION ("warmelt-outobj.melt:3179:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3181:/ cond"); /*cond */ if ( /*_#I__L30*/ meltfnum[20]) /*then */ { /*^cond.then */ @@ -15682,7 +15874,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3179:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3181:/ cond.else"); /*^block */ /*anyblock */ @@ -15697,7 +15889,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3179) ? (3179) : __LINE__, + (3181) ? (3181) : __LINE__, __FUNCTION__); ; } @@ -15714,7 +15906,7 @@ lab_endgetargs:; /*_.IFELSE___V41*/ meltfptr[37];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3179:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3181:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L28*/ meltfnum[25] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V40*/ meltfptr[34] = 0; @@ -15737,7 +15929,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:3154:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3156:/ clear"); /*clear *//*_.CURARG__V26*/ meltfptr[21] = 0; /*^clear */ /*clear *//*_#CURANK__L19*/ meltfnum[18] = 0; @@ -15752,18 +15944,18 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.BOXDEPTHP1__V15*/ meltfptr[14])));; { - MELT_LOCATION ("warmelt-outobj.melt:3182:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3184:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L31*/ meltfnum[22]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3150:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3152:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3149:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3151:/ clear"); /*clear *//*_#I__L18*/ meltfnum[17] = 0; /*^clear */ /*clear *//*_#GET_INT__L31*/ meltfnum[22] = 0; @@ -15771,12 +15963,12 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:3185:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3187:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L32*/ meltfnum[23] = (( /*_#NBXRES__L4*/ meltfnum[3]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:3185:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3187:/ cond"); /*cond */ if ( /*_#I__L32*/ meltfnum[23]) /*then */ { /*^cond.then */ @@ -15784,7 +15976,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:3189:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3191:/ quasiblock"); /*^newclosure */ @@ -15858,7 +16050,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]); ; /*_.LAMBDA___V43*/ meltfptr[23] = /*_.LAMBDA___V44*/ meltfptr[24];; - MELT_LOCATION ("warmelt-outobj.melt:3187:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3189:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15877,7 +16069,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3186:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3188:/ quasiblock"); /*_.PROGN___V46*/ meltfptr[30] = @@ -15887,7 +16079,7 @@ lab_endgetargs:; /*_.IF___V42*/ meltfptr[32] = /*_.PROGN___V46*/ meltfptr[30];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3185:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3187:/ clear"); /*clear *//*_.LAMBDA___V43*/ meltfptr[23] = 0; /*^clear */ /*clear *//*_.MULTIPLE_EVERY__V45*/ meltfptr[28] = 0; @@ -15906,7 +16098,7 @@ lab_endgetargs:; /*_#GET_INT__L33*/ meltfnum[25] = (melt_get_int ((melt_ptr_t) ( /*_.BOXDEPTHP1__V15*/ meltfptr[14])));; - MELT_LOCATION ("warmelt-outobj.melt:3213:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3215:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15928,7 +16120,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3217:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3219:/ quasiblock"); /*^newclosure */ @@ -15979,7 +16171,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.BOXDEPTHP1__V15*/ meltfptr[14]); ; /*_.LAMBDA___V48*/ meltfptr[34] = /*_.LAMBDA___V49*/ meltfptr[37];; - MELT_LOCATION ("warmelt-outobj.melt:3215:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3217:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -16000,7 +16192,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3221:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3223:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" melt_apply ((meltclosure_ptr_t)(")); @@ -16008,7 +16200,7 @@ lab_endgetargs:; ; /*_#I__L34*/ meltfnum[24] = ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; - MELT_LOCATION ("warmelt-outobj.melt:3222:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3224:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -16032,13 +16224,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3223:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3225:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("), (melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3225:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3227:/ quasiblock"); /*_.FIRSTARG__V53*/ meltfptr[52] = @@ -16048,7 +16240,7 @@ lab_endgetargs:; /*_#I__L35*/ meltfnum[20] = ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; - MELT_LOCATION ("warmelt-outobj.melt:3226:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3228:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -16072,7 +16264,7 @@ lab_endgetargs:; ; /*_.LET___V52*/ meltfptr[30] = /*_.OUTPUT_C_CODE__V54*/ meltfptr[53];; - MELT_LOCATION ("warmelt-outobj.melt:3225:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3227:/ clear"); /*clear *//*_.FIRSTARG__V53*/ meltfptr[52] = 0; /*^clear */ /*clear *//*_#I__L35*/ meltfnum[20] = 0; @@ -16080,13 +16272,13 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_C_CODE__V54*/ meltfptr[53] = 0; { - MELT_LOCATION ("warmelt-outobj.melt:3228:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3230:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("), (")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3232:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3234:/ quasiblock"); /*^newclosure */ @@ -16111,7 +16303,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]); ; /*_.LAMBDA___V55*/ meltfptr[52] = /*_.LAMBDA___V56*/ meltfptr[53];; - MELT_LOCATION ("warmelt-outobj.melt:3230:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3232:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -16132,18 +16324,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3235:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3237:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("\"\"), ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3237:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3239:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L36*/ meltfnum[17] = (( /*_#NBARG__L3*/ meltfnum[1]) > (1));; - MELT_LOCATION ("warmelt-outobj.melt:3237:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3239:/ cond"); /*cond */ if ( /*_#I__L36*/ meltfnum[17]) /*then */ { /*^cond.then */ @@ -16153,7 +16345,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3238:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3240:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -16166,7 +16358,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3237:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3239:/ cond.else"); /*^block */ /*anyblock */ @@ -16174,7 +16366,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3239:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3241:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -16186,7 +16378,7 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-outobj.melt:3243:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3245:/ quasiblock"); /*^newclosure */ @@ -16211,7 +16403,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]); ; /*_.LAMBDA___V58*/ meltfptr[57] = /*_.LAMBDA___V59*/ meltfptr[58];; - MELT_LOCATION ("warmelt-outobj.melt:3241:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3243:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -16232,18 +16424,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3246:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3248:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("\"\"), ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3248:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3250:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L37*/ meltfnum[22] = (( /*_#NBXRES__L4*/ meltfnum[3]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:3248:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3250:/ cond"); /*cond */ if ( /*_#I__L37*/ meltfnum[22]) /*then */ { /*^cond.then */ @@ -16253,7 +16445,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3249:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3251:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -16266,7 +16458,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3248:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3250:/ cond.else"); /*^block */ /*anyblock */ @@ -16274,7 +16466,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3250:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3252:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -16288,7 +16480,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3251:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3253:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -16298,14 +16490,14 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3252:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3254:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L38*/ meltfnum[20]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3253:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3255:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("}")); @@ -16313,14 +16505,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3254:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3256:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3255:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3257:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16331,7 +16523,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L39*/ meltfnum[38] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3256:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3258:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -16366,7 +16558,7 @@ lab_endgetargs:; /*_#I__L41*/ meltfnum[40] = (( /*_#STRBUF_USEDLENGTH__L39*/ meltfnum[38]) < ( /*_#GET_INT__L40*/ meltfnum[39]));; - MELT_LOCATION ("warmelt-outobj.melt:3255:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3257:/ cond"); /*cond */ if ( /*_#I__L41*/ meltfnum[40]) /*then */ { /*^cond.then */ @@ -16374,7 +16566,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3255:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3257:/ cond.else"); /*^block */ /*anyblock */ @@ -16388,7 +16580,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3255) ? (3255) : __LINE__, __FUNCTION__); + (3257) ? (3257) : __LINE__, __FUNCTION__); ; } ; @@ -16403,7 +16595,7 @@ lab_endgetargs:; /*_.IFCPP___V61*/ meltfptr[60] = /*_.IFELSE___V63*/ meltfptr[62];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3255:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3257:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L39*/ meltfnum[38] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V62*/ meltfptr[61] = 0; @@ -16424,7 +16616,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V61*/ meltfptr[60];; - MELT_LOCATION ("warmelt-outobj.melt:3102:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3104:/ clear"); /*clear *//*_.ALOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.ADEST__V9*/ meltfptr[8] = 0; @@ -16498,14 +16690,26 @@ lab_endgetargs:; /*clear *//*_#I__L38*/ meltfnum[20] = 0; /*^clear */ /*clear *//*_.IFCPP___V61*/ meltfptr[60] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3100:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:3100:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3102:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16599,7 +16803,7 @@ meltrout_82_warmelt_outobj_LAMBDA___14__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3146:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3148:/ getarg"); /*_.CURES__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -16615,7 +16819,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-outobj.melt:3147:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3149:/ quasiblock"); /*^checksignal */ @@ -16635,7 +16839,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3148:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3150:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURCTYP__V3*/ meltfptr[2]), 5, "CTYPE_PARSTRING"); @@ -16653,7 +16857,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-outobj.melt:3147:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3149:/ clear"); /*clear *//*_.CURCTYP__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_.CTYPE_PARSTRING__V4*/ meltfptr[3] = 0; @@ -16743,7 +16947,7 @@ meltrout_83_warmelt_outobj_LAMBDA___15__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3189:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3191:/ getarg"); /*_.CURES__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -16759,7 +16963,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-outobj.melt:3190:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3192:/ quasiblock"); /*^checksignal */ @@ -16781,7 +16985,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3191:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3193:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16793,7 +16997,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CURESTYP__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout-> tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:3191:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3193:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -16801,7 +17005,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3191:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3193:/ cond.else"); /*^block */ /*anyblock */ @@ -16815,7 +17019,7 @@ lab_endgetargs:; melt_assert_failed (("check curestyp"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3191) ? (3191) : __LINE__, __FUNCTION__); + (3193) ? (3193) : __LINE__, __FUNCTION__); ; } ; @@ -16830,7 +17034,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3191:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3193:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -16846,7 +17050,7 @@ lab_endgetargs:; /*_#GET_INT__L3*/ meltfnum[1] = (melt_get_int ((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[2]))));; - MELT_LOCATION ("warmelt-outobj.melt:3192:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3194:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -16871,7 +17075,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3193:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3195:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), @@ -16880,7 +17084,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3194:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3196:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), ( /*_#CURANK__L1*/ meltfnum[0])); @@ -16888,18 +17092,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3195:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3197:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), ("].")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3197:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3199:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L4*/ meltfnum[3] = (( /*_.CURES__V2*/ meltfptr[1]) == NULL);; - MELT_LOCATION ("warmelt-outobj.melt:3197:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3199:/ cond"); /*cond */ if ( /*_#NULL__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -16911,7 +17115,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3198:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3200:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), @@ -16925,19 +17129,19 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3197:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3199:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:3199:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3201:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L5*/ meltfnum[4] = (( /*_.CURESTYP__V3*/ meltfptr[2]) == (( /*!CTYPE_VALUE */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-outobj.melt:3199:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3201:/ cond"); /*cond */ if ( /*_#__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -16947,7 +17151,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3200:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3202:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos-> @@ -16959,7 +17163,7 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[2]))));; - MELT_LOCATION ("warmelt-outobj.melt:3201:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3203:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -16984,7 +17188,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3199:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3201:/ quasiblock"); /*_.PROGN___V10*/ meltfptr[9] = @@ -16995,7 +17199,7 @@ lab_endgetargs:; /*_.PROGN___V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3199:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3201:/ clear"); /*clear *//*_#GET_INT__L6*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.OUTPUT_C_CODE__V9*/ meltfptr[8] = 0; @@ -17011,7 +17215,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:3204:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3206:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURESTYP__V3*/ meltfptr[2]), 7, "CTYPE_RESFIELD"); @@ -17032,7 +17236,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3205:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3207:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos-> @@ -17043,7 +17247,7 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[2]))));; - MELT_LOCATION ("warmelt-outobj.melt:3206:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3208:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -17068,7 +17272,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3203:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3205:/ quasiblock"); /*_.PROGN___V13*/ meltfptr[12] = @@ -17079,7 +17283,7 @@ lab_endgetargs:; /*_.PROGN___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3199:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3201:/ clear"); /*clear *//*_.CTYPE_RESFIELD__V11*/ meltfptr[8] = 0; /*^clear */ /*clear *//*_#GET_INT__L7*/ meltfnum[5] = 0; @@ -17094,7 +17298,7 @@ lab_endgetargs:; /*_.IFELSE___V7*/ meltfptr[6] = /*_.IFELSE___V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3197:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3199:/ clear"); /*clear *//*_#__L5*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0; @@ -17104,7 +17308,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3208:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3210:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), (";")); @@ -17115,14 +17319,14 @@ lab_endgetargs:; ((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[2]))));; { - MELT_LOCATION ("warmelt-outobj.melt:3209:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3211:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), ( /*_#GET_INT__L8*/ meltfnum[5]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3190:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3192:/ clear"); /*clear *//*_.CURESTYP__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0; @@ -17222,7 +17426,7 @@ meltrout_84_warmelt_outobj_LAMBDA___16__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3217:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3219:/ getarg"); /*_.CURDEST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -17235,7 +17439,7 @@ lab_endgetargs:; /*_#GET_INT__L1*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[2]))));; - MELT_LOCATION ("warmelt-outobj.melt:3218:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3220:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -17261,13 +17465,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3219:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3221:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), (" = ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3217:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3219:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -17361,7 +17565,7 @@ meltrout_85_warmelt_outobj_LAMBDA___17__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3232:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3234:/ getarg"); /*_.PARD__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -17373,7 +17577,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3233:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3235:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), @@ -17383,13 +17587,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3234:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3236:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), (" ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3232:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3234:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -17478,7 +17682,7 @@ meltrout_86_warmelt_outobj_LAMBDA___18__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3243:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3245:/ getarg"); /*_.RESD__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -17490,7 +17694,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3244:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3246:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), @@ -17500,13 +17704,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3245:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3247:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), (" ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3243:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3245:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -17598,7 +17802,7 @@ meltrout_87_warmelt_outobj_OUTPUCOD_OBJMULTIMSEND (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3265:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ getarg"); /*_.OMSND__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -17636,7 +17840,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3266:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3268:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17648,7 +17852,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OMSND__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJMULTIMSEND */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:3266:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3268:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -17656,7 +17860,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3266:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3268:/ cond.else"); /*^block */ /*anyblock */ @@ -17670,7 +17874,7 @@ lab_endgetargs:; melt_assert_failed (("check omsnd"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3266) ? (3266) : __LINE__, __FUNCTION__); + (3268) ? (3268) : __LINE__, __FUNCTION__); ; } ; @@ -17685,7 +17889,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3266:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3268:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -17696,7 +17900,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3267:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3269:/ quasiblock"); /*^getslot */ @@ -17707,7 +17911,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3268:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3270:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OMSND__V2*/ meltfptr[1]), 1, "OBDI_DESTLIST"); @@ -17715,7 +17919,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3269:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3271:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OMSND__V2*/ meltfptr[1]), 2, "OBMSND_SEL"); @@ -17723,7 +17927,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3270:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3272:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OMSND__V2*/ meltfptr[1]), 3, "OBMSND_RECV"); @@ -17731,7 +17935,7 @@ lab_endgetargs:; meltfptr[10] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3271:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3273:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OMSND__V2*/ meltfptr[1]), 4, "OBMSND_ARGS"); @@ -17739,7 +17943,7 @@ lab_endgetargs:; meltfptr[11] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3272:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3274:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OMSND__V2*/ meltfptr[1]), 5, "OBMULTSND_XRES"); @@ -17773,7 +17977,7 @@ lab_endgetargs:; (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[2])), ( /*_#I__L5*/ meltfnum[4])));; - MELT_LOCATION ("warmelt-outobj.melt:3279:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3281:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17797,7 +18001,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3280:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3282:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*multimsend*/{")); @@ -17807,17 +18011,17 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3281:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3283:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L6*/ meltfnum[5]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3282:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3284:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L7*/ meltfnum[6] = (( /*_#NBARG__L3*/ meltfnum[1]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:3282:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3284:/ cond"); /*cond */ if ( /*_#I__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -17827,7 +18031,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3284:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3286:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -17836,7 +18040,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3285:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3287:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#NBARG__L3*/ meltfnum[1])); @@ -17844,7 +18048,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3286:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3288:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("];")); @@ -17854,29 +18058,29 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3287:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3289:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L8*/ meltfnum[7]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3283:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3285:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3282:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3284:/ clear"); /*clear *//*_#I__L8*/ meltfnum[7] = 0; } ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:3289:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3291:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L9*/ meltfnum[7] = (( /*_#NBXRES__L4*/ meltfnum[3]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:3289:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3291:/ cond"); /*cond */ if ( /*_#I__L9*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -17886,7 +18090,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3291:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3293:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -17895,7 +18099,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3292:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3294:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#NBXRES__L4*/ meltfnum[3])); @@ -17903,7 +18107,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3293:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3295:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("];")); @@ -17913,13 +18117,13 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3294:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3296:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L10*/ meltfnum[9]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3298:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3300:/ quasiblock"); /*^newclosure */ @@ -17948,7 +18152,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.RESDESCLIST__V15*/ meltfptr[14]); ; /*_.LAMBDA___V19*/ meltfptr[18] = /*_.LAMBDA___V20*/ meltfptr[19];; - MELT_LOCATION ("warmelt-outobj.melt:3296:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3298:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17967,7 +18171,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3290:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3292:/ quasiblock"); /*_.PROGN___V22*/ meltfptr[21] = @@ -17977,7 +18181,7 @@ lab_endgetargs:; /*_.IF___V18*/ meltfptr[17] = /*_.PROGN___V22*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3289:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3291:/ clear"); /*clear *//*_#I__L10*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.LAMBDA___V19*/ meltfptr[18] = 0; @@ -17994,12 +18198,12 @@ lab_endgetargs:; /*_.IF___V18*/ meltfptr[17] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:3302:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3304:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L11*/ meltfnum[9] = (( /*_#NBARG__L3*/ meltfnum[1]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:3302:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3304:/ cond"); /*cond */ if ( /*_#I__L11*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -18009,7 +18213,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3304:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3306:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18020,29 +18224,29 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3305:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3307:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L12*/ meltfnum[11]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3303:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3305:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3302:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3304:/ clear"); /*clear *//*_#I__L12*/ meltfnum[11] = 0; } ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:3306:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3308:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L13*/ meltfnum[11] = (( /*_#NBXRES__L4*/ meltfnum[3]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:3306:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3308:/ cond"); /*cond */ if ( /*_#I__L13*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -18052,7 +18256,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3308:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3310:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18063,29 +18267,29 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3309:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3311:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L14*/ meltfnum[13]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3307:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3309:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3306:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3308:/ clear"); /*clear *//*_#I__L14*/ meltfnum[13] = 0; } ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:3311:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3313:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L15*/ meltfnum[13] = (( /*_#NBARG__L3*/ meltfnum[1]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:3311:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3313:/ cond"); /*cond */ if ( /*_#I__L15*/ meltfnum[13]) /*then */ { /*^cond.then */ @@ -18111,7 +18315,7 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-outobj.melt:3317:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3319:/ quasiblock"); /*^checksignal */ @@ -18135,7 +18339,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3318:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3320:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18149,7 +18353,7 @@ lab_endgetargs:; (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout-> tabval[8])));; - MELT_LOCATION ("warmelt-outobj.melt:3318:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3320:/ cond"); /*cond */ if ( /*_#IS_A__L17*/ meltfnum[16]) /*then */ { /*^cond.then */ @@ -18157,7 +18361,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3318:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3320:/ cond.else"); /*^block */ /*anyblock */ @@ -18172,7 +18376,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3318) ? (3318) : __LINE__, + (3320) ? (3320) : __LINE__, __FUNCTION__); ; } @@ -18189,7 +18393,7 @@ lab_endgetargs:; /*_.IFELSE___V26*/ meltfptr[25];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3318:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3320:/ clear"); /*clear *//*_#IS_A__L17*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.IFELSE___V26*/ meltfptr[25] = 0; @@ -18205,7 +18409,7 @@ lab_endgetargs:; /*_#GET_INT__L18*/ meltfnum[16] = (melt_get_int ((melt_ptr_t) ( /*_.BOXDEPTHP1__V16*/ meltfptr[15])));; - MELT_LOCATION ("warmelt-outobj.melt:3319:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3321:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -18232,7 +18436,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3320:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3322:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18241,7 +18445,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3321:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3323:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#CURANK__L16*/ meltfnum[15])); @@ -18249,14 +18453,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3322:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3324:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("].")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3323:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3325:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURCTYP__V24*/ meltfptr[20]), 5, "CTYPE_PARSTRING"); @@ -18273,12 +18477,12 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.CTYPE_PARSTRING__V28*/ meltfptr[27])); } ; - MELT_LOCATION ("warmelt-outobj.melt:3325:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3327:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L19*/ meltfnum[18] = (( /*_.CURARG__V23*/ meltfptr[18]) == NULL);; - MELT_LOCATION ("warmelt-outobj.melt:3325:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3327:/ cond"); /*cond */ if ( /*_#NULL__L19*/ meltfnum[18]) /*then */ { /*^cond.then */ @@ -18290,7 +18494,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3326:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3328:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18304,20 +18508,20 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3325:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3327:/ cond.else"); /*^block */ /*anyblock */ { MELT_LOCATION - ("warmelt-outobj.melt:3327:/ checksignal"); + ("warmelt-outobj.melt:3329:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L20*/ meltfnum[19] = (( /*_.CURCTYP__V24*/ meltfptr[20]) == (( /*!CTYPE_VALUE */ meltfrout->tabval[9])));; - MELT_LOCATION ("warmelt-outobj.melt:3327:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3329:/ cond"); /*cond */ if ( /*_#__L20*/ meltfnum[19]) /*then */ { /*^cond.then */ @@ -18328,7 +18532,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:3328:/ locexp"); + ("warmelt-outobj.melt:3330:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ @@ -18341,7 +18545,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.BOXDEPTHP1__V16*/ meltfptr[15])));; MELT_LOCATION - ("warmelt-outobj.melt:3329:/ checksignal"); + ("warmelt-outobj.melt:3331:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -18368,7 +18572,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:3327:/ quasiblock"); + ("warmelt-outobj.melt:3329:/ quasiblock"); /*_.PROGN___V32*/ meltfptr[31] = @@ -18380,7 +18584,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:3327:/ clear"); + ("warmelt-outobj.melt:3329:/ clear"); /*clear *//*_#GET_INT__L21*/ meltfnum[20] = 0; /*^clear */ /*clear *//*_.OUTPUT_C_CODE__V31*/ meltfptr[30] = @@ -18398,7 +18602,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:3332:/ getslot"); + ("warmelt-outobj.melt:3334:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURCTYP__V24*/ meltfptr[20]), 6, "CTYPE_ARGFIELD"); @@ -18419,7 +18623,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:3333:/ locexp"); + ("warmelt-outobj.melt:3335:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ @@ -18431,7 +18635,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.BOXDEPTHP1__V16*/ meltfptr[15])));; MELT_LOCATION - ("warmelt-outobj.melt:3334:/ checksignal"); + ("warmelt-outobj.melt:3336:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -18458,7 +18662,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:3331:/ quasiblock"); + ("warmelt-outobj.melt:3333:/ quasiblock"); /*_.PROGN___V35*/ meltfptr[34] = @@ -18470,7 +18674,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:3327:/ clear"); + ("warmelt-outobj.melt:3329:/ clear"); /*clear *//*_.CTYPE_ARGFIELD__V33*/ meltfptr[30] = 0; /*^clear */ @@ -18488,7 +18692,7 @@ lab_endgetargs:; /*_.IFELSE___V30*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3325:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3327:/ clear"); /*clear *//*_#__L20*/ meltfnum[19] = 0; /*^clear */ /*clear *//*_.IFELSE___V30*/ meltfptr[29] = 0; @@ -18498,7 +18702,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3336:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3338:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -18506,7 +18710,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-outobj.melt:3317:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3319:/ clear"); /*clear *//*_.CURCTYP__V24*/ meltfptr[20] = 0; /*^clear */ /*clear *//*_.IFCPP___V25*/ meltfptr[21] = 0; @@ -18522,7 +18726,7 @@ lab_endgetargs:; /*clear *//*_.IFELSE___V29*/ meltfptr[28] = 0; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3338:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3340:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18534,7 +18738,7 @@ lab_endgetargs:; melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3339:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3341:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -18569,7 +18773,7 @@ lab_endgetargs:; /*_#I__L25*/ meltfnum[16] = (( /*_#STRBUF_USEDLENGTH__L23*/ meltfnum[20]) < ( /*_#GET_INT__L24*/ meltfnum[19]));; - MELT_LOCATION ("warmelt-outobj.melt:3338:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3340:/ cond"); /*cond */ if ( /*_#I__L25*/ meltfnum[16]) /*then */ { /*^cond.then */ @@ -18577,7 +18781,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3338:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3340:/ cond.else"); /*^block */ /*anyblock */ @@ -18592,7 +18796,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3338) ? (3338) : __LINE__, + (3340) ? (3340) : __LINE__, __FUNCTION__); ; } @@ -18609,7 +18813,7 @@ lab_endgetargs:; /*_.IFELSE___V38*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3338:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3340:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L23*/ meltfnum[20] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V37*/ meltfptr[31] = 0; @@ -18632,7 +18836,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:3314:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3316:/ clear"); /*clear *//*_.CURARG__V23*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_#CURANK__L16*/ meltfnum[15] = 0; @@ -18645,29 +18849,29 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.BOXDEPTHP1__V16*/ meltfptr[15])));; { - MELT_LOCATION ("warmelt-outobj.melt:3341:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3343:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L26*/ meltfnum[18]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3312:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3314:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3311:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3313:/ clear"); /*clear *//*_#GET_INT__L26*/ meltfnum[18] = 0; } ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:3344:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3346:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L27*/ meltfnum[20] = (( /*_#NBXRES__L4*/ meltfnum[3]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:3344:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3346:/ cond"); /*cond */ if ( /*_#I__L27*/ meltfnum[20]) /*then */ { /*^cond.then */ @@ -18675,7 +18879,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:3348:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3350:/ quasiblock"); /*^newclosure */ @@ -18749,7 +18953,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.DECLBUF__V3*/ meltfptr[2]); ; /*_.LAMBDA___V40*/ meltfptr[20] = /*_.LAMBDA___V41*/ meltfptr[21];; - MELT_LOCATION ("warmelt-outobj.melt:3346:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3348:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -18768,7 +18972,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3345:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3347:/ quasiblock"); /*_.PROGN___V43*/ meltfptr[27] = @@ -18778,7 +18982,7 @@ lab_endgetargs:; /*_.IF___V39*/ meltfptr[29] = /*_.PROGN___V43*/ meltfptr[27];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3344:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3346:/ clear"); /*clear *//*_.LAMBDA___V40*/ meltfptr[20] = 0; /*^clear */ /*clear *//*_.MULTIPLE_EVERY__V42*/ meltfptr[25] = 0; @@ -18797,7 +19001,7 @@ lab_endgetargs:; /*_#GET_INT__L28*/ meltfnum[19] = (melt_get_int ((melt_ptr_t) ( /*_.BOXDEPTHP1__V16*/ meltfptr[15])));; - MELT_LOCATION ("warmelt-outobj.melt:3372:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3374:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -18819,7 +19023,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3376:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3378:/ quasiblock"); /*^newclosure */ @@ -18870,7 +19074,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.BOXDEPTHP1__V16*/ meltfptr[15]); ; /*_.LAMBDA___V45*/ meltfptr[31] = /*_.LAMBDA___V46*/ meltfptr[34];; - MELT_LOCATION ("warmelt-outobj.melt:3374:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3376:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -18891,7 +19095,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3380:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3382:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" meltgc_send ((melt_ptr_t)(")); @@ -18899,7 +19103,7 @@ lab_endgetargs:; ; /*_#I__L29*/ meltfnum[16] = ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; - MELT_LOCATION ("warmelt-outobj.melt:3381:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3383:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -18923,7 +19127,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3382:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3384:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("), ((melt_ptr_t)(")); @@ -18931,7 +19135,7 @@ lab_endgetargs:; ; /*_#I__L30*/ meltfnum[18] = ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; - MELT_LOCATION ("warmelt-outobj.melt:3384:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3386:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -18955,13 +19159,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3385:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3387:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (")), (")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3389:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3391:/ quasiblock"); /*^newclosure */ @@ -18986,7 +19190,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]); ; /*_.LAMBDA___V50*/ meltfptr[49] = /*_.LAMBDA___V51*/ meltfptr[50];; - MELT_LOCATION ("warmelt-outobj.melt:3387:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3389:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19007,18 +19211,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3392:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3394:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("\"\"), ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3394:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3396:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L31*/ meltfnum[30] = (( /*_#NBARG__L3*/ meltfnum[1]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:3394:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3396:/ cond"); /*cond */ if ( /*_#I__L31*/ meltfnum[30]) /*then */ { /*^cond.then */ @@ -19028,7 +19232,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3395:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3397:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -19041,7 +19245,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3394:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3396:/ cond.else"); /*^block */ /*anyblock */ @@ -19049,7 +19253,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3396:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3398:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -19061,7 +19265,7 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-outobj.melt:3400:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3402:/ quasiblock"); /*^newclosure */ @@ -19086,7 +19290,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]); ; /*_.LAMBDA___V53*/ meltfptr[52] = /*_.LAMBDA___V54*/ meltfptr[53];; - MELT_LOCATION ("warmelt-outobj.melt:3398:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3400:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19107,18 +19311,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3403:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3405:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("\"\"), ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3405:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3407:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L32*/ meltfnum[31] = (( /*_#NBXRES__L4*/ meltfnum[3]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:3405:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3407:/ cond"); /*cond */ if ( /*_#I__L32*/ meltfnum[31]) /*then */ { /*^cond.then */ @@ -19128,7 +19332,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3406:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3408:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -19141,7 +19345,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3405:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3407:/ cond.else"); /*^block */ /*anyblock */ @@ -19149,7 +19353,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3407:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3409:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -19163,7 +19367,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3408:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3410:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -19173,14 +19377,14 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3409:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3411:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L33*/ meltfnum[32]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3410:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3412:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("}")); @@ -19188,14 +19392,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3411:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3413:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3412:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3414:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19206,7 +19410,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L34*/ meltfnum[33] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3413:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3415:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -19241,7 +19445,7 @@ lab_endgetargs:; /*_#I__L36*/ meltfnum[35] = (( /*_#STRBUF_USEDLENGTH__L34*/ meltfnum[33]) < ( /*_#GET_INT__L35*/ meltfnum[34]));; - MELT_LOCATION ("warmelt-outobj.melt:3412:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3414:/ cond"); /*cond */ if ( /*_#I__L36*/ meltfnum[35]) /*then */ { /*^cond.then */ @@ -19249,7 +19453,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3412:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3414:/ cond.else"); /*^block */ /*anyblock */ @@ -19263,7 +19467,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3412) ? (3412) : __LINE__, __FUNCTION__); + (3414) ? (3414) : __LINE__, __FUNCTION__); ; } ; @@ -19278,7 +19482,7 @@ lab_endgetargs:; /*_.IFCPP___V56*/ meltfptr[55] = /*_.IFELSE___V58*/ meltfptr[57];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3412:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3414:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L34*/ meltfnum[33] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V57*/ meltfptr[56] = 0; @@ -19299,7 +19503,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V56*/ meltfptr[55];; - MELT_LOCATION ("warmelt-outobj.melt:3267:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3269:/ clear"); /*clear *//*_.OLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.ODEST__V9*/ meltfptr[8] = 0; @@ -19375,14 +19579,26 @@ lab_endgetargs:; /*clear *//*_#I__L33*/ meltfnum[32] = 0; /*^clear */ /*clear *//*_.IFCPP___V56*/ meltfptr[55] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3265:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:3265:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3267:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -19476,7 +19692,7 @@ meltrout_88_warmelt_outobj_LAMBDA___19__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3298:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3300:/ getarg"); /*_.CURES__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -19492,7 +19708,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-outobj.melt:3299:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3301:/ quasiblock"); /*^checksignal */ @@ -19512,7 +19728,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3300:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3302:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURESTYP__V3*/ meltfptr[2]), 5, "CTYPE_PARSTRING"); @@ -19530,7 +19746,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-outobj.melt:3299:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3301:/ clear"); /*clear *//*_.CURESTYP__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_.CTYPE_PARSTRING__V4*/ meltfptr[3] = 0; @@ -19620,7 +19836,7 @@ meltrout_89_warmelt_outobj_LAMBDA___20__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3348:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3350:/ getarg"); /*_.CURES__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -19636,7 +19852,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-outobj.melt:3349:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3351:/ quasiblock"); /*^checksignal */ @@ -19658,7 +19874,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3350:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3352:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19670,7 +19886,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CURESTYP__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout-> tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:3350:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3352:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -19678,7 +19894,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3350:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3352:/ cond.else"); /*^block */ /*anyblock */ @@ -19692,7 +19908,7 @@ lab_endgetargs:; melt_assert_failed (("check curestyp"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3350) ? (3350) : __LINE__, __FUNCTION__); + (3352) ? (3352) : __LINE__, __FUNCTION__); ; } ; @@ -19707,7 +19923,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3350:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3352:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -19723,7 +19939,7 @@ lab_endgetargs:; /*_#GET_INT__L3*/ meltfnum[1] = (melt_get_int ((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[2]))));; - MELT_LOCATION ("warmelt-outobj.melt:3351:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3353:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19748,7 +19964,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3352:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3354:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), @@ -19757,7 +19973,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3353:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3355:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), ( /*_#CURANK__L1*/ meltfnum[0])); @@ -19765,18 +19981,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3354:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3356:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), ("].")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3356:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3358:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NULL__L4*/ meltfnum[3] = (( /*_.CURES__V2*/ meltfptr[1]) == NULL);; - MELT_LOCATION ("warmelt-outobj.melt:3356:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3358:/ cond"); /*cond */ if ( /*_#NULL__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -19788,7 +20004,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3357:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3359:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), @@ -19802,19 +20018,19 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3356:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3358:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:3359:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3361:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L5*/ meltfnum[4] = (( /*_.CURESTYP__V3*/ meltfptr[2]) == (( /*!CTYPE_VALUE */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-outobj.melt:3359:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3361:/ cond"); /*cond */ if ( /*_#__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -19824,7 +20040,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3360:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3362:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos-> @@ -19836,7 +20052,7 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[2]))));; - MELT_LOCATION ("warmelt-outobj.melt:3361:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3363:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -19861,7 +20077,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3359:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3361:/ quasiblock"); /*_.PROGN___V10*/ meltfptr[9] = @@ -19872,7 +20088,7 @@ lab_endgetargs:; /*_.PROGN___V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3359:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3361:/ clear"); /*clear *//*_#GET_INT__L6*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.OUTPUT_C_CODE__V9*/ meltfptr[8] = 0; @@ -19888,7 +20104,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:3364:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3366:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CURESTYP__V3*/ meltfptr[2]), 7, "CTYPE_RESFIELD"); @@ -19909,7 +20125,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3365:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3367:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos-> @@ -19920,7 +20136,7 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[2]))));; - MELT_LOCATION ("warmelt-outobj.melt:3366:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3368:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -19945,7 +20161,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3363:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3365:/ quasiblock"); /*_.PROGN___V13*/ meltfptr[12] = @@ -19956,7 +20172,7 @@ lab_endgetargs:; /*_.PROGN___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3359:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3361:/ clear"); /*clear *//*_.CTYPE_RESFIELD__V11*/ meltfptr[8] = 0; /*^clear */ /*clear *//*_#GET_INT__L7*/ meltfnum[5] = 0; @@ -19971,7 +20187,7 @@ lab_endgetargs:; /*_.IFELSE___V7*/ meltfptr[6] = /*_.IFELSE___V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3356:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3358:/ clear"); /*clear *//*_#__L5*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0; @@ -19981,14 +20197,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3368:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3370:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), (";")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3349:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3351:/ clear"); /*clear *//*_.CURESTYP__V3*/ meltfptr[2] = 0; /*^clear */ /*clear *//*_.IFCPP___V4*/ meltfptr[3] = 0; @@ -20086,7 +20302,7 @@ meltrout_90_warmelt_outobj_LAMBDA___21__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3376:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3378:/ getarg"); /*_.CURDEST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -20099,7 +20315,7 @@ lab_endgetargs:; /*_#GET_INT__L1*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[2]))));; - MELT_LOCATION ("warmelt-outobj.melt:3377:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3379:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -20125,13 +20341,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3378:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3380:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), (" = ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3376:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3378:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -20225,7 +20441,7 @@ meltrout_91_warmelt_outobj_LAMBDA___22__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3389:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3391:/ getarg"); /*_.PARD__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -20237,7 +20453,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3390:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3392:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), @@ -20247,13 +20463,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3391:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3393:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), (" ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3389:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3391:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -20342,7 +20558,7 @@ meltrout_92_warmelt_outobj_LAMBDA___23__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3400:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3402:/ getarg"); /*_.RESD__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -20354,7 +20570,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3401:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3403:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), @@ -20364,13 +20580,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3402:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3404:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[0])), (" ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3400:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3402:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -20461,7 +20677,7 @@ meltrout_93_warmelt_outobj_OUTPUCOD_OBJCLEAR (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3420:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3422:/ getarg"); /*_.OCLEAR__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -20499,7 +20715,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3421:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3423:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20511,7 +20727,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OCLEAR__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJCLEAR */ meltfrout-> tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:3421:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3423:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -20519,7 +20735,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3421:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3423:/ cond.else"); /*^block */ /*anyblock */ @@ -20533,7 +20749,7 @@ lab_endgetargs:; melt_assert_failed (("check oclear"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3421) ? (3421) : __LINE__, __FUNCTION__); + (3423) ? (3423) : __LINE__, __FUNCTION__); ; } ; @@ -20548,7 +20764,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3421:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3423:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -20559,7 +20775,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3422:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3424:/ quasiblock"); /*^getslot */ @@ -20570,7 +20786,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3423:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3425:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OCLEAR__V2*/ meltfptr[1]), 1, "OCLR_VLOC"); @@ -20578,7 +20794,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3425:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3427:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -20602,7 +20818,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3426:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3428:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*clear*/ ")); @@ -20610,7 +20826,7 @@ lab_endgetargs:; ; /*_#I__L3*/ meltfnum[1] = (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; - MELT_LOCATION ("warmelt-outobj.melt:3427:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3429:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -20634,7 +20850,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3428:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3430:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" = 0 ")); @@ -20642,7 +20858,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3429:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3431:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20653,7 +20869,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[3] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3430:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3432:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20688,7 +20904,7 @@ lab_endgetargs:; /*_#I__L6*/ meltfnum[5] = (( /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[3]) < ( /*_#GET_INT__L5*/ meltfnum[4]));; - MELT_LOCATION ("warmelt-outobj.melt:3429:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3431:/ cond"); /*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -20696,7 +20912,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3429:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3431:/ cond.else"); /*^block */ /*anyblock */ @@ -20710,7 +20926,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3429) ? (3429) : __LINE__, __FUNCTION__); + (3431) ? (3431) : __LINE__, __FUNCTION__); ; } ; @@ -20725,7 +20941,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3429:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3431:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V13*/ meltfptr[12] = 0; @@ -20746,7 +20962,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V12*/ meltfptr[11];; - MELT_LOCATION ("warmelt-outobj.melt:3422:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3424:/ clear"); /*clear *//*_.CLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.CVL__V9*/ meltfptr[8] = 0; @@ -20758,14 +20974,26 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_C_CODE__V11*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_.IFCPP___V12*/ meltfptr[11] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3420:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3422:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:3420:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3422:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -20862,7 +21090,7 @@ meltrout_94_warmelt_outobj_OUTPUCOD_OBJRAWALLOCOBJ (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3436:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3438:/ getarg"); /*_.ORALOB__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -20900,7 +21128,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3437:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3439:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20912,7 +21140,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.ORALOB__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJRAWALLOCOBJ */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:3437:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3439:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -20920,7 +21148,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3437:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3439:/ cond.else"); /*^block */ /*anyblock */ @@ -20934,7 +21162,7 @@ lab_endgetargs:; melt_assert_failed (("check oralob"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3437) ? (3437) : __LINE__, __FUNCTION__); + (3439) ? (3439) : __LINE__, __FUNCTION__); ; } ; @@ -20949,7 +21177,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3437:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3439:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -20960,7 +21188,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3438:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3440:/ quasiblock"); /*^getslot */ @@ -20971,7 +21199,7 @@ lab_endgetargs:; meltfptr[5] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3439:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3441:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.ORALOB__V2*/ meltfptr[1]), 2, "OBRALLOBJ_CLASS"); @@ -20979,7 +21207,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3440:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3442:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.ORALOB__V2*/ meltfptr[1]), 4, "OBRALLOBJ_CLASSNAME"); @@ -20987,7 +21215,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3441:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3443:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.ORALOB__V2*/ meltfptr[1]), 3, "OBRALLOBJ_LEN"); @@ -20995,7 +21223,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3442:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3444:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.ORALOB__V2*/ meltfptr[1]), 1, "OBDI_DESTLIST"); @@ -21013,7 +21241,7 @@ lab_endgetargs:; ( /*_#I__L3*/ meltfnum[1])));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3445:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3447:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21025,7 +21253,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.ICLASS__V8*/ meltfptr[7]), (melt_ptr_t) (( /*!CLASS_OBJVALUE */ meltfrout-> tabval[2])));; - MELT_LOCATION ("warmelt-outobj.melt:3445:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3447:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -21033,7 +21261,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3445:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3447:/ cond.else"); /*^block */ /*anyblock */ @@ -21047,7 +21275,7 @@ lab_endgetargs:; melt_assert_failed (("outpucod_objrawallocobj check iclass"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3445) ? (3445) : __LINE__, __FUNCTION__); + (3447) ? (3447) : __LINE__, __FUNCTION__); ; } ; @@ -21062,7 +21290,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3445:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3447:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -21073,7 +21301,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3446:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3448:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21097,7 +21325,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3447:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3449:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*rawallocobj*/ { melt_ptr_t newobj = 0;")); @@ -21107,14 +21335,14 @@ lab_endgetargs:; (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; { - MELT_LOCATION ("warmelt-outobj.melt:3448:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3450:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L5*/ meltfnum[3]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3449:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3451:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_raw_object_create(newobj,(melt_ptr_t)(")); @@ -21122,7 +21350,7 @@ lab_endgetargs:; ; /*_#GET_INT__L6*/ meltfnum[5] = (melt_get_int ((melt_ptr_t) ( /*_.BOXDEPTHP1__V12*/ meltfptr[11])));; - MELT_LOCATION ("warmelt-outobj.melt:3450:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3452:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -21146,7 +21374,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3451:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3453:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("), (")); @@ -21154,7 +21382,7 @@ lab_endgetargs:; ; /*_#GET_INT__L7*/ meltfnum[6] = (melt_get_int ((melt_ptr_t) ( /*_.BOXDEPTHP1__V12*/ meltfptr[11])));; - MELT_LOCATION ("warmelt-outobj.melt:3452:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3454:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -21178,7 +21406,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3453:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3455:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("), \"")); @@ -21186,7 +21414,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3454:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3456:/ locexp"); meltgc_add_strbuf_cstr ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.ICLANAME__V9*/ @@ -21195,7 +21423,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3455:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3457:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("\");")); @@ -21219,7 +21447,7 @@ lab_endgetargs:; (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; { - MELT_LOCATION ("warmelt-outobj.melt:3459:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3461:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L8*/ meltfnum[7]), 0); @@ -21228,7 +21456,7 @@ lab_endgetargs:; /*_#GET_INT__L9*/ meltfnum[8] = (melt_get_int ((melt_ptr_t) ( /*_.BOXDEPTHP1__V12*/ meltfptr[11])));; - MELT_LOCATION ("warmelt-outobj.melt:3460:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3462:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -21254,7 +21482,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3461:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3463:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21265,7 +21493,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L10*/ meltfnum[9] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3462:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3464:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -21300,7 +21528,7 @@ lab_endgetargs:; /*_#I__L12*/ meltfnum[11] = (( /*_#STRBUF_USEDLENGTH__L10*/ meltfnum[9]) < ( /*_#GET_INT__L11*/ meltfnum[10]));; - MELT_LOCATION ("warmelt-outobj.melt:3461:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3463:/ cond"); /*cond */ if ( /*_#I__L12*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -21308,7 +21536,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3461:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3463:/ cond.else"); /*^block */ /*anyblock */ @@ -21322,7 +21550,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3461) ? (3461) : __LINE__, + (3463) ? (3463) : __LINE__, __FUNCTION__); ; } @@ -21338,7 +21566,7 @@ lab_endgetargs:; /*_.IFCPP___V21*/ meltfptr[20] = /*_.IFELSE___V23*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3461:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3463:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L10*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V22*/ meltfptr[21] = 0; @@ -21357,7 +21585,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3463:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3465:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" =")); @@ -21370,7 +21598,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:3456:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3458:/ clear"); /*clear *//*_.DSTPAIR__V18*/ meltfptr[17] = 0; /*^clear */ /*clear *//*_.DST__V19*/ meltfptr[18] = 0; @@ -21385,7 +21613,7 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-outobj.melt:3438:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3440:/ clear"); /*clear *//*_.ILOC__V7*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.ICLASS__V8*/ meltfptr[7] = 0; @@ -21417,14 +21645,14 @@ lab_endgetargs:; (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; { - MELT_LOCATION ("warmelt-outobj.melt:3464:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3466:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L13*/ meltfnum[9]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3465:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3467:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("newobj; };")); @@ -21432,14 +21660,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3466:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3468:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3467:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3469:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21450,7 +21678,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L14*/ meltfnum[10] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3468:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3470:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -21485,7 +21713,7 @@ lab_endgetargs:; /*_#I__L16*/ meltfnum[1] = (( /*_#STRBUF_USEDLENGTH__L14*/ meltfnum[10]) < ( /*_#GET_INT__L15*/ meltfnum[11]));; - MELT_LOCATION ("warmelt-outobj.melt:3467:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3469:/ cond"); /*cond */ if ( /*_#I__L16*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -21493,7 +21721,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3467:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3469:/ cond.else"); /*^block */ /*anyblock */ @@ -21507,7 +21735,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3467) ? (3467) : __LINE__, __FUNCTION__); + (3469) ? (3469) : __LINE__, __FUNCTION__); ; } ; @@ -21522,7 +21750,7 @@ lab_endgetargs:; /*_.IFCPP___V24*/ meltfptr[21] = /*_.IFELSE___V26*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3467:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3469:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L14*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V25*/ meltfptr[22] = 0; @@ -21539,14 +21767,26 @@ lab_endgetargs:; /*_.IFCPP___V24*/ meltfptr[21] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3436:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3438:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V24*/ meltfptr[21];; - MELT_LOCATION ("warmelt-outobj.melt:3436:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3438:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -21645,7 +21885,7 @@ meltrout_95_warmelt_outobj_OUTPUCOD_OBJNEWCLOSURE (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3474:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3476:/ getarg"); /*_.OBNCLO__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -21683,7 +21923,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3475:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3477:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21695,7 +21935,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OBNCLO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJNEWCLOSURE */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:3475:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3477:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -21703,7 +21943,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3475:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3477:/ cond.else"); /*^block */ /*anyblock */ @@ -21717,7 +21957,7 @@ lab_endgetargs:; melt_assert_failed (("check oralob"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3475) ? (3475) : __LINE__, __FUNCTION__); + (3477) ? (3477) : __LINE__, __FUNCTION__); ; } ; @@ -21732,7 +21972,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3475:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3477:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -21743,7 +21983,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3476:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3478:/ quasiblock"); /*^getslot */ @@ -21754,7 +21994,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3477:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3479:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBNCLO__V2*/ meltfptr[1]), 2, "OBNCLO_DISCR"); @@ -21762,7 +22002,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3478:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3480:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBNCLO__V2*/ meltfptr[1]), 3, "OBNCLO_ROUT"); @@ -21770,7 +22010,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3479:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3481:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBNCLO__V2*/ meltfptr[1]), 4, "OBNCLO_LEN"); @@ -21778,7 +22018,7 @@ lab_endgetargs:; meltfptr[10] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3480:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3482:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OBNCLO__V2*/ meltfptr[1]), 1, "OBDI_DESTLIST"); @@ -21794,7 +22034,7 @@ lab_endgetargs:; (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[1])), ( /*_#I__L3*/ meltfnum[1])));; - MELT_LOCATION ("warmelt-outobj.melt:3483:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3485:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21818,13 +22058,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3484:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3486:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" /*newclosure*/ ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3487:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3489:/ quasiblock"); /*^newclosure */ @@ -21875,7 +22115,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.BOXDEPTHP1__V13*/ meltfptr[12]); ; /*_.LAMBDA___V15*/ meltfptr[14] = /*_.LAMBDA___V16*/ meltfptr[15];; - MELT_LOCATION ("warmelt-outobj.melt:3485:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3487:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21898,14 +22138,14 @@ lab_endgetargs:; (( /*_#DEPTH__L1*/ meltfnum[0]) + (1));; { - MELT_LOCATION ("warmelt-outobj.melt:3492:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3494:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L4*/ meltfnum[3]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3493:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3495:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("(melt_ptr_t) meltgc_new_closure((meltobject_ptr_t)(")); @@ -21913,7 +22153,7 @@ lab_endgetargs:; ; /*_#GET_INT__L5*/ meltfnum[4] = (melt_get_int ((melt_ptr_t) ( /*_.BOXDEPTHP1__V13*/ meltfptr[12])));; - MELT_LOCATION ("warmelt-outobj.melt:3494:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3496:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -21937,7 +22177,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3495:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3497:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("), (meltroutine_ptr_t)(")); @@ -21945,7 +22185,7 @@ lab_endgetargs:; ; /*_#GET_INT__L6*/ meltfnum[5] = (melt_get_int ((melt_ptr_t) ( /*_.BOXDEPTHP1__V13*/ meltfptr[12])));; - MELT_LOCATION ("warmelt-outobj.melt:3496:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3498:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -21969,7 +22209,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3497:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3499:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("), (")); @@ -21977,7 +22217,7 @@ lab_endgetargs:; ; /*_#GET_INT__L7*/ meltfnum[6] = (melt_get_int ((melt_ptr_t) ( /*_.BOXDEPTHP1__V13*/ meltfptr[12])));; - MELT_LOCATION ("warmelt-outobj.melt:3498:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3500:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -22001,7 +22241,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3499:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3501:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("));")); @@ -22009,14 +22249,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3500:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3502:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3501:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3503:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22027,7 +22267,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L8*/ meltfnum[7] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3502:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3504:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22062,7 +22302,7 @@ lab_endgetargs:; /*_#I__L10*/ meltfnum[9] = (( /*_#STRBUF_USEDLENGTH__L8*/ meltfnum[7]) < ( /*_#GET_INT__L9*/ meltfnum[8]));; - MELT_LOCATION ("warmelt-outobj.melt:3501:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3503:/ cond"); /*cond */ if ( /*_#I__L10*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -22070,7 +22310,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3501:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3503:/ cond.else"); /*^block */ /*anyblock */ @@ -22084,7 +22324,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3501) ? (3501) : __LINE__, __FUNCTION__); + (3503) ? (3503) : __LINE__, __FUNCTION__); ; } ; @@ -22099,7 +22339,7 @@ lab_endgetargs:; /*_.IFCPP___V21*/ meltfptr[20] = /*_.IFELSE___V23*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3501:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3503:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V22*/ meltfptr[21] = 0; @@ -22120,7 +22360,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-outobj.melt:3476:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3478:/ clear"); /*clear *//*_.ILOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.ODISCR__V9*/ meltfptr[8] = 0; @@ -22156,14 +22396,26 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_C_CODE__V20*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_.IFCPP___V21*/ meltfptr[20] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3474:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3476:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:3474:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3476:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -22257,7 +22509,7 @@ meltrout_96_warmelt_outobj_LAMBDA___24__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3487:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3489:/ getarg"); /*_.DST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -22270,7 +22522,7 @@ lab_endgetargs:; /*_#GET_INT__L1*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[2]))));; - MELT_LOCATION ("warmelt-outobj.melt:3488:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3490:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -22296,7 +22548,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3489:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3491:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22307,7 +22559,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:3490:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3492:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22342,7 +22594,7 @@ lab_endgetargs:; /*_#I__L4*/ meltfnum[3] = (( /*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1]) < ( /*_#GET_INT__L3*/ meltfnum[2]));; - MELT_LOCATION ("warmelt-outobj.melt:3489:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3491:/ cond"); /*cond */ if ( /*_#I__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -22350,7 +22602,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3489:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3491:/ cond.else"); /*^block */ /*anyblock */ @@ -22364,7 +22616,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3489) ? (3489) : __LINE__, __FUNCTION__); + (3491) ? (3491) : __LINE__, __FUNCTION__); ; } ; @@ -22379,7 +22631,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3489:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3491:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V5*/ meltfptr[4] = 0; @@ -22398,13 +22650,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3491:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3493:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), (" =")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3487:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3489:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -22502,7 +22754,7 @@ meltrout_97_warmelt_outobj_OUTPUCOD_OBJTOUCH (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3507:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3509:/ getarg"); /*_.OTOUCH__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -22540,7 +22792,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3508:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3510:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22552,7 +22804,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OTOUCH__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJTOUCH */ meltfrout-> tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:3508:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3510:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -22560,7 +22812,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3508:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3510:/ cond.else"); /*^block */ /*anyblock */ @@ -22574,7 +22826,7 @@ lab_endgetargs:; melt_assert_failed (("check oclear"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3508) ? (3508) : __LINE__, __FUNCTION__); + (3510) ? (3510) : __LINE__, __FUNCTION__); ; } ; @@ -22589,7 +22841,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3508:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3510:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -22600,7 +22852,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3509:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3511:/ quasiblock"); /*^getslot */ @@ -22611,7 +22863,7 @@ lab_endgetargs:; meltfptr[5] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3510:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3512:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OTOUCH__V2*/ meltfptr[1]), 1, "OTOUCH_VAL"); @@ -22619,7 +22871,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3511:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3513:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OTOUCH__V2*/ meltfptr[1]), 2, "OTOUCH_COMMENT"); @@ -22627,7 +22879,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3513:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3515:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -22649,7 +22901,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3514:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3516:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -22662,7 +22914,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3516:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3518:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -22671,7 +22923,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3517:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3519:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -22681,7 +22933,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3518:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3520:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/")); @@ -22689,13 +22941,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3519:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3521:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3515:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3517:/ quasiblock"); /*epilog */ @@ -22705,13 +22957,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3521:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3523:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("meltgc_touch(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3522:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3524:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -22735,7 +22987,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3523:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3525:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -22743,13 +22995,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3524:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3526:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3509:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3511:/ clear"); /*clear *//*_.ILOC__V7*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.TOUCHED__V8*/ meltfptr[7] = 0; @@ -22759,7 +23011,7 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_LOCATION__V10*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.OUTPUT_C_CODE__V11*/ meltfptr[10] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3507:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3509:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -22853,7 +23105,7 @@ meltrout_98_warmelt_outobj_OUTPUCOD_OBJPUTUPLE (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3532:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3534:/ getarg"); /*_.OPTUP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -22891,7 +23143,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3533:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3535:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22903,7 +23155,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OPTUP__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJPUTUPLE */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:3533:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3535:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -22911,7 +23163,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3533:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3535:/ cond.else"); /*^block */ /*anyblock */ @@ -22925,7 +23177,7 @@ lab_endgetargs:; melt_assert_failed (("check optyp"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3533) ? (3533) : __LINE__, __FUNCTION__); + (3535) ? (3535) : __LINE__, __FUNCTION__); ; } ; @@ -22940,7 +23192,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3533:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3535:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -22951,7 +23203,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3534:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3536:/ quasiblock"); /*^getslot */ @@ -22962,7 +23214,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3535:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3537:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPTUP__V2*/ meltfptr[1]), 1, "OPUTU_TUPLED"); @@ -22970,7 +23222,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3536:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3538:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPTUP__V2*/ meltfptr[1]), 2, "OPUTU_OFFSET"); @@ -22979,7 +23231,7 @@ lab_endgetargs:; }; ; /*_#UNIQRANK__L3*/ meltfnum[1] = 0;; - MELT_LOCATION ("warmelt-outobj.melt:3538:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3540:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPTUP__V2*/ meltfptr[1]), 3, "OPUTU_VALUE"); @@ -22989,17 +23241,17 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3541:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3543:/ locexp"); static long UNIQRANKSET__1_cnt; UNIQRANKSET__1_cnt++; /*_#UNIQRANK__L3*/ meltfnum[1] = UNIQRANKSET__1_cnt; ; } ; - MELT_LOCATION ("warmelt-outobj.melt:3547:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3549:/ checksignal"); MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-outobj.melt:3545:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3547:/ quasiblock"); /*^multiapply */ @@ -23021,7 +23273,7 @@ lab_endgetargs:; /*^quasiblock */ - MELT_LOCATION ("warmelt-outobj.melt:3548:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3550:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23045,7 +23297,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3549:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3551:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*putupl")); @@ -23053,7 +23305,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3550:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3552:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#")); @@ -23061,14 +23313,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3551:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3553:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#UNIQRANK__L3*/ meltfnum[1])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3552:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3554:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/")); @@ -23076,20 +23328,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3553:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3555:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3554:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3556:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_assertmsg(\"putupl ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3555:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3557:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#GET_INT__L4*/ meltfnum[3] = @@ -23098,7 +23350,7 @@ lab_endgetargs:; /*_#I__L5*/ meltfnum[4] = (( /*_#GET_INT__L4*/ meltfnum[3]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:3555:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3557:/ cond"); /*cond */ if ( /*_#I__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -23108,7 +23360,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3557:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3559:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("[")); @@ -23116,7 +23368,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3558:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3560:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -23127,7 +23379,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3559:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3561:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (":")); @@ -23137,7 +23389,7 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.LINEV__V13*/ meltfptr[12])));; { - MELT_LOCATION ("warmelt-outobj.melt:3560:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3562:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L6*/ meltfnum[5])); @@ -23145,18 +23397,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3561:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3563:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("] ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3556:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3558:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3555:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3557:/ clear"); /*clear *//*_#GET_INT__L6*/ meltfnum[5] = 0; } ; @@ -23164,7 +23416,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3563:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3565:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#")); @@ -23172,20 +23424,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3564:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3566:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#UNIQRANK__L3*/ meltfnum[1])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3565:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3567:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" checktup\", melt_magic_discr((melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3566:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3568:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -23209,7 +23461,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3567:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3569:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("))== MELTOBMAG_MULTIPLE);")); @@ -23217,20 +23469,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3568:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3570:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3569:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3571:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_assertmsg(\"putupl ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3570:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3572:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#GET_INT__L7*/ meltfnum[5] = @@ -23239,7 +23491,7 @@ lab_endgetargs:; /*_#I__L8*/ meltfnum[7] = (( /*_#GET_INT__L7*/ meltfnum[5]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:3570:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3572:/ cond"); /*cond */ if ( /*_#I__L8*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -23249,7 +23501,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3572:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3574:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("[")); @@ -23257,7 +23509,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3573:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3575:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -23268,7 +23520,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3574:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3576:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (":")); @@ -23278,7 +23530,7 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.LINEV__V13*/ meltfptr[12])));; { - MELT_LOCATION ("warmelt-outobj.melt:3575:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3577:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L9*/ meltfnum[8])); @@ -23286,18 +23538,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3576:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3578:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("] ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3571:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3573:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3570:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3572:/ clear"); /*clear *//*_#GET_INT__L9*/ meltfnum[8] = 0; } ; @@ -23305,7 +23557,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3578:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3580:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#")); @@ -23313,20 +23565,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3579:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3581:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#UNIQRANK__L3*/ meltfnum[1])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3580:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3582:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" checkoff\", (")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3581:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3583:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -23350,13 +23602,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3582:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3584:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (">=0 && ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3583:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3585:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -23380,13 +23632,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3584:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3586:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("< melt_multiple_length((melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3585:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3587:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -23410,7 +23662,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3586:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3588:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("))));")); @@ -23418,20 +23670,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3587:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3589:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3588:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3590:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("((meltmultiple_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3589:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3591:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -23455,13 +23707,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3590:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3592:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("))->tabval[")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3591:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3593:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -23485,13 +23737,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3592:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3594:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("] = (melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3593:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3595:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -23515,7 +23767,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3594:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3596:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -23523,14 +23775,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3595:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3597:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3596:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3598:/ cppif.then"); /*^block */ /*anyblock */ { @@ -23541,7 +23793,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L10*/ meltfnum[8] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3597:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3599:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -23576,7 +23828,7 @@ lab_endgetargs:; /*_#I__L12*/ meltfnum[11] = (( /*_#STRBUF_USEDLENGTH__L10*/ meltfnum[8]) < ( /*_#GET_INT__L11*/ meltfnum[10]));; - MELT_LOCATION ("warmelt-outobj.melt:3596:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3598:/ cond"); /*cond */ if ( /*_#I__L12*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -23584,7 +23836,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3596:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3598:/ cond.else"); /*^block */ /*anyblock */ @@ -23598,7 +23850,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3596) ? (3596) : __LINE__, __FUNCTION__); + (3598) ? (3598) : __LINE__, __FUNCTION__); ; } ; @@ -23613,7 +23865,7 @@ lab_endgetargs:; /*_.IFCPP___V23*/ meltfptr[22] = /*_.IFELSE___V25*/ meltfptr[24];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3596:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3598:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L10*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V24*/ meltfptr[23] = 0; @@ -23630,12 +23882,12 @@ lab_endgetargs:; /*_.IFCPP___V23*/ meltfptr[22] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3545:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3547:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MULTI___V12*/ meltfptr[11] = /*_.IFCPP___V23*/ meltfptr[22];; - MELT_LOCATION ("warmelt-outobj.melt:3545:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3547:/ clear"); /*clear *//*_.OUTPUT_LOCATION__V15*/ meltfptr[14] = 0; /*^clear */ /*clear *//*_#GET_INT__L4*/ meltfnum[3] = 0; @@ -23666,7 +23918,7 @@ lab_endgetargs:; /*clear *//*_.FILEV__V14*/ meltfptr[13] = 0; /*_.LET___V7*/ meltfptr[5] = /*_.MULTI___V12*/ meltfptr[11];; - MELT_LOCATION ("warmelt-outobj.melt:3534:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3536:/ clear"); /*clear *//*_.ILOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.OTUP__V9*/ meltfptr[8] = 0; @@ -23678,14 +23930,26 @@ lab_endgetargs:; /*clear *//*_.OVAL__V11*/ meltfptr[10] = 0; /*^clear */ /*clear *//*_.MULTI___V12*/ meltfptr[11] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3532:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3534:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:3532:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3534:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -23782,7 +24046,7 @@ meltrout_99_warmelt_outobj_OUTPUCOD_OBJPUTPAIRHEAD (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3606:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3608:/ getarg"); /*_.OPUT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -23818,7 +24082,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-outobj.melt:3607:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3609:/ quasiblock"); /*^getslot */ @@ -23829,7 +24093,7 @@ lab_endgetargs:; meltfptr[5] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3608:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3610:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -23854,7 +24118,7 @@ lab_endgetargs:; /*_.OPAIR__V7*/ meltfptr[6] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:3609:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3611:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -23878,7 +24142,7 @@ lab_endgetargs:; /*_.OHEAD__V8*/ meltfptr[7] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:3610:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3612:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -23915,7 +24179,7 @@ lab_endgetargs:; (melt_unsafe_boxed_int_value ((melt_ptr_t) /*_.OLDCOUNT__V9*/ meltfptr[8]) + (1)))) : (melt_ptr_t) NULL);; - MELT_LOCATION ("warmelt-outobj.melt:3613:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3615:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23939,7 +24203,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3614:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3616:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*putpairhead*/")); @@ -23947,12 +24211,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3615:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3617:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3616:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3618:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -23992,7 +24256,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3617:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3619:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_assertmsg(\"putpairhead /")); @@ -24002,20 +24266,20 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.NEWCOUNT__V10*/ meltfptr[9])));; { - MELT_LOCATION ("warmelt-outobj.melt:3618:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3620:/ locexp"); meltgc_add_strbuf_hex ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L2*/ meltfnum[1])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3619:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3621:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" checkpair\", melt_magic_discr((melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3620:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3622:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -24039,7 +24303,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3621:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3623:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("))== MELTOBMAG_PAIR);")); @@ -24047,20 +24311,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3622:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3624:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3623:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3625:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("((meltpair_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3624:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3626:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -24084,13 +24348,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3625:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3627:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("))->hd = (melt_ptr_t) (")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3626:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3628:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -24114,7 +24378,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3627:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3629:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -24122,14 +24386,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3628:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3630:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3629:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3631:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24140,7 +24404,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[2] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3630:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3632:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -24175,7 +24439,7 @@ lab_endgetargs:; /*_#I__L5*/ meltfnum[4] = (( /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[2]) < ( /*_#GET_INT__L4*/ meltfnum[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3629:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3631:/ cond"); /*cond */ if ( /*_#I__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -24183,7 +24447,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3629:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3631:/ cond.else"); /*^block */ /*anyblock */ @@ -24197,7 +24461,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3629) ? (3629) : __LINE__, __FUNCTION__); + (3631) ? (3631) : __LINE__, __FUNCTION__); ; } ; @@ -24212,7 +24476,7 @@ lab_endgetargs:; /*_.IFCPP___V15*/ meltfptr[14] = /*_.IFELSE___V17*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3629:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3631:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V16*/ meltfptr[15] = 0; @@ -24233,7 +24497,7 @@ lab_endgetargs:; /*_.LET___V5*/ meltfptr[4] = /*_.IFCPP___V15*/ meltfptr[14];; - MELT_LOCATION ("warmelt-outobj.melt:3607:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3609:/ clear"); /*clear *//*_.OLOC__V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.OPAIR__V7*/ meltfptr[6] = 0; @@ -24255,11 +24519,23 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_C_CODE__V14*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.IFCPP___V15*/ meltfptr[14] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3606:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3608:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-outobj.melt:3606:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3608:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -24357,7 +24633,7 @@ meltrout_100_warmelt_outobj_OUTPUCOD_OBJPUTPAIRTAIL (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3635:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3637:/ getarg"); /*_.OPUT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -24393,7 +24669,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-outobj.melt:3636:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3638:/ quasiblock"); /*^getslot */ @@ -24404,7 +24680,7 @@ lab_endgetargs:; meltfptr[5] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3637:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3639:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -24429,7 +24705,7 @@ lab_endgetargs:; /*_.OPAIR__V7*/ meltfptr[6] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:3638:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3640:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -24453,7 +24729,7 @@ lab_endgetargs:; /*_.OTAIL__V8*/ meltfptr[7] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:3640:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3642:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24477,7 +24753,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3641:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3643:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*putpairtail*/")); @@ -24485,14 +24761,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3642:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3644:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3643:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3645:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_assertmsg(\"putpairtail /")); @@ -24502,20 +24778,20 @@ lab_endgetargs:; (melt_obj_hash ((melt_ptr_t) ( /*_.OPUT__V2*/ meltfptr[1])));; { - MELT_LOCATION ("warmelt-outobj.melt:3644:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3646:/ locexp"); meltgc_add_strbuf_hex ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#OBJ_HASH__L2*/ meltfnum[1])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3645:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3647:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" checkpair\", melt_magic_discr((melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3646:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3648:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -24539,7 +24815,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3647:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3649:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("))== MELTOBMAG_PAIR);")); @@ -24547,20 +24823,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3648:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3650:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3649:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3651:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("((meltpair_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3650:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3652:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -24584,13 +24860,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3651:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3653:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("))->tl = (meltpair_ptr_t) (")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3652:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3654:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -24614,7 +24890,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3653:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3655:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -24622,14 +24898,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3654:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3656:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3655:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3657:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24640,7 +24916,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[2] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3656:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3658:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -24675,7 +24951,7 @@ lab_endgetargs:; /*_#I__L5*/ meltfnum[4] = (( /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[2]) < ( /*_#GET_INT__L4*/ meltfnum[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3655:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3657:/ cond"); /*cond */ if ( /*_#I__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -24683,7 +24959,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3655:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3657:/ cond.else"); /*^block */ /*anyblock */ @@ -24697,7 +24973,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3655) ? (3655) : __LINE__, __FUNCTION__); + (3657) ? (3657) : __LINE__, __FUNCTION__); ; } ; @@ -24712,7 +24988,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = /*_.IFELSE___V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3655:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3657:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V14*/ meltfptr[13] = 0; @@ -24733,7 +25009,7 @@ lab_endgetargs:; /*_.LET___V5*/ meltfptr[4] = /*_.IFCPP___V13*/ meltfptr[12];; - MELT_LOCATION ("warmelt-outobj.melt:3636:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3638:/ clear"); /*clear *//*_.OLOC__V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.OPAIR__V7*/ meltfptr[6] = 0; @@ -24751,11 +25027,23 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_C_CODE__V12*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_.IFCPP___V13*/ meltfptr[12] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3635:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3637:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-outobj.melt:3635:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3637:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -24849,7 +25137,7 @@ meltrout_101_warmelt_outobj_OUTPUCOD_OBJPUTLIST (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3661:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3663:/ getarg"); /*_.OPUT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -24885,7 +25173,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-outobj.melt:3662:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3664:/ quasiblock"); /*^getslot */ @@ -24896,7 +25184,7 @@ lab_endgetargs:; meltfptr[5] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3663:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3665:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -24921,7 +25209,7 @@ lab_endgetargs:; /*_.OLIST__V7*/ meltfptr[6] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:3664:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3666:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -24946,7 +25234,7 @@ lab_endgetargs:; /*_.OFIRST__V8*/ meltfptr[7] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:3665:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3667:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -24971,7 +25259,7 @@ lab_endgetargs:; /*_.OLAST__V9*/ meltfptr[8] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:3667:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3669:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24995,7 +25283,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3668:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3670:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*putlist*/")); @@ -25003,20 +25291,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3669:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3671:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3670:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3672:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_assertmsg(\"putlist checklist\", melt_magic_discr((melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3671:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3673:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -25040,7 +25328,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3672:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3674:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("))== MELTOBMAG_LIST);")); @@ -25048,20 +25336,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3673:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3675:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3674:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3676:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("((meltlist_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3675:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3677:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -25085,13 +25373,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3676:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3678:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("))->first = (meltpair_ptr_t) (")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3677:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3679:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -25115,7 +25403,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3678:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3680:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -25123,20 +25411,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3679:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3681:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3680:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3682:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("((meltlist_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3681:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3683:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -25160,13 +25448,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3682:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3684:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("))->last = (meltpair_ptr_t) (")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3683:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3685:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -25190,7 +25478,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3684:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3686:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -25198,14 +25486,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3685:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3687:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3686:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3688:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25216,7 +25504,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3687:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3689:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -25251,7 +25539,7 @@ lab_endgetargs:; /*_#I__L4*/ meltfnum[3] = (( /*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1]) < ( /*_#GET_INT__L3*/ meltfnum[2]));; - MELT_LOCATION ("warmelt-outobj.melt:3686:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3688:/ cond"); /*cond */ if ( /*_#I__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -25259,7 +25547,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3686:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3688:/ cond.else"); /*^block */ /*anyblock */ @@ -25273,7 +25561,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3686) ? (3686) : __LINE__, __FUNCTION__); + (3688) ? (3688) : __LINE__, __FUNCTION__); ; } ; @@ -25288,7 +25576,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[15] = /*_.IFELSE___V18*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3686:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3688:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V17*/ meltfptr[16] = 0; @@ -25309,7 +25597,7 @@ lab_endgetargs:; /*_.LET___V5*/ meltfptr[4] = /*_.IFCPP___V16*/ meltfptr[15];; - MELT_LOCATION ("warmelt-outobj.melt:3662:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3664:/ clear"); /*clear *//*_.OLOC__V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.OLIST__V7*/ meltfptr[6] = 0; @@ -25331,11 +25619,23 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_C_CODE__V15*/ meltfptr[14] = 0; /*^clear */ /*clear *//*_.IFCPP___V16*/ meltfptr[15] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3661:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3663:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[4];; - MELT_LOCATION ("warmelt-outobj.melt:3661:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3663:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -25429,7 +25729,7 @@ meltrout_102_warmelt_outobj_OUTPUCOD_OBJGETSLOT (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3692:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3694:/ getarg"); /*_.OGSL__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -25467,7 +25767,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3693:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3695:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25479,7 +25779,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OGSL__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJGETSLOT */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:3693:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3695:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -25487,7 +25787,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3693:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3695:/ cond.else"); /*^block */ /*anyblock */ @@ -25501,7 +25801,7 @@ lab_endgetargs:; melt_assert_failed (("check ogsl"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3693) ? (3693) : __LINE__, __FUNCTION__); + (3695) ? (3695) : __LINE__, __FUNCTION__); ; } ; @@ -25516,7 +25816,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3693:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3695:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -25527,7 +25827,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3694:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3696:/ quasiblock"); /*^getslot */ @@ -25538,7 +25838,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3695:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3697:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OGSL__V2*/ meltfptr[1]), 1, "OBDI_DESTLIST"); @@ -25546,7 +25846,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3696:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3698:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OGSL__V2*/ meltfptr[1]), 2, "OGETSL_OBJ"); @@ -25554,7 +25854,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3697:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3699:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OGSL__V2*/ meltfptr[1]), 3, "OGETSL_FIELD"); @@ -25572,7 +25872,7 @@ lab_endgetargs:; ( /*_#I__L3*/ meltfnum[1])));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3700:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3702:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25584,7 +25884,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OFIELD__V11*/ meltfptr[10]), (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout-> tabval[2])));; - MELT_LOCATION ("warmelt-outobj.melt:3700:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3702:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -25592,7 +25892,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3700:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3702:/ cond.else"); /*^block */ /*anyblock */ @@ -25606,7 +25906,7 @@ lab_endgetargs:; melt_assert_failed (("check ofield"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3700) ? (3700) : __LINE__, __FUNCTION__); + (3702) ? (3702) : __LINE__, __FUNCTION__); ; } ; @@ -25621,7 +25921,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3700:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3702:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -25632,7 +25932,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3701:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3703:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -25656,7 +25956,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3702:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3704:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("{ melt_ptr_t slot=0;")); @@ -25666,20 +25966,20 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3703:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3705:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L5*/ meltfnum[3]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3704:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3706:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_object_get_field(slot,(melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3705:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3707:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -25703,7 +26003,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3706:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3708:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("), ")); @@ -25713,20 +26013,20 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.OFIELD__V11*/ meltfptr[10])));; { - MELT_LOCATION ("warmelt-outobj.melt:3707:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3709:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L6*/ meltfnum[5])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3708:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3710:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (", \"")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3709:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3711:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OFIELD__V11*/ meltfptr[10]), 1, "NAMED_NAME"); @@ -25746,13 +26046,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3710:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3712:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("\");")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3713:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3715:/ quasiblock"); /*^newclosure */ @@ -25803,7 +26103,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.BOXDEPTHP1__V12*/ meltfptr[11]); ; /*_.LAMBDA___V18*/ meltfptr[17] = /*_.LAMBDA___V19*/ meltfptr[18];; - MELT_LOCATION ("warmelt-outobj.melt:3711:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3713:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -25824,7 +26124,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3718:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3720:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("slot; };")); @@ -25832,14 +26132,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3719:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3721:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3720:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3722:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25850,7 +26150,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3721:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3723:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -25885,7 +26185,7 @@ lab_endgetargs:; /*_#I__L9*/ meltfnum[8] = (( /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6]) < ( /*_#GET_INT__L8*/ meltfnum[7]));; - MELT_LOCATION ("warmelt-outobj.melt:3720:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3722:/ cond"); /*cond */ if ( /*_#I__L9*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -25893,7 +26193,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3720:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3722:/ cond.else"); /*^block */ /*anyblock */ @@ -25907,7 +26207,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3720) ? (3720) : __LINE__, __FUNCTION__); + (3722) ? (3722) : __LINE__, __FUNCTION__); ; } ; @@ -25922,7 +26222,7 @@ lab_endgetargs:; /*_.IFCPP___V21*/ meltfptr[20] = /*_.IFELSE___V23*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3720:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3722:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V22*/ meltfptr[21] = 0; @@ -25943,7 +26243,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-outobj.melt:3694:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3696:/ clear"); /*clear *//*_.OLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.DESTLIST__V9*/ meltfptr[8] = 0; @@ -25973,14 +26273,26 @@ lab_endgetargs:; /*clear *//*_.LIST_EVERY__V20*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_.IFCPP___V21*/ meltfptr[20] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3692:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3694:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:3692:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3694:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -26074,7 +26386,7 @@ meltrout_103_warmelt_outobj_LAMBDA___25__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3713:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3715:/ getarg"); /*_.DST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -26087,7 +26399,7 @@ lab_endgetargs:; /*_#GET_INT__L1*/ meltfnum[0] = (melt_get_int ((melt_ptr_t) (( /*~BOXDEPTHP1 */ meltfclos->tabval[2]))));; - MELT_LOCATION ("warmelt-outobj.melt:3714:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3716:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -26113,7 +26425,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3715:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3717:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26124,7 +26436,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:3716:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3718:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -26159,7 +26471,7 @@ lab_endgetargs:; /*_#I__L4*/ meltfnum[3] = (( /*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1]) < ( /*_#GET_INT__L3*/ meltfnum[2]));; - MELT_LOCATION ("warmelt-outobj.melt:3715:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3717:/ cond"); /*cond */ if ( /*_#I__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -26167,7 +26479,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3715:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3717:/ cond.else"); /*^block */ /*anyblock */ @@ -26181,7 +26493,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3715) ? (3715) : __LINE__, __FUNCTION__); + (3717) ? (3717) : __LINE__, __FUNCTION__); ; } ; @@ -26196,7 +26508,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3715:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3717:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V5*/ meltfptr[4] = 0; @@ -26215,13 +26527,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3717:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3719:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~IMPLBUF */ meltfclos->tabval[1])), (" = ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3713:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3715:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -26319,7 +26631,7 @@ meltrout_104_warmelt_outobj_OUTPUCOD_OBJPUTSLOT (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3728:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3730:/ getarg"); /*_.OPSLO__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -26357,7 +26669,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3729:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3731:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26369,7 +26681,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OPSLO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJPUTSLOT */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:3729:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3731:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -26377,7 +26689,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3729:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3731:/ cond.else"); /*^block */ /*anyblock */ @@ -26391,7 +26703,7 @@ lab_endgetargs:; melt_assert_failed (("check opslo"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3729) ? (3729) : __LINE__, __FUNCTION__); + (3731) ? (3731) : __LINE__, __FUNCTION__); ; } ; @@ -26406,7 +26718,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3729:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3731:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -26417,7 +26729,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3730:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3732:/ quasiblock"); /*^getslot */ @@ -26428,7 +26740,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3731:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3733:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPSLO__V2*/ meltfptr[1]), 1, "OSLOT_ODATA"); @@ -26436,7 +26748,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3732:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3734:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPSLO__V2*/ meltfptr[1]), 2, "OSLOT_OFFSET"); @@ -26444,7 +26756,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3733:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3735:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPSLO__V2*/ meltfptr[1]), 3, "OSLOT_FIELD"); @@ -26452,7 +26764,7 @@ lab_endgetargs:; meltfptr[10] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3734:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3736:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPSLO__V2*/ meltfptr[1]), 4, "OSLOT_VALUE"); @@ -26462,7 +26774,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3736:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3738:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26478,7 +26790,7 @@ lab_endgetargs:; /*_#NOT__L4*/ meltfnum[3] = (!( /*_#IS_A__L3*/ meltfnum[1]));; - MELT_LOCATION ("warmelt-outobj.melt:3736:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3738:/ cond"); /*cond */ if ( /*_#NOT__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -26486,7 +26798,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3736:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3738:/ cond.else"); /*^block */ /*anyblock */ @@ -26500,7 +26812,7 @@ lab_endgetargs:; melt_assert_failed (("outpucod_objputslot check oval not nrep"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3736) ? (3736) : __LINE__, __FUNCTION__); + (3738) ? (3738) : __LINE__, __FUNCTION__); ; } ; @@ -26515,7 +26827,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3736:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3738:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#NOT__L4*/ meltfnum[3] = 0; @@ -26528,7 +26840,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3737:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3739:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -26552,7 +26864,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3738:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3740:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*putslot*/")); @@ -26560,27 +26872,27 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3739:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3741:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3740:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3742:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_assertmsg(\"putslot checkobj")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3741:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3743:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L5*/ meltfnum[1] = melt_is_instance_of ((melt_ptr_t) ( /*_.ODATA__V9*/ meltfptr[8]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout-> tabval[3])));; - MELT_LOCATION ("warmelt-outobj.melt:3741:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3743:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -26590,13 +26902,13 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3743:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3745:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3744:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3746:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.ODATA__V9*/ meltfptr[8]), 1, "NAMED_NAME"); @@ -26615,25 +26927,25 @@ lab_endgetargs:; meltfptr[15]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:3742:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3744:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3741:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3743:/ clear"); /*clear *//*_.NAMED_NAME__V16*/ meltfptr[15] = 0; } ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:3745:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3747:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L6*/ meltfnum[3] = melt_is_instance_of ((melt_ptr_t) ( /*_.OFIELD__V11*/ meltfptr[10]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout-> tabval[3])));; - MELT_LOCATION ("warmelt-outobj.melt:3745:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3747:/ cond"); /*cond */ if ( /*_#IS_A__L6*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -26643,13 +26955,13 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3747:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3749:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" @")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3748:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3750:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OFIELD__V11*/ meltfptr[10]), 1, "NAMED_NAME"); @@ -26668,12 +26980,12 @@ lab_endgetargs:; meltfptr[15]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:3746:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3748:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3745:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3747:/ clear"); /*clear *//*_.NAMED_NAME__V17*/ meltfptr[15] = 0; } ; @@ -26681,13 +26993,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3749:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3751:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("\", melt_magic_discr((melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3750:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3752:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -26711,7 +27023,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3751:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3753:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (")) == MELTOBMAG_OBJECT);")); @@ -26719,19 +27031,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3752:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3754:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:3753:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3755:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L7*/ meltfnum[6] = melt_is_instance_of ((melt_ptr_t) ( /*_.OFIELD__V11*/ meltfptr[10]), (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout-> tabval[5])));; - MELT_LOCATION ("warmelt-outobj.melt:3753:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3755:/ cond"); /*cond */ if ( /*_#IS_A__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -26741,14 +27053,14 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3755:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3757:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_putfield_object((")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3756:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3758:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -26774,13 +27086,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3757:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3759:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("), (")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3758:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3760:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -26806,7 +27118,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3759:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3761:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("), (")); @@ -26814,7 +27126,7 @@ lab_endgetargs:; ; /*_#I__L8*/ meltfnum[7] = ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; - MELT_LOCATION ("warmelt-outobj.melt:3760:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3762:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -26840,13 +27152,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3761:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3763:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("), \"")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3762:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3764:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OFIELD__V11*/ meltfptr[10]), 1, "NAMED_NAME"); @@ -26866,18 +27178,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3763:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3765:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("\");")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3754:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3756:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3753:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3755:/ clear"); /*clear *//*_.OUTPUT_C_CODE__V19*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_.OUTPUT_C_CODE__V20*/ meltfptr[19] = 0; @@ -26899,7 +27211,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3767:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3769:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); @@ -26907,21 +27219,21 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3768:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3770:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_assertmsg(\"putslot checkoff")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3769:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3771:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L9*/ meltfnum[7] = melt_is_instance_of ((melt_ptr_t) ( /*_.ODATA__V9*/ meltfptr[8]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout-> tabval[3])));; - MELT_LOCATION ("warmelt-outobj.melt:3769:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3771:/ cond"); /*cond */ if ( /*_#IS_A__L9*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -26931,14 +27243,14 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3771:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3773:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3772:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3774:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.ODATA__V9*/ meltfptr[8]), 1, "NAMED_NAME"); @@ -26956,18 +27268,18 @@ lab_endgetargs:; ( /*_.NAMED_NAME__V23*/ meltfptr[18]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:3770:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3772:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3769:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3771:/ clear"); /*clear *//*_.NAMED_NAME__V23*/ meltfptr[18] = 0; } ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:3773:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3775:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L10*/ meltfnum[9] = @@ -26975,7 +27287,7 @@ lab_endgetargs:; ( /*_.OFIELD__V11*/ meltfptr[10]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout-> tabval[3])));; - MELT_LOCATION ("warmelt-outobj.melt:3773:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3775:/ cond"); /*cond */ if ( /*_#IS_A__L10*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -26985,14 +27297,14 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:3775:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3777:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" @")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3776:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3778:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OFIELD__V11*/ meltfptr[10]), 1, "NAMED_NAME"); @@ -27010,12 +27322,12 @@ lab_endgetargs:; ( /*_.NAMED_NAME__V24*/ meltfptr[19]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:3774:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3776:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3773:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3775:/ clear"); /*clear *//*_.NAMED_NAME__V24*/ meltfptr[19] = 0; } ; @@ -27023,13 +27335,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3777:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3779:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("\", (")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3778:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3780:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -27055,14 +27367,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3779:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3781:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (">=0 && ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3780:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3782:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -27088,14 +27400,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3781:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3783:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("< melt_object_length((melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3782:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3784:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -27121,7 +27433,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3783:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3785:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("))));")); @@ -27129,7 +27441,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3784:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3786:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); @@ -27137,14 +27449,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3785:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3787:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("((meltobject_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3786:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3788:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -27170,14 +27482,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3787:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3789:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("))->obj_vartab[")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3788:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3790:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -27203,7 +27515,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3789:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3791:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -27214,7 +27526,7 @@ lab_endgetargs:; ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION ("warmelt-outobj.melt:3790:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3792:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#I__L11*/ meltfnum[10]), 0); @@ -27222,7 +27534,7 @@ lab_endgetargs:; ; /*_#I__L12*/ meltfnum[11] = ((1) + ( /*_#DEPTH__L1*/ meltfnum[0]));; - MELT_LOCATION ("warmelt-outobj.melt:3791:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3793:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -27248,18 +27560,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3792:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3794:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3765:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3767:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3753:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3755:/ clear"); /*clear *//*_#IS_A__L9*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_#IS_A__L10*/ meltfnum[9] = 0; @@ -27285,14 +27597,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3795:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3797:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3796:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3798:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27303,7 +27615,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L13*/ meltfnum[7] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3797:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3799:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -27338,7 +27650,7 @@ lab_endgetargs:; /*_#I__L15*/ meltfnum[10] = (( /*_#STRBUF_USEDLENGTH__L13*/ meltfnum[7]) < ( /*_#GET_INT__L14*/ meltfnum[9]));; - MELT_LOCATION ("warmelt-outobj.melt:3796:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3798:/ cond"); /*cond */ if ( /*_#I__L15*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -27346,7 +27658,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3796:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3798:/ cond.else"); /*^block */ /*anyblock */ @@ -27360,7 +27672,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3796) ? (3796) : __LINE__, __FUNCTION__); + (3798) ? (3798) : __LINE__, __FUNCTION__); ; } ; @@ -27375,7 +27687,7 @@ lab_endgetargs:; /*_.IFCPP___V31*/ meltfptr[20] = /*_.IFELSE___V33*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3796:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3798:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L13*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V32*/ meltfptr[21] = 0; @@ -27396,7 +27708,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V31*/ meltfptr[20];; - MELT_LOCATION ("warmelt-outobj.melt:3730:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3732:/ clear"); /*clear *//*_.ILOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.ODATA__V9*/ meltfptr[8] = 0; @@ -27420,14 +27732,26 @@ lab_endgetargs:; /*clear *//*_#IS_A__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.IFCPP___V31*/ meltfptr[20] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3728:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3730:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:3728:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3730:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ diff --git a/gcc/melt/generated/warmelt-outobj+04.c b/gcc/melt/generated/warmelt-outobj+04.c index a0891e00b4f..a9ef6b54a3f 100644 --- a/gcc/melt/generated/warmelt-outobj+04.c +++ b/gcc/melt/generated/warmelt-outobj+04.c @@ -2290,7 +2290,7 @@ meltrout_105_warmelt_outobj_OUTPUCOD_OBJPUTCLOSUROUT (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3803:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3805:/ getarg"); /*_.OPCLOR__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -2328,7 +2328,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3804:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3806:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2340,7 +2340,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OPCLOR__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJPUTCLOSUROUT */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:3804:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3806:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -2348,7 +2348,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3804:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3806:/ cond.else"); /*^block */ /*anyblock */ @@ -2362,7 +2362,7 @@ lab_endgetargs:; melt_assert_failed (("check opclor"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3804) ? (3804) : __LINE__, __FUNCTION__); + (3806) ? (3806) : __LINE__, __FUNCTION__); ; } ; @@ -2377,7 +2377,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3804:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3806:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -2388,7 +2388,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3805:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3807:/ quasiblock"); /*^getslot */ @@ -2399,7 +2399,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3806:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3808:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPCLOR__V2*/ meltfptr[1]), 1, "OPCLOR_CLOS"); @@ -2407,7 +2407,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3807:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3809:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPCLOR__V2*/ meltfptr[1]), 2, "OPCLOR_ROUT"); @@ -2418,7 +2418,7 @@ lab_endgetargs:; /*_#CNT__L3*/ meltfnum[1] = 0;; { - MELT_LOCATION ("warmelt-outobj.melt:3812:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3814:/ locexp"); /* GETCNTCHK__1 in outpucod_objputclosurout */ static long GETCNTCHK__1_cnt; GETCNTCHK__1_cnt++; @@ -2426,7 +2426,7 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-outobj.melt:3817:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3819:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -2450,7 +2450,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3818:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3820:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*putclosurout#")); @@ -2458,14 +2458,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3819:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3821:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#CNT__L3*/ meltfnum[1])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3820:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3822:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("*/")); @@ -2473,14 +2473,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3821:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3823:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3822:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3824:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_assertmsg(\"putclosrout#")); @@ -2488,20 +2488,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3823:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3825:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#CNT__L3*/ meltfnum[1])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3824:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3826:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" checkclo\", melt_magic_discr((melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3825:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3827:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -2525,7 +2525,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3826:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3828:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (")) == MELTOBMAG_CLOSURE);")); @@ -2533,14 +2533,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3827:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3829:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3828:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3830:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_assertmsg(\"putclosrout#")); @@ -2548,20 +2548,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3829:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3831:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#CNT__L3*/ meltfnum[1])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3830:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3832:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" checkrout\", melt_magic_discr((melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3831:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3833:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -2585,7 +2585,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3832:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3834:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (")) == MELTOBMAG_ROUTINE);")); @@ -2593,20 +2593,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3833:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3835:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3834:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3836:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("((meltclosure_ptr_t)")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3835:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3837:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -2630,13 +2630,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3836:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3838:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (")->rout = (meltroutine_ptr_t) (")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3837:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3839:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -2660,7 +2660,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3838:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3840:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -2668,14 +2668,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3839:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3841:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3840:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3842:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2686,7 +2686,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[3] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3841:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3843:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -2721,7 +2721,7 @@ lab_endgetargs:; /*_#I__L6*/ meltfnum[5] = (( /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[3]) < ( /*_#GET_INT__L5*/ meltfnum[4]));; - MELT_LOCATION ("warmelt-outobj.melt:3840:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3842:/ cond"); /*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -2729,7 +2729,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3840:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3842:/ cond.else"); /*^block */ /*anyblock */ @@ -2743,7 +2743,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3840) ? (3840) : __LINE__, __FUNCTION__); + (3842) ? (3842) : __LINE__, __FUNCTION__); ; } ; @@ -2758,7 +2758,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[15] = /*_.IFELSE___V18*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3840:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3842:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V17*/ meltfptr[16] = 0; @@ -2779,7 +2779,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V16*/ meltfptr[15];; - MELT_LOCATION ("warmelt-outobj.melt:3805:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3807:/ clear"); /*clear *//*_.OLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.OCLOS__V9*/ meltfptr[8] = 0; @@ -2799,14 +2799,26 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_C_CODE__V15*/ meltfptr[14] = 0; /*^clear */ /*clear *//*_.IFCPP___V16*/ meltfptr[15] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3803:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3805:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:3803:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3805:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -2903,7 +2915,7 @@ meltrout_106_warmelt_outobj_OUTPUCOD_OBJPUTCLOSEDV (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3847:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3849:/ getarg"); /*_.OPCLOV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -2941,7 +2953,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3848:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3850:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2953,7 +2965,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OPCLOV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJPUTCLOSEDV */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:3848:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3850:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -2961,7 +2973,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3848:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3850:/ cond.else"); /*^block */ /*anyblock */ @@ -2975,7 +2987,7 @@ lab_endgetargs:; melt_assert_failed (("check opclor"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3848) ? (3848) : __LINE__, __FUNCTION__); + (3850) ? (3850) : __LINE__, __FUNCTION__); ; } ; @@ -2990,7 +3002,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3848:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3850:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -3001,7 +3013,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3849:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3851:/ quasiblock"); /*^getslot */ @@ -3012,7 +3024,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3850:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3852:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPCLOV__V2*/ meltfptr[1]), 1, "OPCLOV_CLOS"); @@ -3020,7 +3032,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3851:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3853:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPCLOV__V2*/ meltfptr[1]), 2, "OPCLOV_OFF"); @@ -3028,7 +3040,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3852:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3854:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPCLOV__V2*/ meltfptr[1]), 3, "OPCLOV_CVAL"); @@ -3036,7 +3048,7 @@ lab_endgetargs:; meltfptr[10] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3853:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3855:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3060,7 +3072,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3854:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3856:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*putclosv*/")); @@ -3068,20 +3080,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3855:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3857:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3856:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3858:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_assertmsg(\"putclosv checkclo\", melt_magic_discr((melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3857:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3859:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -3105,7 +3117,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3858:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3860:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (")) == MELTOBMAG_CLOSURE);")); @@ -3113,20 +3125,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3859:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3861:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3860:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3862:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_assertmsg(\"putclosv checkoff\", ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3861:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3863:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -3150,13 +3162,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3862:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3864:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (">= 0 && ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3863:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3865:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -3180,13 +3192,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3864:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3866:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("< melt_closure_size((melt_ptr_t) (")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3865:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3867:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -3210,7 +3222,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3866:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3868:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (")));")); @@ -3218,20 +3230,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3867:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3869:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3868:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3870:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("((meltclosure_ptr_t)")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3869:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3871:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -3255,13 +3267,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3870:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3872:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (")->tabval[")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3871:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3873:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -3285,13 +3297,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3872:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3874:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("] = (melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3873:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3875:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -3315,7 +3327,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3874:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3876:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -3323,14 +3335,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3875:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3877:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3876:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3878:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3341,7 +3353,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3877:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3879:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -3376,7 +3388,7 @@ lab_endgetargs:; /*_#I__L5*/ meltfnum[4] = (( /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1]) < ( /*_#GET_INT__L4*/ meltfnum[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3876:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3878:/ cond"); /*cond */ if ( /*_#I__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -3384,7 +3396,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3876:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3878:/ cond.else"); /*^block */ /*anyblock */ @@ -3398,7 +3410,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3876) ? (3876) : __LINE__, __FUNCTION__); + (3878) ? (3878) : __LINE__, __FUNCTION__); ; } ; @@ -3413,7 +3425,7 @@ lab_endgetargs:; /*_.IFCPP___V20*/ meltfptr[19] = /*_.IFELSE___V22*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3876:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3878:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V21*/ meltfptr[20] = 0; @@ -3434,7 +3446,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V20*/ meltfptr[19];; - MELT_LOCATION ("warmelt-outobj.melt:3849:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3851:/ clear"); /*clear *//*_.OLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.OCLOS__V9*/ meltfptr[8] = 0; @@ -3460,14 +3472,26 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_C_CODE__V19*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_.IFCPP___V20*/ meltfptr[19] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3847:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3849:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:3847:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3849:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3568,7 +3592,7 @@ meltrout_107_warmelt_outobj_OUTPUCOD_OBJPUTCLOSEDNOTNULLV (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3883:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3885:/ getarg"); /*_.OPCLOV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -3606,7 +3630,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3884:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3886:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3618,7 +3642,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OPCLOV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJPUTCLOSEDNOTNULLV */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:3884:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3886:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -3626,7 +3650,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3884:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3886:/ cond.else"); /*^block */ /*anyblock */ @@ -3640,7 +3664,7 @@ lab_endgetargs:; melt_assert_failed (("check opclor"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3884) ? (3884) : __LINE__, __FUNCTION__); + (3886) ? (3886) : __LINE__, __FUNCTION__); ; } ; @@ -3655,7 +3679,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3884:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3886:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -3666,7 +3690,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3885:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3887:/ quasiblock"); /*^getslot */ @@ -3677,7 +3701,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3886:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3888:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPCLOV__V2*/ meltfptr[1]), 1, "OPCLOV_CLOS"); @@ -3685,7 +3709,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3887:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3889:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPCLOV__V2*/ meltfptr[1]), 2, "OPCLOV_OFF"); @@ -3693,7 +3717,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3888:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3890:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPCLOV__V2*/ meltfptr[1]), 3, "OPCLOV_CVAL"); @@ -3701,7 +3725,7 @@ lab_endgetargs:; meltfptr[10] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3889:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3891:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3725,7 +3749,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3890:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3892:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*putclosvnotnull*/")); @@ -3733,20 +3757,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3891:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3893:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3892:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3894:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_assertmsg(\"putclosvnotnull checkclo\", melt_magic_discr((melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3893:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3895:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -3770,7 +3794,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3894:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3896:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (")) == MELTOBMAG_CLOSURE);")); @@ -3778,20 +3802,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3895:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3897:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3896:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3898:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_assertmsg(\"putclosvnotnull checknotnullval\", NULL != ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3897:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3899:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -3815,7 +3839,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3898:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3900:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -3823,20 +3847,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3899:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3901:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3900:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3902:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_assertmsg(\"putclosvnotnull checkoff\", ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3901:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3903:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -3860,13 +3884,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3902:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3904:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (">= 0 && ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3903:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3905:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -3890,13 +3914,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3904:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3906:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("< melt_closure_size((melt_ptr_t) (")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3905:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3907:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -3920,7 +3944,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3906:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3908:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (")));")); @@ -3928,20 +3952,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3907:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3909:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3908:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3910:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("((meltclosure_ptr_t)")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3909:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3911:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -3965,13 +3989,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3910:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3912:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (")->tabval[")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3911:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3913:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -3995,13 +4019,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3912:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3914:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("] = (melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3913:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3915:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -4025,7 +4049,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3914:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3916:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -4033,14 +4057,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3915:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3917:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3916:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3918:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4051,7 +4075,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3917:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3919:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -4086,7 +4110,7 @@ lab_endgetargs:; /*_#I__L5*/ meltfnum[4] = (( /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1]) < ( /*_#GET_INT__L4*/ meltfnum[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3916:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3918:/ cond"); /*cond */ if ( /*_#I__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -4094,7 +4118,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3916:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3918:/ cond.else"); /*^block */ /*anyblock */ @@ -4108,7 +4132,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3916) ? (3916) : __LINE__, __FUNCTION__); + (3918) ? (3918) : __LINE__, __FUNCTION__); ; } ; @@ -4123,7 +4147,7 @@ lab_endgetargs:; /*_.IFCPP___V21*/ meltfptr[20] = /*_.IFELSE___V23*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3916:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3918:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V22*/ meltfptr[21] = 0; @@ -4144,7 +4168,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-outobj.melt:3885:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3887:/ clear"); /*clear *//*_.OLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.OCLOS__V9*/ meltfptr[8] = 0; @@ -4172,14 +4196,26 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_C_CODE__V20*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_.IFCPP___V21*/ meltfptr[20] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3883:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3885:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:3883:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3885:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4279,7 +4315,7 @@ meltrout_108_warmelt_outobj_OUTPUCOD_OBJPUTROUTCONST (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3923:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3925:/ getarg"); /*_.OPRCONST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -4317,7 +4353,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3924:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3926:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4329,7 +4365,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OPRCONST__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJPUTROUTCONST */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:3924:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3926:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -4337,7 +4373,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3924:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3926:/ cond.else"); /*^block */ /*anyblock */ @@ -4351,7 +4387,7 @@ lab_endgetargs:; melt_assert_failed (("check oprconst"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3924) ? (3924) : __LINE__, __FUNCTION__); + (3926) ? (3926) : __LINE__, __FUNCTION__); ; } ; @@ -4366,7 +4402,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3924:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3926:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -4377,7 +4413,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3925:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3927:/ quasiblock"); /*^getslot */ @@ -4388,7 +4424,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3926:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3928:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPRCONST__V2*/ meltfptr[1]), 1, "OPRCONST_ROUT"); @@ -4396,14 +4432,14 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3927:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3929:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L3*/ meltfnum[1] = melt_is_instance_of ((melt_ptr_t) ( /*_.OROUT__V9*/ meltfptr[8]), (melt_ptr_t) (( /*!CLASS_OBJINITROUTINE */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:3927:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3929:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -4423,7 +4459,7 @@ lab_endgetargs:; /*_.OIE_CNAME__V11*/ meltfptr[10];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3927:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3929:/ clear"); /*clear *//*_.OIE_CNAME__V11*/ meltfptr[10] = 0; } ; @@ -4434,7 +4470,7 @@ lab_endgetargs:; /*_.OROUTNAM__V10*/ meltfptr[9] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:3928:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3930:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPRCONST__V2*/ meltfptr[1]), 2, "OPRCONST_OFF"); @@ -4442,7 +4478,7 @@ lab_endgetargs:; meltfptr[10] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3929:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3931:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPRCONST__V2*/ meltfptr[1]), 3, "OPRCONST_CVAL"); @@ -4450,7 +4486,7 @@ lab_endgetargs:; meltfptr[12] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3930:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3932:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -4474,7 +4510,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3931:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3933:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*putroutconst*/")); @@ -4482,20 +4518,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3932:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3934:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3933:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3935:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_assertmsg(\"putroutconst checkrout\", melt_magic_discr((melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3934:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3936:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -4519,7 +4555,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3935:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3937:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (")) == MELTOBMAG_ROUTINE);")); @@ -4527,26 +4563,26 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3936:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3938:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3938:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3940:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg(\"putroutconst constnull.")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3939:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3941:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_STRING__L4*/ meltfnum[3] = (melt_magic_discr ((melt_ptr_t) ( /*_.OROUTNAM__V10*/ meltfptr[9])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:3939:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3941:/ cond"); /*cond */ if ( /*_#IS_STRING__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -4572,13 +4608,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3940:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3942:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("#")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3941:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3943:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -4602,13 +4638,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3942:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3944:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("\", NULL != (")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3943:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3945:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -4632,7 +4668,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3944:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3946:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("));")); @@ -4640,20 +4676,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3945:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3947:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3947:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3949:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("((meltroutine_ptr_t)")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3948:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3950:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -4677,13 +4713,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3949:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3951:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (")->tabval[")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3950:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3952:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -4707,13 +4743,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3951:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3953:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("] = (melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3952:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3954:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -4737,7 +4773,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3953:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3955:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -4745,14 +4781,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3954:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3956:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3955:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3957:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4763,7 +4799,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[4] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3956:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3958:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -4798,7 +4834,7 @@ lab_endgetargs:; /*_#I__L7*/ meltfnum[6] = (( /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[4]) < ( /*_#GET_INT__L6*/ meltfnum[5]));; - MELT_LOCATION ("warmelt-outobj.melt:3955:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3957:/ cond"); /*cond */ if ( /*_#I__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -4806,7 +4842,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3955:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3957:/ cond.else"); /*^block */ /*anyblock */ @@ -4820,7 +4856,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3955) ? (3955) : __LINE__, __FUNCTION__); + (3957) ? (3957) : __LINE__, __FUNCTION__); ; } ; @@ -4835,7 +4871,7 @@ lab_endgetargs:; /*_.IFCPP___V21*/ meltfptr[20] = /*_.IFELSE___V23*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3955:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3957:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L5*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V22*/ meltfptr[21] = 0; @@ -4856,7 +4892,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-outobj.melt:3925:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3927:/ clear"); /*clear *//*_.OLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.OROUT__V9*/ meltfptr[8] = 0; @@ -4886,14 +4922,26 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_C_CODE__V20*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_.IFCPP___V21*/ meltfptr[20] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3923:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3925:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:3923:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3925:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4996,7 +5044,7 @@ meltrout_109_warmelt_outobj_OUTPUCOD_OBJPUTROUTCONSTNOTNULL (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3962:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3964:/ getarg"); /*_.OPRCONST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -5034,7 +5082,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3963:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3965:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5045,7 +5093,7 @@ lab_endgetargs:; /*_#IS_A__L2*/ meltfnum[1] = melt_is_instance_of ((melt_ptr_t) ( /*_.OPRCONST__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJPUTROUTCONSTNOTNULL */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:3963:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3965:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -5053,7 +5101,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3963:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3965:/ cond.else"); /*^block */ /*anyblock */ @@ -5067,7 +5115,7 @@ lab_endgetargs:; melt_assert_failed (("check oprconst"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3963) ? (3963) : __LINE__, __FUNCTION__); + (3965) ? (3965) : __LINE__, __FUNCTION__); ; } ; @@ -5082,7 +5130,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3963:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3965:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -5093,7 +5141,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3964:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:3966:/ quasiblock"); /*^getslot */ @@ -5104,7 +5152,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3965:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3967:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPRCONST__V2*/ meltfptr[1]), 1, "OPRCONST_ROUT"); @@ -5112,7 +5160,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3966:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3968:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPRCONST__V2*/ meltfptr[1]), 2, "OPRCONST_OFF"); @@ -5120,7 +5168,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:3967:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:3969:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPRCONST__V2*/ meltfptr[1]), 3, "OPRCONST_CVAL"); @@ -5130,7 +5178,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3968:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3970:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5140,7 +5188,7 @@ lab_endgetargs:; ; /*_#NOTNULL__L3*/ meltfnum[1] = (( /*_.OCVAL__V11*/ meltfptr[10]) != NULL);; - MELT_LOCATION ("warmelt-outobj.melt:3968:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3970:/ cond"); /*cond */ if ( /*_#NOTNULL__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -5148,7 +5196,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3968:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3970:/ cond.else"); /*^block */ /*anyblock */ @@ -5162,7 +5210,7 @@ lab_endgetargs:; melt_assert_failed (("check notnull ocval"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3968) ? (3968) : __LINE__, __FUNCTION__); + (3970) ? (3970) : __LINE__, __FUNCTION__); ; } ; @@ -5177,7 +5225,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3968:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3970:/ clear"); /*clear *//*_#NOTNULL__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; @@ -5188,7 +5236,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3969:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3971:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -5212,7 +5260,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3970:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3972:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*putroutconstnotnull*/")); @@ -5220,20 +5268,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3971:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3973:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3972:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3974:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_assertmsg(\"putroutconstnotnull checkrout\", melt_magic_discr((melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3973:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3975:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -5257,7 +5305,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3974:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3976:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (")) == MELTOBMAG_ROUTINE);")); @@ -5265,20 +5313,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3975:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3977:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3976:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3978:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("melt_assertmsg(\"putroutconstnotnull notnullconst\", NULL != ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3977:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3979:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -5302,7 +5350,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3978:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3980:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -5310,20 +5358,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3979:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3981:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:3980:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3982:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("((meltroutine_ptr_t)")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3981:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3983:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -5347,13 +5395,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3982:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3984:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (")->tabval[")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3983:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3985:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -5377,13 +5425,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3984:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3986:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("] = (melt_ptr_t)(")); } ; - MELT_LOCATION ("warmelt-outobj.melt:3985:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3987:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -5407,7 +5455,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3986:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3988:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -5415,14 +5463,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:3987:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:3989:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3988:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:3990:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5433,7 +5481,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:3989:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3991:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -5468,7 +5516,7 @@ lab_endgetargs:; /*_#I__L6*/ meltfnum[5] = (( /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1]) < ( /*_#GET_INT__L5*/ meltfnum[4]));; - MELT_LOCATION ("warmelt-outobj.melt:3988:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:3990:/ cond"); /*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -5476,7 +5524,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3988:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:3990:/ cond.else"); /*^block */ /*anyblock */ @@ -5490,7 +5538,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3988) ? (3988) : __LINE__, __FUNCTION__); + (3990) ? (3990) : __LINE__, __FUNCTION__); ; } ; @@ -5505,7 +5553,7 @@ lab_endgetargs:; /*_.IFCPP___V20*/ meltfptr[19] = /*_.IFELSE___V22*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3988:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3990:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V21*/ meltfptr[20] = 0; @@ -5526,7 +5574,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V20*/ meltfptr[19];; - MELT_LOCATION ("warmelt-outobj.melt:3964:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:3966:/ clear"); /*clear *//*_.OLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.OROUT__V9*/ meltfptr[8] = 0; @@ -5550,14 +5598,26 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_C_CODE__V19*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_.IFCPP___V20*/ meltfptr[19] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3962:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3964:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:3962:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3964:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -5657,7 +5717,7 @@ meltrout_110_warmelt_outobj_OUTPUCOD_OBJPUTXTRARESULT (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:3997:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:3999:/ getarg"); /*_.OPUTX__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -5695,7 +5755,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:3998:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4000:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5707,7 +5767,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OPUTX__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJPUTXTRARESULT */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:3998:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4000:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -5715,7 +5775,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:3998:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4000:/ cond.else"); /*^block */ /*anyblock */ @@ -5729,7 +5789,7 @@ lab_endgetargs:; melt_assert_failed (("check oputx"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (3998) ? (3998) : __LINE__, __FUNCTION__); + (4000) ? (4000) : __LINE__, __FUNCTION__); ; } ; @@ -5744,7 +5804,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:3998:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4000:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -5755,7 +5815,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:3999:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4001:/ quasiblock"); /*^getslot */ @@ -5766,7 +5826,7 @@ lab_endgetargs:; meltfptr[7] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:4000:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:4002:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPUTX__V2*/ meltfptr[1]), 1, "OBXRES_RANK"); @@ -5774,7 +5834,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:4001:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:4003:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OPUTX__V2*/ meltfptr[1]), 2, "OBXRES_OBLOC"); @@ -5782,7 +5842,7 @@ lab_endgetargs:; meltfptr[9] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:4002:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4004:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -5799,7 +5859,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4004:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4006:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -5823,7 +5883,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4005:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4007:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5835,7 +5895,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OCTYP__V11*/ meltfptr[10]), (melt_ptr_t) (( /*!CLASS_CTYPE */ meltfrout-> tabval[3])));; - MELT_LOCATION ("warmelt-outobj.melt:4005:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4007:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -5843,7 +5903,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4005:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4007:/ cond.else"); /*^block */ /*anyblock */ @@ -5857,7 +5917,7 @@ lab_endgetargs:; melt_assert_failed (("check octyp"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4005) ? (4005) : __LINE__, __FUNCTION__); + (4007) ? (4007) : __LINE__, __FUNCTION__); ; } ; @@ -5872,7 +5932,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4005:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4007:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -5885,7 +5945,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4006:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4008:/ cppif.then"); /*^block */ /*anyblock */ { @@ -5896,7 +5956,7 @@ lab_endgetargs:; /*_#IS_INTEGERBOX__L4*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.ORANK__V9*/ meltfptr[8])) == MELTOBMAG_INT);; - MELT_LOCATION ("warmelt-outobj.melt:4006:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4008:/ cond"); /*cond */ if ( /*_#IS_INTEGERBOX__L4*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -5904,7 +5964,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4006:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4008:/ cond.else"); /*^block */ /*anyblock */ @@ -5918,7 +5978,7 @@ lab_endgetargs:; melt_assert_failed (("check orank"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4006) ? (4006) : __LINE__, __FUNCTION__); + (4008) ? (4008) : __LINE__, __FUNCTION__); ; } ; @@ -5933,7 +5993,7 @@ lab_endgetargs:; /*_.IFCPP___V15*/ meltfptr[13] = /*_.IFELSE___V16*/ meltfptr[15];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4006:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4008:/ clear"); /*clear *//*_#IS_INTEGERBOX__L4*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V16*/ meltfptr[15] = 0; @@ -5946,7 +6006,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4007:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4009:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("if (!meltxrestab_ || !meltxresdescr_) goto labend_rout;")); @@ -5954,14 +6014,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4008:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4010:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4009:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4011:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("if (meltxresdescr_[")); @@ -5971,20 +6031,20 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.ORANK__V9*/ meltfptr[8])));; { - MELT_LOCATION ("warmelt-outobj.melt:4010:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4012:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L5*/ meltfnum[1])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4011:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4013:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("] != ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:4012:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:4014:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OCTYP__V11*/ meltfptr[10]), 4, "CTYPE_PARCHAR"); @@ -6004,7 +6064,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4013:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4015:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (") goto labend_rout;")); @@ -6012,14 +6072,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4014:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4016:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4015:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4017:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("if (meltxrestab_[")); @@ -6029,20 +6089,20 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.ORANK__V9*/ meltfptr[8])));; { - MELT_LOCATION ("warmelt-outobj.melt:4016:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4018:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L6*/ meltfnum[5])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4017:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4019:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("].")); } ; - MELT_LOCATION ("warmelt-outobj.melt:4018:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4020:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -6076,7 +6136,7 @@ lab_endgetargs:; (melt_magic_discr ((melt_ptr_t) ( /*_.CTYPE_RESFIELD__V18*/ meltfptr[17])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:4018:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4020:/ cond"); /*cond */ if ( /*_#IS_STRING__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -6084,7 +6144,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4018:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4020:/ cond.else"); /*^block */ /*anyblock */ @@ -6092,7 +6152,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4019:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4021:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6118,7 +6178,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4019:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4021:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L8*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -6133,7 +6193,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4019:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4021:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -6147,7 +6207,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4019; + argtab[2].meltbp_long = 4021; /*^apply.arg */ argtab[3].meltbp_cstring = "outpucod_objputxtraresult bad octyp"; @@ -6175,7 +6235,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V22*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4019:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4021:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L9*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V22*/ meltfptr[21] = 0; @@ -6188,7 +6248,7 @@ lab_endgetargs:; /*_.IF___V21*/ meltfptr[20] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4019:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4021:/ quasiblock"); /*_.PROGN___V23*/ meltfptr[21] = /*_.IF___V21*/ meltfptr[20];; @@ -6197,7 +6257,7 @@ lab_endgetargs:; /*_.IFCPP___V20*/ meltfptr[19] = /*_.PROGN___V23*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4019:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4021:/ clear"); /*clear *//*_#MELT_NEED_DBG__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IF___V21*/ meltfptr[20] = 0; @@ -6210,7 +6270,7 @@ lab_endgetargs:; /*_.IFCPP___V20*/ meltfptr[19] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4020:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4022:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -6237,14 +6297,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4020:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4022:/ locexp"); melt_error_str ((melt_ptr_t) ( /*_.OLOC__V8*/ meltfptr[7]), ("impossible secondary result type"), (melt_ptr_t) ( /*_.NAMED_NAME__V24*/ meltfptr[20])); } ; - MELT_LOCATION ("warmelt-outobj.melt:4018:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4020:/ quasiblock"); /*epilog */ @@ -6257,7 +6317,7 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-outobj.melt:4022:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:4024:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OCTYP__V11*/ meltfptr[10]), 7, "CTYPE_RESFIELD"); @@ -6277,7 +6337,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4023:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4025:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (") *(meltxrestab_[")); @@ -6287,20 +6347,20 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.ORANK__V9*/ meltfptr[8])));; { - MELT_LOCATION ("warmelt-outobj.melt:4024:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4026:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L10*/ meltfnum[8])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4025:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4027:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("].")); } ; - MELT_LOCATION ("warmelt-outobj.melt:4026:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:4028:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OCTYP__V11*/ meltfptr[10]), 7, "CTYPE_RESFIELD"); @@ -6320,19 +6380,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4027:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4029:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (") = (")); } ; - MELT_LOCATION ("warmelt-outobj.melt:4028:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4030:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L11*/ meltfnum[7] = (( /*_.OCTYP__V11*/ meltfptr[10]) == (( /*!CTYPE_VALUE */ meltfrout->tabval[6])));; - MELT_LOCATION ("warmelt-outobj.melt:4028:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4030:/ cond"); /*cond */ if ( /*_#__L11*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -6354,7 +6414,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:4029:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4031:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -6378,7 +6438,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4030:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4032:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (");")); @@ -6386,14 +6446,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4031:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4033:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4032:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4034:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6404,7 +6464,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L12*/ meltfnum[11] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:4033:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4035:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -6439,7 +6499,7 @@ lab_endgetargs:; /*_#I__L14*/ meltfnum[13] = (( /*_#STRBUF_USEDLENGTH__L12*/ meltfnum[11]) < ( /*_#GET_INT__L13*/ meltfnum[12]));; - MELT_LOCATION ("warmelt-outobj.melt:4032:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4034:/ cond"); /*cond */ if ( /*_#I__L14*/ meltfnum[13]) /*then */ { /*^cond.then */ @@ -6447,7 +6507,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4032:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4034:/ cond.else"); /*^block */ /*anyblock */ @@ -6461,7 +6521,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4032) ? (4032) : __LINE__, __FUNCTION__); + (4034) ? (4034) : __LINE__, __FUNCTION__); ; } ; @@ -6476,7 +6536,7 @@ lab_endgetargs:; /*_.IFCPP___V28*/ meltfptr[27] = /*_.IFELSE___V30*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4032:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4034:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L12*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V29*/ meltfptr[28] = 0; @@ -6497,7 +6557,7 @@ lab_endgetargs:; /*_.LET___V7*/ meltfptr[5] = /*_.IFCPP___V28*/ meltfptr[27];; - MELT_LOCATION ("warmelt-outobj.melt:3999:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4001:/ clear"); /*clear *//*_.OLOC__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.ORANK__V9*/ meltfptr[8] = 0; @@ -6535,14 +6595,26 @@ lab_endgetargs:; /*clear *//*_.OUTPUT_C_CODE__V27*/ meltfptr[20] = 0; /*^clear */ /*clear *//*_.IFCPP___V28*/ meltfptr[27] = 0; - MELT_LOCATION ("warmelt-outobj.melt:3997:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:3999:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V7*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:3997:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:3999:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -6638,7 +6710,7 @@ meltrout_111_warmelt_outobj_OUTPUCOD_OBJEXPV (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:4038:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:4040:/ getarg"); /*_.OEXP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -6676,7 +6748,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4039:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4041:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6688,7 +6760,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OEXP__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJEXPV */ meltfrout-> tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:4039:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4041:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -6696,7 +6768,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4039:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4041:/ cond.else"); /*^block */ /*anyblock */ @@ -6710,7 +6782,7 @@ lab_endgetargs:; melt_assert_failed (("check oexp"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4039) ? (4039) : __LINE__, __FUNCTION__); + (4041) ? (4041) : __LINE__, __FUNCTION__); ; } ; @@ -6725,7 +6797,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4039:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4041:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -6736,7 +6808,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4040:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4042:/ quasiblock"); /*^getslot */ @@ -6757,7 +6829,7 @@ lab_endgetargs:; ( /*_#I__L3*/ meltfnum[1])));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4043:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4045:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6768,7 +6840,7 @@ lab_endgetargs:; /*_#IS_MULTIPLE__L4*/ meltfnum[3] = (melt_magic_discr ((melt_ptr_t) ( /*_.CONT__V7*/ meltfptr[5])) == MELTOBMAG_MULTIPLE);; - MELT_LOCATION ("warmelt-outobj.melt:4043:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4045:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -6776,7 +6848,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4043:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4045:/ cond.else"); /*^block */ /*anyblock */ @@ -6790,7 +6862,7 @@ lab_endgetargs:; melt_assert_failed (("check cont"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4043) ? (4043) : __LINE__, __FUNCTION__); + (4045) ? (4045) : __LINE__, __FUNCTION__); ; } ; @@ -6805,7 +6877,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[8] = /*_.IFELSE___V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4043:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4045:/ clear"); /*clear *//*_#IS_MULTIPLE__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[9] = 0; @@ -6835,7 +6907,7 @@ lab_endgetargs:; /*_#GET_INT__L6*/ meltfnum[5] = (melt_get_int ((melt_ptr_t) ( /*_.BOXDEPTHP1__V8*/ meltfptr[7])));; - MELT_LOCATION ("warmelt-outobj.melt:4047:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4049:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -6861,7 +6933,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4048:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4050:/ cppif.then"); /*^block */ /*anyblock */ { @@ -6872,7 +6944,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:4049:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4051:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -6907,7 +6979,7 @@ lab_endgetargs:; /*_#I__L9*/ meltfnum[8] = (( /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6]) < ( /*_#GET_INT__L8*/ meltfnum[7]));; - MELT_LOCATION ("warmelt-outobj.melt:4048:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4050:/ cond"); /*cond */ if ( /*_#I__L9*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -6915,7 +6987,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4048:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4050:/ cond.else"); /*^block */ /*anyblock */ @@ -6929,7 +7001,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4048) ? (4048) : __LINE__, + (4050) ? (4050) : __LINE__, __FUNCTION__); ; } @@ -6945,7 +7017,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = /*_.IFELSE___V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4048:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4050:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V14*/ meltfptr[13] = 0; @@ -6968,7 +7040,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:4044:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4046:/ clear"); /*clear *//*_.COMP__V11*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_#IX__L5*/ meltfnum[3] = 0; @@ -6981,7 +7053,7 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-outobj.melt:4040:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4042:/ clear"); /*clear *//*_.CONT__V7*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_#I__L3*/ meltfnum[1] = 0; @@ -6989,7 +7061,7 @@ lab_endgetargs:; /*clear *//*_.BOXDEPTHP1__V8*/ meltfptr[7] = 0; /*^clear */ /*clear *//*_.IFCPP___V9*/ meltfptr[8] = 0; - MELT_LOCATION ("warmelt-outobj.melt:4038:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4040:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -7087,7 +7159,7 @@ meltrout_112_warmelt_outobj_OUTPUCOD_OBJLOCATEDEXPV (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:4054:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:4056:/ getarg"); /*_.OEXP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -7125,7 +7197,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4055:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4057:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7137,7 +7209,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.OEXP__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJLOCATEDEXPV */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:4055:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4057:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -7145,7 +7217,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4055:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4057:/ cond.else"); /*^block */ /*anyblock */ @@ -7159,7 +7231,7 @@ lab_endgetargs:; melt_assert_failed (("check oexp"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4055) ? (4055) : __LINE__, __FUNCTION__); + (4057) ? (4057) : __LINE__, __FUNCTION__); ; } ; @@ -7174,7 +7246,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4055:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4057:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -7185,7 +7257,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4056:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4058:/ quasiblock"); /*^getslot */ @@ -7196,7 +7268,7 @@ lab_endgetargs:; meltfptr[5] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:4057:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:4059:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OEXP__V2*/ meltfptr[1]), 2, "OBCX_LOC"); @@ -7212,7 +7284,7 @@ lab_endgetargs:; (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[1])), ( /*_#I__L3*/ meltfnum[1])));; - MELT_LOCATION ("warmelt-outobj.melt:4059:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:4061:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.OEXP__V2*/ meltfptr[1]), 0, "OBV_TYPE"); @@ -7222,7 +7294,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4062:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4064:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7235,7 +7307,7 @@ lab_endgetargs:; || (melt_unsafe_magic_discr ((melt_ptr_t) ( /*_.CONT__V7*/ meltfptr[5])) == MELTOBMAG_MULTIPLE));; - MELT_LOCATION ("warmelt-outobj.melt:4062:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4064:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE_OR_NULL__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -7243,7 +7315,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4062:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4064:/ cond.else"); /*^block */ /*anyblock */ @@ -7257,7 +7329,7 @@ lab_endgetargs:; melt_assert_failed (("check cont"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4062) ? (4062) : __LINE__, __FUNCTION__); + (4064) ? (4064) : __LINE__, __FUNCTION__); ; } ; @@ -7272,7 +7344,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[10] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4062:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4064:/ clear"); /*clear *//*_#IS_MULTIPLE_OR_NULL__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -7283,13 +7355,13 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[10] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4063:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4065:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L5*/ meltfnum[3] = (( /*_.OTYP__V10*/ meltfptr[9]) == (( /*!CTYPE_VOID */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-outobj.melt:4063:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4065:/ cond"); /*cond */ if ( /*_#__L5*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -7299,7 +7371,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:4065:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4067:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); @@ -7307,7 +7379,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4066:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4068:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("{")); @@ -7315,13 +7387,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4067:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4069:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4068:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4070:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7345,7 +7417,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4064:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4066:/ quasiblock"); /*_.PROGN___V15*/ meltfptr[14] = @@ -7355,7 +7427,7 @@ lab_endgetargs:; /*_.IFELSE___V13*/ meltfptr[11] = /*_.PROGN___V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4063:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4065:/ clear"); /*clear *//*_.OUTPUT_LOCATION__V14*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.PROGN___V15*/ meltfptr[14] = 0; @@ -7369,7 +7441,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:4070:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4072:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -7380,7 +7452,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:4071:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4073:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -7409,7 +7481,7 @@ lab_endgetargs:; /*_.OUTPUT_RAW_LOCATION__V17*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4070:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4072:/ clear"); /*clear *//*_.OUTPUT_RAW_LOCATION__V17*/ meltfptr[14] = 0; } ; @@ -7425,7 +7497,7 @@ lab_endgetargs:; /*_.IFELSE___V13*/ meltfptr[11] = /*_.IF___V16*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4063:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4065:/ clear"); /*clear *//*_.IF___V16*/ meltfptr[13] = 0; } ; @@ -7450,7 +7522,7 @@ lab_endgetargs:; /*_#GET_INT__L7*/ meltfnum[6] = (melt_get_int ((melt_ptr_t) ( /*_.BOXDEPTHP1__V9*/ meltfptr[8])));; - MELT_LOCATION ("warmelt-outobj.melt:4078:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4080:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -7476,7 +7548,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4079:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4081:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7487,7 +7559,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L8*/ meltfnum[7] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:4080:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4082:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -7522,7 +7594,7 @@ lab_endgetargs:; /*_#I__L10*/ meltfnum[9] = (( /*_#STRBUF_USEDLENGTH__L8*/ meltfnum[7]) < ( /*_#GET_INT__L9*/ meltfnum[8]));; - MELT_LOCATION ("warmelt-outobj.melt:4079:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4081:/ cond"); /*cond */ if ( /*_#I__L10*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -7530,7 +7602,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4079:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4081:/ cond.else"); /*^block */ /*anyblock */ @@ -7544,7 +7616,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4079) ? (4079) : __LINE__, + (4081) ? (4081) : __LINE__, __FUNCTION__); ; } @@ -7560,7 +7632,7 @@ lab_endgetargs:; /*_.IFCPP___V20*/ meltfptr[19] = /*_.IFELSE___V22*/ meltfptr[21];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4079:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4081:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V21*/ meltfptr[20] = 0; @@ -7583,7 +7655,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:4075:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4077:/ clear"); /*clear *//*_.COMP__V18*/ meltfptr[14] = 0; /*^clear */ /*clear *//*_#IX__L6*/ meltfnum[5] = 0; @@ -7595,13 +7667,13 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V20*/ meltfptr[19] = 0; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-outobj.melt:4082:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4084:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L11*/ meltfnum[7] = (( /*_.OTYP__V10*/ meltfptr[9]) == (( /*!CTYPE_VOID */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-outobj.melt:4082:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4084:/ cond"); /*cond */ if ( /*_#__L11*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -7611,7 +7683,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:4084:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4086:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";}")); @@ -7619,13 +7691,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4085:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4087:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4083:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4085:/ quasiblock"); /*epilog */ @@ -7634,7 +7706,7 @@ lab_endgetargs:; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:4056:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4058:/ clear"); /*clear *//*_.CONT__V7*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.OLOC__V8*/ meltfptr[7] = 0; @@ -7654,7 +7726,7 @@ lab_endgetargs:; /*clear *//*_#__L11*/ meltfnum[7] = 0; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4087:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4089:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7665,7 +7737,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L12*/ meltfnum[8] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:4088:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4090:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -7700,7 +7772,7 @@ lab_endgetargs:; /*_#I__L14*/ meltfnum[1] = (( /*_#STRBUF_USEDLENGTH__L12*/ meltfnum[8]) < ( /*_#GET_INT__L13*/ meltfnum[9]));; - MELT_LOCATION ("warmelt-outobj.melt:4087:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4089:/ cond"); /*cond */ if ( /*_#I__L14*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -7708,7 +7780,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4087:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4089:/ cond.else"); /*^block */ /*anyblock */ @@ -7722,7 +7794,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4087) ? (4087) : __LINE__, __FUNCTION__); + (4089) ? (4089) : __LINE__, __FUNCTION__); ; } ; @@ -7737,7 +7809,7 @@ lab_endgetargs:; /*_.IFCPP___V23*/ meltfptr[20] = /*_.IFELSE___V25*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4087:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4089:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L12*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V24*/ meltfptr[21] = 0; @@ -7754,14 +7826,26 @@ lab_endgetargs:; /*_.IFCPP___V23*/ meltfptr[20] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4054:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4056:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V23*/ meltfptr[20];; - MELT_LOCATION ("warmelt-outobj.melt:4054:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:4056:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -7861,7 +7945,7 @@ meltrout_113_warmelt_outobj_OUTPUCOD_VERBATIMSTRING (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:4093:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:4095:/ getarg"); /*_.VSTR__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -7899,7 +7983,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4094:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4096:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7915,7 +7999,7 @@ lab_endgetargs:; /*_#__L2*/ meltfnum[1] = (( /*_.DISCRIM__V6*/ meltfptr[5]) == (( /*!DISCR_VERBATIM_STRING */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:4094:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4096:/ cond"); /*cond */ if ( /*_#__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -7923,7 +8007,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4094:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4096:/ cond.else"); /*^block */ /*anyblock */ @@ -7937,7 +8021,7 @@ lab_endgetargs:; melt_assert_failed (("check vstr"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4094) ? (4094) : __LINE__, __FUNCTION__); + (4096) ? (4096) : __LINE__, __FUNCTION__); ; } ; @@ -7952,7 +8036,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4094:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4096:/ clear"); /*clear *//*_.DISCRIM__V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_#__L2*/ meltfnum[1] = 0; @@ -7967,7 +8051,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4095:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4097:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) @@ -7976,7 +8060,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4096:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4098:/ cppif.then"); /*^block */ /*anyblock */ { @@ -7987,7 +8071,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:4097:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4099:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -8022,7 +8106,7 @@ lab_endgetargs:; /*_#I__L5*/ meltfnum[4] = (( /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1]) < ( /*_#GET_INT__L4*/ meltfnum[3]));; - MELT_LOCATION ("warmelt-outobj.melt:4096:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4098:/ cond"); /*cond */ if ( /*_#I__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -8030,7 +8114,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4096:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4098:/ cond.else"); /*^block */ /*anyblock */ @@ -8044,7 +8128,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4096) ? (4096) : __LINE__, __FUNCTION__); + (4098) ? (4098) : __LINE__, __FUNCTION__); ; } ; @@ -8059,7 +8143,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4096:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4098:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V9*/ meltfptr[6] = 0; @@ -8076,14 +8160,26 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[5] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4093:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4095:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V8*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:4093:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:4095:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8179,7 +8275,7 @@ meltrout_114_warmelt_outobj_OUTPUCOD_STRING (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:4106:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:4108:/ getarg"); /*_.VSTR__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -8217,7 +8313,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4107:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4109:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8233,7 +8329,7 @@ lab_endgetargs:; /*_#__L2*/ meltfnum[1] = (( /*_.DISCRIM__V6*/ meltfptr[5]) == (( /*!DISCR_STRING */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:4107:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4109:/ cond"); /*cond */ if ( /*_#__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -8241,7 +8337,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4107:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4109:/ cond.else"); /*^block */ /*anyblock */ @@ -8255,7 +8351,7 @@ lab_endgetargs:; melt_assert_failed (("check vstr"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4107) ? (4107) : __LINE__, __FUNCTION__); + (4109) ? (4109) : __LINE__, __FUNCTION__); ; } ; @@ -8270,7 +8366,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4107:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4109:/ clear"); /*clear *//*_.DISCRIM__V6*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_#__L2*/ meltfnum[1] = 0; @@ -8285,7 +8381,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4108:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4110:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" \"")); @@ -8293,7 +8389,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4109:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4111:/ locexp"); meltgc_add_strbuf_cstr ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.VSTR__V2*/ @@ -8302,7 +8398,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4110:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4112:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("\"")); @@ -8310,7 +8406,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4111:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4113:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8321,7 +8417,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:4112:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4114:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -8356,7 +8452,7 @@ lab_endgetargs:; /*_#I__L5*/ meltfnum[4] = (( /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1]) < ( /*_#GET_INT__L4*/ meltfnum[3]));; - MELT_LOCATION ("warmelt-outobj.melt:4111:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4113:/ cond"); /*cond */ if ( /*_#I__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -8364,7 +8460,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4111:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4113:/ cond.else"); /*^block */ /*anyblock */ @@ -8378,7 +8474,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4111) ? (4111) : __LINE__, __FUNCTION__); + (4113) ? (4113) : __LINE__, __FUNCTION__); ; } ; @@ -8393,7 +8489,7 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4111:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4113:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V9*/ meltfptr[6] = 0; @@ -8410,14 +8506,26 @@ lab_endgetargs:; /*_.IFCPP___V8*/ meltfptr[5] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4106:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4108:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V8*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:4106:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:4108:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -8513,7 +8621,7 @@ meltrout_115_warmelt_outobj_OUTPUCOD_INTEGER (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:4119:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:4121:/ getarg"); /*_.VINT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -8551,7 +8659,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4120:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4122:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8562,7 +8670,7 @@ lab_endgetargs:; /*_#IS_INTEGERBOX__L2*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.VINT__V2*/ meltfptr[1])) == MELTOBMAG_INT);; - MELT_LOCATION ("warmelt-outobj.melt:4120:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4122:/ cond"); /*cond */ if ( /*_#IS_INTEGERBOX__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -8570,7 +8678,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4120:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4122:/ cond.else"); /*^block */ /*anyblock */ @@ -8584,7 +8692,7 @@ lab_endgetargs:; melt_assert_failed (("check vint"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4120) ? (4120) : __LINE__, __FUNCTION__); + (4122) ? (4122) : __LINE__, __FUNCTION__); ; } ; @@ -8599,7 +8707,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4120:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4122:/ clear"); /*clear *//*_#IS_INTEGERBOX__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -8616,12 +8724,12 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.VINT__V2*/ meltfptr[1])));; { - MELT_LOCATION ("warmelt-outobj.melt:4121:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4123:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L3*/ meltfnum[1])); } ; - MELT_LOCATION ("warmelt-outobj.melt:4119:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4121:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -8718,7 +8826,7 @@ meltrout_116_warmelt_outobj_OUTPUCOD_FINALRETURN (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:4126:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:4128:/ getarg"); /*_.FRET__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -8756,7 +8864,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4127:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4129:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8768,7 +8876,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.FRET__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_OBJFINALRETURN */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:4127:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4129:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -8776,7 +8884,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4127:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4129:/ cond.else"); /*^block */ /*anyblock */ @@ -8790,7 +8898,7 @@ lab_endgetargs:; melt_assert_failed (("check fret"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4127) ? (4127) : __LINE__, __FUNCTION__); + (4129) ? (4129) : __LINE__, __FUNCTION__); ; } ; @@ -8805,7 +8913,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4127:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4129:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -8816,7 +8924,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4128:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:4130:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.FRET__V2*/ meltfptr[1]), 0, "OBI_LOC"); @@ -8848,7 +8956,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4129:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4131:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); @@ -8856,14 +8964,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4130:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4132:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4131:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4133:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/*finalret*/ goto labend_rout ")); @@ -8871,7 +8979,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4132:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4134:/ cppif.then"); /*^block */ /*anyblock */ { @@ -8882,7 +8990,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:4133:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4135:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -8917,7 +9025,7 @@ lab_endgetargs:; /*_#I__L5*/ meltfnum[4] = (( /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1]) < ( /*_#GET_INT__L4*/ meltfnum[3]));; - MELT_LOCATION ("warmelt-outobj.melt:4132:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4134:/ cond"); /*cond */ if ( /*_#I__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -8925,7 +9033,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4132:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4134:/ cond.else"); /*^block */ /*anyblock */ @@ -8939,7 +9047,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4132) ? (4132) : __LINE__, __FUNCTION__); + (4134) ? (4134) : __LINE__, __FUNCTION__); ; } ; @@ -8954,7 +9062,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[8] = /*_.IFELSE___V11*/ meltfptr[10];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4132:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4134:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V10*/ meltfptr[9] = 0; @@ -8971,14 +9079,26 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[8] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4126:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4128:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V9*/ meltfptr[8];; - MELT_LOCATION ("warmelt-outobj.melt:4126:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:4128:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9082,7 +9202,7 @@ meltrout_117_warmelt_outobj_SORTED_NAMED_DICT_TUPLE (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:4139:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:4141:/ getarg"); /*_.DIC__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -9092,7 +9212,7 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-outobj.melt:4140:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4142:/ quasiblock"); /*_#DICNT__L1*/ meltfnum[0] = @@ -9158,7 +9278,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4146:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4148:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9170,7 +9290,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.ENT__V6*/ meltfptr[5]), (melt_ptr_t) (( /*!CLASS_NAMED */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:4146:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4148:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -9178,7 +9298,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4146:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4148:/ cond.else"); /*^block */ /*anyblock */ @@ -9192,7 +9312,7 @@ lab_endgetargs:; melt_assert_failed (("check ent named"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4146) ? (4146) : __LINE__, + (4148) ? (4148) : __LINE__, __FUNCTION__); ; } @@ -9208,7 +9328,7 @@ lab_endgetargs:; /*_.IFCPP___V7*/ meltfptr[6] = /*_.IFELSE___V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4146:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4148:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0; @@ -9221,7 +9341,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4147:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4149:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.ENTLIST__V4*/ meltfptr[3]), (melt_ptr_t) ( /*_.ENT__V6*/ meltfptr[5])); } @@ -9233,7 +9353,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:4143:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4145:/ clear"); /*clear *//*_.NAM__V5*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.ENT__V6*/ meltfptr[5] = 0; @@ -9241,7 +9361,7 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V7*/ meltfptr[6] = 0; } /*endciterblock FOREACH_IN_MAPSTRING */ ; - MELT_LOCATION ("warmelt-outobj.melt:4148:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4150:/ quasiblock"); /*^checksignal */ @@ -9259,7 +9379,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4150:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4152:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9275,7 +9395,7 @@ lab_endgetargs:; /*_#I__L4*/ meltfnum[3] = (( /*_#DICNT__L1*/ meltfnum[0]) == ( /*_#MULTIPLE_LENGTH__L3*/ meltfnum[1]));; - MELT_LOCATION ("warmelt-outobj.melt:4150:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4152:/ cond"); /*cond */ if ( /*_#I__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -9283,7 +9403,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4150:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4152:/ cond.else"); /*^block */ /*anyblock */ @@ -9294,7 +9414,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("sorted_named_dict_tuple check tuple length is dict count"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (4150) ? (4150) : __LINE__, __FUNCTION__); + melt_assert_failed (("sorted_named_dict_tuple check tuple length is dict count"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (4152) ? (4152) : __LINE__, __FUNCTION__); ; } ; @@ -9309,7 +9429,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[10] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4150:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4152:/ clear"); /*clear *//*_#MULTIPLE_LENGTH__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#I__L4*/ meltfnum[3] = 0; @@ -9334,7 +9454,7 @@ lab_endgetargs:; /*_.LET___V9*/ meltfptr[7] = /*_.MULTIPLE_SORT__V13*/ meltfptr[11];; - MELT_LOCATION ("warmelt-outobj.melt:4148:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4150:/ clear"); /*clear *//*_.RAWTUP__V10*/ meltfptr[9] = 0; /*^clear */ /*clear *//*_.IFCPP___V11*/ meltfptr[10] = 0; @@ -9342,17 +9462,29 @@ lab_endgetargs:; /*clear *//*_.MULTIPLE_SORT__V13*/ meltfptr[11] = 0; /*_.LET___V3*/ meltfptr[2] = /*_.LET___V9*/ meltfptr[7];; - MELT_LOCATION ("warmelt-outobj.melt:4140:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4142:/ clear"); /*clear *//*_#DICNT__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.ENTLIST__V4*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.LET___V9*/ meltfptr[7] = 0; - MELT_LOCATION ("warmelt-outobj.melt:4139:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4141:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-outobj.melt:4139:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:4141:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -9450,7 +9582,7 @@ meltrout_118_warmelt_outobj_OUTPUT_EXPORTED_OFFSETS (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:4156:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:4158:/ getarg"); /*_.MODCTX__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -9482,7 +9614,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4157:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4159:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9494,7 +9626,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:4157:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4159:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -9502,7 +9634,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4157:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4159:/ cond.else"); /*^block */ /*anyblock */ @@ -9516,7 +9648,7 @@ lab_endgetargs:; melt_assert_failed (("check modctx"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4157) ? (4157) : __LINE__, __FUNCTION__); + (4159) ? (4159) : __LINE__, __FUNCTION__); ; } ; @@ -9531,7 +9663,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4157:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4159:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -9542,10 +9674,10 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4158:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4160:/ quasiblock"); - MELT_LOCATION ("warmelt-outobj.melt:4159:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:4161:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.MODCTX__V2*/ meltfptr[1]), 1, "MOCX_EXPFIELDICT"); @@ -9553,7 +9685,7 @@ lab_endgetargs:; meltfptr[5] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:4160:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4162:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -9566,7 +9698,7 @@ lab_endgetargs:; (union meltparam_un *) 0, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4161:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:4163:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.MODCTX__V2*/ meltfptr[1]), 2, "MOCX_EXPCLASSDICT"); @@ -9574,7 +9706,7 @@ lab_endgetargs:; meltfptr[8] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:4162:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4164:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -9590,12 +9722,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4164:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4166:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4165:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4167:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -9616,14 +9748,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4170:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4172:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4171:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4173:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/* exported ")); @@ -9635,14 +9767,14 @@ lab_endgetargs:; meltfptr[5])));; { - MELT_LOCATION ("warmelt-outobj.melt:4172:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4174:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#MAPSTRING_COUNT__L2*/ meltfnum[0])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4173:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4175:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" field offsets */")); @@ -9668,7 +9800,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4177:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4179:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9681,7 +9813,7 @@ lab_endgetargs:; ( /*_.FLD__V12*/ meltfptr[11]), (melt_ptr_t) (( /*!CLASS_FIELD */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-outobj.melt:4177:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4179:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[3]) /*then */ { /*^cond.then */ @@ -9689,7 +9821,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4177:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4179:/ cond.else"); /*^block */ /*anyblock */ @@ -9703,7 +9835,7 @@ lab_endgetargs:; melt_assert_failed (("check fld"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4177) ? (4177) : __LINE__, + (4179) ? (4179) : __LINE__, __FUNCTION__); ; } @@ -9719,7 +9851,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4177:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4179:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -9732,7 +9864,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4178:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4180:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); @@ -9740,14 +9872,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4179:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4181:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("const int meltfieldoff__")); } ; - MELT_LOCATION ("warmelt-outobj.melt:4180:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:4182:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.FLD__V12*/ meltfptr[11]), 1, "NAMED_NAME"); @@ -9767,7 +9899,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4181:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4183:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" = ")); @@ -9777,7 +9909,7 @@ lab_endgetargs:; (melt_get_int ((melt_ptr_t) ( /*_.FLD__V12*/ meltfptr[11])));; { - MELT_LOCATION ("warmelt-outobj.melt:4182:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4184:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#GET_INT__L5*/ meltfnum[3])); @@ -9785,7 +9917,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4183:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4185:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); @@ -9793,14 +9925,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4184:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4186:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" /* in ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:4185:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4187:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -9824,7 +9956,7 @@ lab_endgetargs:; /*_.FLD_OWNCLASS__V16*/ meltfptr[15] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4185:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4187:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -9851,7 +9983,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4185:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4187:/ locexp"); /*add2sbuf_string */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), @@ -9862,7 +9994,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4186:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4188:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" */")); @@ -9870,7 +10002,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4187:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4189:/ cppif.then"); /*^block */ /*anyblock */ { @@ -9881,7 +10013,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L6*/ meltfnum[5] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:4188:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4190:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -9916,7 +10048,7 @@ lab_endgetargs:; /*_#I__L8*/ meltfnum[7] = (( /*_#STRBUF_USEDLENGTH__L6*/ meltfnum[5]) < ( /*_#GET_INT__L7*/ meltfnum[6]));; - MELT_LOCATION ("warmelt-outobj.melt:4187:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4189:/ cond"); /*cond */ if ( /*_#I__L8*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -9924,7 +10056,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4187:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4189:/ cond.else"); /*^block */ /*anyblock */ @@ -9938,7 +10070,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4187) ? (4187) : __LINE__, + (4189) ? (4189) : __LINE__, __FUNCTION__); ; } @@ -9954,7 +10086,7 @@ lab_endgetargs:; /*_.IFCPP___V18*/ meltfptr[17] = /*_.IFELSE___V20*/ meltfptr[19];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4187:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4189:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L6*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V19*/ meltfptr[18] = 0; @@ -9977,7 +10109,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:4174:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4176:/ clear"); /*clear *//*_.FLD__V12*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_#IX__L3*/ meltfnum[2] = 0; @@ -9997,21 +10129,21 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4190:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4192:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4191:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4193:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4192:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4194:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("/* exported ")); @@ -10023,14 +10155,14 @@ lab_endgetargs:; meltfptr[8])));; { - MELT_LOCATION ("warmelt-outobj.melt:4193:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4195:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#MAPSTRING_COUNT__L9*/ meltfnum[5])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4194:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4196:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" class lengths */")); @@ -10056,7 +10188,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4198:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4200:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10069,7 +10201,7 @@ lab_endgetargs:; ( /*_.CLA__V21*/ meltfptr[18]), (melt_ptr_t) (( /*!CLASS_CLASS */ meltfrout->tabval[7])));; - MELT_LOCATION ("warmelt-outobj.melt:4198:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4200:/ cond"); /*cond */ if ( /*_#IS_A__L11*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -10077,7 +10209,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4198:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4200:/ cond.else"); /*^block */ /*anyblock */ @@ -10091,7 +10223,7 @@ lab_endgetargs:; melt_assert_failed (("check cla"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4198) ? (4198) : __LINE__, + (4200) ? (4200) : __LINE__, __FUNCTION__); ; } @@ -10107,7 +10239,7 @@ lab_endgetargs:; /*_.IFCPP___V22*/ meltfptr[19] = /*_.IFELSE___V23*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4198:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4200:/ clear"); /*clear *//*_#IS_A__L11*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IFELSE___V23*/ meltfptr[22] = 0; @@ -10120,7 +10252,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4199:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4201:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); @@ -10128,14 +10260,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4200:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4202:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ("const int meltclasslen__")); } ; - MELT_LOCATION ("warmelt-outobj.melt:4201:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:4203:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CLA__V21*/ meltfptr[18]), 1, "NAMED_NAME"); @@ -10155,13 +10287,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4202:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4204:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (" = ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:4204:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:4206:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.CLA__V21*/ meltfptr[18]), 6, "CLASS_FIELDS"); @@ -10174,7 +10306,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.CLASS_FIELDS__V25*/ meltfptr[24])));; { - MELT_LOCATION ("warmelt-outobj.melt:4203:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4205:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), ( /*_#MULTIPLE_LENGTH__L12*/ meltfnum[7])); @@ -10182,7 +10314,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4205:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4207:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (";")); @@ -10190,7 +10322,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4206:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4208:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10201,7 +10333,7 @@ lab_endgetargs:; /*_#STRBUF_USEDLENGTH__L13*/ meltfnum[12] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION ("warmelt-outobj.melt:4207:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4209:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -10236,7 +10368,7 @@ lab_endgetargs:; /*_#I__L15*/ meltfnum[14] = (( /*_#STRBUF_USEDLENGTH__L13*/ meltfnum[12]) < ( /*_#GET_INT__L14*/ meltfnum[13]));; - MELT_LOCATION ("warmelt-outobj.melt:4206:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4208:/ cond"); /*cond */ if ( /*_#I__L15*/ meltfnum[14]) /*then */ { /*^cond.then */ @@ -10244,7 +10376,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4206:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4208:/ cond.else"); /*^block */ /*anyblock */ @@ -10258,7 +10390,7 @@ lab_endgetargs:; melt_assert_failed (("check limited implbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4206) ? (4206) : __LINE__, + (4208) ? (4208) : __LINE__, __FUNCTION__); ; } @@ -10274,7 +10406,7 @@ lab_endgetargs:; /*_.IFCPP___V26*/ meltfptr[25] = /*_.IFELSE___V28*/ meltfptr[27];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4206:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4208:/ clear"); /*clear *//*_#STRBUF_USEDLENGTH__L13*/ meltfnum[12] = 0; /*^clear */ /*clear *//*_.REFERENCED_VALUE__V27*/ meltfptr[26] = 0; @@ -10297,7 +10429,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:4195:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4197:/ clear"); /*clear *//*_.CLA__V21*/ meltfptr[18] = 0; /*^clear */ /*clear *//*_#IX__L10*/ meltfnum[6] = 0; @@ -10315,12 +10447,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4209:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4211:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4210:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4212:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -10341,13 +10473,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4215:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4217:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4158:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4160:/ clear"); /*clear *//*_.RAWDICTFIELDS__V7*/ meltfptr[5] = 0; /*^clear */ /*clear *//*_.SORTEDFIELDS__V8*/ meltfptr[7] = 0; @@ -10363,7 +10495,7 @@ lab_endgetargs:; /*clear *//*_#MAPSTRING_COUNT__L9*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V29*/ meltfptr[26] = 0; - MELT_LOCATION ("warmelt-outobj.melt:4156:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4158:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -10457,7 +10589,7 @@ meltrout_119_warmelt_outobj_NTH_SECUNDARY_FILE (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:4237:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:4239:/ getarg"); /*_.MODCTX__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -10495,7 +10627,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4238:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4240:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10507,7 +10639,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:4238:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4240:/ cond"); /*cond */ if ( /*_#IS_A__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -10515,7 +10647,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4238:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4240:/ cond.else"); /*^block */ /*anyblock */ @@ -10529,7 +10661,7 @@ lab_endgetargs:; melt_assert_failed (("check modctx"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4238) ? (4238) : __LINE__, __FUNCTION__); + (4240) ? (4240) : __LINE__, __FUNCTION__); ; } ; @@ -10544,7 +10676,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4238:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4240:/ clear"); /*clear *//*_#IS_A__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V6*/ meltfptr[5] = 0; @@ -10557,7 +10689,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4239:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4241:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10568,7 +10700,7 @@ lab_endgetargs:; /*_#IS_STRING__L3*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.MODNAMSTR__V3*/ meltfptr[2])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:4239:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4241:/ cond"); /*cond */ if ( /*_#IS_STRING__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -10576,7 +10708,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4239:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4241:/ cond.else"); /*^block */ /*anyblock */ @@ -10590,7 +10722,7 @@ lab_endgetargs:; melt_assert_failed (("check modnamstr"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4239) ? (4239) : __LINE__, __FUNCTION__); + (4241) ? (4241) : __LINE__, __FUNCTION__); ; } ; @@ -10605,7 +10737,7 @@ lab_endgetargs:; /*_.IFCPP___V7*/ meltfptr[5] = /*_.IFELSE___V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4239:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4241:/ clear"); /*clear *//*_#IS_STRING__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V8*/ meltfptr[7] = 0; @@ -10618,7 +10750,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4240:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4242:/ cppif.then"); /*^block */ /*anyblock */ { @@ -10629,7 +10761,7 @@ lab_endgetargs:; /*_#IS_STRBUF__L4*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.DECLBUF__V4*/ meltfptr[3])) == MELTOBMAG_STRBUF);; - MELT_LOCATION ("warmelt-outobj.melt:4240:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4242:/ cond"); /*cond */ if ( /*_#IS_STRBUF__L4*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -10637,7 +10769,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4240:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4242:/ cond.else"); /*^block */ /*anyblock */ @@ -10651,7 +10783,7 @@ lab_endgetargs:; melt_assert_failed (("check declbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4240) ? (4240) : __LINE__, __FUNCTION__); + (4242) ? (4242) : __LINE__, __FUNCTION__); ; } ; @@ -10666,7 +10798,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[7] = /*_.IFELSE___V10*/ meltfptr[9];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4240:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4242:/ clear"); /*clear *//*_#IS_STRBUF__L4*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[9] = 0; @@ -10677,7 +10809,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[7] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4241:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4243:/ quasiblock"); /*^cond */ @@ -10715,7 +10847,7 @@ lab_endgetargs:; (melt_multiple_nth ((melt_ptr_t) ( /*_.MOFILES__V12*/ meltfptr[11]), ( /*_#IX__L1*/ meltfnum[0])));; - MELT_LOCATION ("warmelt-outobj.melt:4245:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4247:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -10733,13 +10865,25 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.NTHFILE__V13*/ meltfptr[12];; - MELT_LOCATION ("warmelt-outobj.melt:4245:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:4247:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V14*/ meltfptr[13] = /*_.RETURN___V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4245:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4247:/ clear"); /*clear *//*_.RETURN___V15*/ meltfptr[14] = 0; } ; @@ -10750,12 +10894,12 @@ lab_endgetargs:; /*_.IF___V14*/ meltfptr[13] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4246:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4248:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L6*/ meltfnum[5] = (( /*_#IX__L1*/ meltfnum[0]) <= (0));; - MELT_LOCATION ("warmelt-outobj.melt:4246:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4248:/ cond"); /*cond */ if ( /*_#I__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -10767,13 +10911,25 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-outobj.melt:4246:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:4248:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V16*/ meltfptr[14] = /*_.RETURN___V17*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4246:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4248:/ clear"); /*clear *//*_.RETURN___V17*/ meltfptr[16] = 0; } ; @@ -10784,12 +10940,12 @@ lab_endgetargs:; /*_.IF___V16*/ meltfptr[14] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4247:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4249:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L7*/ meltfnum[6] = (( /*_#IX__L1*/ meltfnum[0]) >= ( /*_#NBFILES__L5*/ meltfnum[1]));; - MELT_LOCATION ("warmelt-outobj.melt:4247:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4249:/ cond"); /*cond */ if ( /*_#I__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -10801,13 +10957,25 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-outobj.melt:4247:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:4249:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.IF___V18*/ meltfptr[16] = /*_.RETURN___V19*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4247:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4249:/ clear"); /*clear *//*_.RETURN___V19*/ meltfptr[18] = 0; } ; @@ -10818,7 +10986,7 @@ lab_endgetargs:; /*_.IF___V18*/ meltfptr[16] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4249:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4251:/ quasiblock"); /*_.PATH__V21*/ meltfptr[20] = @@ -10834,7 +11002,7 @@ lab_endgetargs:; meltgc_new_strbuf ((meltobject_ptr_t) (( /*!DISCR_STRBUF */ meltfrout->tabval[2])), (const char *) 0);; - MELT_LOCATION ("warmelt-outobj.melt:4255:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4257:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -10893,14 +11061,14 @@ lab_endgetargs:; /*_.NEWFILE__V23*/ meltfptr[22] = /*_.INST__V24*/ meltfptr[23];; { - MELT_LOCATION ("warmelt-outobj.melt:4261:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4263:/ locexp"); melt_put_int ((melt_ptr_t) ( /*_.NEWFILE__V23*/ meltfptr[22]), ( /*_#IX__L1*/ meltfnum[0])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4262:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4264:/ locexp"); meltgc_multiple_put_nth ((melt_ptr_t) ( /*_.MOFILES__V12*/ meltfptr[11]), ( /*_#IX__L1*/ meltfnum[0]), @@ -10908,19 +11076,31 @@ lab_endgetargs:; meltfptr[22])); } ; - MELT_LOCATION ("warmelt-outobj.melt:4263:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4265:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.NEWFILE__V23*/ meltfptr[22];; - MELT_LOCATION ("warmelt-outobj.melt:4263:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:4265:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*_.LET___V20*/ meltfptr[18] = /*_.RETURN___V25*/ meltfptr[24];; - MELT_LOCATION ("warmelt-outobj.melt:4249:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4251:/ clear"); /*clear *//*_.PATH__V21*/ meltfptr[20] = 0; /*^clear */ /*clear *//*_.IMPLBUF__V22*/ meltfptr[21] = 0; @@ -10930,7 +11110,7 @@ lab_endgetargs:; /*clear *//*_.RETURN___V25*/ meltfptr[24] = 0; /*_.LET___V11*/ meltfptr[9] = /*_.LET___V20*/ meltfptr[18];; - MELT_LOCATION ("warmelt-outobj.melt:4241:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4243:/ clear"); /*clear *//*_.MOFILES__V12*/ meltfptr[11] = 0; /*^clear */ /*clear *//*_#NBFILES__L5*/ meltfnum[1] = 0; @@ -10948,14 +11128,26 @@ lab_endgetargs:; /*clear *//*_.IF___V18*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.LET___V20*/ meltfptr[18] = 0; - MELT_LOCATION ("warmelt-outobj.melt:4237:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4239:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V11*/ meltfptr[9];; - MELT_LOCATION ("warmelt-outobj.melt:4237:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:4239:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -11058,7 +11250,7 @@ meltrout_120_warmelt_outobj_OUTPUT_MELT_DESCRIPTOR (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:4271:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:4273:/ getarg"); /*_.MODNAMSTR__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -11090,7 +11282,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4272:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4274:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11116,7 +11308,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4272:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4274:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -11131,7 +11323,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4272:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4274:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11144,7 +11336,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4272; + argtab[2].meltbp_long = 4274; /*^apply.arg */ argtab[3].meltbp_cstring = "output_melt_descriptor modnamstr="; /*^apply.arg */ @@ -11175,7 +11367,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4272:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4274:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0; @@ -11188,7 +11380,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4272:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4274:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -11197,7 +11389,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4272:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4274:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -11212,7 +11404,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4273:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4275:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11223,7 +11415,7 @@ lab_endgetargs:; /*_#IS_STRING__L3*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.MODNAMSTR__V2*/ meltfptr[1])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:4273:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4275:/ cond"); /*cond */ if ( /*_#IS_STRING__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -11231,7 +11423,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4273:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4275:/ cond.else"); /*^block */ /*anyblock */ @@ -11245,7 +11437,7 @@ lab_endgetargs:; melt_assert_failed (("check modnamstr"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4273) ? (4273) : __LINE__, __FUNCTION__); + (4275) ? (4275) : __LINE__, __FUNCTION__); ; } ; @@ -11260,7 +11452,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4273:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4275:/ clear"); /*clear *//*_#IS_STRING__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; @@ -11273,7 +11465,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4274:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4276:/ cppif.then"); /*^block */ /*anyblock */ { @@ -11285,7 +11477,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:4274:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4276:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -11293,7 +11485,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4274:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4276:/ cond.else"); /*^block */ /*anyblock */ @@ -11307,7 +11499,7 @@ lab_endgetargs:; melt_assert_failed (("check modctx"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4274) ? (4274) : __LINE__, __FUNCTION__); + (4276) ? (4276) : __LINE__, __FUNCTION__); ; } ; @@ -11322,7 +11514,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4274:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4276:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -11333,7 +11525,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4275:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4277:/ quasiblock"); /*_#NBSECFILES__L5*/ meltfnum[1] = @@ -11379,7 +11571,7 @@ lab_endgetargs:; (meltgc_new_string_nakedbasename ((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[4])), melt_string_str ((melt_ptr_t) ( /*_.MODNAMSTR__V2*/ meltfptr[1]))));; - MELT_LOCATION ("warmelt-outobj.melt:4284:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4286:/ quasiblock"); /*_.BUF__V20*/ meltfptr[19] = @@ -11389,7 +11581,7 @@ lab_endgetargs:; (const char *) 0);; { - MELT_LOCATION ("warmelt-outobj.melt:4286:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4288:/ locexp"); meltgc_add_out_cident ((melt_ptr_t) ( /*_.BUF__V20*/ meltfptr[19]), melt_string_str ((melt_ptr_t) ( /*_.MODNAMSTR__V2*/ @@ -11404,12 +11596,12 @@ lab_endgetargs:; /*_.LET___V19*/ meltfptr[18] = /*_.STRBUF2STRING__V21*/ meltfptr[20];; - MELT_LOCATION ("warmelt-outobj.melt:4284:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4286:/ clear"); /*clear *//*_.BUF__V20*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_.STRBUF2STRING__V21*/ meltfptr[20] = 0; /*_.MODCIDENT__V22*/ meltfptr[19] = /*_.LET___V19*/ meltfptr[18];; - MELT_LOCATION ("warmelt-outobj.melt:4288:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4290:/ quasiblock"); /*_.BUF__V24*/ meltfptr[23] = @@ -11419,7 +11611,7 @@ lab_endgetargs:; (const char *) 0);; { - MELT_LOCATION ("warmelt-outobj.melt:4290:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4292:/ locexp"); meltgc_add_out_cident ((melt_ptr_t) ( /*_.BUF__V24*/ meltfptr[23]), melt_string_str ((melt_ptr_t) ( /*_.MODBUILDSTR__V18*/ @@ -11434,12 +11626,12 @@ lab_endgetargs:; /*_.LET___V23*/ meltfptr[20] = /*_.STRBUF2STRING__V25*/ meltfptr[24];; - MELT_LOCATION ("warmelt-outobj.melt:4288:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4290:/ clear"); /*clear *//*_.BUF__V24*/ meltfptr[23] = 0; /*^clear */ /*clear *//*_.STRBUF2STRING__V25*/ meltfptr[24] = 0; /*_.MODBUILDCIDENT__V26*/ meltfptr[23] = /*_.LET___V23*/ meltfptr[20];; - MELT_LOCATION ("warmelt-outobj.melt:4292:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4294:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11460,7 +11652,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4293:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4295:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -11484,7 +11676,7 @@ lab_endgetargs:; /*_.PACKAGEPCLIST__V28*/ meltfptr[27] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4295:/ blockmultialloc"); + MELT_LOCATION ("warmelt-outobj.melt:4297:/ blockmultialloc"); /*multiallocblock */ { struct meltletrec_1_st @@ -11506,11 +11698,11 @@ lab_endgetargs:; /*^putuple */ /*putupl#1 */ - melt_assertmsg ("putupl [:4295] #1 checktup", + melt_assertmsg ("putupl [:4297] #1 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.TUPLREC___V30*/ meltfptr[29])) == MELTOBMAG_MULTIPLE); - melt_assertmsg ("putupl [:4295] #1 checkoff", + melt_assertmsg ("putupl [:4297] #1 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) @@ -11521,11 +11713,11 @@ lab_endgetargs:; ; /*^putuple */ /*putupl#2 */ - melt_assertmsg ("putupl [:4295] #2 checktup", + melt_assertmsg ("putupl [:4297] #2 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.TUPLREC___V30*/ meltfptr[29])) == MELTOBMAG_MULTIPLE); - melt_assertmsg ("putupl [:4295] #2 checkoff", + melt_assertmsg ("putupl [:4297] #2 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) @@ -11536,11 +11728,11 @@ lab_endgetargs:; ; /*^putuple */ /*putupl#3 */ - melt_assertmsg ("putupl [:4295] #3 checktup", + melt_assertmsg ("putupl [:4297] #3 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.TUPLREC___V30*/ meltfptr[29])) == MELTOBMAG_MULTIPLE); - melt_assertmsg ("putupl [:4295] #3 checkoff", + melt_assertmsg ("putupl [:4297] #3 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) @@ -11551,11 +11743,11 @@ lab_endgetargs:; ; /*^putuple */ /*putupl#4 */ - melt_assertmsg ("putupl [:4295] #4 checktup", + melt_assertmsg ("putupl [:4297] #4 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.TUPLREC___V30*/ meltfptr[29])) == MELTOBMAG_MULTIPLE); - melt_assertmsg ("putupl [:4295] #4 checkoff", + melt_assertmsg ("putupl [:4297] #4 checkoff", (3 >= 0 && 3 < melt_multiple_length ((melt_ptr_t) @@ -11570,7 +11762,7 @@ lab_endgetargs:; /*_.FLAVORTUPLE__V29*/ meltfptr[28] = /*_.TUPLREC___V30*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4295:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4297:/ clear"); /*clear *//*_.TUPLREC___V30*/ meltfptr[29] = 0; /*^clear */ /*clear *//*_.TUPLREC___V30*/ meltfptr[29] = 0; @@ -11578,7 +11770,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4297:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4299:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("/** GENERATED MELT DESCRIPTOR FILE ")); @@ -11586,7 +11778,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4298:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4300:/ locexp"); meltgc_add_strbuf_ccomment ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), melt_string_str ((melt_ptr_t) @@ -11596,7 +11788,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4299:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4301:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("+meltdesc.c \n** NEVER EDIT OR MOVE THIS, IT IS GENERATED & PARSED! **/")); @@ -11604,14 +11796,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4300:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4302:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4301:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4303:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("/* These identifiers are generated in warmelt-outobj.melt \n & handled in melt-runtime.c carefully. */")); @@ -11619,12 +11811,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4302:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4304:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4303:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4305:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11647,7 +11839,7 @@ lab_endgetargs:; ""), argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4304:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4306:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11666,7 +11858,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4305:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4307:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11687,14 +11879,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4321:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4323:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4322:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4324:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("/* version of the GCC compiler & MELT runtime generating this */")); @@ -11702,14 +11894,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4323:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4325:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4324:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4326:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("const char melt_genversionstr[]=\"")); @@ -11717,7 +11909,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4327:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4329:/ locexp"); /* output_melt_descriptor GENVERSCH__1 + */ meltgc_add_strbuf_cstr ((melt_ptr_t) /*_.DEBUF__V13*/ meltfptr[11], melt_gccversionstr); @@ -11726,7 +11918,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4330:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4332:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("\"")); @@ -11734,12 +11926,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4331:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4333:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4332:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4334:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11760,20 +11952,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4340:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4342:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4341:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4343:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("const char melt_versionmeltstr[]=\"")); } ; - MELT_LOCATION ("warmelt-outobj.melt:4342:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4344:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11793,7 +11985,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4345:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4347:/ locexp"); /* output_melt_descriptor GENVMELTCH__1 + */ meltgc_add_strbuf_cstr ((melt_ptr_t) /*_.DEBUF__V13*/ meltfptr[11], melt_version_str ()); @@ -11804,7 +11996,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4349:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4351:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("\";")); @@ -11812,28 +12004,28 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4350:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4352:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4351:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4353:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.MKBUF__V15*/ meltfptr[14]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4353:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4355:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4354:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4356:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("/* source name & real path of the module */")); @@ -11841,14 +12033,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4355:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4357:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4356:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4358:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("/*MELTMODULENAME ")); @@ -11856,7 +12048,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4357:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4359:/ locexp"); meltgc_add_strbuf_ccomment ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), melt_string_str ((melt_ptr_t) @@ -11866,7 +12058,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4358:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4360:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (" */")); @@ -11874,12 +12066,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4359:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4361:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4360:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4362:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11897,7 +12089,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4361:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4363:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11920,12 +12112,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4362:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4364:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.MKBUF__V15*/ meltfptr[14]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4363:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4365:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -11948,14 +12140,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4364:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4366:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.MKBUF__V15*/ meltfptr[14]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4365:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4367:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("const char melt_modulename[]=\"")); @@ -11963,7 +12155,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4368:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4370:/ locexp"); /* output_melt_descriptor GENMODNAMSTR__1 + */ meltgc_add_strbuf_cstr ((melt_ptr_t) /*_.DEBUF__V13*/ meltfptr[11], lbasename (melt_string_str @@ -11974,7 +12166,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4372:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4374:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("\";")); @@ -11982,14 +12174,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4373:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4375:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4374:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4376:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("const char melt_modulerealpath[]=\"")); @@ -11997,7 +12189,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4377:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4379:/ locexp"); /* output_melt_descriptor GENRPATHCH__1 + */ char *lrp = lrealpath (melt_string_str @@ -12027,7 +12219,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4393:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4395:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("\";")); @@ -12035,21 +12227,21 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4394:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4396:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4395:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4397:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4396:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4398:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("/* hash of preprocessed melt-run.h generating this */")); @@ -12057,14 +12249,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4397:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4399:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4398:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4400:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("const char melt_prepromd5meltrun[]=\"")); @@ -12072,7 +12264,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4401:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4403:/ locexp"); /* output_melt_descriptor GENVERSCH__2 */ meltgc_add_strbuf_cstr ((melt_ptr_t) /*_.DEBUF__V13*/ meltfptr[11], MELT_RUN_HASHMD5); @@ -12081,7 +12273,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4404:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4406:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("\";")); @@ -12089,14 +12281,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4405:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4407:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4407:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4409:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("/* hexmd5checksum of primary C file */")); @@ -12104,23 +12296,23 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4408:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4410:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4409:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4411:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("const char melt_primaryhexmd5[]=\"")); } ; - MELT_LOCATION ("warmelt-outobj.melt:4410:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4412:/ quasiblock"); - MELT_LOCATION ("warmelt-outobj.melt:4411:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4413:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12167,7 +12359,7 @@ lab_endgetargs:; (const char *) 0);; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4417:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4419:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12193,7 +12385,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4417:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4419:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -12208,7 +12400,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4417:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4419:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12221,7 +12413,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4417; + argtab[2].meltbp_long = 4419; /*^apply.arg */ argtab[3].meltbp_cstring = "output_melt_descriptor primpath="; /*^apply.arg */ @@ -12241,7 +12433,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V46*/ meltfptr[45];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4417:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4419:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V46*/ meltfptr[45] = 0; @@ -12254,7 +12446,7 @@ lab_endgetargs:; /*_.IF___V45*/ meltfptr[44] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4417:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4419:/ quasiblock"); /*_.PROGN___V47*/ meltfptr[45] = /*_.IF___V45*/ meltfptr[44];; @@ -12263,7 +12455,7 @@ lab_endgetargs:; /*_.IFCPP___V44*/ meltfptr[43] = /*_.PROGN___V47*/ meltfptr[45];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4417:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4419:/ clear"); /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.IF___V45*/ meltfptr[44] = 0; @@ -12278,28 +12470,28 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4418:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4420:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.PATHLIST__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.PRIMPATH__V39*/ meltfptr[38])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4419:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4421:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.MD5LIST__V17*/ meltfptr[16]), (melt_ptr_t) ( /*_.PRIMMD5S__V40*/ meltfptr[39])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4420:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4422:/ locexp"); meltgc_add_strbuf_cstr ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), melt_string_str ((melt_ptr_t) ( /*_.PRIMMD5S__V40*/ meltfptr[39]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:4421:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4423:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12317,7 +12509,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4422:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4424:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12346,12 +12538,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4423:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4425:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.MKBUF__V15*/ meltfptr[14]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4424:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4426:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12380,12 +12572,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4425:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4427:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.MKBUF__V15*/ meltfptr[14]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4427:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4429:/ quasiblock"); /*^checksignal */ @@ -12412,7 +12604,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.PACKAGEPCTUP__V52*/ meltfptr[51])));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4430:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4432:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12438,7 +12630,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4430:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4432:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -12453,7 +12645,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4430:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4432:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12467,7 +12659,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4430; + argtab[2].meltbp_long = 4432; /*^apply.arg */ argtab[3].meltbp_cstring = "output_melt_descriptor packagepctup="; @@ -12488,7 +12680,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V55*/ meltfptr[54];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4430:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4432:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V55*/ meltfptr[54] = 0; @@ -12501,7 +12693,7 @@ lab_endgetargs:; /*_.IF___V54*/ meltfptr[53] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4430:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4432:/ quasiblock"); /*_.PROGN___V56*/ meltfptr[54] = /*_.IF___V54*/ meltfptr[53];; @@ -12510,7 +12702,7 @@ lab_endgetargs:; /*_.IFCPP___V53*/ meltfptr[52] = /*_.PROGN___V56*/ meltfptr[54];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4430:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4432:/ clear"); /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.IF___V54*/ meltfptr[53] = 0; @@ -12523,7 +12715,7 @@ lab_endgetargs:; /*_.IFCPP___V53*/ meltfptr[52] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4431:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4433:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -12534,7 +12726,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:4432:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4434:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12557,7 +12749,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4433:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4435:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12599,7 +12791,7 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-outobj.melt:4437:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4439:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12626,7 +12818,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:4434:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4436:/ clear"); /*clear *//*_.CURPACK__V60*/ meltfptr[59] = 0; /*^clear */ /*clear *//*_#PKIX__L12*/ meltfnum[10] = 0; @@ -12634,7 +12826,7 @@ lab_endgetargs:; /*clear *//*_.ADD2OUT__V61*/ meltfptr[60] = 0; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-outobj.melt:4438:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4440:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12653,7 +12845,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4439:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4441:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12678,7 +12870,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4431:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4433:/ quasiblock"); /*_.PROGN___V64*/ meltfptr[63] = /*_.ADD2OUT__V63*/ meltfptr[62];; @@ -12687,7 +12879,7 @@ lab_endgetargs:; /*_.IF___V57*/ meltfptr[53] = /*_.PROGN___V64*/ meltfptr[63];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4431:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4433:/ clear"); /*clear *//*_.ADD2OUT__V58*/ meltfptr[54] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V59*/ meltfptr[58] = 0; @@ -12706,7 +12898,7 @@ lab_endgetargs:; /*_.IF___V57*/ meltfptr[53] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4441:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4443:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -12717,13 +12909,13 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4441:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4443:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:4442:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4444:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12742,7 +12934,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4441:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4443:/ quasiblock"); /*_.PROGN___V67*/ meltfptr[61] = /*_.ADD2OUT__V66*/ meltfptr[58];; @@ -12751,7 +12943,7 @@ lab_endgetargs:; /*_.IFELSE___V65*/ meltfptr[54] = /*_.PROGN___V67*/ meltfptr[61];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4441:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4443:/ clear"); /*clear *//*_.ADD2OUT__V66*/ meltfptr[58] = 0; /*^clear */ /*clear *//*_.PROGN___V67*/ meltfptr[61] = 0; @@ -12761,7 +12953,7 @@ lab_endgetargs:; ; /*_.LET___V51*/ meltfptr[50] = /*_.IFELSE___V65*/ meltfptr[54];; - MELT_LOCATION ("warmelt-outobj.melt:4427:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4429:/ clear"); /*clear *//*_.PACKAGEPCTUP__V52*/ meltfptr[51] = 0; /*^clear */ /*clear *//*_#NBPACKAGEPC__L9*/ meltfnum[7] = 0; @@ -12771,7 +12963,7 @@ lab_endgetargs:; /*clear *//*_.IF___V57*/ meltfptr[53] = 0; /*^clear */ /*clear *//*_.IFELSE___V65*/ meltfptr[54] = 0; - MELT_LOCATION ("warmelt-outobj.melt:4444:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4446:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12794,7 +12986,7 @@ lab_endgetargs:; ""), argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4445:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4447:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12835,7 +13027,7 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-outobj.melt:4449:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4451:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12880,7 +13072,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:4446:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4448:/ clear"); /*clear *//*_.CURFLAV__V70*/ meltfptr[58] = 0; /*^clear */ /*clear *//*_#FLAVIX__L13*/ meltfnum[6] = 0; @@ -12890,7 +13082,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4451:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4453:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("\";")); @@ -12898,21 +13090,21 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4452:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4454:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4454:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4456:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4455:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4457:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("/* hexmd5checksum of secondary C files */")); @@ -12920,14 +13112,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4456:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4458:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4457:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4459:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("const char* const melt_secondaryhexmd5tab[]={")); @@ -12935,7 +13127,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4459:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4461:/ cppif.then"); /*^block */ /*anyblock */ { @@ -12961,7 +13153,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4459:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4461:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -12976,7 +13168,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4459:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4461:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -12990,7 +13182,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4459; + argtab[2].meltbp_long = 4461; /*^apply.arg */ argtab[3].meltbp_cstring = "output_melt_descriptor secfiles="; /*^apply.arg */ @@ -13010,7 +13202,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V74*/ meltfptr[53];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4459:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4461:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[14] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V74*/ meltfptr[53] = 0; @@ -13023,7 +13215,7 @@ lab_endgetargs:; /*_.IF___V73*/ meltfptr[52] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4459:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4461:/ quasiblock"); /*_.PROGN___V75*/ meltfptr[54] = /*_.IF___V73*/ meltfptr[52];; @@ -13032,7 +13224,7 @@ lab_endgetargs:; /*_.IFCPP___V72*/ meltfptr[51] = /*_.PROGN___V75*/ meltfptr[54];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4459:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4461:/ clear"); /*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IF___V73*/ meltfptr[52] = 0; @@ -13063,7 +13255,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4463:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4465:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13089,7 +13281,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4463:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4465:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -13104,7 +13296,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4463:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4465:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13118,7 +13310,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4463; + argtab[2].meltbp_long = 4465; /*^apply.arg */ argtab[3].meltbp_cstring = "output_melt_descriptor curfil="; @@ -13145,7 +13337,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V79*/ meltfptr[78];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4463:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4465:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[17] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V79*/ meltfptr[78] = 0; @@ -13158,7 +13350,7 @@ lab_endgetargs:; /*_.IF___V78*/ meltfptr[54] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4463:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4465:/ quasiblock"); /*_.PROGN___V80*/ meltfptr[78] = /*_.IF___V78*/ meltfptr[54];; @@ -13167,7 +13359,7 @@ lab_endgetargs:; /*_.IFCPP___V77*/ meltfptr[52] = /*_.PROGN___V80*/ meltfptr[78];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4463:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4465:/ clear"); /*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IF___V78*/ meltfptr[54] = 0; @@ -13182,13 +13374,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4464:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4466:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (1), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4465:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4467:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -13201,7 +13393,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4467:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4469:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13213,7 +13405,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CURFIL__V76*/ meltfptr[53]), (melt_ptr_t) (( /*!CLASS_SECONDARY_C_FILE */ meltfrout->tabval[13])));; - MELT_LOCATION ("warmelt-outobj.melt:4467:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4469:/ cond"); /*cond */ if ( /*_#IS_A__L19*/ meltfnum[17]) /*then */ { /*^cond.then */ @@ -13221,7 +13413,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4467:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4469:/ cond.else"); /*^block */ /*anyblock */ @@ -13232,7 +13424,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("output_melt_descriptor check curfil"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (4467) ? (4467) : __LINE__, __FUNCTION__); + melt_assert_failed (("output_melt_descriptor check curfil"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (4469) ? (4469) : __LINE__, __FUNCTION__); ; } ; @@ -13248,7 +13440,7 @@ lab_endgetargs:; /*_.IFELSE___V82*/ meltfptr[78];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4467:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4469:/ clear"); /*clear *//*_#IS_A__L19*/ meltfnum[17] = 0; /*^clear */ /*clear *//*_.IFELSE___V82*/ meltfptr[78] = 0; @@ -13259,11 +13451,11 @@ lab_endgetargs:; /*_.IFCPP___V81*/ meltfptr[54] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4469:/ compute"); + MELT_LOCATION ("warmelt-outobj.melt:4471:/ compute"); /*_#LASTSECFILEIX__L6*/ meltfnum[0] = /*_#SETQ___L20*/ meltfnum[7] = /*_#FILIX__L16*/ meltfnum[14];; - MELT_LOCATION ("warmelt-outobj.melt:4470:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4472:/ quasiblock"); /*^cond */ @@ -13299,7 +13491,7 @@ lab_endgetargs:; ((melt_ptr_t) /*_.SECPATH__V83*/ meltfptr[78])));; { - MELT_LOCATION ("warmelt-outobj.melt:4473:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4475:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.PATHLIST__V16*/ meltfptr[15]), (melt_ptr_t) ( /*_.SECPATH__V83*/ @@ -13308,7 +13500,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4474:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4476:/ locexp"); meltgc_append_list ((melt_ptr_t) ( /*_.MD5LIST__V17*/ meltfptr[16]), (melt_ptr_t) ( /*_.SECMD5S__V84*/ @@ -13317,7 +13509,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4475:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4477:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), @@ -13326,7 +13518,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4476:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4478:/ locexp"); meltgc_add_strbuf_ccomment ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), @@ -13336,7 +13528,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4477:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4479:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), @@ -13348,7 +13540,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.CURFIL__V76*/ meltfptr[53])));; { - MELT_LOCATION ("warmelt-outobj.melt:4478:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4480:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ( /*_#GET_INT__L21*/ meltfnum[17])); @@ -13356,7 +13548,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4479:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4481:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), @@ -13365,7 +13557,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4480:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4482:/ locexp"); meltgc_add_strbuf_cstr ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), melt_string_str ((melt_ptr_t) @@ -13374,14 +13566,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4481:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4483:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("\",")); } ; - MELT_LOCATION ("warmelt-outobj.melt:4482:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4484:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13403,7 +13595,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4483:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4485:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13425,7 +13617,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4485:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4487:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13476,12 +13668,12 @@ lab_endgetargs:; MELT_LOCATION - ("warmelt-outobj.melt:4490:/ checksignal"); + ("warmelt-outobj.melt:4492:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L23*/ meltfnum[22] = (( /*_#FILIX__L16*/ meltfnum[14]) < (10));; - MELT_LOCATION ("warmelt-outobj.melt:4490:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4492:/ cond"); /*cond */ if ( /*_#I__L23*/ meltfnum[22]) /*then */ { /*^cond.then */ @@ -13490,18 +13682,18 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-outobj.melt:4490:/ cond.else"); + ("warmelt-outobj.melt:4492:/ cond.else"); /*_?*/ meltfram__.loc_CSTRING__o0 = "";; } ; MELT_LOCATION - ("warmelt-outobj.melt:4492:/ checksignal"); + ("warmelt-outobj.melt:4494:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L24*/ meltfnum[23] = (( /*_#FILIX__L16*/ meltfnum[14]) < (10));; - MELT_LOCATION ("warmelt-outobj.melt:4492:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4494:/ cond"); /*cond */ if ( /*_#I__L24*/ meltfnum[23]) /*then */ { /*^cond.then */ @@ -13510,13 +13702,13 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-outobj.melt:4492:/ cond.else"); + ("warmelt-outobj.melt:4494:/ cond.else"); /*_?*/ meltfram__.loc_CSTRING__o1 = "";; } ; MELT_LOCATION - ("warmelt-outobj.melt:4489:/ checksignal"); + ("warmelt-outobj.melt:4491:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13584,7 +13776,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:4486:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4488:/ clear"); /*clear *//*_.CURFLAV__V88*/ meltfptr[87] = 0; /*^clear */ /*clear *//*_#FLAVIX__L22*/ meltfnum[21] = 0; @@ -13601,7 +13793,7 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-outobj.melt:4470:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4472:/ clear"); /*clear *//*_.SECPATH__V83*/ meltfptr[78] = 0; /*^clear */ /*clear *//*_.SECMD5S__V84*/ meltfptr[83] = 0; @@ -13613,12 +13805,12 @@ lab_endgetargs:; /*clear *//*_.ADD2OUT__V86*/ meltfptr[85] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V87*/ meltfptr[86] = 0; - MELT_LOCATION ("warmelt-outobj.melt:4466:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4468:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4465:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4467:/ clear"); /*clear *//*_.IFCPP___V81*/ meltfptr[54] = 0; /*^clear */ /*clear *//*_#SETQ___L20*/ meltfnum[7] = 0; @@ -13634,7 +13826,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:4496:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4498:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), @@ -13652,7 +13844,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:4460:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4462:/ clear"); /*clear *//*_.CURFIL__V76*/ meltfptr[53] = 0; /*^clear */ /*clear *//*_#FILIX__L16*/ meltfnum[14] = 0; @@ -13662,14 +13854,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4498:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4500:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4499:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4501:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("(const char*)0 };")); @@ -13677,21 +13869,21 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4500:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4502:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4502:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4504:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4503:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4505:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("/* last index of secondary files */")); @@ -13699,14 +13891,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4504:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4506:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4505:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4507:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("const int melt_lastsecfileindex=")); @@ -13714,14 +13906,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4506:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4508:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ( /*_#LASTSECFILEIX__L6*/ meltfnum[0])); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4507:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4509:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (";")); @@ -13729,12 +13921,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4508:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4510:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4509:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4511:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13757,7 +13949,7 @@ lab_endgetargs:; ((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[4])), melt_strbuf_str ((melt_ptr_t) ( /*_.SECPATHBUF__V43*/ meltfptr[42]))));; - MELT_LOCATION ("warmelt-outobj.melt:4510:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4512:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13788,7 +13980,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4511:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4513:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.MKBUF__V15*/ meltfptr[14]), (0), 0); } @@ -13798,7 +13990,7 @@ lab_endgetargs:; ((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[4])), melt_strbuf_str ((melt_ptr_t) ( /*_.SECMD5BUF__V42*/ meltfptr[41]))));; - MELT_LOCATION ("warmelt-outobj.melt:4512:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4514:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13829,15 +14021,15 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4513:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4515:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.MKBUF__V15*/ meltfptr[14]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4515:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4517:/ quasiblock"); - MELT_LOCATION ("warmelt-outobj.melt:4516:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4518:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13859,7 +14051,7 @@ lab_endgetargs:; (meltgc_new_string_nakedbasename ((meltobject_ptr_t) (( /*!DISCR_STRING */ meltfrout->tabval[4])), melt_string_str ((melt_ptr_t) ( /*_.MODNAMSTR__V2*/ meltfptr[1]))));; - MELT_LOCATION ("warmelt-outobj.melt:4519:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4521:/ quasiblock"); /*_.MOUT__V100*/ meltfptr[99] = @@ -13867,7 +14059,7 @@ lab_endgetargs:; meltgc_new_strbuf ((meltobject_ptr_t) (( /*!DISCR_STRBUF */ meltfrout->tabval[2])), (const char *) 0);; - MELT_LOCATION ("warmelt-outobj.melt:4521:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4523:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13887,14 +14079,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4522:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4524:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.MOUT__V100*/ meltfptr[99]), melt_string_str ((melt_ptr_t) ( /*_.MIDSTR__V98*/ meltfptr[97]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:4523:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4525:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -13914,7 +14106,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4524:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4526:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.MOUT__V100*/ meltfptr[99]), melt_string_str ((melt_ptr_t) ( /*_.CUMPATHMDS__V97*/ @@ -13929,7 +14121,7 @@ lab_endgetargs:; /*_.LET___V99*/ meltfptr[98] = /*_.STRBUF2STRING__V103*/ meltfptr[102];; - MELT_LOCATION ("warmelt-outobj.melt:4519:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4521:/ clear"); /*clear *//*_.MOUT__V100*/ meltfptr[99] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V101*/ meltfptr[100] = 0; @@ -13940,7 +14132,7 @@ lab_endgetargs:; /*_.MODIDNAM__V104*/ meltfptr[99] = /*_.LET___V99*/ meltfptr[98];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4528:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4530:/ cppif.then"); /*^block */ /*anyblock */ { @@ -13951,7 +14143,7 @@ lab_endgetargs:; /*_#IS_STRING__L25*/ meltfnum[17] = (melt_magic_discr ((melt_ptr_t) ( /*_.CUMPATHMDS__V97*/ meltfptr[96])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:4528:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4530:/ cond"); /*cond */ if ( /*_#IS_STRING__L25*/ meltfnum[17]) /*then */ { /*^cond.then */ @@ -13959,7 +14151,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4528:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4530:/ cond.else"); /*^block */ /*anyblock */ @@ -13973,7 +14165,7 @@ lab_endgetargs:; melt_assert_failed (("check cumpathmds"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4528) ? (4528) : __LINE__, __FUNCTION__); + (4530) ? (4530) : __LINE__, __FUNCTION__); ; } ; @@ -13988,7 +14180,7 @@ lab_endgetargs:; /*_.IFCPP___V105*/ meltfptr[100] = /*_.IFELSE___V106*/ meltfptr[101];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4528:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4530:/ clear"); /*clear *//*_#IS_STRING__L25*/ meltfnum[17] = 0; /*^clear */ /*clear *//*_.IFELSE___V106*/ meltfptr[101] = 0; @@ -13999,7 +14191,7 @@ lab_endgetargs:; /*_.IFCPP___V105*/ meltfptr[100] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4530:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4532:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14022,7 +14214,7 @@ lab_endgetargs:; ""), argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4531:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4533:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14060,7 +14252,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4534:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4536:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14101,7 +14293,7 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-outobj.melt:4538:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4540:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14131,7 +14323,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4539:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4541:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14178,7 +14370,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4542:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4544:/ quasiblock"); /*^checksignal */ @@ -14200,7 +14392,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4543:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4545:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14221,7 +14413,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4545:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4547:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14242,7 +14434,7 @@ lab_endgetargs:; /*_#I__L29*/ meltfnum[28] = (( /*_#MULTIPLE_LENGTH__L27*/ meltfnum[17]) == ( /*_#MULTIPLE_LENGTH__L28*/ meltfnum[27]));; - MELT_LOCATION ("warmelt-outobj.melt:4545:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4547:/ cond"); /*cond */ if ( /*_#I__L29*/ meltfnum[28]) /*then */ { /*^cond.then */ @@ -14250,7 +14442,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4545:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4547:/ cond.else"); /*^block */ /*anyblock */ @@ -14264,7 +14456,7 @@ lab_endgetargs:; melt_assert_failed (("check same length pathtup md5tup"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4545) ? (4545) : __LINE__, + (4547) ? (4547) : __LINE__, __FUNCTION__); ; } @@ -14281,7 +14473,7 @@ lab_endgetargs:; /*_.IFELSE___V116*/ meltfptr[115];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4545:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4547:/ clear"); /*clear *//*_#MULTIPLE_LENGTH__L27*/ meltfnum[17] = 0; /*^clear */ /*clear *//*_#MULTIPLE_LENGTH__L28*/ meltfnum[27] = 0; @@ -14314,7 +14506,7 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-outobj.melt:4549:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4551:/ quasiblock"); /*_.CURMD5__V119*/ meltfptr[118] = @@ -14323,7 +14515,7 @@ lab_endgetargs:; ( /*_#IX__L30*/ meltfnum[17])));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4551:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4553:/ cppif.then"); /*^block */ /*anyblock */ { @@ -14349,7 +14541,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4551:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4553:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L31*/ meltfnum[27]) /*then */ { /*^cond.then */ @@ -14365,7 +14557,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-outobj.melt:4551:/ checksignal"); + ("warmelt-outobj.melt:4553:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14379,7 +14571,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4551; + argtab[2].meltbp_long = 4553; /*^apply.arg */ argtab[3].meltbp_cstring = "output_melt_descriptor curpath="; @@ -14413,7 +14605,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V122*/ meltfptr[121];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4551:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4553:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L32*/ meltfnum[28] = 0; /*^clear */ @@ -14428,7 +14620,7 @@ lab_endgetargs:; /*_.IF___V121*/ meltfptr[120] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4551:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4553:/ quasiblock"); /*_.PROGN___V123*/ meltfptr[121] = @@ -14439,7 +14631,7 @@ lab_endgetargs:; /*_.PROGN___V123*/ meltfptr[121];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4551:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4553:/ clear"); /*clear *//*_#MELT_NEED_DBG__L31*/ meltfnum[27] = 0; /*^clear */ /*clear *//*_.IF___V121*/ meltfptr[120] = 0; @@ -14460,7 +14652,7 @@ lab_endgetargs:; (( /*!DISCR_STRING */ meltfrout->tabval[4])), melt_string_str ((melt_ptr_t) ( /*_.CURPATH__V117*/ meltfptr[115]))));; - MELT_LOCATION ("warmelt-outobj.melt:4552:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4554:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14503,7 +14695,7 @@ lab_endgetargs:; /*_.LET___V118*/ meltfptr[117] = /*_.ADD2OUT__V125*/ meltfptr[121];; - MELT_LOCATION ("warmelt-outobj.melt:4549:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4551:/ clear"); /*clear *//*_.CURMD5__V119*/ meltfptr[118] = 0; /*^clear */ /*clear *//*_.IFCPP___V120*/ meltfptr[119] = 0; @@ -14518,7 +14710,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:4546:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4548:/ clear"); /*clear *//*_.CURPATH__V117*/ meltfptr[115] = 0; /*^clear */ /*clear *//*_#IX__L30*/ meltfnum[17] = 0; @@ -14527,13 +14719,13 @@ lab_endgetargs:; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-outobj.melt:4542:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4544:/ clear"); /*clear *//*_.PATHTUP__V113*/ meltfptr[112] = 0; /*^clear */ /*clear *//*_.MD5TUP__V114*/ meltfptr[113] = 0; /*^clear */ /*clear *//*_.IFCPP___V115*/ meltfptr[114] = 0; - MELT_LOCATION ("warmelt-outobj.melt:4557:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4559:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14557,7 +14749,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:4535:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4537:/ clear"); /*clear *//*_.CURFLAV__V110*/ meltfptr[109] = 0; /*^clear */ /*clear *//*_#FLAVIX__L26*/ meltfnum[7] = 0; @@ -14569,7 +14761,7 @@ lab_endgetargs:; /*clear *//*_.ADD2OUT__V126*/ meltfptr[118] = 0; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-outobj.melt:4560:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4562:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14592,7 +14784,7 @@ lab_endgetargs:; ""), argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4561:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4563:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14611,10 +14803,10 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4562:/ compute"); + MELT_LOCATION ("warmelt-outobj.melt:4564:/ compute"); /*_.MKRULEBUF__V41*/ meltfptr[40] = /*_.SETQ___V129*/ meltfptr[121] = ( /*nil */ NULL);; - MELT_LOCATION ("warmelt-outobj.melt:4563:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4565:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14632,7 +14824,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4564:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4566:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14661,7 +14853,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4565:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4567:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14691,12 +14883,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4566:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4568:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4567:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4569:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14734,7 +14926,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4579:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4581:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.TIBUF__V14*/ meltfptr[13]), ("/** GENERATED MELT TIMESTAMP FILE ")); @@ -14742,7 +14934,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4580:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4582:/ locexp"); meltgc_add_strbuf_ccomment ((melt_ptr_t) ( /*_.TIBUF__V14*/ meltfptr[13]), melt_string_str ((melt_ptr_t) @@ -14752,7 +14944,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4581:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4583:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.TIBUF__V14*/ meltfptr[13]), ("+melttime.h \n** NEVER EDIT OR MOVE THIS, IT IS GENERATED & PARSED! **/")); @@ -14760,14 +14952,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4582:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4584:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.TIBUF__V14*/ meltfptr[13]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4583:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4585:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.TIBUF__V14*/ meltfptr[13]), ("/* These identifiers are generated in warmelt-outobj.melt \n & handled in melt-runtime.c carefully. */")); @@ -14775,19 +14967,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4584:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4586:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.TIBUF__V14*/ meltfptr[13]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4585:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4587:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.TIBUF__V14*/ meltfptr[13]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4586:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4588:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14828,14 +15020,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4601:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4603:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.TIBUF__V14*/ meltfptr[13]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4604:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4606:/ locexp"); /* output_melt_descriptor GENTIMCH__1 + */ time_t now = 0; char nowbuf[64]; @@ -14859,12 +15051,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4621:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4623:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.TIBUF__V14*/ meltfptr[13]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4622:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4624:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14885,12 +15077,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4631:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4633:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.TIBUF__V14*/ meltfptr[13]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4632:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4634:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14929,19 +15121,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4641:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4643:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.TIBUF__V14*/ meltfptr[13]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4643:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4645:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4644:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4646:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -14962,14 +15154,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4649:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4651:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4650:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4652:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), ("/* end of melt descriptor file */")); @@ -14977,12 +15169,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4651:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4653:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DEBUF__V13*/ meltfptr[11]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4652:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4654:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15007,7 +15199,7 @@ lab_endgetargs:; ; /*_.LET___V95*/ meltfptr[54] = /*_.ADD2OUT__V138*/ meltfptr[137];; - MELT_LOCATION ("warmelt-outobj.melt:4515:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4517:/ clear"); /*clear *//*_.LIST_TO_MULTIPLE__V96*/ meltfptr[95] = 0; /*^clear */ /*clear *//*_.CUMPATHMDS__V97*/ meltfptr[96] = 0; @@ -15049,10 +15241,10 @@ lab_endgetargs:; /*clear *//*_.ADD2OUT__V137*/ meltfptr[136] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V138*/ meltfptr[137] = 0; - MELT_LOCATION ("warmelt-outobj.melt:4654:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4656:/ quasiblock"); - MELT_LOCATION ("warmelt-outobj.melt:4655:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4657:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15073,7 +15265,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4656:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4658:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15094,7 +15286,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4657:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4659:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15117,7 +15309,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4659:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4661:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15143,7 +15335,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4659:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4661:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L33*/ meltfnum[28]) /*then */ { /*^cond.then */ @@ -15158,7 +15350,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4659:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4661:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15172,7 +15364,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4659; + argtab[2].meltbp_long = 4661; /*^apply.arg */ argtab[3].meltbp_cstring = "output_melt_descriptor meltdescpath="; @@ -15199,7 +15391,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V144*/ meltfptr[100];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4659:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4661:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L34*/ meltfnum[27] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V144*/ meltfptr[100] = 0; @@ -15212,7 +15404,7 @@ lab_endgetargs:; /*_.IF___V143*/ meltfptr[99] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4659:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4661:/ quasiblock"); /*_.PROGN___V145*/ meltfptr[102] = /*_.IF___V143*/ meltfptr[99];; @@ -15221,7 +15413,7 @@ lab_endgetargs:; /*_.IFCPP___V142*/ meltfptr[98] = /*_.PROGN___V145*/ meltfptr[102];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4659:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4661:/ clear"); /*clear *//*_#MELT_NEED_DBG__L33*/ meltfnum[28] = 0; /*^clear */ /*clear *//*_.IF___V143*/ meltfptr[99] = 0; @@ -15236,7 +15428,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4661:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4663:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15262,7 +15454,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4661:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4663:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L35*/ meltfnum[27]) /*then */ { /*^cond.then */ @@ -15277,7 +15469,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4661:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4663:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15291,7 +15483,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4661; + argtab[2].meltbp_long = 4663; /*^apply.arg */ argtab[3].meltbp_cstring = "output_melt_descriptor melttimepath="; @@ -15318,7 +15510,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V148*/ meltfptr[119];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4661:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4663:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L36*/ meltfnum[28] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V148*/ meltfptr[119] = 0; @@ -15331,7 +15523,7 @@ lab_endgetargs:; /*_.IF___V147*/ meltfptr[108] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4661:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4663:/ quasiblock"); /*_.PROGN___V149*/ meltfptr[120] = /*_.IF___V147*/ meltfptr[108];; @@ -15340,7 +15532,7 @@ lab_endgetargs:; /*_.IFCPP___V146*/ meltfptr[101] = /*_.PROGN___V149*/ meltfptr[120];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4661:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4663:/ clear"); /*clear *//*_#MELT_NEED_DBG__L35*/ meltfnum[27] = 0; /*^clear */ /*clear *//*_.IF___V147*/ meltfptr[108] = 0; @@ -15355,7 +15547,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4663:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4665:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15381,7 +15573,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4663:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4665:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L37*/ meltfnum[28]) /*then */ { /*^cond.then */ @@ -15396,7 +15588,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4663:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4665:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15410,7 +15602,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4663; + argtab[2].meltbp_long = 4665; /*^apply.arg */ argtab[3].meltbp_cstring = "output_melt_descriptor meltmakepath="; @@ -15437,7 +15629,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V152*/ meltfptr[113];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4663:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4665:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L38*/ meltfnum[27] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V152*/ meltfptr[113] = 0; @@ -15450,7 +15642,7 @@ lab_endgetargs:; /*_.IF___V151*/ meltfptr[112] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4663:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4665:/ quasiblock"); /*_.PROGN___V153*/ meltfptr[114] = /*_.IF___V151*/ meltfptr[112];; @@ -15459,7 +15651,7 @@ lab_endgetargs:; /*_.IFCPP___V150*/ meltfptr[121] = /*_.PROGN___V153*/ meltfptr[114];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4663:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4665:/ clear"); /*clear *//*_#MELT_NEED_DBG__L37*/ meltfnum[28] = 0; /*^clear */ /*clear *//*_.IF___V151*/ meltfptr[112] = 0; @@ -15474,7 +15666,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4665:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4667:/ locexp"); /*output_sbuf_no_overwrite_strval */ melt_output_strbuf_to_file_no_overwrite ((melt_ptr_t) ( /*_.DEBUF__V13*/ @@ -15487,7 +15679,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4666:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4668:/ locexp"); /*output_sbuf_no_overwrite_strval */ melt_output_strbuf_to_file_no_overwrite ((melt_ptr_t) ( /*_.TIBUF__V14*/ @@ -15500,7 +15692,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4667:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4669:/ locexp"); /*output_sbuf_no_overwrite_strval */ melt_output_strbuf_to_file_no_overwrite ((melt_ptr_t) ( /*_.MKBUF__V15*/ @@ -15512,7 +15704,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-outobj.melt:4654:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4656:/ clear"); /*clear *//*_.MELTDESCPATH__V139*/ meltfptr[95] = 0; /*^clear */ /*clear *//*_.MELTTIMEPATH__V140*/ meltfptr[96] = 0; @@ -15525,7 +15717,7 @@ lab_endgetargs:; /*^clear */ /*clear *//*_.IFCPP___V150*/ meltfptr[121] = 0; - MELT_LOCATION ("warmelt-outobj.melt:4410:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4412:/ clear"); /*clear *//*_.PRIMPATH__V39*/ meltfptr[38] = 0; /*^clear */ /*clear *//*_.PRIMMD5S__V40*/ meltfptr[39] = 0; @@ -15564,7 +15756,7 @@ lab_endgetargs:; /*^clear */ /*clear *//*_.LET___V95*/ meltfptr[54] = 0; - MELT_LOCATION ("warmelt-outobj.melt:4275:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4277:/ clear"); /*clear *//*_#NBSECFILES__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#LASTSECFILEIX__L6*/ meltfnum[0] = 0; @@ -15610,7 +15802,7 @@ lab_endgetargs:; /*clear *//*_.ADD2OUT__V37*/ meltfptr[36] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V38*/ meltfptr[37] = 0; - MELT_LOCATION ("warmelt-outobj.melt:4271:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4273:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -15706,7 +15898,7 @@ meltrout_121_warmelt_outobj_SYNTESTGEN_ANY (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:4684:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:4686:/ getarg"); /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -15752,13 +15944,13 @@ lab_endgetargs:; /*anyblock*/ { - MELT_LOCATION ("warmelt-outobj.melt:4685:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4687:/ quasiblock"); /*_.DIS__V7*/ meltfptr[6] = ((melt_ptr_t) (melt_discr ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]))));; - MELT_LOCATION ("warmelt-outobj.melt:4686:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4688:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -15783,7 +15975,7 @@ lab_endgetargs:; /*_.DISNAME__V8*/ meltfptr[7] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4687:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4689:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -15810,7 +16002,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4689:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4691:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15836,7 +16028,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4689:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4691:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -15851,7 +16043,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4689:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4691:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -15864,7 +16056,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4689; + argtab[2].meltbp_long = 4691; /*^apply.arg */ argtab[3].meltbp_cstring = "syntestgen_any recv="; /*^apply.arg */ @@ -15913,7 +16105,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4689:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4691:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V12*/ meltfptr[11] = 0; @@ -15926,7 +16118,7 @@ lab_endgetargs:; /*_.IF___V11*/ meltfptr[10] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4689:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4691:/ quasiblock"); /*_.PROGN___V13*/ meltfptr[11] = /*_.IF___V11*/ meltfptr[10];; @@ -15935,7 +16127,7 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[9] = /*_.PROGN___V13*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4689:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4691:/ clear"); /*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V11*/ meltfptr[10] = 0; @@ -15950,7 +16142,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4694:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4696:/ locexp"); melt_error_str ((melt_ptr_t) ( /*_.DLOC__V9*/ meltfptr[8]), ("unimplemented SYNTAX_TEST_GENERATOR method for "), (melt_ptr_t) ( /*_.DISNAME__V8*/ meltfptr[7])); @@ -15958,7 +16150,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4695:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4697:/ cppif.then"); /*^block */ /*anyblock */ { @@ -15969,7 +16161,7 @@ lab_endgetargs:; /*_#IS_A__L4*/ meltfnum[2] = melt_is_instance_of ((melt_ptr_t) ( /*_.GENDEV__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_SOURCE_GENERATOR_DEVICE */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-outobj.melt:4695:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4697:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -15977,7 +16169,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4695:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4697:/ cond.else"); /*^block */ /*anyblock */ @@ -15991,7 +16183,7 @@ lab_endgetargs:; melt_assert_failed (("check gendev"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4695) ? (4695) : __LINE__, __FUNCTION__); + (4697) ? (4697) : __LINE__, __FUNCTION__); ; } ; @@ -16006,7 +16198,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[10] = /*_.IFELSE___V15*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4695:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4697:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.IFELSE___V15*/ meltfptr[11] = 0; @@ -16019,7 +16211,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4696:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4698:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16030,7 +16222,7 @@ lab_endgetargs:; /*_#IS_STRBUF__L5*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3])) == MELTOBMAG_STRBUF);; - MELT_LOCATION ("warmelt-outobj.melt:4696:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4698:/ cond"); /*cond */ if ( /*_#IS_STRBUF__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -16038,7 +16230,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4696:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4698:/ cond.else"); /*^block */ /*anyblock */ @@ -16052,7 +16244,7 @@ lab_endgetargs:; melt_assert_failed (("check sbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4696) ? (4696) : __LINE__, __FUNCTION__); + (4698) ? (4698) : __LINE__, __FUNCTION__); ; } ; @@ -16067,7 +16259,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[11] = /*_.IFELSE___V17*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4696:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4698:/ clear"); /*clear *//*_#IS_STRBUF__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0; @@ -16080,7 +16272,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4697:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4699:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16092,7 +16284,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[4])));; - MELT_LOCATION ("warmelt-outobj.melt:4697:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4699:/ cond"); /*cond */ if ( /*_#IS_A__L6*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -16100,7 +16292,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4697:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4699:/ cond.else"); /*^block */ /*anyblock */ @@ -16114,7 +16306,7 @@ lab_endgetargs:; melt_assert_failed (("check modctx"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4697) ? (4697) : __LINE__, __FUNCTION__); + (4699) ? (4699) : __LINE__, __FUNCTION__); ; } ; @@ -16129,7 +16321,7 @@ lab_endgetargs:; /*_.IFCPP___V18*/ meltfptr[16] = /*_.IFELSE___V19*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4697:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4699:/ clear"); /*clear *//*_#IS_A__L6*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0; @@ -16142,7 +16334,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4698:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4700:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16158,7 +16350,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4698:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4700:/ cond.else"); /*^block */ /*anyblock */ @@ -16172,7 +16364,7 @@ lab_endgetargs:; melt_assert_failed (("@$@unimplemented syntax_test_generator"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4698) ? (4698) : __LINE__, __FUNCTION__); + (4700) ? (4700) : __LINE__, __FUNCTION__); ; } ; @@ -16187,7 +16379,7 @@ lab_endgetargs:; /*_.IFCPP___V20*/ meltfptr[18] = /*_.IFELSE___V21*/ meltfptr[20];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4698:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4700:/ clear"); /*clear *//*_.IFELSE___V21*/ meltfptr[20] = 0; } @@ -16200,7 +16392,7 @@ lab_endgetargs:; /*_.LET___V6*/ meltfptr[5] = /*_.IFCPP___V20*/ meltfptr[18];; - MELT_LOCATION ("warmelt-outobj.melt:4685:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4687:/ clear"); /*clear *//*_.DIS__V7*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_.DISNAME__V8*/ meltfptr[7] = 0; @@ -16216,11 +16408,23 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V18*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.IFCPP___V20*/ meltfptr[18] = 0; - MELT_LOCATION ("warmelt-outobj.melt:4684:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4686:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V6*/ meltfptr[5];; - MELT_LOCATION ("warmelt-outobj.melt:4684:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:4686:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -16320,7 +16524,7 @@ meltrout_122_warmelt_outobj_SUBSTITUTE_FORMALS_FOR_SYNTEST (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:4704:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:4706:/ getarg"); /*_.SBUF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -16358,7 +16562,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4705:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4707:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16384,7 +16588,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4705:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4707:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -16399,7 +16603,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4705:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4707:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -16412,7 +16616,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4705; + argtab[2].meltbp_long = 4707; /*^apply.arg */ argtab[3].meltbp_cstring = "substitute_formals_for_syntest sbuf="; @@ -16449,7 +16653,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4705:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4707:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0; @@ -16462,7 +16666,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4705:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4707:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -16471,7 +16675,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4705:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4707:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -16486,7 +16690,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4706:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4708:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16497,7 +16701,7 @@ lab_endgetargs:; /*_#IS_STRBUF__L3*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1])) == MELTOBMAG_STRBUF);; - MELT_LOCATION ("warmelt-outobj.melt:4706:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4708:/ cond"); /*cond */ if ( /*_#IS_STRBUF__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -16505,7 +16709,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4706:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4708:/ cond.else"); /*^block */ /*anyblock */ @@ -16519,7 +16723,7 @@ lab_endgetargs:; melt_assert_failed (("check sbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4706) ? (4706) : __LINE__, __FUNCTION__); + (4708) ? (4708) : __LINE__, __FUNCTION__); ; } ; @@ -16534,7 +16738,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4706:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4708:/ clear"); /*clear *//*_#IS_STRBUF__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; @@ -16547,7 +16751,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4707:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4709:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16559,7 +16763,7 @@ lab_endgetargs:; /*is_mapobject: */ (melt_magic_discr ((melt_ptr_t) ( /*_.REPLMAP__V3*/ meltfptr[2])) == MELTOBMAG_MAPOBJECTS);; - MELT_LOCATION ("warmelt-outobj.melt:4707:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4709:/ cond"); /*cond */ if ( /*_#IS_MAPOBJECT__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -16567,7 +16771,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4707:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4709:/ cond.else"); /*^block */ /*anyblock */ @@ -16581,7 +16785,7 @@ lab_endgetargs:; melt_assert_failed (("check replmap"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4707) ? (4707) : __LINE__, __FUNCTION__); + (4709) ? (4709) : __LINE__, __FUNCTION__); ; } ; @@ -16596,7 +16800,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4707:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4709:/ clear"); /*clear *//*_#IS_MAPOBJECT__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -16609,7 +16813,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4708:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4710:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16623,7 +16827,7 @@ lab_endgetargs:; (melt_unsafe_magic_discr ((melt_ptr_t) ( /*_.FORMALS__V4*/ meltfptr[3])) == MELTOBMAG_MULTIPLE));; - MELT_LOCATION ("warmelt-outobj.melt:4708:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4710:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE_OR_NULL__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -16631,7 +16835,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4708:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4710:/ cond.else"); /*^block */ /*anyblock */ @@ -16645,7 +16849,7 @@ lab_endgetargs:; melt_assert_failed (("check formals"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4708) ? (4708) : __LINE__, __FUNCTION__); + (4710) ? (4710) : __LINE__, __FUNCTION__); ; } ; @@ -16660,7 +16864,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4708:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4710:/ clear"); /*clear *//*_#IS_MULTIPLE_OR_NULL__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -16689,7 +16893,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4712:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4714:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16715,7 +16919,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4712:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4714:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -16730,7 +16934,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4712:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4714:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -16744,7 +16948,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4712; + argtab[2].meltbp_long = 4714; /*^apply.arg */ argtab[3].meltbp_cstring = "substitute_formals_for_syntest curformal="; @@ -16771,7 +16975,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V18*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4712:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4714:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V18*/ meltfptr[17] = 0; @@ -16784,7 +16988,7 @@ lab_endgetargs:; /*_.IF___V17*/ meltfptr[16] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4712:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4714:/ quasiblock"); /*_.PROGN___V19*/ meltfptr[17] = /*_.IF___V17*/ meltfptr[16];; @@ -16793,7 +16997,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[15] = /*_.PROGN___V19*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4712:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4714:/ clear"); /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V17*/ meltfptr[16] = 0; @@ -16808,7 +17012,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4713:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4715:/ cppif.then"); /*^block */ /*anyblock */ { @@ -16821,7 +17025,7 @@ lab_endgetargs:; ( /*_.CURFORMAL__V15*/ meltfptr[13]), (melt_ptr_t) (( /*!CLASS_FORMAL_BINDING */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:4713:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4715:/ cond"); /*cond */ if ( /*_#IS_A__L9*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -16829,7 +17033,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4713:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4715:/ cond.else"); /*^block */ /*anyblock */ @@ -16843,7 +17047,7 @@ lab_endgetargs:; melt_assert_failed (("check curformal"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4713) ? (4713) : __LINE__, + (4715) ? (4715) : __LINE__, __FUNCTION__); ; } @@ -16859,7 +17063,7 @@ lab_endgetargs:; /*_.IFCPP___V20*/ meltfptr[16] = /*_.IFELSE___V21*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4713:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4715:/ clear"); /*clear *//*_#IS_A__L9*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IFELSE___V21*/ meltfptr[17] = 0; @@ -16870,7 +17074,7 @@ lab_endgetargs:; /*_.IFCPP___V20*/ meltfptr[16] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4714:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4716:/ quasiblock"); /*^cond */ @@ -16898,7 +17102,7 @@ lab_endgetargs:; /*_.FSYMB__V22*/ meltfptr[17] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4715:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4717:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -16923,7 +17127,7 @@ lab_endgetargs:; /*_.FTYPE__V23*/ meltfptr[22] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4716:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4718:/ quasiblock"); /*_.NAMBUF__V25*/ meltfptr[24] = @@ -16931,7 +17135,7 @@ lab_endgetargs:; meltgc_new_strbuf ((meltobject_ptr_t) (( /*!DISCR_STRBUF */ meltfrout->tabval[3])), (const char *) 0);; - MELT_LOCATION ("warmelt-outobj.melt:4718:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4720:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -16954,7 +17158,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4719:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4721:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -16981,7 +17185,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4719:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4721:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.NAMBUF__V25*/ meltfptr[24]), melt_string_str ((melt_ptr_t) @@ -17000,7 +17204,7 @@ lab_endgetargs:; /*_.LET___V24*/ meltfptr[23] = /*_.STRBUF2STRING__V28*/ meltfptr[27];; - MELT_LOCATION ("warmelt-outobj.melt:4716:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4718:/ clear"); /*clear *//*_.NAMBUF__V25*/ meltfptr[24] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V26*/ meltfptr[25] = 0; @@ -17011,7 +17215,7 @@ lab_endgetargs:; /*_.GENSY__V29*/ meltfptr[24] = /*_.LET___V24*/ meltfptr[23];; { - MELT_LOCATION ("warmelt-outobj.melt:4722:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4724:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.REPLMAP__V3*/ meltfptr[2]), (meltobject_ptr_t) ( /*_.FSYMB__V22*/ @@ -17022,7 +17226,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4723:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4725:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17048,7 +17252,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4723:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4725:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L10*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -17063,7 +17267,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4723:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4725:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17077,7 +17281,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4723; + argtab[2].meltbp_long = 4725; /*^apply.arg */ argtab[3].meltbp_cstring = "substitute_formals_for_syntest updated replmap="; @@ -17111,7 +17315,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V32*/ meltfptr[27];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4723:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4725:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L11*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V32*/ meltfptr[27] = 0; @@ -17124,7 +17328,7 @@ lab_endgetargs:; /*_.IF___V31*/ meltfptr[26] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4723:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4725:/ quasiblock"); /*_.PROGN___V33*/ meltfptr[27] = /*_.IF___V31*/ meltfptr[26];; @@ -17133,7 +17337,7 @@ lab_endgetargs:; /*_.IFCPP___V30*/ meltfptr[25] = /*_.PROGN___V33*/ meltfptr[27];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4723:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4725:/ clear"); /*clear *//*_#MELT_NEED_DBG__L10*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V31*/ meltfptr[26] = 0; @@ -17146,7 +17350,7 @@ lab_endgetargs:; /*_.IFCPP___V30*/ meltfptr[25] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4724:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4726:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -17171,7 +17375,7 @@ lab_endgetargs:; /*_.CTYPE_CNAME__V34*/ meltfptr[26] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4724:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4726:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17200,13 +17404,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4725:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4727:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (1), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4714:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4716:/ clear"); /*clear *//*_.FSYMB__V22*/ meltfptr[17] = 0; /*^clear */ /*clear *//*_.FTYPE__V23*/ meltfptr[22] = 0; @@ -17226,7 +17430,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:4709:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4711:/ clear"); /*clear *//*_.CURFORMAL__V15*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_#IX__L6*/ meltfnum[0] = 0; @@ -17236,7 +17440,7 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V20*/ meltfptr[16] = 0; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-outobj.melt:4704:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4706:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -17340,7 +17544,7 @@ meltrout_123_warmelt_outobj_EXPAND_TUPLE_FOR_SYNTEST (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:4730:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:4732:/ getarg"); /*_.SBUF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -17380,7 +17584,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4731:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4733:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17406,7 +17610,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4731:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4733:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -17421,7 +17625,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4731:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4733:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17434,7 +17638,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4731; + argtab[2].meltbp_long = 4733; /*^apply.arg */ argtab[3].meltbp_cstring = "expand_tuple_for_syntest sbuf="; /*^apply.arg */ @@ -17465,7 +17669,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4731:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4733:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0; @@ -17478,7 +17682,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4731:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4733:/ quasiblock"); /*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];; @@ -17487,7 +17691,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4731:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4733:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V7*/ meltfptr[6] = 0; @@ -17518,7 +17722,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4735:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4737:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17544,7 +17748,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4735:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4737:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -17559,7 +17763,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4735:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4737:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17573,7 +17777,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4735; + argtab[2].meltbp_long = 4737; /*^apply.arg */ argtab[3].meltbp_cstring = "expand_tuple_for_syntest curexpan="; @@ -17595,7 +17799,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4735:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4737:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L5*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V13*/ meltfptr[12] = 0; @@ -17608,7 +17812,7 @@ lab_endgetargs:; /*_.IF___V12*/ meltfptr[11] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4735:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4737:/ quasiblock"); /*_.PROGN___V14*/ meltfptr[12] = /*_.IF___V12*/ meltfptr[11];; @@ -17617,7 +17821,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[7] = /*_.PROGN___V14*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4735:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4737:/ clear"); /*clear *//*_#MELT_NEED_DBG__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V12*/ meltfptr[11] = 0; @@ -17630,14 +17834,14 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[7] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4736:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4738:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_OBJECT__L6*/ meltfnum[4] = (melt_magic_discr ((melt_ptr_t) ( /*_.CUREXPAN__V10*/ meltfptr[6])) == MELTOBMAG_OBJECT);; - MELT_LOCATION ("warmelt-outobj.melt:4736:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4738:/ cond"); /*cond */ if ( /*_#IS_OBJECT__L6*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -17645,7 +17849,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:4737:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4739:/ quasiblock"); /*_.CUREPL__V17*/ meltfptr[16] = @@ -17655,7 +17859,7 @@ lab_endgetargs:; (meltobject_ptr_t) ( /*_.CUREXPAN__V10*/ meltfptr[6]));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4739:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4741:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17681,7 +17885,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4739:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4741:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -17697,7 +17901,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-outobj.melt:4739:/ checksignal"); + ("warmelt-outobj.melt:4741:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17711,7 +17915,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4739; + argtab[2].meltbp_long = 4741; /*^apply.arg */ argtab[3].meltbp_cstring = "expand_tuple_for_syntest curepl="; @@ -17733,7 +17937,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V20*/ meltfptr[19];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4739:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4741:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V20*/ meltfptr[19] = 0; @@ -17746,7 +17950,7 @@ lab_endgetargs:; /*_.IF___V19*/ meltfptr[18] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4739:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4741:/ quasiblock"); /*_.PROGN___V21*/ meltfptr[19] = @@ -17757,7 +17961,7 @@ lab_endgetargs:; /*_.PROGN___V21*/ meltfptr[19];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4739:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4741:/ clear"); /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V19*/ meltfptr[18] = 0; @@ -17770,7 +17974,7 @@ lab_endgetargs:; /*_.IFCPP___V18*/ meltfptr[17] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4740:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4742:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -17782,7 +17986,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:4741:/ checksignal"); + ("warmelt-outobj.melt:4743:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17806,7 +18010,7 @@ lab_endgetargs:; /*_.ADD2OUT__V23*/ meltfptr[19];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4740:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4742:/ clear"); /*clear *//*_.ADD2OUT__V23*/ meltfptr[19] = 0; } ; @@ -17818,7 +18022,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:4742:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4744:/ quasiblock"); /*^cond */ @@ -17847,7 +18051,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4744:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4746:/ cppif.then"); /*^block */ /*anyblock */ { @@ -17873,7 +18077,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4744:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4746:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L9*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -17889,7 +18093,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-outobj.melt:4744:/ checksignal"); + ("warmelt-outobj.melt:4746:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -17904,7 +18108,7 @@ lab_endgetargs:; argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4744; + argtab[2].meltbp_long = 4746; /*^apply.arg */ argtab[3].meltbp_cstring = "expand_tuple_for_syntest no curepl for curexpan="; @@ -17938,7 +18142,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:4744:/ clear"); + ("warmelt-outobj.melt:4746:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L10*/ meltfnum[0] = 0; /*^clear */ @@ -17954,7 +18158,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:4744:/ quasiblock"); + ("warmelt-outobj.melt:4746:/ quasiblock"); /*_.PROGN___V28*/ meltfptr[26] = @@ -17965,7 +18169,7 @@ lab_endgetargs:; /*_.PROGN___V28*/ meltfptr[26];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4744:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4746:/ clear"); /*clear *//*_#MELT_NEED_DBG__L9*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IF___V26*/ meltfptr[25] = 0; @@ -17980,7 +18184,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4745:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4747:/ locexp"); melt_warning_str (0, (melt_ptr_t) ( /*_.LOC__V5*/ meltfptr[4]), @@ -17992,7 +18196,7 @@ lab_endgetargs:; /*_.IFELSE___V22*/ meltfptr[18] = /*_.IFCPP___V25*/ meltfptr[24];; - MELT_LOCATION ("warmelt-outobj.melt:4742:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4744:/ clear"); /*clear *//*_.CUREXPNAM__V24*/ meltfptr[19] = 0; /*^clear */ /*clear *//*_.IFCPP___V25*/ meltfptr[24] = 0; @@ -18004,7 +18208,7 @@ lab_endgetargs:; /*_.LET___V16*/ meltfptr[12] = /*_.IFELSE___V22*/ meltfptr[18];; - MELT_LOCATION ("warmelt-outobj.melt:4737:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4739:/ clear"); /*clear *//*_.CUREPL__V17*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.IFCPP___V18*/ meltfptr[17] = 0; @@ -18014,7 +18218,7 @@ lab_endgetargs:; /*_.LET___V16*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4736:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4738:/ clear"); /*clear *//*_.LET___V16*/ meltfptr[12] = 0; } ; @@ -18026,7 +18230,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:4748:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4750:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -18049,7 +18253,7 @@ lab_endgetargs:; /*_.ADD2OUT__V29*/ meltfptr[25];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4736:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4738:/ clear"); /*clear *//*_.ADD2OUT__V29*/ meltfptr[25] = 0; } ; @@ -18061,7 +18265,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:4732:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4734:/ clear"); /*clear *//*_.CUREXPAN__V10*/ meltfptr[6] = 0; /*^clear */ /*clear *//*_#PIX__L3*/ meltfnum[1] = 0; @@ -18075,7 +18279,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4750:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4752:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18101,7 +18305,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4750:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4752:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -18116,7 +18320,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4750:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4752:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -18130,7 +18334,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4750; + argtab[2].meltbp_long = 4752; /*^apply.arg */ argtab[3].meltbp_cstring = "expand_tuple_for_syntest done sbuf="; @@ -18151,7 +18355,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V32*/ meltfptr[24];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4750:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4752:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V32*/ meltfptr[24] = 0; @@ -18164,7 +18368,7 @@ lab_endgetargs:; /*_.IF___V31*/ meltfptr[19] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4750:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4752:/ quasiblock"); /*_.PROGN___V33*/ meltfptr[16] = /*_.IF___V31*/ meltfptr[19];; @@ -18173,7 +18377,7 @@ lab_endgetargs:; /*_.IFCPP___V30*/ meltfptr[26] = /*_.PROGN___V33*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4750:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4752:/ clear"); /*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V31*/ meltfptr[19] = 0; @@ -18186,14 +18390,26 @@ lab_endgetargs:; /*_.IFCPP___V30*/ meltfptr[26] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4730:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4732:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V30*/ meltfptr[26];; - MELT_LOCATION ("warmelt-outobj.melt:4730:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:4732:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -18290,7 +18506,7 @@ meltrout_124_warmelt_outobj_SYNTESTGEN_PRIMITIVE (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:4754:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:4756:/ getarg"); /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -18338,7 +18554,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4755:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4757:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18364,7 +18580,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4755:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4757:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -18379,7 +18595,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4755:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4757:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -18392,7 +18608,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4755; + argtab[2].meltbp_long = 4757; /*^apply.arg */ argtab[3].meltbp_cstring = "syntestgen_primitive recv="; /*^apply.arg */ @@ -18417,7 +18633,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4755:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4757:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0; @@ -18430,7 +18646,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4755:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4757:/ quasiblock"); /*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];; @@ -18439,7 +18655,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4755:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4757:/ clear"); /*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V7*/ meltfptr[6] = 0; @@ -18454,7 +18670,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4756:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4758:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18466,7 +18682,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_PRIMITIVE */ meltfrout-> tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:4756:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4758:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -18474,7 +18690,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4756:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4758:/ cond.else"); /*^block */ /*anyblock */ @@ -18488,7 +18704,7 @@ lab_endgetargs:; melt_assert_failed (("check recv"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4756) ? (4756) : __LINE__, __FUNCTION__); + (4758) ? (4758) : __LINE__, __FUNCTION__); ; } ; @@ -18503,7 +18719,7 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4756:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4758:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0; @@ -18516,7 +18732,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4757:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4759:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18527,7 +18743,7 @@ lab_endgetargs:; /*_#IS_A__L5*/ meltfnum[1] = melt_is_instance_of ((melt_ptr_t) ( /*_.GENDEV__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_SOURCE_GENERATOR_DEVICE */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-outobj.melt:4757:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4759:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -18535,7 +18751,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4757:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4759:/ cond.else"); /*^block */ /*anyblock */ @@ -18549,7 +18765,7 @@ lab_endgetargs:; melt_assert_failed (("check gendev"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4757) ? (4757) : __LINE__, __FUNCTION__); + (4759) ? (4759) : __LINE__, __FUNCTION__); ; } ; @@ -18564,7 +18780,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4757:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4759:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; @@ -18577,7 +18793,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4758:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4760:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18588,7 +18804,7 @@ lab_endgetargs:; /*_#IS_STRBUF__L6*/ meltfnum[2] = (melt_magic_discr ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3])) == MELTOBMAG_STRBUF);; - MELT_LOCATION ("warmelt-outobj.melt:4758:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4760:/ cond"); /*cond */ if ( /*_#IS_STRBUF__L6*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -18596,7 +18812,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4758:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4760:/ cond.else"); /*^block */ /*anyblock */ @@ -18610,7 +18826,7 @@ lab_endgetargs:; melt_assert_failed (("check sbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4758) ? (4758) : __LINE__, __FUNCTION__); + (4760) ? (4760) : __LINE__, __FUNCTION__); ; } ; @@ -18625,7 +18841,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[12] = /*_.IFELSE___V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4758:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4760:/ clear"); /*clear *//*_#IS_STRBUF__L6*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0; @@ -18638,7 +18854,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4759:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4761:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18650,7 +18866,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-outobj.melt:4759:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4761:/ cond"); /*cond */ if ( /*_#IS_A__L7*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -18658,7 +18874,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4759:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4761:/ cond.else"); /*^block */ /*anyblock */ @@ -18672,7 +18888,7 @@ lab_endgetargs:; melt_assert_failed (("check modctx"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4759) ? (4759) : __LINE__, __FUNCTION__); + (4761) ? (4761) : __LINE__, __FUNCTION__); ; } ; @@ -18687,7 +18903,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[14] = /*_.IFELSE___V17*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4759:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4761:/ clear"); /*clear *//*_#IS_A__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0; @@ -18698,7 +18914,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[14] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4760:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4762:/ quasiblock"); /*^cond */ @@ -18726,7 +18942,7 @@ lab_endgetargs:; /*_.DLOC__V18*/ meltfptr[16] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4761:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4763:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -18750,7 +18966,7 @@ lab_endgetargs:; /*_.PRIDEF__V19*/ meltfptr[18] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4762:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4764:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -18774,7 +18990,7 @@ lab_endgetargs:; /*_.PRIREP__V20*/ meltfptr[19] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4763:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4765:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -18799,7 +19015,7 @@ lab_endgetargs:; /*_.PRINAM__V21*/ meltfptr[20] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4764:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4766:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -18824,7 +19040,7 @@ lab_endgetargs:; /*_.PRIFORMALS__V22*/ meltfptr[21] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4765:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4767:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -18848,7 +19064,7 @@ lab_endgetargs:; /*_.SPRIM_EXPLOC__V23*/ meltfptr[22] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4765:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4767:/ cond"); /*cond */ if ( /*_.SPRIM_EXPLOC__V23*/ meltfptr[22]) /*then */ { /*^cond.then */ @@ -18857,12 +19073,12 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4765:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4767:/ cond.else"); /*_.EXPLOC__V24*/ meltfptr[23] = /*_.DLOC__V18*/ meltfptr[16];; } ; - MELT_LOCATION ("warmelt-outobj.melt:4766:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4768:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -18887,7 +19103,7 @@ lab_endgetargs:; /*_.PRITYPE__V25*/ meltfptr[24] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4767:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4769:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -18933,7 +19149,7 @@ lab_endgetargs:; ( /*_#I__L10*/ meltfnum[9])));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4771:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4773:/ cppif.then"); /*^block */ /*anyblock */ { @@ -18945,7 +19161,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.PRIDEF__V19*/ meltfptr[18]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFPRIMITIVE */ meltfrout->tabval[6])));; - MELT_LOCATION ("warmelt-outobj.melt:4771:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4773:/ cond"); /*cond */ if ( /*_#IS_A__L11*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -18953,7 +19169,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4771:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4773:/ cond.else"); /*^block */ /*anyblock */ @@ -18967,7 +19183,7 @@ lab_endgetargs:; melt_assert_failed (("check pridef"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4771) ? (4771) : __LINE__, __FUNCTION__); + (4773) ? (4773) : __LINE__, __FUNCTION__); ; } ; @@ -18982,7 +19198,7 @@ lab_endgetargs:; /*_.IFCPP___V28*/ meltfptr[27] = /*_.IFELSE___V29*/ meltfptr[28];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4771:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4773:/ clear"); /*clear *//*_#IS_A__L11*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.IFELSE___V29*/ meltfptr[28] = 0; @@ -18995,7 +19211,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4772:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4774:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19005,7 +19221,7 @@ lab_endgetargs:; ; /*_#__L12*/ meltfnum[10] = (( /*_.PRIREP__V20*/ meltfptr[19]) == ( /*_.RECV__V2*/ meltfptr[1]));; - MELT_LOCATION ("warmelt-outobj.melt:4772:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4774:/ cond"); /*cond */ if ( /*_#__L12*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -19013,7 +19229,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4772:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4774:/ cond.else"); /*^block */ /*anyblock */ @@ -19027,7 +19243,7 @@ lab_endgetargs:; melt_assert_failed (("check prirep"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4772) ? (4772) : __LINE__, __FUNCTION__); + (4774) ? (4774) : __LINE__, __FUNCTION__); ; } ; @@ -19042,7 +19258,7 @@ lab_endgetargs:; /*_.IFCPP___V30*/ meltfptr[28] = /*_.IFELSE___V31*/ meltfptr[30];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4772:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4774:/ clear"); /*clear *//*_#__L12*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.IFELSE___V31*/ meltfptr[30] = 0; @@ -19053,7 +19269,7 @@ lab_endgetargs:; /*_.IFCPP___V30*/ meltfptr[28] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4773:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4775:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19073,14 +19289,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4774:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4776:/ locexp"); meltgc_add_strbuf_ccomment ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.PRINAM__V21*/ meltfptr[20]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:4775:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4777:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19100,12 +19316,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4776:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4778:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (1), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4777:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4779:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19129,13 +19345,13 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4779:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4781:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L13*/ meltfnum[10] = (( /*_.PRITYPE__V25*/ meltfptr[24]) != (( /*!CTYPE_VOID */ meltfrout->tabval[10])));; - MELT_LOCATION ("warmelt-outobj.melt:4779:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4781:/ cond"); /*cond */ if ( /*_#__L13*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -19143,7 +19359,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:4780:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4782:/ quasiblock"); /*^cond */ @@ -19171,7 +19387,7 @@ lab_endgetargs:; /*_.PRITYNAM__V37*/ meltfptr[36] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4782:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4784:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19199,14 +19415,14 @@ lab_endgetargs:; ; /*_.LET___V36*/ meltfptr[35] = /*_.ADD2OUT__V38*/ meltfptr[37];; - MELT_LOCATION ("warmelt-outobj.melt:4780:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4782:/ clear"); /*clear *//*_.PRITYNAM__V37*/ meltfptr[36] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V38*/ meltfptr[37] = 0; /*_.IF___V35*/ meltfptr[34] = /*_.LET___V36*/ meltfptr[35];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4779:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4781:/ clear"); /*clear *//*_.LET___V36*/ meltfptr[35] = 0; } ; @@ -19217,7 +19433,7 @@ lab_endgetargs:; /*_.IF___V35*/ meltfptr[34] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4785:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4787:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -19257,7 +19473,7 @@ lab_endgetargs:; /*_.OUTPUT_RAW_LOCATION__V40*/ meltfptr[37];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4785:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4787:/ clear"); /*clear *//*_.OUTPUT_RAW_LOCATION__V40*/ meltfptr[37] = 0; } ; @@ -19268,13 +19484,13 @@ lab_endgetargs:; /*_.IF___V39*/ meltfptr[36] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4786:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4788:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L14*/ meltfnum[13] = (( /*_.PRITYPE__V25*/ meltfptr[24]) != (( /*!CTYPE_VOID */ meltfrout->tabval[10])));; - MELT_LOCATION ("warmelt-outobj.melt:4786:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4788:/ cond"); /*cond */ if ( /*_#__L14*/ meltfnum[13]) /*then */ { /*^cond.then */ @@ -19282,7 +19498,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:4787:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4789:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19303,7 +19519,7 @@ lab_endgetargs:; /*_.IF___V41*/ meltfptr[35] = /*_.ADD2OUT__V42*/ meltfptr[37];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4786:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4788:/ clear"); /*clear *//*_.ADD2OUT__V42*/ meltfptr[37] = 0; } ; @@ -19316,7 +19532,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4788:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4790:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19342,7 +19558,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4788:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4790:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[14]) /*then */ { /*^cond.then */ @@ -19357,7 +19573,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4788:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4790:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19371,7 +19587,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4788; + argtab[2].meltbp_long = 4790; /*^apply.arg */ argtab[3].meltbp_cstring = "syntestgen_primitive primexpan="; /*^apply.arg */ @@ -19391,7 +19607,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V45*/ meltfptr[44];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4788:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4790:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V45*/ meltfptr[44] = 0; @@ -19404,7 +19620,7 @@ lab_endgetargs:; /*_.IF___V44*/ meltfptr[43] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4788:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4790:/ quasiblock"); /*_.PROGN___V46*/ meltfptr[44] = /*_.IF___V44*/ meltfptr[43];; @@ -19413,7 +19629,7 @@ lab_endgetargs:; /*_.IFCPP___V43*/ meltfptr[37] = /*_.PROGN___V46*/ meltfptr[44];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4788:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4790:/ clear"); /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[14] = 0; /*^clear */ /*clear *//*_.IF___V44*/ meltfptr[43] = 0; @@ -19426,7 +19642,7 @@ lab_endgetargs:; /*_.IFCPP___V43*/ meltfptr[37] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4789:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4791:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19450,13 +19666,13 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4791:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4793:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L17*/ meltfnum[15] = (( /*_.PRITYPE__V25*/ meltfptr[24]) != (( /*!CTYPE_VOID */ meltfrout->tabval[10])));; - MELT_LOCATION ("warmelt-outobj.melt:4791:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4793:/ cond"); /*cond */ if ( /*_#__L17*/ meltfnum[15]) /*then */ { /*^cond.then */ @@ -19464,7 +19680,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:4792:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4794:/ quasiblock"); /*^cond */ @@ -19492,7 +19708,7 @@ lab_endgetargs:; /*_.PRITYNAM__V50*/ meltfptr[49] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4794:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4796:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19512,12 +19728,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4795:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4797:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (2), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4796:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4798:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19542,7 +19758,7 @@ lab_endgetargs:; ; /*_.LET___V49*/ meltfptr[48] = /*_.ADD2OUT__V52*/ meltfptr[51];; - MELT_LOCATION ("warmelt-outobj.melt:4792:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4794:/ clear"); /*clear *//*_.PRITYNAM__V50*/ meltfptr[49] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V51*/ meltfptr[50] = 0; @@ -19551,7 +19767,7 @@ lab_endgetargs:; /*_.IF___V48*/ meltfptr[44] = /*_.LET___V49*/ meltfptr[48];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4791:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4793:/ clear"); /*clear *//*_.LET___V49*/ meltfptr[48] = 0; } ; @@ -19562,7 +19778,7 @@ lab_endgetargs:; /*_.IF___V48*/ meltfptr[44] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4799:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4801:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19582,12 +19798,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4800:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4802:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (1), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4801:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4803:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19607,14 +19823,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4802:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4804:/ locexp"); meltgc_add_strbuf_ccomment ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.PRINAM__V21*/ meltfptr[20]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:4803:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4805:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19634,13 +19850,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4804:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4806:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4760:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4762:/ clear"); /*clear *//*_.DLOC__V18*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.PRIDEF__V19*/ meltfptr[18] = 0; @@ -19700,7 +19916,7 @@ lab_endgetargs:; /*clear *//*_.ADD2OUT__V54*/ meltfptr[50] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V55*/ meltfptr[51] = 0; - MELT_LOCATION ("warmelt-outobj.melt:4754:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4756:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -19803,7 +20019,7 @@ meltrout_125_warmelt_outobj_SYNTESTGEN_CITERATOR (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:4814:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ getarg"); /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -19851,7 +20067,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4815:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4817:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19877,7 +20093,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4815:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4817:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -19892,7 +20108,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4815:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4817:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -19905,7 +20121,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4815; + argtab[2].meltbp_long = 4817; /*^apply.arg */ argtab[3].meltbp_cstring = "syntestgen_citerator recv="; /*^apply.arg */ @@ -19930,7 +20146,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4815:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4817:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0; @@ -19943,7 +20159,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4815:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4817:/ quasiblock"); /*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];; @@ -19952,7 +20168,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4815:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4817:/ clear"); /*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V7*/ meltfptr[6] = 0; @@ -19967,7 +20183,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4816:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4818:/ cppif.then"); /*^block */ /*anyblock */ { @@ -19979,7 +20195,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_CITERATOR */ meltfrout-> tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:4816:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4818:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -19987,7 +20203,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4816:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4818:/ cond.else"); /*^block */ /*anyblock */ @@ -20001,7 +20217,7 @@ lab_endgetargs:; melt_assert_failed (("check recv"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4816) ? (4816) : __LINE__, __FUNCTION__); + (4818) ? (4818) : __LINE__, __FUNCTION__); ; } ; @@ -20016,7 +20232,7 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4816:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4818:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0; @@ -20029,7 +20245,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4817:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4819:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20040,7 +20256,7 @@ lab_endgetargs:; /*_#IS_A__L5*/ meltfnum[1] = melt_is_instance_of ((melt_ptr_t) ( /*_.GENDEV__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_SOURCE_GENERATOR_DEVICE */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-outobj.melt:4817:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4819:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -20048,7 +20264,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4817:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4819:/ cond.else"); /*^block */ /*anyblock */ @@ -20062,7 +20278,7 @@ lab_endgetargs:; melt_assert_failed (("check gendev"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4817) ? (4817) : __LINE__, __FUNCTION__); + (4819) ? (4819) : __LINE__, __FUNCTION__); ; } ; @@ -20077,7 +20293,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4817:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4819:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; @@ -20090,7 +20306,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4818:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4820:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20101,7 +20317,7 @@ lab_endgetargs:; /*_#IS_STRBUF__L6*/ meltfnum[2] = (melt_magic_discr ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3])) == MELTOBMAG_STRBUF);; - MELT_LOCATION ("warmelt-outobj.melt:4818:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4820:/ cond"); /*cond */ if ( /*_#IS_STRBUF__L6*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -20109,7 +20325,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4818:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4820:/ cond.else"); /*^block */ /*anyblock */ @@ -20123,7 +20339,7 @@ lab_endgetargs:; melt_assert_failed (("check sbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4818) ? (4818) : __LINE__, __FUNCTION__); + (4820) ? (4820) : __LINE__, __FUNCTION__); ; } ; @@ -20138,7 +20354,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[12] = /*_.IFELSE___V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4818:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4820:/ clear"); /*clear *//*_#IS_STRBUF__L6*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0; @@ -20151,7 +20367,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4819:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4821:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20163,7 +20379,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-outobj.melt:4819:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4821:/ cond"); /*cond */ if ( /*_#IS_A__L7*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -20171,7 +20387,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4819:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4821:/ cond.else"); /*^block */ /*anyblock */ @@ -20185,7 +20401,7 @@ lab_endgetargs:; melt_assert_failed (("check modctx"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4819) ? (4819) : __LINE__, __FUNCTION__); + (4821) ? (4821) : __LINE__, __FUNCTION__); ; } ; @@ -20200,7 +20416,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[14] = /*_.IFELSE___V17*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4819:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4821:/ clear"); /*clear *//*_#IS_A__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0; @@ -20211,7 +20427,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[14] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4820:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4822:/ quasiblock"); /*^cond */ @@ -20239,7 +20455,7 @@ lab_endgetargs:; /*_.DLOC__V18*/ meltfptr[16] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4821:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4823:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20263,7 +20479,7 @@ lab_endgetargs:; /*_.CITDEF__V19*/ meltfptr[18] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4822:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4824:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20287,7 +20503,7 @@ lab_endgetargs:; /*_.CITREP__V20*/ meltfptr[19] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4823:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4825:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20312,7 +20528,7 @@ lab_endgetargs:; /*_.CITNAM__V21*/ meltfptr[20] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4824:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4826:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20337,7 +20553,7 @@ lab_endgetargs:; /*_.CITSTAFORMALS__V22*/ meltfptr[21] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4825:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4827:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20362,7 +20578,7 @@ lab_endgetargs:; /*_.CITSTATE__V23*/ meltfptr[22] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4826:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4828:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20387,7 +20603,7 @@ lab_endgetargs:; /*_.CITBODFORMALS__V24*/ meltfptr[23] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4827:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4829:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20412,7 +20628,7 @@ lab_endgetargs:; /*_.CITEXPBEFO__V25*/ meltfptr[24] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4828:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4830:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20456,7 +20672,7 @@ lab_endgetargs:; (meltgc_new_mapobjects ((meltobject_ptr_t) (( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[6])), ( /*_#I__L10*/ meltfnum[9])));; - MELT_LOCATION ("warmelt-outobj.melt:4830:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4832:/ quasiblock"); /*_.NBUF__V29*/ meltfptr[28] = @@ -20464,7 +20680,7 @@ lab_endgetargs:; meltgc_new_strbuf ((meltobject_ptr_t) (( /*!DISCR_STRBUF */ meltfrout->tabval[7])), (const char *) 0);; - MELT_LOCATION ("warmelt-outobj.melt:4832:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4834:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -20486,7 +20702,7 @@ lab_endgetargs:; ""), argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4833:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4835:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20513,7 +20729,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4833:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4835:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.NBUF__V29*/ meltfptr[28]), melt_string_str ((melt_ptr_t) ( /*_.NAMED_NAME__V31*/ @@ -20529,7 +20745,7 @@ lab_endgetargs:; /*_.LET___V28*/ meltfptr[27] = /*_.STRBUF2STRING__V32*/ meltfptr[31];; - MELT_LOCATION ("warmelt-outobj.melt:4830:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4832:/ clear"); /*clear *//*_.NBUF__V29*/ meltfptr[28] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V30*/ meltfptr[29] = 0; @@ -20538,7 +20754,7 @@ lab_endgetargs:; /*^clear */ /*clear *//*_.STRBUF2STRING__V32*/ meltfptr[31] = 0; /*_.REPSTATNAM__V33*/ meltfptr[28] = /*_.LET___V28*/ meltfptr[27];; - MELT_LOCATION ("warmelt-outobj.melt:4835:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4837:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20562,7 +20778,7 @@ lab_endgetargs:; /*_.SCITERDEF_BEFORELOC__V34*/ meltfptr[29] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4835:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4837:/ cond"); /*cond */ if ( /*_.SCITERDEF_BEFORELOC__V34*/ meltfptr[29]) /*then */ { /*^cond.then */ @@ -20571,12 +20787,12 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4835:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4837:/ cond.else"); /*_.BEFLOC__V35*/ meltfptr[30] = /*_.DLOC__V18*/ meltfptr[16];; } ; - MELT_LOCATION ("warmelt-outobj.melt:4836:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4838:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -20600,7 +20816,7 @@ lab_endgetargs:; /*_.SCITERDEF_AFTERLOC__V36*/ meltfptr[31] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4836:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4838:/ cond"); /*cond */ if ( /*_.SCITERDEF_AFTERLOC__V36*/ meltfptr[31]) /*then */ { /*^cond.then */ @@ -20609,14 +20825,14 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4836:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4838:/ cond.else"); /*_.AFTLOC__V37*/ meltfptr[36] = /*_.DLOC__V18*/ meltfptr[16];; } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4838:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4840:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20628,7 +20844,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CITDEF__V19*/ meltfptr[18]), (melt_ptr_t) (( /*!CLASS_SOURCE_DEFCITERATOR */ meltfrout->tabval[10])));; - MELT_LOCATION ("warmelt-outobj.melt:4838:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4840:/ cond"); /*cond */ if ( /*_#IS_A__L11*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -20636,7 +20852,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4838:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4840:/ cond.else"); /*^block */ /*anyblock */ @@ -20650,7 +20866,7 @@ lab_endgetargs:; melt_assert_failed (("check citdef"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4838) ? (4838) : __LINE__, __FUNCTION__); + (4840) ? (4840) : __LINE__, __FUNCTION__); ; } ; @@ -20665,7 +20881,7 @@ lab_endgetargs:; /*_.IFCPP___V38*/ meltfptr[37] = /*_.IFELSE___V39*/ meltfptr[38];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4838:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4840:/ clear"); /*clear *//*_#IS_A__L11*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.IFELSE___V39*/ meltfptr[38] = 0; @@ -20678,7 +20894,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4839:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4841:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20688,7 +20904,7 @@ lab_endgetargs:; ; /*_#__L12*/ meltfnum[10] = (( /*_.CITREP__V20*/ meltfptr[19]) == ( /*_.RECV__V2*/ meltfptr[1]));; - MELT_LOCATION ("warmelt-outobj.melt:4839:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4841:/ cond"); /*cond */ if ( /*_#__L12*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -20696,7 +20912,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4839:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4841:/ cond.else"); /*^block */ /*anyblock */ @@ -20710,7 +20926,7 @@ lab_endgetargs:; melt_assert_failed (("check citrep"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4839) ? (4839) : __LINE__, __FUNCTION__); + (4841) ? (4841) : __LINE__, __FUNCTION__); ; } ; @@ -20725,7 +20941,7 @@ lab_endgetargs:; /*_.IFCPP___V40*/ meltfptr[38] = /*_.IFELSE___V41*/ meltfptr[40];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4839:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4841:/ clear"); /*clear *//*_#__L12*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.IFELSE___V41*/ meltfptr[40] = 0; @@ -20736,7 +20952,7 @@ lab_endgetargs:; /*_.IFCPP___V40*/ meltfptr[38] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4840:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4842:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -20756,14 +20972,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4841:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4843:/ locexp"); meltgc_add_strbuf_ccomment ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.CITNAM__V21*/ meltfptr[20]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:4842:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4844:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -20783,12 +20999,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4843:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4845:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (1), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4844:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4846:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -20828,7 +21044,7 @@ lab_endgetargs:; /*_.OUTPUT_RAW_LOCATION__V45*/ meltfptr[44];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4844:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4846:/ clear"); /*clear *//*_.OUTPUT_RAW_LOCATION__V45*/ meltfptr[44] = 0; } ; @@ -20841,7 +21057,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4845:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4847:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.REPLMAP__V27*/ meltfptr[26]), (meltobject_ptr_t) ( /*_.CITSTATE__V23*/ @@ -20852,7 +21068,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4846:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4848:/ cppif.then"); /*^block */ /*anyblock */ { @@ -20878,7 +21094,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4846:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4848:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L13*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -20893,7 +21109,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4846:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4848:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -20907,7 +21123,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4846; + argtab[2].meltbp_long = 4848; /*^apply.arg */ argtab[3].meltbp_cstring = "syntestgen_citerator replmap="; /*^apply.arg */ @@ -20927,7 +21143,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V48*/ meltfptr[47];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4846:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4848:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L14*/ meltfnum[13] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V48*/ meltfptr[47] = 0; @@ -20940,7 +21156,7 @@ lab_endgetargs:; /*_.IF___V47*/ meltfptr[46] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4846:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4848:/ quasiblock"); /*_.PROGN___V49*/ meltfptr[47] = /*_.IF___V47*/ meltfptr[46];; @@ -20949,7 +21165,7 @@ lab_endgetargs:; /*_.IFCPP___V46*/ meltfptr[44] = /*_.PROGN___V49*/ meltfptr[47];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4846:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4848:/ clear"); /*clear *//*_#MELT_NEED_DBG__L13*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.IF___V47*/ meltfptr[46] = 0; @@ -20962,7 +21178,7 @@ lab_endgetargs:; /*_.IFCPP___V46*/ meltfptr[44] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4847:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4849:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -20987,7 +21203,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4848:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4850:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21012,7 +21228,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4849:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4851:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -21052,7 +21268,7 @@ lab_endgetargs:; /*_.OUTPUT_RAW_LOCATION__V53*/ meltfptr[52];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4849:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4851:/ clear"); /*clear *//*_.OUTPUT_RAW_LOCATION__V53*/ meltfptr[52] = 0; } ; @@ -21063,7 +21279,7 @@ lab_endgetargs:; /*_.IF___V52*/ meltfptr[51] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4850:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4852:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21089,7 +21305,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4851:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4853:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21115,7 +21331,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4851:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4853:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[13]) /*then */ { /*^cond.then */ @@ -21130,7 +21346,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4851:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4853:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21144,7 +21360,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4851; + argtab[2].meltbp_long = 4853; /*^apply.arg */ argtab[3].meltbp_cstring = "syntestgen_citerator after start formals replmap="; @@ -21165,7 +21381,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V57*/ meltfptr[56];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4851:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4853:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V57*/ meltfptr[56] = 0; @@ -21178,7 +21394,7 @@ lab_endgetargs:; /*_.IF___V56*/ meltfptr[55] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4851:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4853:/ quasiblock"); /*_.PROGN___V58*/ meltfptr[56] = /*_.IF___V56*/ meltfptr[55];; @@ -21187,7 +21403,7 @@ lab_endgetargs:; /*_.IFCPP___V55*/ meltfptr[54] = /*_.PROGN___V58*/ meltfptr[56];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4851:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4853:/ clear"); /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[13] = 0; /*^clear */ /*clear *//*_.IF___V56*/ meltfptr[55] = 0; @@ -21202,12 +21418,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4852:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4854:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4853:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4855:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21232,14 +21448,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4854:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4856:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4855:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4857:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21265,7 +21481,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4855:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4857:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -21280,7 +21496,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4855:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4857:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21294,7 +21510,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4855; + argtab[2].meltbp_long = 4857; /*^apply.arg */ argtab[3].meltbp_cstring = "syntestgen_citerator citbodformals="; @@ -21315,7 +21531,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V62*/ meltfptr[61];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4855:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4857:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[13] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V62*/ meltfptr[61] = 0; @@ -21328,7 +21544,7 @@ lab_endgetargs:; /*_.IF___V61*/ meltfptr[60] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4855:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4857:/ quasiblock"); /*_.PROGN___V63*/ meltfptr[61] = /*_.IF___V61*/ meltfptr[60];; @@ -21337,7 +21553,7 @@ lab_endgetargs:; /*_.IFCPP___V60*/ meltfptr[56] = /*_.PROGN___V63*/ meltfptr[61];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4855:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4857:/ clear"); /*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.IF___V61*/ meltfptr[60] = 0; @@ -21370,7 +21586,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4859:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4861:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21396,7 +21612,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4859:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4861:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L20*/ meltfnum[10]) /*then */ { /*^cond.then */ @@ -21411,7 +21627,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4859:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4861:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21425,7 +21641,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4859; + argtab[2].meltbp_long = 4861; /*^apply.arg */ argtab[3].meltbp_cstring = "syntestgen_citerator curbodformbind="; @@ -21447,7 +21663,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V67*/ meltfptr[66];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4859:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4861:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L21*/ meltfnum[20] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V67*/ meltfptr[66] = 0; @@ -21460,7 +21676,7 @@ lab_endgetargs:; /*_.IF___V66*/ meltfptr[65] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4859:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4861:/ quasiblock"); /*_.PROGN___V68*/ meltfptr[66] = /*_.IF___V66*/ meltfptr[65];; @@ -21469,7 +21685,7 @@ lab_endgetargs:; /*_.IFCPP___V65*/ meltfptr[61] = /*_.PROGN___V68*/ meltfptr[66];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4859:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4861:/ clear"); /*clear *//*_#MELT_NEED_DBG__L20*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.IF___V66*/ meltfptr[65] = 0; @@ -21482,10 +21698,10 @@ lab_endgetargs:; /*_.IFCPP___V65*/ meltfptr[61] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4860:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4862:/ quasiblock"); - MELT_LOCATION ("warmelt-outobj.melt:4861:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4863:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -21520,7 +21736,7 @@ lab_endgetargs:; meltfptr[65]));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4864:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4866:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21546,7 +21762,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4864:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4866:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L22*/ meltfnum[20]) /*then */ { /*^cond.then */ @@ -21561,7 +21777,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4864:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4866:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21575,7 +21791,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4864; + argtab[2].meltbp_long = 4866; /*^apply.arg */ argtab[3].meltbp_cstring = "syntestgen_citerator nambodformal="; @@ -21597,7 +21813,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V73*/ meltfptr[72];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4864:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4866:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L23*/ meltfnum[10] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V73*/ meltfptr[72] = 0; @@ -21610,7 +21826,7 @@ lab_endgetargs:; /*_.IF___V72*/ meltfptr[71] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4864:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4866:/ quasiblock"); /*_.PROGN___V74*/ meltfptr[72] = /*_.IF___V72*/ meltfptr[71];; @@ -21619,7 +21835,7 @@ lab_endgetargs:; /*_.IFCPP___V71*/ meltfptr[70] = /*_.PROGN___V74*/ meltfptr[72];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4864:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4866:/ clear"); /*clear *//*_#MELT_NEED_DBG__L22*/ meltfnum[20] = 0; /*^clear */ /*clear *//*_.IF___V72*/ meltfptr[71] = 0; @@ -21634,7 +21850,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4865:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4867:/ cppif.then"); /*^block */ /*anyblock */ { @@ -21650,7 +21866,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4865:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4867:/ cond.else"); /*^block */ /*anyblock */ @@ -21664,7 +21880,7 @@ lab_endgetargs:; melt_assert_failed (("check nambodformal"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4865) ? (4865) : __LINE__, + (4867) ? (4867) : __LINE__, __FUNCTION__); ; } @@ -21680,7 +21896,7 @@ lab_endgetargs:; /*_.IFCPP___V75*/ meltfptr[71] = /*_.IFELSE___V76*/ meltfptr[72];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4865:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4867:/ clear"); /*clear *//*_.IFELSE___V76*/ meltfptr[72] = 0; } @@ -21689,7 +21905,7 @@ lab_endgetargs:; /*_.IFCPP___V75*/ meltfptr[71] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4866:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4868:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21715,13 +21931,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4867:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4869:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4860:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4862:/ clear"); /*clear *//*_.CURBODFORMAL__V69*/ meltfptr[65] = 0; /*^clear */ /*clear *//*_.NAMBODFORMAL__V70*/ meltfptr[66] = 0; @@ -21737,7 +21953,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:4856:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4858:/ clear"); /*clear *//*_.CURBODFORMBIND__V64*/ meltfptr[60] = 0; /*^clear */ /*clear *//*_#BODFORMIX__L19*/ meltfnum[13] = 0; @@ -21745,7 +21961,7 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V65*/ meltfptr[61] = 0; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-outobj.melt:4869:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4871:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -21785,7 +22001,7 @@ lab_endgetargs:; /*_.OUTPUT_RAW_LOCATION__V79*/ meltfptr[66];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4869:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4871:/ clear"); /*clear *//*_.OUTPUT_RAW_LOCATION__V79*/ meltfptr[66] = 0; } ; @@ -21796,7 +22012,7 @@ lab_endgetargs:; /*_.IF___V78*/ meltfptr[65] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4870:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4872:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21822,12 +22038,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4871:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4873:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4872:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4874:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21847,14 +22063,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4873:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4875:/ locexp"); meltgc_add_strbuf_ccomment ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.CITNAM__V21*/ meltfptr[20]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:4874:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4876:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -21874,13 +22090,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4875:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4877:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4820:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4822:/ clear"); /*clear *//*_.DLOC__V18*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.CITDEF__V19*/ meltfptr[18] = 0; @@ -21952,7 +22168,7 @@ lab_endgetargs:; /*clear *//*_.ADD2OUT__V81*/ meltfptr[71] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V82*/ meltfptr[72] = 0; - MELT_LOCATION ("warmelt-outobj.melt:4814:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -22054,7 +22270,7 @@ meltrout_126_warmelt_outobj_SYNTESTGEN_CMATCHER (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:4882:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ getarg"); /*_.RECV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -22102,7 +22318,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4883:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4885:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22128,7 +22344,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4883:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4885:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -22143,7 +22359,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4883:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4885:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -22156,7 +22372,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4883; + argtab[2].meltbp_long = 4885; /*^apply.arg */ argtab[3].meltbp_cstring = "syntestgen_cmatcher recv="; /*^apply.arg */ @@ -22181,7 +22397,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4883:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4885:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0; @@ -22194,7 +22410,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4883:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4885:/ quasiblock"); /*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];; @@ -22203,7 +22419,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4883:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4885:/ clear"); /*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V7*/ meltfptr[6] = 0; @@ -22218,7 +22434,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4884:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4886:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22230,7 +22446,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.RECV__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_CMATCHER */ meltfrout-> tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:4884:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4886:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -22238,7 +22454,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4884:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4886:/ cond.else"); /*^block */ /*anyblock */ @@ -22252,7 +22468,7 @@ lab_endgetargs:; melt_assert_failed (("check recv"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4884) ? (4884) : __LINE__, __FUNCTION__); + (4886) ? (4886) : __LINE__, __FUNCTION__); ; } ; @@ -22267,7 +22483,7 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4884:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4886:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0; @@ -22280,7 +22496,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4885:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4887:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22291,7 +22507,7 @@ lab_endgetargs:; /*_#IS_A__L5*/ meltfnum[1] = melt_is_instance_of ((melt_ptr_t) ( /*_.GENDEV__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_SOURCE_GENERATOR_DEVICE */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-outobj.melt:4885:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4887:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -22299,7 +22515,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4885:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4887:/ cond.else"); /*^block */ /*anyblock */ @@ -22313,7 +22529,7 @@ lab_endgetargs:; melt_assert_failed (("check gendev"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4885) ? (4885) : __LINE__, __FUNCTION__); + (4887) ? (4887) : __LINE__, __FUNCTION__); ; } ; @@ -22328,7 +22544,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4885:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4887:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; @@ -22341,7 +22557,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4886:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4888:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22352,7 +22568,7 @@ lab_endgetargs:; /*_#IS_STRBUF__L6*/ meltfnum[2] = (melt_magic_discr ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3])) == MELTOBMAG_STRBUF);; - MELT_LOCATION ("warmelt-outobj.melt:4886:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4888:/ cond"); /*cond */ if ( /*_#IS_STRBUF__L6*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -22360,7 +22576,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4886:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4888:/ cond.else"); /*^block */ /*anyblock */ @@ -22374,7 +22590,7 @@ lab_endgetargs:; melt_assert_failed (("check sbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4886) ? (4886) : __LINE__, __FUNCTION__); + (4888) ? (4888) : __LINE__, __FUNCTION__); ; } ; @@ -22389,7 +22605,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[12] = /*_.IFELSE___V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4886:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4888:/ clear"); /*clear *//*_#IS_STRBUF__L6*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0; @@ -22402,7 +22618,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4887:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4889:/ cppif.then"); /*^block */ /*anyblock */ { @@ -22414,7 +22630,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[3])));; - MELT_LOCATION ("warmelt-outobj.melt:4887:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4889:/ cond"); /*cond */ if ( /*_#IS_A__L7*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -22422,7 +22638,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4887:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4889:/ cond.else"); /*^block */ /*anyblock */ @@ -22436,7 +22652,7 @@ lab_endgetargs:; melt_assert_failed (("check modctx"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4887) ? (4887) : __LINE__, __FUNCTION__); + (4889) ? (4889) : __LINE__, __FUNCTION__); ; } ; @@ -22451,7 +22667,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[14] = /*_.IFELSE___V17*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4887:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4889:/ clear"); /*clear *//*_#IS_A__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0; @@ -22462,7 +22678,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[14] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4888:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4890:/ quasiblock"); /*^cond */ @@ -22490,7 +22706,7 @@ lab_endgetargs:; /*_.DLOC__V18*/ meltfptr[16] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4889:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4891:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22514,7 +22730,7 @@ lab_endgetargs:; /*_.CMATDEF__V19*/ meltfptr[18] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4890:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4892:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22538,7 +22754,7 @@ lab_endgetargs:; /*_.CMATREP__V20*/ meltfptr[19] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4891:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4893:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22563,7 +22779,7 @@ lab_endgetargs:; /*_.CMATNAM__V21*/ meltfptr[20] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4892:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4894:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22587,7 +22803,7 @@ lab_endgetargs:; /*_.CMATINS__V22*/ meltfptr[21] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4893:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4895:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22611,7 +22827,7 @@ lab_endgetargs:; /*_.CMATBIND__V23*/ meltfptr[22] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4894:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4896:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22635,7 +22851,7 @@ lab_endgetargs:; /*_.CMATOUT__V24*/ meltfptr[23] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4895:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4897:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22660,7 +22876,7 @@ lab_endgetargs:; /*_.CMATSTATE__V25*/ meltfptr[24] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4896:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4898:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22685,7 +22901,7 @@ lab_endgetargs:; /*_.CMATTEST__V26*/ meltfptr[25] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4897:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4899:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22710,7 +22926,7 @@ lab_endgetargs:; /*_.CMATFILL__V27*/ meltfptr[26] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4898:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4900:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22735,7 +22951,7 @@ lab_endgetargs:; /*_.CMATOPER__V28*/ meltfptr[27] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4899:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4901:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22759,7 +22975,7 @@ lab_endgetargs:; /*_.SCMATDEF_TESTLOC__V29*/ meltfptr[28] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4899:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4901:/ cond"); /*cond */ if ( /*_.SCMATDEF_TESTLOC__V29*/ meltfptr[28]) /*then */ { /*^cond.then */ @@ -22768,12 +22984,12 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4899:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4901:/ cond.else"); /*_.TESTLOC__V30*/ meltfptr[29] = /*_.DLOC__V18*/ meltfptr[16];; } ; - MELT_LOCATION ("warmelt-outobj.melt:4900:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4902:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22797,7 +23013,7 @@ lab_endgetargs:; /*_.SCMATDEF_FILLLOC__V31*/ meltfptr[30] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4900:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4902:/ cond"); /*cond */ if ( /*_.SCMATDEF_FILLLOC__V31*/ meltfptr[30]) /*then */ { /*^cond.then */ @@ -22806,12 +23022,12 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4900:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4902:/ cond.else"); /*_.FILLLOC__V32*/ meltfptr[31] = /*_.DLOC__V18*/ meltfptr[16];; } ; - MELT_LOCATION ("warmelt-outobj.melt:4901:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4903:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22835,7 +23051,7 @@ lab_endgetargs:; /*_.SCMATDEF_OPERLOC__V33*/ meltfptr[32] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4901:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4903:/ cond"); /*cond */ if ( /*_.SCMATDEF_OPERLOC__V33*/ meltfptr[32]) /*then */ { /*^cond.then */ @@ -22844,7 +23060,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4901:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4903:/ cond.else"); /*_.OPERLOC__V34*/ meltfptr[33] = /*_.DLOC__V18*/ meltfptr[16];; } @@ -22878,7 +23094,7 @@ lab_endgetargs:; (meltgc_new_mapobjects ((meltobject_ptr_t) (( /*!DISCR_MAP_OBJECTS */ meltfrout->tabval[8])), ( /*_#I__L12*/ meltfnum[11])));; - MELT_LOCATION ("warmelt-outobj.melt:4905:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4907:/ quasiblock"); /*_.NBUF__V37*/ meltfptr[36] = @@ -22886,7 +23102,7 @@ lab_endgetargs:; meltgc_new_strbuf ((meltobject_ptr_t) (( /*!DISCR_STRBUF */ meltfrout->tabval[9])), (const char *) 0);; - MELT_LOCATION ("warmelt-outobj.melt:4907:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4909:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -22908,7 +23124,7 @@ lab_endgetargs:; ""), argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4908:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4910:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -22935,7 +23151,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4908:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4910:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.NBUF__V37*/ meltfptr[36]), melt_string_str ((melt_ptr_t) ( /*_.NAMED_NAME__V39*/ @@ -22951,7 +23167,7 @@ lab_endgetargs:; /*_.LET___V36*/ meltfptr[35] = /*_.STRBUF2STRING__V40*/ meltfptr[39];; - MELT_LOCATION ("warmelt-outobj.melt:4905:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4907:/ clear"); /*clear *//*_.NBUF__V37*/ meltfptr[36] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V38*/ meltfptr[37] = 0; @@ -22960,7 +23176,7 @@ lab_endgetargs:; /*^clear */ /*clear *//*_.STRBUF2STRING__V40*/ meltfptr[39] = 0; /*_.REPSTATNAM__V41*/ meltfptr[36] = /*_.LET___V36*/ meltfptr[35];; - MELT_LOCATION ("warmelt-outobj.melt:4911:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4913:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -22980,14 +23196,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4912:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4914:/ locexp"); meltgc_add_strbuf_ccomment ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.CMATNAM__V21*/ meltfptr[20]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:4913:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4915:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23007,14 +23223,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4914:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4916:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (1), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4915:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4917:/ locexp"); meltgc_put_mapobjects ((meltmapobjects_ptr_t) ( /*_.REPLMAP__V35*/ meltfptr[34]), (meltobject_ptr_t) ( /*_.CMATSTATE__V25*/ @@ -23023,7 +23239,7 @@ lab_endgetargs:; meltfptr[36])); } ; - MELT_LOCATION ("warmelt-outobj.melt:4916:/ blockmultialloc"); + MELT_LOCATION ("warmelt-outobj.melt:4918:/ blockmultialloc"); /*multiallocblock */ { struct meltletrec_1_st @@ -23045,11 +23261,11 @@ lab_endgetargs:; /*^putuple */ /*putupl#5 */ - melt_assertmsg ("putupl [:4916] #5 checktup", + melt_assertmsg ("putupl [:4918] #5 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.TUPLREC___V45*/ meltfptr[44])) == MELTOBMAG_MULTIPLE); - melt_assertmsg ("putupl [:4916] #5 checkoff", + melt_assertmsg ("putupl [:4918] #5 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) @@ -23064,7 +23280,7 @@ lab_endgetargs:; /*_.TUPLE___V44*/ meltfptr[39] = /*_.TUPLREC___V45*/ meltfptr[44];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4916:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4918:/ clear"); /*clear *//*_.TUPLREC___V45*/ meltfptr[44] = 0; /*^clear */ /*clear *//*_.TUPLREC___V45*/ meltfptr[44] = 0; @@ -23094,7 +23310,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4917:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4919:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23119,7 +23335,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4918:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4920:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23146,12 +23362,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4919:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4921:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (1), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4920:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4922:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -23191,7 +23407,7 @@ lab_endgetargs:; /*_.OUTPUT_RAW_LOCATION__V50*/ meltfptr[49];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4920:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4922:/ clear"); /*clear *//*_.OUTPUT_RAW_LOCATION__V50*/ meltfptr[49] = 0; } ; @@ -23202,7 +23418,7 @@ lab_endgetargs:; /*_.IF___V49*/ meltfptr[48] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4921:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4923:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23225,7 +23441,7 @@ lab_endgetargs:; ""), argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4922:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4924:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23250,7 +23466,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4923:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4925:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23270,12 +23486,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4924:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4926:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (2), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4925:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4927:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -23315,7 +23531,7 @@ lab_endgetargs:; /*_.OUTPUT_RAW_LOCATION__V55*/ meltfptr[54];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4925:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4927:/ clear"); /*clear *//*_.OUTPUT_RAW_LOCATION__V55*/ meltfptr[54] = 0; } ; @@ -23326,7 +23542,7 @@ lab_endgetargs:; /*_.IF___V54*/ meltfptr[53] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4926:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4928:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23351,12 +23567,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4927:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4929:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (2), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4928:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4930:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23381,7 +23597,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4929:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4931:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23401,7 +23617,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4930:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4932:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (2), 0); } @@ -23425,7 +23641,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4934:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4936:/ cppif.then"); /*^block */ /*anyblock */ { @@ -23451,7 +23667,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4934:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4936:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L14*/ meltfnum[13]) /*then */ { /*^cond.then */ @@ -23466,7 +23682,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4934:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4936:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23480,7 +23696,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4934; + argtab[2].meltbp_long = 4936; /*^apply.arg */ argtab[3].meltbp_cstring = "syntestgen_cmatcher curmatoutbind="; @@ -23502,7 +23718,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V62*/ meltfptr[61];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4934:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4936:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L15*/ meltfnum[14] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V62*/ meltfptr[61] = 0; @@ -23515,7 +23731,7 @@ lab_endgetargs:; /*_.IF___V61*/ meltfptr[60] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4934:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4936:/ quasiblock"); /*_.PROGN___V63*/ meltfptr[61] = /*_.IF___V61*/ meltfptr[60];; @@ -23524,7 +23740,7 @@ lab_endgetargs:; /*_.IFCPP___V60*/ meltfptr[59] = /*_.PROGN___V63*/ meltfptr[61];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4934:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4936:/ clear"); /*clear *//*_#MELT_NEED_DBG__L14*/ meltfnum[13] = 0; /*^clear */ /*clear *//*_.IF___V61*/ meltfptr[60] = 0; @@ -23537,10 +23753,10 @@ lab_endgetargs:; /*_.IFCPP___V60*/ meltfptr[59] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4935:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4937:/ quasiblock"); - MELT_LOCATION ("warmelt-outobj.melt:4936:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4938:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -23575,7 +23791,7 @@ lab_endgetargs:; meltfptr[60]));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4939:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4941:/ cppif.then"); /*^block */ /*anyblock */ { @@ -23601,7 +23817,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4939:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4941:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L16*/ meltfnum[14]) /*then */ { /*^cond.then */ @@ -23616,7 +23832,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4939:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4941:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23630,7 +23846,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4939; + argtab[2].meltbp_long = 4941; /*^apply.arg */ argtab[3].meltbp_cstring = "syntestgen_cmatcher curmatoutbind="; @@ -23658,7 +23874,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V68*/ meltfptr[67];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4939:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4941:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L17*/ meltfnum[13] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V68*/ meltfptr[67] = 0; @@ -23671,7 +23887,7 @@ lab_endgetargs:; /*_.IF___V67*/ meltfptr[66] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4939:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4941:/ quasiblock"); /*_.PROGN___V69*/ meltfptr[67] = /*_.IF___V67*/ meltfptr[66];; @@ -23680,7 +23896,7 @@ lab_endgetargs:; /*_.IFCPP___V66*/ meltfptr[65] = /*_.PROGN___V69*/ meltfptr[67];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4939:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4941:/ clear"); /*clear *//*_#MELT_NEED_DBG__L16*/ meltfnum[14] = 0; /*^clear */ /*clear *//*_.IF___V67*/ meltfptr[66] = 0; @@ -23695,7 +23911,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4941:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4943:/ cppif.then"); /*^block */ /*anyblock */ { @@ -23711,7 +23927,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4941:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4943:/ cond.else"); /*^block */ /*anyblock */ @@ -23725,7 +23941,7 @@ lab_endgetargs:; melt_assert_failed (("check namoutformal "), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4941) ? (4941) : __LINE__, + (4943) ? (4943) : __LINE__, __FUNCTION__); ; } @@ -23741,7 +23957,7 @@ lab_endgetargs:; /*_.IFCPP___V70*/ meltfptr[66] = /*_.IFELSE___V71*/ meltfptr[67];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4941:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4943:/ clear"); /*clear *//*_.IFELSE___V71*/ meltfptr[67] = 0; } @@ -23750,7 +23966,7 @@ lab_endgetargs:; /*_.IFCPP___V70*/ meltfptr[66] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4942:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4944:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23776,13 +23992,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4943:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4945:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (2), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4935:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4937:/ clear"); /*clear *//*_.CUROUTFORMAL__V64*/ meltfptr[60] = 0; /*^clear */ /*clear *//*_.NAMOUTFORMAL__V65*/ meltfptr[61] = 0; @@ -23798,7 +24014,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:4931:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4933:/ clear"); /*clear *//*_.CURMATOUTBIND__V59*/ meltfptr[58] = 0; /*^clear */ /*clear *//*_#OUTIX__L13*/ meltfnum[12] = 0; @@ -23806,7 +24022,7 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V60*/ meltfptr[59] = 0; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-outobj.melt:4946:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4948:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -23831,12 +24047,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4947:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4949:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (1), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4948:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4950:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -23847,7 +24063,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:4950:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4952:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -23888,7 +24104,7 @@ lab_endgetargs:; /*_.OUTPUT_RAW_LOCATION__V75*/ meltfptr[65];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4950:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4952:/ clear"); /*clear *//*_.OUTPUT_RAW_LOCATION__V75*/ meltfptr[65] = 0; } ; @@ -23899,7 +24115,7 @@ lab_endgetargs:; /*_.IF___V74*/ meltfptr[61] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4952:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4954:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -23924,7 +24140,7 @@ lab_endgetargs:; /*_.BINDER__V76*/ meltfptr[66] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4952:/ blockmultialloc"); + MELT_LOCATION ("warmelt-outobj.melt:4954:/ blockmultialloc"); /*multiallocblock */ { struct meltletrec_2_st @@ -23947,12 +24163,12 @@ lab_endgetargs:; /*^putuple */ /*putupl#6 */ - melt_assertmsg ("putupl [:4952] #6 checktup", + melt_assertmsg ("putupl [:4954] #6 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.TUPLREC___V78*/ meltfptr[65])) == MELTOBMAG_MULTIPLE); - melt_assertmsg ("putupl [:4952] #6 checkoff", + melt_assertmsg ("putupl [:4954] #6 checkoff", (0 >= 0 && 0 < melt_multiple_length ((melt_ptr_t) @@ -23964,12 +24180,12 @@ lab_endgetargs:; ; /*^putuple */ /*putupl#7 */ - melt_assertmsg ("putupl [:4952] #7 checktup", + melt_assertmsg ("putupl [:4954] #7 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.TUPLREC___V78*/ meltfptr[65])) == MELTOBMAG_MULTIPLE); - melt_assertmsg ("putupl [:4952] #7 checkoff", + melt_assertmsg ("putupl [:4954] #7 checkoff", (1 >= 0 && 1 < melt_multiple_length ((melt_ptr_t) @@ -23980,12 +24196,12 @@ lab_endgetargs:; ; /*^putuple */ /*putupl#8 */ - melt_assertmsg ("putupl [:4952] #8 checktup", + melt_assertmsg ("putupl [:4954] #8 checktup", melt_magic_discr ((melt_ptr_t) ( /*_.TUPLREC___V78*/ meltfptr[65])) == MELTOBMAG_MULTIPLE); - melt_assertmsg ("putupl [:4952] #8 checkoff", + melt_assertmsg ("putupl [:4954] #8 checkoff", (2 >= 0 && 2 < melt_multiple_length ((melt_ptr_t) @@ -24002,13 +24218,13 @@ lab_endgetargs:; /*_.TUPLREC___V78*/ meltfptr[65];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4952:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4954:/ clear"); /*clear *//*_.TUPLREC___V78*/ meltfptr[65] = 0; /*^clear */ /*clear *//*_.TUPLREC___V78*/ meltfptr[65] = 0; } /*end multiallocblock */ ; - MELT_LOCATION ("warmelt-outobj.melt:4951:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4953:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24034,7 +24250,7 @@ lab_endgetargs:; ""), argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4954:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4956:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24060,7 +24276,7 @@ lab_endgetargs:; ""), argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4955:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4957:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24080,17 +24296,17 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4956:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4958:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (2), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4949:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4951:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4948:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4950:/ clear"); /*clear *//*_.IF___V74*/ meltfptr[61] = 0; /*^clear */ /*clear *//*_.BINDER__V76*/ meltfptr[66] = 0; @@ -24106,7 +24322,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:4958:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4960:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24126,14 +24342,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4959:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4961:/ locexp"); meltgc_add_strbuf_ccomment ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t) ( /*_.CMATNAM__V21*/ meltfptr[20]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:4960:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4962:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24153,13 +24369,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4961:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4963:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4888:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4890:/ clear"); /*clear *//*_.DLOC__V18*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.CMATDEF__V19*/ meltfptr[18] = 0; @@ -24243,7 +24459,7 @@ lab_endgetargs:; /*clear *//*_.ADD2OUT__V82*/ meltfptr[61] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V83*/ meltfptr[66] = 0; - MELT_LOCATION ("warmelt-outobj.melt:4882:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -24350,7 +24566,7 @@ meltrout_127_warmelt_outobj_EMIT_SYNTAX_TESTING_ROUTINE (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:4967:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:4969:/ getarg"); /*_.GENDEVTUP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -24382,7 +24598,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4968:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4970:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24408,7 +24624,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4968:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4970:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -24423,7 +24639,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4968:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4970:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24436,7 +24652,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4968; + argtab[2].meltbp_long = 4970; /*^apply.arg */ argtab[3].meltbp_cstring = "emit_syntax_testing_routine gendevtup="; @@ -24462,7 +24678,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4968:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4970:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0; @@ -24475,7 +24691,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4968:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4970:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -24484,7 +24700,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4968:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4970:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -24499,7 +24715,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4970:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4972:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24510,7 +24726,7 @@ lab_endgetargs:; /*_#IS_MULTIPLE__L3*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.GENDEVTUP__V2*/ meltfptr[1])) == MELTOBMAG_MULTIPLE);; - MELT_LOCATION ("warmelt-outobj.melt:4970:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4972:/ cond"); /*cond */ if ( /*_#IS_MULTIPLE__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -24518,7 +24734,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4970:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4972:/ cond.else"); /*^block */ /*anyblock */ @@ -24532,7 +24748,7 @@ lab_endgetargs:; melt_assert_failed (("check gendevtup"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4970) ? (4970) : __LINE__, __FUNCTION__); + (4972) ? (4972) : __LINE__, __FUNCTION__); ; } ; @@ -24547,7 +24763,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4970:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4972:/ clear"); /*clear *//*_#IS_MULTIPLE__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; @@ -24560,7 +24776,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4971:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4973:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24572,7 +24788,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:4971:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4973:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -24580,7 +24796,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4971:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4973:/ cond.else"); /*^block */ /*anyblock */ @@ -24594,7 +24810,7 @@ lab_endgetargs:; melt_assert_failed (("check modctx"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4971) ? (4971) : __LINE__, __FUNCTION__); + (4973) ? (4973) : __LINE__, __FUNCTION__); ; } ; @@ -24609,7 +24825,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4971:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4973:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -24622,7 +24838,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4972:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4974:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24633,7 +24849,7 @@ lab_endgetargs:; /*_#IS_STRBUF__L5*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3])) == MELTOBMAG_STRBUF);; - MELT_LOCATION ("warmelt-outobj.melt:4972:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4974:/ cond"); /*cond */ if ( /*_#IS_STRBUF__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -24641,7 +24857,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4972:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4974:/ cond.else"); /*^block */ /*anyblock */ @@ -24655,7 +24871,7 @@ lab_endgetargs:; melt_assert_failed (("check sbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4972) ? (4972) : __LINE__, __FUNCTION__); + (4974) ? (4974) : __LINE__, __FUNCTION__); ; } ; @@ -24670,7 +24886,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4972:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4974:/ clear"); /*clear *//*_#IS_STRBUF__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -24681,13 +24897,13 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:4973:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4975:/ quasiblock"); /*_#NBGENDEV__L6*/ meltfnum[0] = (melt_multiple_length ((melt_ptr_t) ( /*_.GENDEVTUP__V2*/ meltfptr[1])));; - MELT_LOCATION ("warmelt-outobj.melt:4975:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4977:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -24711,7 +24927,7 @@ lab_endgetargs:; /*_.MODNAM__V15*/ meltfptr[13] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4977:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4979:/ quasiblock"); /*_.NABUF__V17*/ meltfptr[16] = @@ -24719,7 +24935,7 @@ lab_endgetargs:; meltgc_new_strbuf ((meltobject_ptr_t) (( /*!DISCR_STRBUF */ meltfrout->tabval[2])), (const char *) 0);; - MELT_LOCATION ("warmelt-outobj.melt:4978:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4980:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24739,7 +24955,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4979:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4981:/ locexp"); meltgc_add_strbuf_cident ((melt_ptr_t) ( /*_.NABUF__V17*/ meltfptr[16]), melt_string_str ((melt_ptr_t) ( /*_.MODNAM__V15*/ @@ -24755,7 +24971,7 @@ lab_endgetargs:; /*_.LET___V16*/ meltfptr[15] = /*_.STRBUF2STRING__V19*/ meltfptr[18];; - MELT_LOCATION ("warmelt-outobj.melt:4977:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4979:/ clear"); /*clear *//*_.NABUF__V17*/ meltfptr[16] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V18*/ meltfptr[17] = 0; @@ -24764,7 +24980,7 @@ lab_endgetargs:; /*_.SYNTESTNAME__V20*/ meltfptr[16] = /*_.LET___V16*/ meltfptr[15];; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4982:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4984:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24790,7 +25006,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4982:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4984:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -24805,7 +25021,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:4982:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4984:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24818,7 +25034,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 4982; + argtab[2].meltbp_long = 4984; /*^apply.arg */ argtab[3].meltbp_cstring = "emit_syntax_testing_routine syntestname="; @@ -24839,7 +25055,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V23*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4982:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4984:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V23*/ meltfptr[22] = 0; @@ -24852,7 +25068,7 @@ lab_endgetargs:; /*_.IF___V22*/ meltfptr[18] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:4982:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:4984:/ quasiblock"); /*_.PROGN___V24*/ meltfptr[22] = /*_.IF___V22*/ meltfptr[18];; @@ -24861,7 +25077,7 @@ lab_endgetargs:; /*_.IFCPP___V21*/ meltfptr[17] = /*_.PROGN___V24*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4982:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4984:/ clear"); /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V22*/ meltfptr[18] = 0; @@ -24876,7 +25092,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:4983:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:4985:/ cppif.then"); /*^block */ /*anyblock */ { @@ -24888,7 +25104,7 @@ lab_endgetargs:; (melt_magic_discr ((melt_ptr_t) ( /*_.SYNTESTNAME__V20*/ meltfptr[16])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:4983:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:4985:/ cond"); /*cond */ if ( /*_#IS_STRING__L9*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -24896,7 +25112,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:4983:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:4985:/ cond.else"); /*^block */ /*anyblock */ @@ -24910,7 +25126,7 @@ lab_endgetargs:; melt_assert_failed (("check syntestname"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (4983) ? (4983) : __LINE__, __FUNCTION__); + (4985) ? (4985) : __LINE__, __FUNCTION__); ; } ; @@ -24925,7 +25141,7 @@ lab_endgetargs:; /*_.IFCPP___V25*/ meltfptr[18] = /*_.IFELSE___V26*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:4983:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4985:/ clear"); /*clear *//*_#IS_STRING__L9*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IFELSE___V26*/ meltfptr[22] = 0; @@ -24938,26 +25154,26 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4984:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4986:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4985:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4987:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:4986:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4988:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4987:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4989:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -24978,12 +25194,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4988:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4990:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4989:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4991:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -25003,12 +25219,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:4990:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:4992:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4991:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4993:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -25057,14 +25273,14 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:5001:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5003:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (1), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5002:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5004:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25090,7 +25306,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5002:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5004:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L11*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -25105,7 +25321,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5002:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5004:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -25119,7 +25335,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5002; + argtab[2].meltbp_long = 5004; /*^apply.arg */ argtab[3].meltbp_cstring = "emit_syntax_testing_routine curgendev="; @@ -25146,7 +25362,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V33*/ meltfptr[32];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5002:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5004:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L12*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V33*/ meltfptr[32] = 0; @@ -25159,7 +25375,7 @@ lab_endgetargs:; /*_.IF___V32*/ meltfptr[31] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5002:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5004:/ quasiblock"); /*_.PROGN___V34*/ meltfptr[32] = /*_.IF___V32*/ meltfptr[31];; @@ -25168,7 +25384,7 @@ lab_endgetargs:; /*_.IFCPP___V31*/ meltfptr[30] = /*_.PROGN___V34*/ meltfptr[32];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5002:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5004:/ clear"); /*clear *//*_#MELT_NEED_DBG__L11*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IF___V32*/ meltfptr[31] = 0; @@ -25183,7 +25399,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5003:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5005:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25195,7 +25411,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CURGENDEV__V30*/ meltfptr[29]), (melt_ptr_t) (( /*!CLASS_SOURCE_GENERATOR_DEVICE */ meltfrout->tabval[5])));; - MELT_LOCATION ("warmelt-outobj.melt:5003:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5005:/ cond"); /*cond */ if ( /*_#IS_A__L13*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -25203,7 +25419,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5003:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5005:/ cond.else"); /*^block */ /*anyblock */ @@ -25217,7 +25433,7 @@ lab_endgetargs:; melt_assert_failed (("check curgendev"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5003) ? (5003) : __LINE__, + (5005) ? (5005) : __LINE__, __FUNCTION__); ; } @@ -25233,7 +25449,7 @@ lab_endgetargs:; /*_.IFCPP___V35*/ meltfptr[31] = /*_.IFELSE___V36*/ meltfptr[32];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5003:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5005:/ clear"); /*clear *//*_#IS_A__L13*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.IFELSE___V36*/ meltfptr[32] = 0; @@ -25244,12 +25460,12 @@ lab_endgetargs:; /*_.IFCPP___V35*/ meltfptr[31] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5004:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5006:/ quasiblock"); /*_#SUCGIX__L14*/ meltfnum[7] = (( /*_#GIX__L10*/ meltfnum[1]) + (1));; - MELT_LOCATION ("warmelt-outobj.melt:5005:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5007:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -25276,12 +25492,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5007:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5009:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5008:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5010:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -25306,14 +25522,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5009:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5011:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5010:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5012:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25339,7 +25555,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5010:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5012:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L15*/ meltfnum[11]) /*then */ { /*^cond.then */ @@ -25354,7 +25570,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5010:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5012:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -25368,7 +25584,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5010; + argtab[2].meltbp_long = 5012; /*^apply.arg */ argtab[3].meltbp_cstring = "emit_syntax_testing_routine before syntax_test_generator repr="; @@ -25390,7 +25606,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V42*/ meltfptr[41];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5010:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5012:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L16*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V42*/ meltfptr[41] = 0; @@ -25403,7 +25619,7 @@ lab_endgetargs:; /*_.IF___V41*/ meltfptr[40] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5010:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5012:/ quasiblock"); /*_.PROGN___V43*/ meltfptr[41] = /*_.IF___V41*/ meltfptr[40];; @@ -25412,7 +25628,7 @@ lab_endgetargs:; /*_.IFCPP___V40*/ meltfptr[39] = /*_.PROGN___V43*/ meltfptr[41];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5010:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5012:/ clear"); /*clear *//*_#MELT_NEED_DBG__L15*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.IF___V41*/ meltfptr[40] = 0; @@ -25425,7 +25641,7 @@ lab_endgetargs:; /*_.IFCPP___V40*/ meltfptr[39] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5011:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5013:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -25455,7 +25671,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5012:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5014:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25481,7 +25697,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5012:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5014:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[15]) /*then */ { /*^cond.then */ @@ -25496,7 +25712,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5012:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5014:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -25510,7 +25726,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5012; + argtab[2].meltbp_long = 5014; /*^apply.arg */ argtab[3].meltbp_cstring = "emit_syntax_testing_routine after syntax_test_generator repr="; @@ -25539,7 +25755,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V47*/ meltfptr[46];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5012:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5014:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[11] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V47*/ meltfptr[46] = 0; @@ -25552,7 +25768,7 @@ lab_endgetargs:; /*_.IF___V46*/ meltfptr[45] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5012:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5014:/ quasiblock"); /*_.PROGN___V48*/ meltfptr[46] = /*_.IF___V46*/ meltfptr[45];; @@ -25561,7 +25777,7 @@ lab_endgetargs:; /*_.IFCPP___V45*/ meltfptr[41] = /*_.PROGN___V48*/ meltfptr[46];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5012:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5014:/ clear"); /*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[15] = 0; /*^clear */ /*clear *//*_.IF___V46*/ meltfptr[45] = 0; @@ -25578,7 +25794,7 @@ lab_endgetargs:; /*_.LET___V37*/ meltfptr[32] = /*_.IFCPP___V45*/ meltfptr[41];; - MELT_LOCATION ("warmelt-outobj.melt:5004:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5006:/ clear"); /*clear *//*_#SUCGIX__L14*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.REPR__V38*/ meltfptr[37] = 0; @@ -25592,7 +25808,7 @@ lab_endgetargs:; /*clear *//*_.IFCPP___V45*/ meltfptr[41] = 0; { - MELT_LOCATION ("warmelt-outobj.melt:5014:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5016:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } @@ -25603,7 +25819,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:4998:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5000:/ clear"); /*clear *//*_.CURGENDEV__V30*/ meltfptr[29] = 0; /*^clear */ /*clear *//*_#GIX__L10*/ meltfnum[1] = 0; @@ -25617,12 +25833,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5016:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5018:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5017:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5019:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -25647,12 +25863,12 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5020:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5022:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5021:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5023:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -25672,20 +25888,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5022:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5024:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:5023:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5025:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V4*/ meltfptr[3]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:4973:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:4975:/ clear"); /*clear *//*_#NBGENDEV__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.MODNAM__V15*/ meltfptr[13] = 0; @@ -25707,7 +25923,7 @@ lab_endgetargs:; /*clear *//*_.ADD2OUT__V49*/ meltfptr[45] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V50*/ meltfptr[46] = 0; - MELT_LOCATION ("warmelt-outobj.melt:4967:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:4969:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -25812,7 +26028,7 @@ meltrout_128_warmelt_outobj_TRANSLATE_MACROEXPANDED_LIST (meltclosure_ptr_t /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:5029:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ getarg"); /*_.XLIST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -25853,7 +26069,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5030:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5032:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25879,7 +26095,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5030:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5032:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -25894,7 +26110,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5030:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5032:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -25907,7 +26123,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5030; + argtab[2].meltbp_long = 5032; /*^apply.arg */ argtab[3].meltbp_cstring = "translate_macroexpanded_list modnamstr="; @@ -25933,7 +26149,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5030:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5032:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0; @@ -25946,7 +26162,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5030:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5032:/ quasiblock"); /*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];; @@ -25955,7 +26171,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5030:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5032:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V7*/ meltfptr[6] = 0; @@ -25970,7 +26186,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5031:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5033:/ cppif.then"); /*^block */ /*anyblock */ { @@ -25981,7 +26197,7 @@ lab_endgetargs:; /*_#IS_LIST__L3*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.XLIST__V2*/ meltfptr[1])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:5031:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5033:/ cond"); /*cond */ if ( /*_#IS_LIST__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -25989,7 +26205,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5031:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5033:/ cond.else"); /*^block */ /*anyblock */ @@ -26003,7 +26219,7 @@ lab_endgetargs:; melt_assert_failed (("check xlist"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5031) ? (5031) : __LINE__, __FUNCTION__); + (5033) ? (5033) : __LINE__, __FUNCTION__); ; } ; @@ -26018,7 +26234,7 @@ lab_endgetargs:; /*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5031:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5033:/ clear"); /*clear *//*_#IS_LIST__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0; @@ -26031,7 +26247,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5032:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5034:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26042,7 +26258,7 @@ lab_endgetargs:; /*_#IS_STRING__L4*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.MODNAMSTR__V3*/ meltfptr[2])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:5032:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5034:/ cond"); /*cond */ if ( /*_#IS_STRING__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -26050,7 +26266,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5032:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5034:/ cond.else"); /*^block */ /*anyblock */ @@ -26064,7 +26280,7 @@ lab_endgetargs:; melt_assert_failed (("check modnamstr"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5032) ? (5032) : __LINE__, __FUNCTION__); + (5034) ? (5034) : __LINE__, __FUNCTION__); ; } ; @@ -26079,7 +26295,7 @@ lab_endgetargs:; /*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5032:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5034:/ clear"); /*clear *//*_#IS_STRING__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0; @@ -26092,7 +26308,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5033:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5035:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26104,7 +26320,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.MODCTX__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_MODULE_CONTEXT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:5033:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5035:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -26112,7 +26328,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5033:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5035:/ cond.else"); /*^block */ /*anyblock */ @@ -26126,7 +26342,7 @@ lab_endgetargs:; melt_assert_failed (("check modctx"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5033) ? (5033) : __LINE__, __FUNCTION__); + (5035) ? (5035) : __LINE__, __FUNCTION__); ; } ; @@ -26141,7 +26357,7 @@ lab_endgetargs:; /*_.IFCPP___V14*/ meltfptr[12] = /*_.IFELSE___V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5033:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5035:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0; @@ -26154,7 +26370,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5034:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5036:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26166,7 +26382,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NCX__V5*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-outobj.melt:5034:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5036:/ cond"); /*cond */ if ( /*_#IS_A__L6*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -26174,7 +26390,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5034:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5036:/ cond.else"); /*^block */ /*anyblock */ @@ -26188,7 +26404,7 @@ lab_endgetargs:; melt_assert_failed (("check ncx"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5034) ? (5034) : __LINE__, __FUNCTION__); + (5036) ? (5036) : __LINE__, __FUNCTION__); ; } ; @@ -26203,7 +26419,7 @@ lab_endgetargs:; /*_.IFCPP___V16*/ meltfptr[14] = /*_.IFELSE___V17*/ meltfptr[16];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5034:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5036:/ clear"); /*clear *//*_#IS_A__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0; @@ -26216,7 +26432,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5035:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5037:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26232,7 +26448,7 @@ lab_endgetargs:; /*_#NOT__L8*/ meltfnum[0] = (!( /*_#STRING_DYNLOADED_SUFFIXED__L7*/ meltfnum[1]));; - MELT_LOCATION ("warmelt-outobj.melt:5035:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5037:/ cond"); /*cond */ if ( /*_#NOT__L8*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -26240,7 +26456,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5035:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5037:/ cond.else"); /*^block */ /*anyblock */ @@ -26251,7 +26467,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("translate_macroexpanded_list modulename not ended with MELT_DYNLOADED_SUFFIX."), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5035) ? (5035) : __LINE__, __FUNCTION__); + melt_assert_failed (("translate_macroexpanded_list modulename not ended with MELT_DYNLOADED_SUFFIX."), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5037) ? (5037) : __LINE__, __FUNCTION__); ; } ; @@ -26266,7 +26482,7 @@ lab_endgetargs:; /*_.IFCPP___V18*/ meltfptr[16] = /*_.IFELSE___V19*/ meltfptr[18];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5035:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5037:/ clear"); /*clear *//*_#STRING_DYNLOADED_SUFFIXED__L7*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#NOT__L8*/ meltfnum[0] = 0; @@ -26281,7 +26497,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5037:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5039:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26297,7 +26513,7 @@ lab_endgetargs:; /*_#NOT__L10*/ meltfnum[0] = (!( /*_#STRING_SUFFIXED__L9*/ meltfnum[1]));; - MELT_LOCATION ("warmelt-outobj.melt:5037:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5039:/ cond"); /*cond */ if ( /*_#NOT__L10*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -26305,7 +26521,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5037:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5039:/ cond.else"); /*^block */ /*anyblock */ @@ -26316,7 +26532,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("translate_macroexpanded_list modulename not ended with .melt"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5037) ? (5037) : __LINE__, __FUNCTION__); + melt_assert_failed (("translate_macroexpanded_list modulename not ended with .melt"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5039) ? (5039) : __LINE__, __FUNCTION__); ; } ; @@ -26331,7 +26547,7 @@ lab_endgetargs:; /*_.IFCPP___V20*/ meltfptr[18] = /*_.IFELSE___V21*/ meltfptr[20];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5037:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5039:/ clear"); /*clear *//*_#STRING_SUFFIXED__L9*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#NOT__L10*/ meltfnum[0] = 0; @@ -26346,7 +26562,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5039:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5041:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26362,7 +26578,7 @@ lab_endgetargs:; /*_#NOT__L12*/ meltfnum[0] = (!( /*_#STRING_SUFFIXED__L11*/ meltfnum[1]));; - MELT_LOCATION ("warmelt-outobj.melt:5039:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5041:/ cond"); /*cond */ if ( /*_#NOT__L12*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -26370,7 +26586,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5039:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5041:/ cond.else"); /*^block */ /*anyblock */ @@ -26381,7 +26597,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("translate_macroexpanded_list modulename not ended with .c"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5039) ? (5039) : __LINE__, __FUNCTION__); + melt_assert_failed (("translate_macroexpanded_list modulename not ended with .c"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5041) ? (5041) : __LINE__, __FUNCTION__); ; } ; @@ -26396,7 +26612,7 @@ lab_endgetargs:; /*_.IFCPP___V22*/ meltfptr[20] = /*_.IFELSE___V23*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5039:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5041:/ clear"); /*clear *//*_#STRING_SUFFIXED__L11*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#NOT__L12*/ meltfnum[0] = 0; @@ -26409,14 +26625,14 @@ lab_endgetargs:; /*_.IFCPP___V22*/ meltfptr[20] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5041:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5043:/ quasiblock"); /*_#STARTCLOCK__L13*/ meltfnum[1] = 0;; /*^compute */ /*_#ENDCLOCK__L14*/ meltfnum[0] = 0;; - MELT_LOCATION ("warmelt-outobj.melt:5044:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:5046:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.MODCTX__V4*/ meltfptr[3]), 3, "MOCX_INITIALENV"); @@ -26424,7 +26640,7 @@ lab_endgetargs:; meltfptr[22] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:5045:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:5047:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.MODCTX__V4*/ meltfptr[3]), 8, "MOCX_CHEADERLIST"); @@ -26432,7 +26648,7 @@ lab_endgetargs:; meltfptr[24] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:5046:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5048:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -26464,14 +26680,14 @@ lab_endgetargs:; /*_.FIRSTX__V28*/ meltfptr[27] = (melt_pair_head ((melt_ptr_t) ( /*_.LIST_FIRST__V27*/ meltfptr[26])));; - MELT_LOCATION ("warmelt-outobj.melt:5048:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5050:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L15*/ meltfnum[14] = melt_is_instance_of ((melt_ptr_t) ( /*_.FIRSTX__V28*/ meltfptr[27]), (melt_ptr_t) (( /*!CLASS_SOURCE */ meltfrout-> tabval[3])));; - MELT_LOCATION ("warmelt-outobj.melt:5048:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5050:/ cond"); /*cond */ if ( /*_#IS_A__L15*/ meltfnum[14]) /*then */ { /*^cond.then */ @@ -26491,7 +26707,7 @@ lab_endgetargs:; /*_.LOCA_LOCATION__V30*/ meltfptr[29];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5048:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5050:/ clear"); /*clear *//*_.LOCA_LOCATION__V30*/ meltfptr[29] = 0; } ; @@ -26502,7 +26718,7 @@ lab_endgetargs:; /*_.FIRSTLOC__V29*/ meltfptr[28] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5049:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:5051:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCX__V5*/ meltfptr[4]), 0, "NCTX_INITPROC"); @@ -26522,7 +26738,7 @@ lab_endgetargs:; meltgc_new_strbuf ((meltobject_ptr_t) (( /*!DISCR_STRBUF */ meltfrout->tabval[4])), (const char *) 0);; - MELT_LOCATION ("warmelt-outobj.melt:5053:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5055:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ @@ -26561,7 +26777,7 @@ lab_endgetargs:; /*_.UCMEB1__V34*/ meltfptr[33] = /*_.INST__V35*/ meltfptr[34];; { - MELT_LOCATION ("warmelt-outobj.melt:5059:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5061:/ locexp"); /* translate_macroexpanded_list STARTMODNAM__1 */ #if HAVE_CLOCK /*_#STARTCLOCK__L13*/ meltfnum[1] = (long) clock (); @@ -26572,13 +26788,13 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-outobj.melt:5067:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5069:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#__L16*/ meltfnum[15] = (( /*_.INIENV__V24*/ meltfptr[22]) == (( /*!INITIAL_ENVIRONMENT */ meltfrout->tabval[7])));; - MELT_LOCATION ("warmelt-outobj.melt:5067:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5069:/ cond"); /*cond */ if ( /*_#__L16*/ meltfnum[15]) /*then */ { /*^cond.then */ @@ -26588,7 +26804,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:5068:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5070:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), @@ -26601,7 +26817,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5067:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5069:/ cond.else"); /*^block */ /*anyblock */ @@ -26609,7 +26825,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:5069:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5071:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), @@ -26623,21 +26839,21 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5071:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5073:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:5072:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5074:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:5073:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5075:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), ("struct melt_callframe_st; /*defined in melt-runtime.h*/")); @@ -26645,28 +26861,28 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5074:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5076:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:5075:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5077:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:5076:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5078:/ locexp"); meltgc_prepend_list ((melt_ptr_t) ( /*_.XLIST__V2*/ meltfptr[1]), (melt_ptr_t) ( /*_.UCMEB1__V34*/ meltfptr[33])); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5077:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5079:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26692,7 +26908,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5077:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5079:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L17*/ meltfnum[16]) /*then */ { /*^cond.then */ @@ -26707,7 +26923,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5077:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5079:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -26721,7 +26937,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5077; + argtab[2].meltbp_long = 5079; /*^apply.arg */ argtab[3].meltbp_cstring = "after macroexpansion compile_list_sexpr xlist="; @@ -26748,7 +26964,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V38*/ meltfptr[37];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5077:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5079:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L18*/ meltfnum[17] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V38*/ meltfptr[37] = 0; @@ -26761,7 +26977,7 @@ lab_endgetargs:; /*_.IF___V37*/ meltfptr[36] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5077:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5079:/ quasiblock"); /*_.PROGN___V39*/ meltfptr[37] = /*_.IF___V37*/ meltfptr[36];; @@ -26770,7 +26986,7 @@ lab_endgetargs:; /*_.IFCPP___V36*/ meltfptr[35] = /*_.PROGN___V39*/ meltfptr[37];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5077:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5079:/ clear"); /*clear *//*_#MELT_NEED_DBG__L17*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.IF___V37*/ meltfptr[36] = 0; @@ -26785,7 +27001,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5078:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5080:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26797,7 +27013,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.INIPROC__V31*/ meltfptr[29]), (melt_ptr_t) (( /*!CLASS_NREP_INITPROC */ meltfrout->tabval[8])));; - MELT_LOCATION ("warmelt-outobj.melt:5078:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5080:/ cond"); /*cond */ if ( /*_#IS_A__L19*/ meltfnum[17]) /*then */ { /*^cond.then */ @@ -26805,7 +27021,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5078:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5080:/ cond.else"); /*^block */ /*anyblock */ @@ -26819,7 +27035,7 @@ lab_endgetargs:; melt_assert_failed (("check iniproc"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5078) ? (5078) : __LINE__, __FUNCTION__); + (5080) ? (5080) : __LINE__, __FUNCTION__); ; } ; @@ -26834,7 +27050,7 @@ lab_endgetargs:; /*_.IFCPP___V40*/ meltfptr[36] = /*_.IFELSE___V41*/ meltfptr[37];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5078:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5080:/ clear"); /*clear *//*_#IS_A__L19*/ meltfnum[17] = 0; /*^clear */ /*clear *//*_.IFELSE___V41*/ meltfptr[37] = 0; @@ -26847,7 +27063,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5079:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5081:/ cppif.then"); /*^block */ /*anyblock */ { @@ -26858,7 +27074,7 @@ lab_endgetargs:; /*_#IS_LIST__L20*/ meltfnum[16] = (melt_magic_discr ((melt_ptr_t) ( /*_.XLIST__V2*/ meltfptr[1])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:5079:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5081:/ cond"); /*cond */ if ( /*_#IS_LIST__L20*/ meltfnum[16]) /*then */ { /*^cond.then */ @@ -26866,7 +27082,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5079:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5081:/ cond.else"); /*^block */ /*anyblock */ @@ -26880,7 +27096,7 @@ lab_endgetargs:; melt_assert_failed (("check xlist"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5079) ? (5079) : __LINE__, __FUNCTION__); + (5081) ? (5081) : __LINE__, __FUNCTION__); ; } ; @@ -26895,7 +27111,7 @@ lab_endgetargs:; /*_.IFCPP___V42*/ meltfptr[37] = /*_.IFELSE___V43*/ meltfptr[42];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5079:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5081:/ clear"); /*clear *//*_#IS_LIST__L20*/ meltfnum[16] = 0; /*^clear */ /*clear *//*_.IFELSE___V43*/ meltfptr[42] = 0; @@ -26906,7 +27122,7 @@ lab_endgetargs:; /*_.IFCPP___V42*/ meltfptr[37] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5083:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5085:/ quasiblock"); /*^newclosure */ @@ -26970,7 +27186,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.INIPROC__V31*/ meltfptr[29]); ; /*_.LAMBDA___V44*/ meltfptr[42] = /*_.LAMBDA___V45*/ meltfptr[44];; - MELT_LOCATION ("warmelt-outobj.melt:5081:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5083:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -26991,7 +27207,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5115:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5117:/ locexp"); /* translate_macroexpanded_list CHECK_ERRORS_AFTER_NORMALIZATION__1 */ if (melt_error_counter > 0) melt_fatal_error @@ -27001,7 +27217,7 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-outobj.melt:5120:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5122:/ quasiblock"); /*^getslot */ @@ -27039,7 +27255,7 @@ lab_endgetargs:; (meltgc_new_int ((meltobject_ptr_t) (( /*!DISCR_INTEGER */ meltfrout->tabval[20])), (0)));; - MELT_LOCATION ("warmelt-outobj.melt:5124:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5126:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -27063,7 +27279,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.CHEADTUP__V51*/ meltfptr[50])));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5127:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5129:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27089,7 +27305,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5127:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5129:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L25*/ meltfnum[24]) /*then */ { /*^cond.then */ @@ -27104,7 +27320,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5127:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5129:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -27118,7 +27334,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5127; + argtab[2].meltbp_long = 5129; /*^apply.arg */ argtab[3].meltbp_cstring = "compile_list_sexpr prolist="; /*^apply.arg */ @@ -27144,7 +27360,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V54*/ meltfptr[53];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5127:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5129:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L26*/ meltfnum[25] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V54*/ meltfptr[53] = 0; @@ -27157,7 +27373,7 @@ lab_endgetargs:; /*_.IF___V53*/ meltfptr[52] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5127:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5129:/ quasiblock"); /*_.PROGN___V55*/ meltfptr[53] = /*_.IF___V53*/ meltfptr[52];; @@ -27166,7 +27382,7 @@ lab_endgetargs:; /*_.IFCPP___V52*/ meltfptr[51] = /*_.PROGN___V55*/ meltfptr[53];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5127:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5129:/ clear"); /*clear *//*_#MELT_NEED_DBG__L25*/ meltfnum[24] = 0; /*^clear */ /*clear *//*_.IF___V53*/ meltfptr[52] = 0; @@ -27179,12 +27395,12 @@ lab_endgetargs:; /*_.IFCPP___V52*/ meltfptr[51] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5129:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5131:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L27*/ meltfnum[25] = (( /*_#NBCHEAD__L24*/ meltfnum[23]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:5129:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5131:/ cond"); /*cond */ if ( /*_#I__L27*/ meltfnum[25]) /*then */ { /*^cond.then */ @@ -27194,7 +27410,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:5131:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5133:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), (0), 0); @@ -27202,13 +27418,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5132:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5134:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5133:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5135:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -27233,7 +27449,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5134:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5136:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), (0), 0); @@ -27241,7 +27457,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5135:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5137:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), (0), 0); @@ -27267,7 +27483,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5139:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5141:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27293,7 +27509,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5139:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5141:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[28]) /*then */ { /*^cond.then */ @@ -27309,7 +27525,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-outobj.melt:5139:/ checksignal"); + ("warmelt-outobj.melt:5141:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -27323,7 +27539,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5139; + argtab[2].meltbp_long = 5141; /*^apply.arg */ argtab[3].meltbp_cstring = "compile_list_sexpr curchead="; @@ -27350,7 +27566,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V60*/ meltfptr[59];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5139:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5141:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L30*/ meltfnum[29] = 0; /*^clear */ @@ -27364,7 +27580,7 @@ lab_endgetargs:; /*_.IF___V59*/ meltfptr[58] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5139:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5141:/ quasiblock"); /*_.PROGN___V61*/ meltfptr[59] = @@ -27375,7 +27591,7 @@ lab_endgetargs:; /*_.PROGN___V61*/ meltfptr[59];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5139:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5141:/ clear"); /*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[28] = 0; /*^clear */ /*clear *//*_.IF___V59*/ meltfptr[58] = 0; @@ -27390,7 +27606,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5140:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5142:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27402,7 +27618,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CURCHEAD__V57*/ meltfptr[53]), (melt_ptr_t) (( /*!CLASS_SOURCE_CHEADER */ meltfrout->tabval[24])));; - MELT_LOCATION ("warmelt-outobj.melt:5140:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5142:/ cond"); /*cond */ if ( /*_#IS_A__L31*/ meltfnum[29]) /*then */ { /*^cond.then */ @@ -27410,7 +27626,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5140:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5142:/ cond.else"); /*^block */ /*anyblock */ @@ -27425,7 +27641,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5140) ? (5140) : __LINE__, + (5142) ? (5142) : __LINE__, __FUNCTION__); ; } @@ -27442,7 +27658,7 @@ lab_endgetargs:; /*_.IFELSE___V63*/ meltfptr[59];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5140:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5142:/ clear"); /*clear *//*_#IS_A__L31*/ meltfnum[29] = 0; /*^clear */ /*clear *//*_.IFELSE___V63*/ meltfptr[59] = 0; @@ -27455,13 +27671,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5141:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5143:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5142:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5144:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -27487,13 +27703,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5143:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5145:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5144:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5146:/ quasiblock"); /*^cond */ @@ -27521,7 +27737,7 @@ lab_endgetargs:; /*_.HLOC__V65*/ meltfptr[64] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5145:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5147:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -27546,7 +27762,7 @@ lab_endgetargs:; /*_.CHSTR__V66*/ meltfptr[65] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5147:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5149:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -27558,7 +27774,7 @@ lab_endgetargs:; { MELT_LOCATION - ("warmelt-outobj.melt:5148:/ checksignal"); + ("warmelt-outobj.melt:5150:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -27588,7 +27804,7 @@ lab_endgetargs:; /*_.OUTPUT_RAW_LOCATION__V68*/ meltfptr[67];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5147:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5149:/ clear"); /*clear *//*_.OUTPUT_RAW_LOCATION__V68*/ meltfptr[67] = 0; } @@ -27600,7 +27816,7 @@ lab_endgetargs:; /*_.IF___V67*/ meltfptr[66] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5149:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5151:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -27622,14 +27838,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5150:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5152:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5144:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5146:/ clear"); /*clear *//*_.HLOC__V65*/ meltfptr[64] = 0; /*^clear */ /*clear *//*_.CHSTR__V66*/ meltfptr[65] = 0; @@ -27643,7 +27859,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:5136:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5138:/ clear"); /*clear *//*_.CURCHEAD__V57*/ meltfptr[53] = 0; /*^clear */ /*clear *//*_#HIX__L28*/ meltfnum[24] = 0; @@ -27657,7 +27873,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5153:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5155:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), (0), 0); @@ -27665,13 +27881,13 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5154:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5156:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5155:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5157:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -27696,7 +27912,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5156:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5158:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), (0), 0); @@ -27704,18 +27920,18 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5157:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5159:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5130:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5132:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5129:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5131:/ clear"); /*clear *//*_.ADD2OUT__V56*/ meltfptr[52] = 0; /*^clear */ /*clear *//*_.ADD2OUT__V70*/ meltfptr[64] = 0; @@ -27725,7 +27941,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5161:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5163:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27736,7 +27952,7 @@ lab_endgetargs:; /*_#IS_LIST__L32*/ meltfnum[28] = (melt_magic_discr ((melt_ptr_t) ( /*_.PROLIST__V47*/ meltfptr[46])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:5161:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5163:/ cond"); /*cond */ if ( /*_#IS_LIST__L32*/ meltfnum[28]) /*then */ { /*^cond.then */ @@ -27744,7 +27960,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5161:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5163:/ cond.else"); /*^block */ /*anyblock */ @@ -27758,7 +27974,7 @@ lab_endgetargs:; melt_assert_failed (("check prolist"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5161) ? (5161) : __LINE__, __FUNCTION__); + (5163) ? (5163) : __LINE__, __FUNCTION__); ; } ; @@ -27773,7 +27989,7 @@ lab_endgetargs:; /*_.IFCPP___V71*/ meltfptr[65] = /*_.IFELSE___V72*/ meltfptr[66];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5161:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5163:/ clear"); /*clear *//*_#IS_LIST__L32*/ meltfnum[28] = 0; /*^clear */ /*clear *//*_.IFELSE___V72*/ meltfptr[66] = 0; @@ -27784,7 +28000,7 @@ lab_endgetargs:; /*_.IFCPP___V71*/ meltfptr[65] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5164:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5166:/ quasiblock"); /*^newclosure */ @@ -27848,7 +28064,7 @@ lab_endgetargs:; (melt_ptr_t) ( /*_.OBJLIST__V48*/ meltfptr[47]); ; /*_.LAMBDA___V73*/ meltfptr[67] = /*_.LAMBDA___V74*/ meltfptr[52];; - MELT_LOCATION ("warmelt-outobj.melt:5162:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5164:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -27869,7 +28085,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5174:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5176:/ locexp"); /*translate_macroexpanded_list CHECK_ERRORS_AFTER_COMPILATION__1 */ if (melt_error_counter > 0) melt_fatal_error @@ -27881,7 +28097,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5181:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5183:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27892,7 +28108,7 @@ lab_endgetargs:; /*_#IS_LIST__L33*/ meltfnum[29] = (melt_magic_discr ((melt_ptr_t) ( /*_.OBJLIST__V48*/ meltfptr[47])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:5181:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5183:/ cond"); /*cond */ if ( /*_#IS_LIST__L33*/ meltfnum[29]) /*then */ { /*^cond.then */ @@ -27900,7 +28116,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5181:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5183:/ cond.else"); /*^block */ /*anyblock */ @@ -27914,7 +28130,7 @@ lab_endgetargs:; melt_assert_failed (("check objlist"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5181) ? (5181) : __LINE__, __FUNCTION__); + (5183) ? (5183) : __LINE__, __FUNCTION__); ; } ; @@ -27929,7 +28145,7 @@ lab_endgetargs:; /*_.IFCPP___V76*/ meltfptr[66] = /*_.IFELSE___V77*/ meltfptr[76];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5181:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5183:/ clear"); /*clear *//*_#IS_LIST__L33*/ meltfnum[29] = 0; /*^clear */ /*clear *//*_.IFELSE___V77*/ meltfptr[76] = 0; @@ -27940,7 +28156,7 @@ lab_endgetargs:; /*_.IFCPP___V76*/ meltfptr[66] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5182:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5184:/ quasiblock"); /*^getslot */ @@ -27951,7 +28167,7 @@ lab_endgetargs:; meltfptr[76] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:5183:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:5185:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCX__V5*/ meltfptr[4]), 2, "NCTX_DATALIST"); @@ -27959,7 +28175,7 @@ lab_endgetargs:; meltfptr[78] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:5184:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:5186:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCX__V5*/ meltfptr[4]), 3, "NCTX_VALUELIST"); @@ -27967,7 +28183,7 @@ lab_endgetargs:; meltfptr[79] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:5185:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:5187:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.NCX__V5*/ meltfptr[4]), 14, "NCTX_PROCURMODENVLIST"); @@ -27977,7 +28193,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5187:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5189:/ cppif.then"); /*^block */ /*anyblock */ { @@ -27989,7 +28205,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.INIPRO__V78*/ meltfptr[76]), (melt_ptr_t) (( /*!CLASS_NREP_INITPROC */ meltfrout->tabval[8])));; - MELT_LOCATION ("warmelt-outobj.melt:5187:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5189:/ cond"); /*cond */ if ( /*_#IS_A__L34*/ meltfnum[28]) /*then */ { /*^cond.then */ @@ -27997,7 +28213,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5187:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5189:/ cond.else"); /*^block */ /*anyblock */ @@ -28011,7 +28227,7 @@ lab_endgetargs:; melt_assert_failed (("check inipro"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5187) ? (5187) : __LINE__, __FUNCTION__); + (5189) ? (5189) : __LINE__, __FUNCTION__); ; } ; @@ -28026,7 +28242,7 @@ lab_endgetargs:; /*_.IFCPP___V82*/ meltfptr[81] = /*_.IFELSE___V83*/ meltfptr[82];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5187:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5189:/ clear"); /*clear *//*_#IS_A__L34*/ meltfnum[28] = 0; /*^clear */ /*clear *//*_.IFELSE___V83*/ meltfptr[82] = 0; @@ -28037,7 +28253,7 @@ lab_endgetargs:; /*_.IFCPP___V82*/ meltfptr[81] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5188:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5190:/ quasiblock"); /*^checksignal */ @@ -28087,7 +28303,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5193:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5195:/ cppif.then"); /*^block */ /*anyblock */ { @@ -28113,7 +28329,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5193:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5195:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L35*/ meltfnum[29]) /*then */ { /*^cond.then */ @@ -28128,7 +28344,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5193:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5195:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -28142,7 +28358,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5193; + argtab[2].meltbp_long = 5195; /*^apply.arg */ argtab[3].meltbp_cstring = "compile_list_sexpr obel="; /*^apply.arg */ @@ -28163,7 +28379,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V89*/ meltfptr[88];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5193:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5195:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L36*/ meltfnum[28] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V89*/ meltfptr[88] = 0; @@ -28176,7 +28392,7 @@ lab_endgetargs:; /*_.IF___V88*/ meltfptr[87] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5193:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5195:/ quasiblock"); /*_.PROGN___V90*/ meltfptr[88] = /*_.IF___V88*/ meltfptr[87];; @@ -28185,7 +28401,7 @@ lab_endgetargs:; /*_.IFCPP___V87*/ meltfptr[86] = /*_.PROGN___V90*/ meltfptr[88];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5193:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5195:/ clear"); /*clear *//*_#MELT_NEED_DBG__L35*/ meltfnum[29] = 0; /*^clear */ /*clear *//*_.IF___V88*/ meltfptr[87] = 0; @@ -28198,17 +28414,17 @@ lab_endgetargs:; /*_.IFCPP___V87*/ meltfptr[86] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5195:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5197:/ quasiblock"); - MELT_LOCATION ("warmelt-outobj.melt:5196:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5198:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L37*/ meltfnum[28] = melt_is_instance_of ((melt_ptr_t) ( /*_.OBEL__V86*/ meltfptr[85]), (melt_ptr_t) (( /*!CLASS_PROCROUTINEOBJ */ meltfrout->tabval[32])));; - MELT_LOCATION ("warmelt-outobj.melt:5196:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5198:/ cond"); /*cond */ if ( /*_#IS_A__L37*/ meltfnum[28]) /*then */ { /*^cond.then */ @@ -28216,7 +28432,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:5197:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5199:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -28252,7 +28468,7 @@ lab_endgetargs:; /*_#GET_INT__L39*/ meltfnum[38];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5196:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5198:/ clear"); /*clear *//*_.OPROUT_FILENUM__V92*/ meltfptr[88] = 0; /*^clear */ /*clear *//*_#GET_INT__L39*/ meltfnum[38] = 0; @@ -28265,7 +28481,7 @@ lab_endgetargs:; /*_#FILNUM__L38*/ meltfnum[29] = 0;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5199:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5201:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -28306,7 +28522,7 @@ lab_endgetargs:; /*_.NTH_SECUNDARY_FILE__V94*/ meltfptr[93];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5199:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5201:/ clear"); /*clear *//*_.NTH_SECUNDARY_FILE__V94*/ meltfptr[93] = 0; } ; @@ -28317,7 +28533,7 @@ lab_endgetargs:; /*_.SECFIL__V93*/ meltfptr[88] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5201:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5203:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -28359,7 +28575,7 @@ lab_endgetargs:; /*_.SECFIL_IMPLBUF__V96*/ meltfptr[95];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5201:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5203:/ clear"); /*clear *//*_.SECFIL_IMPLBUF__V96*/ meltfptr[95] = 0; } ; @@ -28371,7 +28587,7 @@ lab_endgetargs:; /*_.IMPLBUF__V33*/ meltfptr[32];; } ; - MELT_LOCATION ("warmelt-outobj.melt:5203:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5205:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -28398,7 +28614,7 @@ lab_endgetargs:; /*_.LET___V91*/ meltfptr[87] = /*_.OUTPUT_C_CODE__V97*/ meltfptr[95];; - MELT_LOCATION ("warmelt-outobj.melt:5195:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5197:/ clear"); /*clear *//*_#IS_A__L37*/ meltfnum[28] = 0; /*^clear */ /*clear *//*_#FILNUM__L38*/ meltfnum[29] = 0; @@ -28415,7 +28631,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:5190:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5192:/ clear"); /*clear *//*_.PAIREL__V85*/ meltfptr[84] = 0; /*^clear */ /*clear *//*_.OBEL__V86*/ meltfptr[85] = 0; @@ -28427,7 +28643,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5205:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5207:/ cppif.then"); /*^block */ /*anyblock */ { @@ -28453,7 +28669,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5205:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5207:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L40*/ meltfnum[38]) /*then */ { /*^cond.then */ @@ -28468,7 +28684,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5205:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5207:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -28482,7 +28698,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5205; + argtab[2].meltbp_long = 5207; /*^apply.arg */ argtab[3].meltbp_cstring = "compile_list_sexpr final modnamstr="; @@ -28509,7 +28725,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V100*/ meltfptr[95];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5205:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5207:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L41*/ meltfnum[28] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V100*/ meltfptr[95] = 0; @@ -28522,7 +28738,7 @@ lab_endgetargs:; /*_.IF___V99*/ meltfptr[93] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5205:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5207:/ quasiblock"); /*_.PROGN___V101*/ meltfptr[95] = /*_.IF___V99*/ meltfptr[93];; @@ -28531,7 +28747,7 @@ lab_endgetargs:; /*_.IFCPP___V98*/ meltfptr[88] = /*_.PROGN___V101*/ meltfptr[95];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5205:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5207:/ clear"); /*clear *//*_#MELT_NEED_DBG__L40*/ meltfnum[38] = 0; /*^clear */ /*clear *//*_.IF___V99*/ meltfptr[93] = 0; @@ -28546,19 +28762,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5206:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5208:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V33*/ meltfptr[32]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:5207:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5209:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V33*/ meltfptr[32]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5209:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5211:/ quasiblock"); /*^checksignal */ @@ -28585,7 +28801,7 @@ lab_endgetargs:; ((melt_ptr_t) ( /*_.GENDEVTUP__V103*/ meltfptr[95])));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5212:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5214:/ cppif.then"); /*^block */ /*anyblock */ { @@ -28611,7 +28827,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5212:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5214:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L43*/ meltfnum[28]) /*then */ { /*^cond.then */ @@ -28626,7 +28842,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5212:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5214:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -28640,7 +28856,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5212; + argtab[2].meltbp_long = 5214; /*^apply.arg */ argtab[3].meltbp_cstring = "compile_list_sexpr before emit_syntax_testing_routine gendevtup="; @@ -28667,7 +28883,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V106*/ meltfptr[105];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5212:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5214:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L44*/ meltfnum[38] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V106*/ meltfptr[105] = 0; @@ -28680,7 +28896,7 @@ lab_endgetargs:; /*_.IF___V105*/ meltfptr[104] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5212:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5214:/ quasiblock"); /*_.PROGN___V107*/ meltfptr[105] = /*_.IF___V105*/ meltfptr[104];; @@ -28689,7 +28905,7 @@ lab_endgetargs:; /*_.IFCPP___V104*/ meltfptr[103] = /*_.PROGN___V107*/ meltfptr[105];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5212:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5214:/ clear"); /*clear *//*_#MELT_NEED_DBG__L43*/ meltfnum[28] = 0; /*^clear */ /*clear *//*_.IF___V105*/ meltfptr[104] = 0; @@ -28702,7 +28918,7 @@ lab_endgetargs:; /*_.IFCPP___V104*/ meltfptr[103] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5213:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5215:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -28713,7 +28929,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:5214:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5216:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -28740,7 +28956,7 @@ lab_endgetargs:; /*_.EMIT_SYNTAX_TESTING_ROUTINE__V109*/ meltfptr[105];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5213:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5215:/ clear"); /*clear *//*_.EMIT_SYNTAX_TESTING_ROUTINE__V109*/ meltfptr[105] = 0; } ; @@ -28756,7 +28972,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:5215:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5217:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.IMPLBUF__V33*/ meltfptr[32]), @@ -28773,7 +28989,7 @@ lab_endgetargs:; /*_.LET___V102*/ meltfptr[93] = /*_.IFELSE___V108*/ meltfptr[104];; - MELT_LOCATION ("warmelt-outobj.melt:5209:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5211:/ clear"); /*clear *//*_.GENDEVTUP__V103*/ meltfptr[95] = 0; /*^clear */ /*clear *//*_#NBGENDEV__L42*/ meltfnum[29] = 0; @@ -28783,12 +28999,12 @@ lab_endgetargs:; /*clear *//*_.IFELSE___V108*/ meltfptr[104] = 0; { - MELT_LOCATION ("warmelt-outobj.melt:5218:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5220:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.IMPLBUF__V33*/ meltfptr[32]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5220:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5222:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^msend */ @@ -28812,7 +29028,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5221:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5223:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -28834,13 +29050,13 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5223:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5225:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#STRBUF_USEDLENGTH__L45*/ meltfnum[38] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.DECLBUF__V32*/ meltfptr[31]));; - MELT_LOCATION ("warmelt-outobj.melt:5223:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5225:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -28881,7 +29097,7 @@ lab_endgetargs:; /*_#I__L48*/ meltfnum[47] = (( /*_#STRBUF_USEDLENGTH__L45*/ meltfnum[38]) > ( /*_#IRAW__L47*/ meltfnum[29]));; - MELT_LOCATION ("warmelt-outobj.melt:5223:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5225:/ cond"); /*cond */ if ( /*_#I__L48*/ meltfnum[47]) /*then */ { /*^cond.then */ @@ -28891,7 +29107,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:5224:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5226:/ locexp"); warning (0, "MELT WARNING MSG [#%ld]::: %s - %s", melt_dbgcounter, ("very large declaration string buffer for module "), melt_string_str ((melt_ptr_t) @@ -28903,13 +29119,13 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:5225:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5227:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#STRBUF_USEDLENGTH__L49*/ meltfnum[48] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.IMPLBUF__V33*/ meltfptr[32]));; - MELT_LOCATION ("warmelt-outobj.melt:5225:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5227:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -28950,7 +29166,7 @@ lab_endgetargs:; /*_#I__L52*/ meltfnum[51] = (( /*_#STRBUF_USEDLENGTH__L49*/ meltfnum[48]) > ( /*_#IRAW__L51*/ meltfnum[50]));; - MELT_LOCATION ("warmelt-outobj.melt:5225:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5227:/ cond"); /*cond */ if ( /*_#I__L52*/ meltfnum[51]) /*then */ { /*^cond.then */ @@ -28960,7 +29176,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:5226:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5228:/ locexp"); warning (0, "MELT WARNING MSG [#%ld]::: %s - %s", melt_dbgcounter, ("very large implementation string buffer module for "), melt_string_str ((melt_ptr_t) @@ -28974,7 +29190,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5229:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5231:/ locexp"); /* translate_macroexpanded_list OUTPUTCFILE__1: */ melt_output_cfile_decl_impl ((melt_ptr_t) ( /*_.MODNAMSTR__V3*/ meltfptr[2]), @@ -28983,7 +29199,7 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-outobj.melt:5236:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5238:/ quasiblock"); /*^cond */ @@ -29023,7 +29239,7 @@ lab_endgetargs:; /*_#HISECFILERK__L55*/ meltfnum[54] = 0;; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5241:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5243:/ cppif.then"); /*^block */ /*anyblock */ { @@ -29049,7 +29265,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5241:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5243:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L56*/ meltfnum[55]) /*then */ { /*^cond.then */ @@ -29064,7 +29280,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5241:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5243:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -29078,7 +29294,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5241; + argtab[2].meltbp_long = 5243; /*^apply.arg */ argtab[3].meltbp_cstring = "compile_list_sexpr secfiles="; /*^apply.arg */ @@ -29098,7 +29314,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V117*/ meltfptr[116];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5241:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5243:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L57*/ meltfnum[56] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V117*/ meltfptr[116] = 0; @@ -29111,7 +29327,7 @@ lab_endgetargs:; /*_.IF___V116*/ meltfptr[115] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5241:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5243:/ quasiblock"); /*_.PROGN___V118*/ meltfptr[116] = /*_.IF___V116*/ meltfptr[115];; @@ -29120,7 +29336,7 @@ lab_endgetargs:; /*_.IFCPP___V115*/ meltfptr[114] = /*_.PROGN___V118*/ meltfptr[116];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5241:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5243:/ clear"); /*clear *//*_#MELT_NEED_DBG__L56*/ meltfnum[55] = 0; /*^clear */ /*clear *//*_.IF___V116*/ meltfptr[115] = 0; @@ -29151,7 +29367,7 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-outobj.melt:5245:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5247:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^cond */ @@ -29164,7 +29380,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5247:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5249:/ cppif.then"); /*^block */ /*anyblock */ { @@ -29176,7 +29392,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CURFIL__V119*/ meltfptr[115]), (melt_ptr_t) (( /*!CLASS_SECONDARY_C_FILE */ meltfrout->tabval[34])));; - MELT_LOCATION ("warmelt-outobj.melt:5247:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5249:/ cond"); /*cond */ if ( /*_#IS_A__L59*/ meltfnum[55]) /*then */ { /*^cond.then */ @@ -29184,7 +29400,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5247:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5249:/ cond.else"); /*^block */ /*anyblock */ @@ -29199,7 +29415,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5247) ? (5247) : __LINE__, + (5249) ? (5249) : __LINE__, __FUNCTION__); ; } @@ -29216,7 +29432,7 @@ lab_endgetargs:; /*_.IFELSE___V121*/ meltfptr[120];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5247:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5249:/ clear"); /*clear *//*_#IS_A__L59*/ meltfnum[55] = 0; /*^clear */ /*clear *//*_.IFELSE___V121*/ meltfptr[120] = 0; @@ -29229,7 +29445,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5249:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5251:/ cppif.then"); /*^block */ /*anyblock */ { @@ -29245,7 +29461,7 @@ lab_endgetargs:; /*_#I__L61*/ meltfnum[60] = (( /*_#GET_INT__L60*/ meltfnum[55]) == ( /*_#FILIX__L58*/ meltfnum[56]));; - MELT_LOCATION ("warmelt-outobj.melt:5249:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5251:/ cond"); /*cond */ if ( /*_#I__L61*/ meltfnum[60]) /*then */ { /*^cond.then */ @@ -29253,7 +29469,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5249:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5251:/ cond.else"); /*^block */ /*anyblock */ @@ -29268,7 +29484,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5249) ? (5249) : __LINE__, + (5251) ? (5251) : __LINE__, __FUNCTION__); ; } @@ -29285,7 +29501,7 @@ lab_endgetargs:; /*_.IFELSE___V123*/ meltfptr[122];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5249:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5251:/ clear"); /*clear *//*_#GET_INT__L60*/ meltfnum[55] = 0; /*^clear */ /*clear *//*_#I__L61*/ meltfnum[60] = 0; @@ -29298,18 +29514,18 @@ lab_endgetargs:; /*_.IFCPP___V122*/ meltfptr[120] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5251:/ compute"); + MELT_LOCATION ("warmelt-outobj.melt:5253:/ compute"); /*_#HISECFILERK__L55*/ meltfnum[54] = /*_#SETQ___L62*/ meltfnum[55] = /*_#FILIX__L58*/ meltfnum[56];; { - MELT_LOCATION ("warmelt-outobj.melt:5252:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5254:/ locexp"); /*increment *//*_#NBSECFILES__L53*/ meltfnum[52] += 1; ; } ; - MELT_LOCATION ("warmelt-outobj.melt:5254:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5256:/ quasiblock"); /*^cond */ @@ -29337,7 +29553,7 @@ lab_endgetargs:; /*_.SECFILPATH__V124*/ meltfptr[122] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5255:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5257:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -29362,7 +29578,7 @@ lab_endgetargs:; /*_.SECDECLBUF__V125*/ meltfptr[124] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5256:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5258:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -29387,14 +29603,14 @@ lab_endgetargs:; /*_.SECIMPLBUF__V126*/ meltfptr[125] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5259:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5261:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#STRBUF_USEDLENGTH__L63*/ meltfnum[60] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.SECDECLBUF__V125*/ meltfptr[124]));; - MELT_LOCATION ("warmelt-outobj.melt:5259:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5261:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -29434,7 +29650,7 @@ lab_endgetargs:; /*_#I__L66*/ meltfnum[65] = (( /*_#STRBUF_USEDLENGTH__L63*/ meltfnum[60]) > ( /*_#IRAW__L65*/ meltfnum[64]));; - MELT_LOCATION ("warmelt-outobj.melt:5259:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5261:/ cond"); /*cond */ if ( /*_#I__L66*/ meltfnum[65]) /*then */ { /*^cond.then */ @@ -29444,7 +29660,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:5260:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5262:/ locexp"); warning (0, "MELT WARNING MSG [#%ld]::: %s - %s", melt_dbgcounter, ("very large declaration string buffer for secondary file "), @@ -29458,14 +29674,14 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:5261:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5263:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#STRBUF_USEDLENGTH__L67*/ meltfnum[66] = melt_strbuf_usedlength ((melt_ptr_t) ( /*_.SECIMPLBUF__V126*/ meltfptr[125]));; - MELT_LOCATION ("warmelt-outobj.melt:5261:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5263:/ cond"); /*cond */ if ( /*ifisa */ melt_is_instance_of ((melt_ptr_t) @@ -29505,7 +29721,7 @@ lab_endgetargs:; /*_#I__L70*/ meltfnum[69] = (( /*_#STRBUF_USEDLENGTH__L67*/ meltfnum[66]) > ( /*_#IRAW__L69*/ meltfnum[68]));; - MELT_LOCATION ("warmelt-outobj.melt:5261:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5263:/ cond"); /*cond */ if ( /*_#I__L70*/ meltfnum[69]) /*then */ { /*^cond.then */ @@ -29515,7 +29731,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:5262:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5264:/ locexp"); warning (0, "MELT WARNING MSG [#%ld]::: %s - %s", melt_dbgcounter, ("very large implementation string buffer for secondary file "), @@ -29531,7 +29747,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5266:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5268:/ locexp"); /* translate_macroexpanded_list SECFILOUT__1: */ melt_output_cfile_decl_impl_secondary ((melt_ptr_t) ( /*_.SECFILPATH__V124*/ meltfptr[122]), @@ -29542,7 +29758,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-outobj.melt:5254:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5256:/ clear"); /*clear *//*_.SECFILPATH__V124*/ meltfptr[122] = 0; /*^clear */ /*clear *//*_.SECDECLBUF__V125*/ meltfptr[124] = 0; @@ -29568,12 +29784,12 @@ lab_endgetargs:; /*clear *//*_#IRAW__L69*/ meltfnum[68] = 0; /*^clear */ /*clear *//*_#I__L70*/ meltfnum[69] = 0; - MELT_LOCATION ("warmelt-outobj.melt:5246:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5248:/ quasiblock"); /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5245:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5247:/ clear"); /*clear *//*_.IFCPP___V120*/ meltfptr[116] = 0; /*^clear */ /*clear *//*_.IFCPP___V122*/ meltfptr[120] = 0; @@ -29589,13 +29805,13 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:5242:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5244:/ clear"); /*clear *//*_.CURFIL__V119*/ meltfptr[115] = 0; /*^clear */ /*clear *//*_#FILIX__L58*/ meltfnum[56] = 0; } /*endciterblock FOREACH_IN_MULTIPLE */ ; - MELT_LOCATION ("warmelt-outobj.melt:5278:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5280:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -29636,12 +29852,12 @@ lab_endgetargs:; - MELT_LOCATION ("warmelt-outobj.melt:5283:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5285:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L74*/ meltfnum[65] = (( /*_#DELFILIX__L73*/ meltfnum[64]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:5283:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5285:/ cond"); /*cond */ if ( /*_#I__L74*/ meltfnum[65]) /*then */ { /*^cond.then */ @@ -29649,7 +29865,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:5284:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5286:/ quasiblock"); /*_.DELFILNAM__V130*/ meltfptr[124] = @@ -29667,7 +29883,7 @@ lab_endgetargs:; meltgc_new_strbuf ((meltobject_ptr_t) (( /*!DISCR_STRBUF */ meltfrout-> tabval[4])), (const char *) 0);; - MELT_LOCATION ("warmelt-outobj.melt:5287:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5289:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -29689,7 +29905,7 @@ lab_endgetargs:; argtab, "", (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5288:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5290:/ quasiblock"); /*_.BAKFILNAM__V133*/ meltfptr[127] = @@ -29700,7 +29916,7 @@ lab_endgetargs:; ( /*_.BAKSBUF__V131*/ meltfptr[125]))));; { - MELT_LOCATION ("warmelt-outobj.melt:5292:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5294:/ locexp"); /*translate_macroexpanded_list BACKUPCHK__1 */ const char *BACKUPCHK__1_delfilnamstr = melt_string_str ((melt_ptr_t) /*_.DELFILNAM__V130*/ @@ -29725,10 +29941,10 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-outobj.melt:5288:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5290:/ clear"); /*clear *//*_.BAKFILNAM__V133*/ meltfptr[127] = 0; - MELT_LOCATION ("warmelt-outobj.melt:5284:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5286:/ clear"); /*clear *//*_.DELFILNAM__V130*/ meltfptr[124] = 0; /*^clear */ /*clear *//*_.BAKSBUF__V131*/ meltfptr[125] = 0; @@ -29743,7 +29959,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:5280:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5282:/ clear"); /*clear *//*_#DELFILIX__L73*/ meltfnum[64] = 0; /*^clear */ /*clear *//*_#I__L74*/ meltfnum[65] = 0; @@ -29751,7 +29967,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5310:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5312:/ locexp"); /* translate_macroexpanded_list ENDMODNAM__1 */ #if HAVE_CLOCK && defined (CLOCKS_PER_SEC) /*_#ENDCLOCK__L14*/ meltfnum[0] = (long) clock (); @@ -29784,7 +30000,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5329:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5331:/ locexp"); #if MELT_HAVE_DEBUG if (melt_need_debug (0)) @@ -29794,7 +30010,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-outobj.melt:5236:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5238:/ clear"); /*clear *//*_.SECFILES__V114*/ meltfptr[113] = 0; /*^clear */ /*clear *//*_#NBSECFILES__L53*/ meltfnum[52] = 0; @@ -29811,7 +30027,7 @@ lab_endgetargs:; /*^clear */ /*clear *//*_#I__L72*/ meltfnum[63] = 0; - MELT_LOCATION ("warmelt-outobj.melt:5188:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5190:/ clear"); /*clear *//*_.INIOBJ__V84*/ meltfptr[82] = 0; /*^clear */ /*clear *//*_.IFCPP___V98*/ meltfptr[88] = 0; @@ -29842,7 +30058,7 @@ lab_endgetargs:; /*^clear */ /*clear *//*_#I__L52*/ meltfnum[51] = 0; - MELT_LOCATION ("warmelt-outobj.melt:5182:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5184:/ clear"); /*clear *//*_.INIPRO__V78*/ meltfptr[76] = 0; /*^clear */ /*clear *//*_.INIDATA__V79*/ meltfptr[78] = 0; @@ -29853,7 +30069,7 @@ lab_endgetargs:; /*^clear */ /*clear *//*_.IFCPP___V82*/ meltfptr[81] = 0; - MELT_LOCATION ("warmelt-outobj.melt:5120:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5122:/ clear"); /*clear *//*_.PROLIST__V47*/ meltfptr[46] = 0; /*^clear */ /*clear *//*_.OBJLIST__V48*/ meltfptr[47] = 0; @@ -29884,7 +30100,7 @@ lab_endgetargs:; /*^clear */ /*clear *//*_.IFCPP___V76*/ meltfptr[66] = 0; - MELT_LOCATION ("warmelt-outobj.melt:5041:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5043:/ clear"); /*clear *//*_#STARTCLOCK__L13*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_#ENDCLOCK__L14*/ meltfnum[0] = 0; @@ -29922,7 +30138,7 @@ lab_endgetargs:; /*clear *//*_.LAMBDA___V44*/ meltfptr[42] = 0; /*^clear */ /*clear *//*_.LIST_EVERY__V46*/ meltfptr[45] = 0; - MELT_LOCATION ("warmelt-outobj.melt:5029:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -30028,7 +30244,7 @@ meltrout_129_warmelt_outobj_LAMBDA___26__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:5083:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:5085:/ getarg"); /*_.SEXP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -30046,7 +30262,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5084:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5086:/ cppif.then"); /*^block */ /*anyblock */ { @@ -30072,7 +30288,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5084:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5086:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L2*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -30087,7 +30303,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5084:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5086:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -30100,7 +30316,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5084; + argtab[2].meltbp_long = 5086; /*^apply.arg */ argtab[3].meltbp_aptr = (melt_ptr_t *) & /*_.SEXP__V2*/ meltfptr[1]; @@ -30127,7 +30343,7 @@ lab_endgetargs:; /*_.IF___V4*/ meltfptr[3] = /*_.MELT_DEBUG_FUN__V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5084:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5086:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L3*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V5*/ meltfptr[4] = 0; @@ -30140,7 +30356,7 @@ lab_endgetargs:; /*_.IF___V4*/ meltfptr[3] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5084:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5086:/ quasiblock"); /*_.PROGN___V6*/ meltfptr[4] = /*_.IF___V4*/ meltfptr[3];; @@ -30149,7 +30365,7 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = /*_.PROGN___V6*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5084:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5086:/ clear"); /*clear *//*_#MELT_NEED_DBG__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IF___V4*/ meltfptr[3] = 0; @@ -30162,17 +30378,17 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5085:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5087:/ quasiblock"); - MELT_LOCATION ("warmelt-outobj.melt:5086:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5088:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L4*/ meltfnum[2] = melt_is_instance_of ((melt_ptr_t) ( /*_.SEXP__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_LOCATED */ meltfrout-> tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:5086:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5088:/ cond"); /*cond */ if ( /*_#IS_A__L4*/ meltfnum[2]) /*then */ { /*^cond.then */ @@ -30191,7 +30407,7 @@ lab_endgetargs:; /*_.PSLOC__V7*/ meltfptr[3] = /*_.LOCA_LOCATION__V8*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5086:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5088:/ clear"); /*clear *//*_.LOCA_LOCATION__V8*/ meltfptr[4] = 0; } ; @@ -30202,14 +30418,14 @@ lab_endgetargs:; /*_.PSLOC__V7*/ meltfptr[3] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5090:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5092:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_A__L5*/ meltfnum[1] = melt_is_instance_of ((melt_ptr_t) ( /*_.SEXP__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_SOURCE_COMMENT */ meltfrout->tabval[2])));; - MELT_LOCATION ("warmelt-outobj.melt:5090:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5092:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -30217,7 +30433,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:5091:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5093:/ quasiblock"); /*^getslot */ @@ -30228,7 +30444,7 @@ lab_endgetargs:; meltfptr[4] = slot; }; ; - MELT_LOCATION ("warmelt-outobj.melt:5092:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:5094:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) ( /*_.SEXP__V2*/ meltfptr[1]), 2, "SCOMM_STR"); @@ -30238,7 +30454,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5094:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5096:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) (( /*~DECLBUF */ meltfclos->tabval[0])), (0), 0); @@ -30246,7 +30462,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5095:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5097:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~DECLBUF */ meltfclos->tabval[0])), @@ -30255,7 +30471,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5096:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5098:/ locexp"); meltgc_add_strbuf_ccomment ((melt_ptr_t) (( /*~DECLBUF */ meltfclos-> tabval[0])), @@ -30266,7 +30482,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5097:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5099:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) (( /*~DECLBUF */ meltfclos->tabval[0])), @@ -30275,14 +30491,14 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5098:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5100:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) (( /*~DECLBUF */ meltfclos->tabval[0])), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5091:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5093:/ clear"); /*clear *//*_.SLOC__V9*/ meltfptr[4] = 0; /*^clear */ /*clear *//*_.SCOMM__V10*/ meltfptr[9] = 0; @@ -30292,16 +30508,16 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5090:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5092:/ cond.else"); /*^block */ /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:5103:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5105:/ checksignal"); MELT_CHECK_SIGNAL (); ; - MELT_LOCATION ("warmelt-outobj.melt:5101:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5103:/ quasiblock"); /*^multimsend */ @@ -30331,7 +30547,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5104:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5106:/ cppif.then"); /*^block */ /*anyblock */ { @@ -30357,7 +30573,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5104:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5106:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L6*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -30372,7 +30588,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5104:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5106:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -30386,7 +30602,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5104; + argtab[2].meltbp_long = 5106; /*^apply.arg */ argtab[3].meltbp_cstring = "compile_list_sexpr nexp="; /*^apply.arg */ @@ -30413,7 +30629,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V15*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5104:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5106:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V15*/ meltfptr[14] = 0; @@ -30426,7 +30642,7 @@ lab_endgetargs:; /*_.IF___V14*/ meltfptr[13] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5104:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5106:/ quasiblock"); /*_.PROGN___V16*/ meltfptr[14] = /*_.IF___V14*/ meltfptr[13];; @@ -30435,7 +30651,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = /*_.PROGN___V16*/ meltfptr[14];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5104:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5106:/ clear"); /*clear *//*_#MELT_NEED_DBG__L6*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.IF___V14*/ meltfptr[13] = 0; @@ -30448,7 +30664,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[12] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5105:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5107:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^checksignal */ @@ -30458,7 +30674,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NEXP__V11*/ meltfptr[4]), (melt_ptr_t) (( /*!CLASS_NREP */ meltfrout-> tabval[4])));; - MELT_LOCATION ("warmelt-outobj.melt:5105:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5107:/ cond"); /*cond */ if ( /*_#IS_A__L8*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -30479,7 +30695,7 @@ lab_endgetargs:; /*_#IF___L9*/ meltfnum[5] = /*_#NOT__L11*/ meltfnum[10];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5105:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5107:/ clear"); /*clear *//*_#IS_A__L10*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_#NOT__L11*/ meltfnum[10] = 0; @@ -30492,7 +30708,7 @@ lab_endgetargs:; /*_#IF___L9*/ meltfnum[5] = 0;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5105:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5107:/ cond"); /*cond */ if ( /*_#IF___L9*/ meltfnum[5]) /*then */ { /*^cond.then */ @@ -30500,7 +30716,7 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:5107:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5109:/ quasiblock"); /*^checksignal */ @@ -30528,7 +30744,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5108:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5110:/ cppif.then"); /*^block */ /*anyblock */ { @@ -30554,7 +30770,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5108:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5110:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[9]) /*then */ { /*^cond.then */ @@ -30570,7 +30786,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-outobj.melt:5108:/ checksignal"); + ("warmelt-outobj.melt:5110:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -30584,7 +30800,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5108; + argtab[2].meltbp_long = 5110; /*^apply.arg */ argtab[3].meltbp_cstring = "compile_list_sexpr wnexp="; @@ -30606,7 +30822,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V20*/ meltfptr[19];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5108:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5110:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[10] = 0; /*^clear */ @@ -30620,7 +30836,7 @@ lab_endgetargs:; /*_.IF___V19*/ meltfptr[18] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5108:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5110:/ quasiblock"); /*_.PROGN___V21*/ meltfptr[19] = @@ -30631,7 +30847,7 @@ lab_endgetargs:; /*_.PROGN___V21*/ meltfptr[19];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5108:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5110:/ clear"); /*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[9] = 0; /*^clear */ /*clear *//*_.IF___V19*/ meltfptr[18] = 0; @@ -30644,7 +30860,7 @@ lab_endgetargs:; /*_.IFCPP___V18*/ meltfptr[14] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5109:/ getslot"); + MELT_LOCATION ("warmelt-outobj.melt:5111:/ getslot"); { melt_ptr_t slot = 0; melt_object_get_field (slot, (melt_ptr_t) (( /*~INIPROC */ meltfclos->tabval[3])), 2, "NINIT_TOPL"); @@ -30662,7 +30878,7 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-outobj.melt:5107:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5109:/ clear"); /*clear *//*_.WNEXP__V17*/ meltfptr[13] = 0; /*^clear */ /*clear *//*_.IFCPP___V18*/ meltfptr[14] = 0; @@ -30673,7 +30889,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:5101:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5103:/ checksignal"); MELT_CHECK_SIGNAL (); ; @@ -30692,13 +30908,13 @@ lab_endgetargs:; } ; - MELT_LOCATION ("warmelt-outobj.melt:5085:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5087:/ clear"); /*clear *//*_#IS_A__L4*/ meltfnum[2] = 0; /*^clear */ /*clear *//*_.PSLOC__V7*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; - MELT_LOCATION ("warmelt-outobj.melt:5083:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5085:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -30790,7 +31006,7 @@ meltrout_130_warmelt_outobj_LAMBDA___27__ (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:5164:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:5166:/ getarg"); /*_.PRO__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto lab_endgetargs; @@ -30802,7 +31018,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5165:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5167:/ cppif.then"); /*^block */ /*anyblock */ { @@ -30814,7 +31030,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.PRO__V2*/ meltfptr[1]), (melt_ptr_t) (( /*!CLASS_NREP_ANYPROC */ meltfrout->tabval[0])));; - MELT_LOCATION ("warmelt-outobj.melt:5165:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5167:/ cond"); /*cond */ if ( /*_#IS_A__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -30822,7 +31038,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5165:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5167:/ cond.else"); /*^block */ /*anyblock */ @@ -30836,7 +31052,7 @@ lab_endgetargs:; melt_assert_failed (("check pro"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5165) ? (5165) : __LINE__, __FUNCTION__); + (5167) ? (5167) : __LINE__, __FUNCTION__); ; } ; @@ -30851,7 +31067,7 @@ lab_endgetargs:; /*_.IFCPP___V3*/ meltfptr[2] = /*_.IFELSE___V4*/ meltfptr[3];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5165:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5167:/ clear"); /*clear *//*_#IS_A__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V4*/ meltfptr[3] = 0; @@ -30872,17 +31088,17 @@ lab_endgetargs:; (( /*_#GET_INT__L2*/ meltfnum[0]) + (1));; { - MELT_LOCATION ("warmelt-outobj.melt:5166:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5168:/ locexp"); melt_put_int ((melt_ptr_t) (( /*~COUNTBOX */ meltfclos->tabval[0])), ( /*_#I__L3*/ meltfnum[2])); } ; - MELT_LOCATION ("warmelt-outobj.melt:5167:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5169:/ quasiblock"); /*_#GET_INT__L4*/ meltfnum[3] = (melt_get_int ((melt_ptr_t) (( /*~COUNTBOX */ meltfclos->tabval[0]))));; - MELT_LOCATION ("warmelt-outobj.melt:5167:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5169:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -30908,7 +31124,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5168:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5170:/ cppif.then"); /*^block */ /*anyblock */ { @@ -30934,7 +31150,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5168:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5170:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L5*/ meltfnum[4]) /*then */ { /*^cond.then */ @@ -30949,7 +31165,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5168:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5170:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -30962,7 +31178,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5168; + argtab[2].meltbp_long = 5170; /*^apply.arg */ argtab[3].meltbp_cstring = "compile_list_sexpr objpro="; /*^apply.arg */ @@ -30987,7 +31203,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5168:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5170:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L6*/ meltfnum[5] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V8*/ meltfptr[7] = 0; @@ -31000,7 +31216,7 @@ lab_endgetargs:; /*_.IF___V7*/ meltfptr[6] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5168:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5170:/ quasiblock"); /*_.PROGN___V9*/ meltfptr[7] = /*_.IF___V7*/ meltfptr[6];; @@ -31009,7 +31225,7 @@ lab_endgetargs:; /*_.IFCPP___V6*/ meltfptr[5] = /*_.PROGN___V9*/ meltfptr[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5168:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5170:/ clear"); /*clear *//*_#MELT_NEED_DBG__L5*/ meltfnum[4] = 0; /*^clear */ /*clear *//*_.IF___V7*/ meltfptr[6] = 0; @@ -31024,20 +31240,20 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5169:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5171:/ locexp"); meltgc_append_list ((melt_ptr_t) (( /*~OBJLIST */ meltfclos->tabval[3])), (melt_ptr_t) ( /*_.OBJPRO__V5*/ meltfptr[3])); } ; - MELT_LOCATION ("warmelt-outobj.melt:5167:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5169:/ clear"); /*clear *//*_#GET_INT__L4*/ meltfnum[3] = 0; /*^clear */ /*clear *//*_.OBJPRO__V5*/ meltfptr[3] = 0; /*^clear */ /*clear *//*_.IFCPP___V6*/ meltfptr[5] = 0; - MELT_LOCATION ("warmelt-outobj.melt:5164:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5166:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ @@ -31135,7 +31351,7 @@ meltrout_131_warmelt_outobj_COMPILE_LIST_SEXPR (meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:5335:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:5337:/ getarg"); /*_.LSEXP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -31167,13 +31383,13 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:5336:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5338:/ locexp"); debugeputs (("starting compile_list_sexpr")); } ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5337:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5339:/ cppif.then"); /*^block */ /*anyblock */ { @@ -31199,7 +31415,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5337:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5339:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -31214,7 +31430,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5337:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5339:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -31227,7 +31443,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5337; + argtab[2].meltbp_long = 5339; /*^apply.arg */ argtab[3].meltbp_cstring = "@*@@@@ compile_list_sexpr lsexp="; /*^apply.arg */ @@ -31258,7 +31474,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5337:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5339:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0; @@ -31271,7 +31487,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5337:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5339:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -31280,7 +31496,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5337:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5339:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -31295,7 +31511,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5338:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5340:/ cppif.then"); /*^block */ /*anyblock */ { @@ -31306,7 +31522,7 @@ lab_endgetargs:; /*_#IS_LIST__L3*/ meltfnum[1] = (melt_magic_discr ((melt_ptr_t) ( /*_.LSEXP__V2*/ meltfptr[1])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:5338:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5340:/ cond"); /*cond */ if ( /*_#IS_LIST__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -31314,7 +31530,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5338:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5340:/ cond.else"); /*^block */ /*anyblock */ @@ -31328,7 +31544,7 @@ lab_endgetargs:; melt_assert_failed (("check lsexp"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5338) ? (5338) : __LINE__, __FUNCTION__); + (5340) ? (5340) : __LINE__, __FUNCTION__); ; } ; @@ -31343,7 +31559,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5338:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5340:/ clear"); /*clear *//*_#IS_LIST__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; @@ -31356,7 +31572,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5339:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5341:/ cppif.then"); /*^block */ /*anyblock */ { @@ -31367,7 +31583,7 @@ lab_endgetargs:; /*_#IS_STRING__L4*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.MODNAMSTR__V4*/ meltfptr[3])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:5339:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5341:/ cond"); /*cond */ if ( /*_#IS_STRING__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -31375,7 +31591,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5339:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5341:/ cond.else"); /*^block */ /*anyblock */ @@ -31389,7 +31605,7 @@ lab_endgetargs:; melt_assert_failed (("check modnamstr"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5339) ? (5339) : __LINE__, __FUNCTION__); + (5341) ? (5341) : __LINE__, __FUNCTION__); ; } ; @@ -31404,7 +31620,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5339:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5341:/ clear"); /*clear *//*_#IS_STRING__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -31417,7 +31633,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5340:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5342:/ cppif.then"); /*^block */ /*anyblock */ { @@ -31429,7 +31645,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.INIENV__V3*/ meltfptr[2]), (melt_ptr_t) (( /*!CLASS_ENVIRONMENT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:5340:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5342:/ cond"); /*cond */ if ( /*_#IS_A__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -31437,7 +31653,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5340:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5342:/ cond.else"); /*^block */ /*anyblock */ @@ -31451,7 +31667,7 @@ lab_endgetargs:; melt_assert_failed (("check inienv"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5340) ? (5340) : __LINE__, __FUNCTION__); + (5342) ? (5342) : __LINE__, __FUNCTION__); ; } ; @@ -31466,7 +31682,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5340:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5342:/ clear"); /*clear *//*_#IS_A__L5*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V14*/ meltfptr[13] = 0; @@ -31479,7 +31695,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5341:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5343:/ cppif.then"); /*^block */ /*anyblock */ { @@ -31495,7 +31711,7 @@ lab_endgetargs:; /*_#NOT__L7*/ meltfnum[1] = (!( /*_#STRING_DYNLOADED_SUFFIXED__L6*/ meltfnum[0]));; - MELT_LOCATION ("warmelt-outobj.melt:5341:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5343:/ cond"); /*cond */ if ( /*_#NOT__L7*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -31503,7 +31719,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5341:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5343:/ cond.else"); /*^block */ /*anyblock */ @@ -31514,7 +31730,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("compile_list_sexpr modulename not ended with MELT_DYNLOADED_SUFFIX."), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5341) ? (5341) : __LINE__, __FUNCTION__); + melt_assert_failed (("compile_list_sexpr modulename not ended with MELT_DYNLOADED_SUFFIX."), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5343) ? (5343) : __LINE__, __FUNCTION__); ; } ; @@ -31529,7 +31745,7 @@ lab_endgetargs:; /*_.IFCPP___V15*/ meltfptr[13] = /*_.IFELSE___V16*/ meltfptr[15];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5341:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5343:/ clear"); /*clear *//*_#STRING_DYNLOADED_SUFFIXED__L6*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_#NOT__L7*/ meltfnum[1] = 0; @@ -31544,7 +31760,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5343:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5345:/ cppif.then"); /*^block */ /*anyblock */ { @@ -31560,7 +31776,7 @@ lab_endgetargs:; /*_#NOT__L9*/ meltfnum[1] = (!( /*_#STRING_SUFFIXED__L8*/ meltfnum[0]));; - MELT_LOCATION ("warmelt-outobj.melt:5343:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5345:/ cond"); /*cond */ if ( /*_#NOT__L9*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -31568,7 +31784,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5343:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5345:/ cond.else"); /*^block */ /*anyblock */ @@ -31579,7 +31795,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("compile_list_sexpr modulename not ended with .melt"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5343) ? (5343) : __LINE__, __FUNCTION__); + melt_assert_failed (("compile_list_sexpr modulename not ended with .melt"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5345) ? (5345) : __LINE__, __FUNCTION__); ; } ; @@ -31594,7 +31810,7 @@ lab_endgetargs:; /*_.IFCPP___V17*/ meltfptr[15] = /*_.IFELSE___V18*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5343:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5345:/ clear"); /*clear *//*_#STRING_SUFFIXED__L8*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_#NOT__L9*/ meltfnum[1] = 0; @@ -31609,7 +31825,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5345:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5347:/ cppif.then"); /*^block */ /*anyblock */ { @@ -31625,7 +31841,7 @@ lab_endgetargs:; /*_#NOT__L11*/ meltfnum[1] = (!( /*_#STRING_SUFFIXED__L10*/ meltfnum[0]));; - MELT_LOCATION ("warmelt-outobj.melt:5345:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5347:/ cond"); /*cond */ if ( /*_#NOT__L11*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -31633,7 +31849,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5345:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5347:/ cond.else"); /*^block */ /*anyblock */ @@ -31644,7 +31860,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("compile_list_sexpr modulename not ended with .c"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5345) ? (5345) : __LINE__, __FUNCTION__); + melt_assert_failed (("compile_list_sexpr modulename not ended with .c"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5347) ? (5347) : __LINE__, __FUNCTION__); ; } ; @@ -31659,7 +31875,7 @@ lab_endgetargs:; /*_.IFCPP___V19*/ meltfptr[17] = /*_.IFELSE___V20*/ meltfptr[19];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5345:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5347:/ clear"); /*clear *//*_#STRING_SUFFIXED__L10*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_#NOT__L11*/ meltfnum[1] = 0; @@ -31672,10 +31888,10 @@ lab_endgetargs:; /*_.IFCPP___V19*/ meltfptr[17] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5347:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5349:/ quasiblock"); - MELT_LOCATION ("warmelt-outobj.melt:5348:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5350:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_.MAKE_STRING_NAKEDBASENAME__V22*/ meltfptr[21] = @@ -31715,7 +31931,7 @@ lab_endgetargs:; /*_.MAKE_LIST__V28*/ meltfptr[27] = (meltgc_new_list ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[6]))));; - MELT_LOCATION ("warmelt-outobj.melt:5348:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5350:/ quasiblock"); /*^rawallocobj */ @@ -31819,7 +32035,7 @@ lab_endgetargs:; "MOCX_GENDEVLIST"); ; /*_.MODCTX__V29*/ meltfptr[28] = /*_.INST__V30*/ meltfptr[29];; - MELT_LOCATION ("warmelt-outobj.melt:5361:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5363:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -31834,7 +32050,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5363:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5365:/ cppif.then"); /*^block */ /*anyblock */ { @@ -31860,7 +32076,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5363:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5365:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L12*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -31875,7 +32091,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5363:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5365:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -31889,7 +32105,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5363; + argtab[2].meltbp_long = 5365; /*^apply.arg */ argtab[3].meltbp_cstring = "compile_list_sexpr initial ncx="; /*^apply.arg */ @@ -31909,7 +32125,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V34*/ meltfptr[33];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5363:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5365:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L13*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V34*/ meltfptr[33] = 0; @@ -31922,7 +32138,7 @@ lab_endgetargs:; /*_.IF___V33*/ meltfptr[32] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5363:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5365:/ quasiblock"); /*_.PROGN___V35*/ meltfptr[33] = /*_.IF___V33*/ meltfptr[32];; @@ -31931,7 +32147,7 @@ lab_endgetargs:; /*_.IFCPP___V32*/ meltfptr[31] = /*_.PROGN___V35*/ meltfptr[33];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5363:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5365:/ clear"); /*clear *//*_#MELT_NEED_DBG__L12*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V33*/ meltfptr[32] = 0; @@ -31946,7 +32162,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5364:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5366:/ cppif.then"); /*^block */ /*anyblock */ { @@ -31958,7 +32174,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.NCX__V31*/ meltfptr[30]), (melt_ptr_t) (( /*!CLASS_NORMALIZATION_CONTEXT */ meltfrout->tabval[8])));; - MELT_LOCATION ("warmelt-outobj.melt:5364:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5366:/ cond"); /*cond */ if ( /*_#IS_A__L14*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -31966,7 +32182,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5364:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5366:/ cond.else"); /*^block */ /*anyblock */ @@ -31980,7 +32196,7 @@ lab_endgetargs:; melt_assert_failed (("check ncx"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5364) ? (5364) : __LINE__, __FUNCTION__); + (5366) ? (5366) : __LINE__, __FUNCTION__); ; } ; @@ -31995,7 +32211,7 @@ lab_endgetargs:; /*_.IFCPP___V36*/ meltfptr[32] = /*_.IFELSE___V37*/ meltfptr[33];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5364:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5366:/ clear"); /*clear *//*_#IS_A__L14*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V37*/ meltfptr[33] = 0; @@ -32006,7 +32222,7 @@ lab_endgetargs:; /*_.IFCPP___V36*/ meltfptr[32] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5365:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5367:/ quasiblock"); /*^checksignal */ @@ -32034,12 +32250,12 @@ lab_endgetargs:; ; /*_#LENXLIST__L15*/ meltfnum[0] = (melt_list_length ((melt_ptr_t) ( /*_.XLIST__V39*/ meltfptr[38])));; - MELT_LOCATION ("warmelt-outobj.melt:5368:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5370:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#I__L16*/ meltfnum[1] = (( /*_#LENXLIST__L15*/ meltfnum[0]) <= (3));; - MELT_LOCATION ("warmelt-outobj.melt:5368:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5370:/ cond"); /*cond */ if ( /*_#I__L16*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -32049,7 +32265,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:5370:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5372:/ locexp"); /* compile_list_sexpr WARNSHORTCHK__1 */ warning (0, "MELT expanded few (%d) expresssions", (int) /*_#LENXLIST__L15*/ meltfnum[0]); @@ -32061,7 +32277,7 @@ lab_endgetargs:; ; } /*noelse */ ; - MELT_LOCATION ("warmelt-outobj.melt:5373:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5375:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -32088,7 +32304,7 @@ lab_endgetargs:; /*_.LET___V38*/ meltfptr[33] = /*_.TRANSLATE_MACROEXPANDED_LIST__V40*/ meltfptr[39];; - MELT_LOCATION ("warmelt-outobj.melt:5365:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5367:/ clear"); /*clear *//*_.XLIST__V39*/ meltfptr[38] = 0; /*^clear */ /*clear *//*_#LENXLIST__L15*/ meltfnum[0] = 0; @@ -32098,7 +32314,7 @@ lab_endgetargs:; /*clear *//*_.TRANSLATE_MACROEXPANDED_LIST__V40*/ meltfptr[39] = 0; /*_.LET___V21*/ meltfptr[19] = /*_.LET___V38*/ meltfptr[33];; - MELT_LOCATION ("warmelt-outobj.melt:5347:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5349:/ clear"); /*clear *//*_.MAKE_STRING_NAKEDBASENAME__V22*/ meltfptr[21] = 0; /*^clear */ /*clear *//*_.MAKE_MAPSTRING__V23*/ meltfptr[22] = 0; @@ -32124,7 +32340,7 @@ lab_endgetargs:; /*clear *//*_.LET___V38*/ meltfptr[33] = 0; { - MELT_LOCATION ("warmelt-outobj.melt:5378:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5380:/ locexp"); /* compile_list_sexpr CHECK_ERRORS_AFTER_GENERATION__1 */ if (melt_error_counter > 0) melt_fatal_error @@ -32136,11 +32352,11 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5383:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5385:/ locexp"); debugeputs (("ended compile_list_sexpr")); } ; - MELT_LOCATION ("warmelt-outobj.melt:5335:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5337:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ diff --git a/gcc/melt/generated/warmelt-outobj+05.c b/gcc/melt/generated/warmelt-outobj+05.c index 9bba8e5fc1e..772f38a2dd2 100644 --- a/gcc/melt/generated/warmelt-outobj+05.c +++ b/gcc/melt/generated/warmelt-outobj+05.c @@ -2283,7 +2283,7 @@ meltrout_132_warmelt_outobj_TRANSLATE_TO_C_ONE_OR_MORE_MELT_FILES /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:5398:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:5400:/ getarg"); /*_.FILES__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -2315,7 +2315,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5399:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5401:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2341,7 +2341,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5399:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5401:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -2356,7 +2356,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5399:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5401:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -2369,7 +2369,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5399; + argtab[2].meltbp_long = 5401; /*^apply.arg */ argtab[3].meltbp_cstring = "translate_to_c_one_or_more_melt_files files="; @@ -2395,7 +2395,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5399:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5401:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0; @@ -2408,7 +2408,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5399:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5401:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -2417,7 +2417,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5399:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5401:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -2432,7 +2432,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5400:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5402:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2444,7 +2444,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CURENV__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_ENVIRONMENT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:5400:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5402:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -2452,7 +2452,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5400:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5402:/ cond.else"); /*^block */ /*anyblock */ @@ -2466,7 +2466,7 @@ lab_endgetargs:; melt_assert_failed (("check curenv"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5400) ? (5400) : __LINE__, __FUNCTION__); + (5402) ? (5402) : __LINE__, __FUNCTION__); ; } ; @@ -2481,7 +2481,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5400:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5402:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; @@ -2494,7 +2494,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5401:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5403:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2505,7 +2505,7 @@ lab_endgetargs:; /*_#IS_STRING__L4*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.MODSRCNAME__V3*/ meltfptr[2])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:5401:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5403:/ cond"); /*cond */ if ( /*_#IS_STRING__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -2513,7 +2513,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5401:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5403:/ cond.else"); /*^block */ /*anyblock */ @@ -2527,7 +2527,7 @@ lab_endgetargs:; melt_assert_failed (("check modsrcname"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5401) ? (5401) : __LINE__, __FUNCTION__); + (5403) ? (5403) : __LINE__, __FUNCTION__); ; } ; @@ -2542,7 +2542,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5401:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5403:/ clear"); /*clear *//*_#IS_STRING__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -2553,14 +2553,14 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5402:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5404:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#STRING_DYNLOADED_SUFFIXED__L5*/ meltfnum[1] = /*string_dynloaded_suffixed: */ (melt_string_is_ending ((melt_ptr_t) /*_.MODSRCNAME__V3*/ meltfptr[2], MELT_DYNLOADED_SUFFIX));; - MELT_LOCATION ("warmelt-outobj.melt:5402:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5404:/ cond"); /*cond */ if ( /*_#STRING_DYNLOADED_SUFFIXED__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -2569,7 +2569,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5402:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5404:/ cond.else"); /*^block */ /*anyblock */ @@ -2579,7 +2579,7 @@ lab_endgetargs:; /*string_suffixed: */ (melt_string_is_ending ((melt_ptr_t) /*_.MODSRCNAME__V3*/ meltfptr[2], ".melt"));; - MELT_LOCATION ("warmelt-outobj.melt:5402:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5404:/ cond"); /*cond */ if ( /*_#STRING_SUFFIXED__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -2588,7 +2588,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5402:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5404:/ cond.else"); /*^block */ /*anyblock */ @@ -2604,7 +2604,7 @@ lab_endgetargs:; /*_#STRING_SUFFIXED__L9*/ meltfnum[8];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5402:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5404:/ clear"); /*clear *//*_#STRING_SUFFIXED__L9*/ meltfnum[8] = 0; } ; @@ -2613,7 +2613,7 @@ lab_endgetargs:; /*_#OR___L6*/ meltfnum[0] = /*_#OR___L8*/ meltfnum[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5402:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5404:/ clear"); /*clear *//*_#STRING_SUFFIXED__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_#OR___L8*/ meltfnum[7] = 0; @@ -2631,7 +2631,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:5405:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5407:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s - %s", melt_dbgcounter, ("invalid MELT source name - should not be suffixed"), melt_string_str ((melt_ptr_t) @@ -2645,7 +2645,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5407:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5409:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2661,7 +2661,7 @@ lab_endgetargs:; /*_#NOT__L11*/ meltfnum[6] = (!( /*_#STRING_DYNLOADED_SUFFIXED__L10*/ meltfnum[8]));; - MELT_LOCATION ("warmelt-outobj.melt:5407:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5409:/ cond"); /*cond */ if ( /*_#NOT__L11*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -2669,7 +2669,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5407:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5409:/ cond.else"); /*^block */ /*anyblock */ @@ -2680,7 +2680,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("translate_to_c_one_or_more_melt_files modsrcname not ended with MELT_DYNLOADED_SUFFIX"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5407) ? (5407) : __LINE__, __FUNCTION__); + melt_assert_failed (("translate_to_c_one_or_more_melt_files modsrcname not ended with MELT_DYNLOADED_SUFFIX"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5409) ? (5409) : __LINE__, __FUNCTION__); ; } ; @@ -2695,7 +2695,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5407:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5409:/ clear"); /*clear *//*_#STRING_DYNLOADED_SUFFIXED__L10*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_#NOT__L11*/ meltfnum[6] = 0; @@ -2710,7 +2710,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5409:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5411:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2726,7 +2726,7 @@ lab_endgetargs:; /*_#NOT__L13*/ meltfnum[8] = (!( /*_#STRING_SUFFIXED__L12*/ meltfnum[7]));; - MELT_LOCATION ("warmelt-outobj.melt:5409:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5411:/ cond"); /*cond */ if ( /*_#NOT__L13*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -2734,7 +2734,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5409:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5411:/ cond.else"); /*^block */ /*anyblock */ @@ -2745,7 +2745,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("translate_to_c_one_or_more_melt_files modulename not ended with .melt"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5409) ? (5409) : __LINE__, __FUNCTION__); + melt_assert_failed (("translate_to_c_one_or_more_melt_files modulename not ended with .melt"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5411) ? (5411) : __LINE__, __FUNCTION__); ; } ; @@ -2760,7 +2760,7 @@ lab_endgetargs:; /*_.IFCPP___V15*/ meltfptr[13] = /*_.IFELSE___V16*/ meltfptr[15];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5409:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5411:/ clear"); /*clear *//*_#STRING_SUFFIXED__L12*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_#NOT__L13*/ meltfnum[8] = 0; @@ -2775,7 +2775,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5411:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5413:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2791,7 +2791,7 @@ lab_endgetargs:; /*_#NOT__L15*/ meltfnum[7] = (!( /*_#STRING_SUFFIXED__L14*/ meltfnum[6]));; - MELT_LOCATION ("warmelt-outobj.melt:5411:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5413:/ cond"); /*cond */ if ( /*_#NOT__L15*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -2799,7 +2799,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5411:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5413:/ cond.else"); /*^block */ /*anyblock */ @@ -2810,7 +2810,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("translate_to_c_one_or_more_melt_files modulename not ended with .c"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5411) ? (5411) : __LINE__, __FUNCTION__); + melt_assert_failed (("translate_to_c_one_or_more_melt_files modulename not ended with .c"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5413) ? (5413) : __LINE__, __FUNCTION__); ; } ; @@ -2825,7 +2825,7 @@ lab_endgetargs:; /*_.IFCPP___V17*/ meltfptr[15] = /*_.IFELSE___V18*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5411:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5413:/ clear"); /*clear *//*_#STRING_SUFFIXED__L14*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_#NOT__L15*/ meltfnum[7] = 0; @@ -2838,7 +2838,7 @@ lab_endgetargs:; /*_.IFCPP___V17*/ meltfptr[15] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5413:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5415:/ quasiblock"); /*_#ISVALIDMODSRC__L16*/ meltfnum[8] = 0;; @@ -2849,7 +2849,7 @@ lab_endgetargs:; ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; { - MELT_LOCATION ("warmelt-outobj.melt:5418:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5420:/ locexp"); /* translate_to_c_one_or_more_melt_files SETISVALIDMODSRCCH__1 */ const char *modsrcstr = melt_string_str ((melt_ptr_t) /*_.MODSRCNAME__V3*/ meltfptr[2]); @@ -2861,12 +2861,12 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-outobj.melt:5425:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5427:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NOT__L17*/ meltfnum[6] = (!( /*_#ISVALIDMODSRC__L16*/ meltfnum[8]));; - MELT_LOCATION ("warmelt-outobj.melt:5425:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5427:/ cond"); /*cond */ if ( /*_#NOT__L17*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -2876,7 +2876,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5427:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5429:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2902,7 +2902,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5427:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5429:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -2917,7 +2917,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5427:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5429:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -2931,7 +2931,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5427; + argtab[2].meltbp_long = 5429; /*^apply.arg */ argtab[3].meltbp_cstring = "translate_to_c_one_or_more_melt_files bad generated modsrcname="; @@ -2953,7 +2953,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V24*/ meltfptr[23];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5427:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5429:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[18] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] = 0; @@ -2966,7 +2966,7 @@ lab_endgetargs:; /*_.IF___V23*/ meltfptr[22] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5427:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5429:/ quasiblock"); /*_.PROGN___V25*/ meltfptr[23] = /*_.IF___V23*/ meltfptr[22];; @@ -2975,7 +2975,7 @@ lab_endgetargs:; /*_.IFCPP___V22*/ meltfptr[21] = /*_.PROGN___V25*/ meltfptr[23];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5427:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5429:/ clear"); /*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IF___V23*/ meltfptr[22] = 0; @@ -2990,21 +2990,33 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5428:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5430:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s - %s", melt_dbgcounter, ("invalid generated source name [basename should have no dot or plus]"), melt_string_str ((melt_ptr_t) ( /*_.MODSRCNAME__V3*/ meltfptr[2]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:5431:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5433:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-outobj.melt:5431:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:5433:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-outobj.melt:5426:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5428:/ quasiblock"); /*_.PROGN___V27*/ meltfptr[23] = /*_.RETURN___V26*/ meltfptr[22];; @@ -3013,7 +3025,7 @@ lab_endgetargs:; /*_.IF___V21*/ meltfptr[20] = /*_.PROGN___V27*/ meltfptr[23];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5425:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5427:/ clear"); /*clear *//*_.IFCPP___V22*/ meltfptr[21] = 0; /*^clear */ /*clear *//*_.RETURN___V26*/ meltfptr[22] = 0; @@ -3028,13 +3040,13 @@ lab_endgetargs:; /*_.IF___V21*/ meltfptr[20] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5434:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5436:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_STRING__L20*/ meltfnum[18] = (melt_magic_discr ((melt_ptr_t) ( /*_.FILES__V2*/ meltfptr[1])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:5434:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5436:/ cond"); /*cond */ if ( /*_#IS_STRING__L20*/ meltfnum[18]) /*then */ { /*^cond.then */ @@ -3044,7 +3056,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5435:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5437:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3070,7 +3082,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5435:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5437:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -3085,7 +3097,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5435:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5437:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3099,7 +3111,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5435; + argtab[2].meltbp_long = 5437; /*^apply.arg */ argtab[3].meltbp_cstring = "translate_to_c_one_or_more_melt_files reading single file "; @@ -3121,7 +3133,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V31*/ meltfptr[30];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5435:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5437:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[21] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V31*/ meltfptr[30] = 0; @@ -3134,7 +3146,7 @@ lab_endgetargs:; /*_.IF___V30*/ meltfptr[23] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5435:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5437:/ quasiblock"); /*_.PROGN___V32*/ meltfptr[30] = /*_.IF___V30*/ meltfptr[23];; @@ -3143,7 +3155,7 @@ lab_endgetargs:; /*_.IFCPP___V29*/ meltfptr[22] = /*_.PROGN___V32*/ meltfptr[30];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5435:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5437:/ clear"); /*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IF___V30*/ meltfptr[23] = 0; @@ -3158,7 +3170,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5436:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5438:/ locexp"); inform (UNKNOWN_LOCATION, "MELT INFORM [#%ld]: %s - %s", melt_dbgcounter, ("reading from file"), melt_string_str ((melt_ptr_t) @@ -3169,7 +3181,7 @@ lab_endgetargs:; (meltgc_read_file (melt_string_str ((melt_ptr_t) ( /*_.FILES__V2*/ meltfptr[1])), (char *) 0));; - MELT_LOCATION ("warmelt-outobj.melt:5437:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5439:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3188,7 +3200,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5434:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5436:/ quasiblock"); /*_.PROGN___V35*/ meltfptr[34] = @@ -3198,7 +3210,7 @@ lab_endgetargs:; /*_.IFELSE___V28*/ meltfptr[21] = /*_.PROGN___V35*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5434:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5436:/ clear"); /*clear *//*_.IFCPP___V29*/ meltfptr[22] = 0; /*^clear */ /*clear *//*_.READ_FILE__V33*/ meltfptr[23] = 0; @@ -3216,13 +3228,13 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:5438:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5440:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L23*/ meltfnum[21] = (melt_magic_discr ((melt_ptr_t) ( /*_.FILES__V2*/ meltfptr[1])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:5438:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5440:/ cond"); /*cond */ if ( /*_#IS_LIST__L23*/ meltfnum[21]) /*then */ { /*^cond.then */ @@ -3232,7 +3244,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5439:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5441:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3258,7 +3270,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5439:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5441:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -3274,7 +3286,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-outobj.melt:5439:/ checksignal"); + ("warmelt-outobj.melt:5441:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3288,7 +3300,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5439; + argtab[2].meltbp_long = 5441; /*^apply.arg */ argtab[3].meltbp_cstring = "translate_to_c_one_or_more_melt_files reading list of files "; @@ -3310,7 +3322,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V39*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5439:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5441:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L25*/ meltfnum[24] = 0; /*^clear */ @@ -3324,7 +3336,7 @@ lab_endgetargs:; /*_.IF___V38*/ meltfptr[30] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5439:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5441:/ quasiblock"); /*_.PROGN___V40*/ meltfptr[34] = @@ -3335,7 +3347,7 @@ lab_endgetargs:; /*_.PROGN___V40*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5439:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5441:/ clear"); /*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IF___V38*/ meltfptr[30] = 0; @@ -3367,7 +3379,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5443:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5445:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3393,7 +3405,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5443:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5445:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[24]) /*then */ { /*^cond.then */ @@ -3409,7 +3421,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-outobj.melt:5443:/ checksignal"); + ("warmelt-outobj.melt:5445:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3424,7 +3436,7 @@ lab_endgetargs:; argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5443; + argtab[2].meltbp_long = 5445; /*^apply.arg */ argtab[3].meltbp_cstring = "translate_to_c_one_or_more_melt_files curfile="; @@ -3450,7 +3462,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:5443:/ clear"); + ("warmelt-outobj.melt:5445:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[7] = 0; /*^clear */ @@ -3466,7 +3478,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:5443:/ quasiblock"); + ("warmelt-outobj.melt:5445:/ quasiblock"); /*_.PROGN___V46*/ meltfptr[44] = @@ -3477,7 +3489,7 @@ lab_endgetargs:; /*_.PROGN___V46*/ meltfptr[44];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5443:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5445:/ clear"); /*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[24] = 0; /*^clear */ /*clear *//*_.IF___V44*/ meltfptr[43] = 0; @@ -3492,7 +3504,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5444:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5446:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3504,7 +3516,7 @@ lab_endgetargs:; (melt_magic_discr ((melt_ptr_t) ( /*_.CURFILE__V42*/ meltfptr[34])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:5444:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5446:/ cond"); /*cond */ if ( /*_#IS_STRING__L28*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -3514,7 +3526,7 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-outobj.melt:5444:/ cond.else"); + ("warmelt-outobj.melt:5446:/ cond.else"); /*^block */ /*anyblock */ @@ -3529,7 +3541,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5444) ? (5444) : + (5446) ? (5446) : __LINE__, __FUNCTION__); ; } @@ -3546,7 +3558,7 @@ lab_endgetargs:; /*_.IFELSE___V48*/ meltfptr[44];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5444:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5446:/ clear"); /*clear *//*_#IS_STRING__L28*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IFELSE___V48*/ meltfptr[44] = 0; @@ -3559,7 +3571,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5445:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5447:/ locexp"); inform (UNKNOWN_LOCATION, "MELT INFORM [#%ld]: %s - %s", melt_dbgcounter, ("reading from file"), @@ -3568,7 +3580,7 @@ lab_endgetargs:; meltfptr[34]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:5446:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5448:/ quasiblock"); /*_.CUREAD__V50*/ meltfptr[49] = @@ -3578,7 +3590,7 @@ lab_endgetargs:; (char *) 0));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5448:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5450:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3604,7 +3616,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5448:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5450:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[24]) /*then */ { /*^cond.then */ @@ -3620,7 +3632,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-outobj.melt:5448:/ checksignal"); + ("warmelt-outobj.melt:5450:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3635,7 +3647,7 @@ lab_endgetargs:; argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5448; + argtab[2].meltbp_long = 5450; /*^apply.arg */ argtab[3].meltbp_cstring = "compilefile_mode curead="; @@ -3661,7 +3673,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:5448:/ clear"); + ("warmelt-outobj.melt:5450:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L30*/ meltfnum[7] = 0; /*^clear */ @@ -3677,7 +3689,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:5448:/ quasiblock"); + ("warmelt-outobj.melt:5450:/ quasiblock"); /*_.PROGN___V54*/ meltfptr[52] = @@ -3688,7 +3700,7 @@ lab_endgetargs:; /*_.PROGN___V54*/ meltfptr[52];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5448:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5450:/ clear"); /*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[24] = 0; /*^clear */ /*clear *//*_.IF___V52*/ meltfptr[51] = 0; @@ -3703,7 +3715,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5449:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5451:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3717,7 +3729,7 @@ lab_endgetargs:; (melt_unsafe_magic_discr ((melt_ptr_t) ( /*_.CUREAD__V50*/ meltfptr[49])) == MELTOBMAG_LIST));; - MELT_LOCATION ("warmelt-outobj.melt:5449:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5451:/ cond"); /*cond */ if ( /*_#IS_LIST_OR_NULL__L31*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -3727,7 +3739,7 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-outobj.melt:5449:/ cond.else"); + ("warmelt-outobj.melt:5451:/ cond.else"); /*^block */ /*anyblock */ @@ -3742,7 +3754,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5449) ? (5449) : + (5451) ? (5451) : __LINE__, __FUNCTION__); ; } @@ -3759,7 +3771,7 @@ lab_endgetargs:; /*_.IFELSE___V56*/ meltfptr[52];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5449:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5451:/ clear"); /*clear *//*_#IS_LIST_OR_NULL__L31*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IFELSE___V56*/ meltfptr[52] = 0; @@ -3771,7 +3783,7 @@ lab_endgetargs:; #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION - ("warmelt-outobj.melt:5450:/ checksignal"); + ("warmelt-outobj.melt:5452:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3795,7 +3807,7 @@ lab_endgetargs:; /*_.LET___V49*/ meltfptr[44] = /*_.LIST_APPEND2LIST__V57*/ meltfptr[52];; - MELT_LOCATION ("warmelt-outobj.melt:5446:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5448:/ clear"); /*clear *//*_.CUREAD__V50*/ meltfptr[49] = 0; /*^clear */ /*clear *//*_.IFCPP___V51*/ meltfptr[50] = 0; @@ -3810,7 +3822,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:5440:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5442:/ clear"); /*clear *//*_.CURPAIR__V41*/ meltfptr[30] = 0; /*^clear */ /*clear *//*_.CURFILE__V42*/ meltfptr[34] = 0; @@ -3822,7 +3834,7 @@ lab_endgetargs:; /*clear *//*_.LET___V49*/ meltfptr[44] = 0; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-outobj.melt:5438:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5440:/ quasiblock"); /*epilog */ @@ -3841,7 +3853,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5452:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5454:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3857,7 +3869,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5452:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5454:/ cond.else"); /*^block */ /*anyblock */ @@ -3868,7 +3880,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("bad files - should be a list of filenames or a filename"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5452) ? (5452) : __LINE__, __FUNCTION__); + melt_assert_failed (("bad files - should be a list of filenames or a filename"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5454) ? (5454) : __LINE__, __FUNCTION__); ; } ; @@ -3884,7 +3896,7 @@ lab_endgetargs:; /*_.IFELSE___V59*/ meltfptr[50];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5452:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5454:/ clear"); /*clear *//*_.IFELSE___V59*/ meltfptr[50] = 0; } @@ -3893,7 +3905,7 @@ lab_endgetargs:; /*_.IFCPP___V58*/ meltfptr[49] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5451:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5453:/ quasiblock"); /*_.PROGN___V60*/ meltfptr[51] = @@ -3904,7 +3916,7 @@ lab_endgetargs:; /*_.PROGN___V60*/ meltfptr[51];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5438:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5440:/ clear"); /*clear *//*_.IFCPP___V58*/ meltfptr[49] = 0; /*^clear */ /*clear *//*_.PROGN___V60*/ meltfptr[51] = 0; @@ -3915,7 +3927,7 @@ lab_endgetargs:; /*_.IFELSE___V28*/ meltfptr[21] = /*_.IFELSE___V36*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5434:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5436:/ clear"); /*clear *//*_#IS_LIST__L23*/ meltfnum[21] = 0; /*^clear */ /*clear *//*_.IFELSE___V36*/ meltfptr[22] = 0; @@ -3925,7 +3937,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5454:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5456:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3951,7 +3963,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5454:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5456:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L32*/ meltfnum[24]) /*then */ { /*^cond.then */ @@ -3966,7 +3978,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5454:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5456:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3980,7 +3992,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5454; + argtab[2].meltbp_long = 5456; /*^apply.arg */ argtab[3].meltbp_cstring = "after read translate_to_c_one_or_more_melt_files rlist="; @@ -4001,7 +4013,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V63*/ meltfptr[50];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5454:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5456:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L33*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V63*/ meltfptr[50] = 0; @@ -4014,7 +4026,7 @@ lab_endgetargs:; /*_.IF___V62*/ meltfptr[23] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5454:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5456:/ quasiblock"); /*_.PROGN___V64*/ meltfptr[49] = /*_.IF___V62*/ meltfptr[23];; @@ -4023,7 +4035,7 @@ lab_endgetargs:; /*_.IFCPP___V61*/ meltfptr[52] = /*_.PROGN___V64*/ meltfptr[49];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5454:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5456:/ clear"); /*clear *//*_#MELT_NEED_DBG__L32*/ meltfnum[24] = 0; /*^clear */ /*clear *//*_.IF___V62*/ meltfptr[23] = 0; @@ -4038,7 +4050,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5455:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5457:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4052,7 +4064,7 @@ lab_endgetargs:; /*_#I__L35*/ meltfnum[7] = (( /*_#LIST_LENGTH__L34*/ meltfnum[21]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:5455:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5457:/ cond"); /*cond */ if ( /*_#I__L35*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -4060,7 +4072,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5455:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5457:/ cond.else"); /*^block */ /*anyblock */ @@ -4074,7 +4086,7 @@ lab_endgetargs:; melt_assert_failed (("check non empty rlist"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5455) ? (5455) : __LINE__, __FUNCTION__); + (5457) ? (5457) : __LINE__, __FUNCTION__); ; } ; @@ -4089,7 +4101,7 @@ lab_endgetargs:; /*_.IFCPP___V65*/ meltfptr[51] = /*_.IFELSE___V66*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5455:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5457:/ clear"); /*clear *//*_#LIST_LENGTH__L34*/ meltfnum[21] = 0; /*^clear */ /*clear *//*_#I__L35*/ meltfnum[7] = 0; @@ -4102,7 +4114,7 @@ lab_endgetargs:; /*_.IFCPP___V65*/ meltfptr[51] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5456:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5458:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -4125,7 +4137,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5457:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5459:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4151,7 +4163,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5457:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5459:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L36*/ meltfnum[24]) /*then */ { /*^cond.then */ @@ -4166,7 +4178,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5457:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5459:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -4180,7 +4192,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5457; + argtab[2].meltbp_long = 5459; /*^apply.arg */ argtab[3].meltbp_cstring = "translate_to_c_one_or_more_melt_files done modsrcname="; @@ -4203,7 +4215,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V70*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5457:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5459:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L37*/ meltfnum[21] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V70*/ meltfptr[22] = 0; @@ -4216,7 +4228,7 @@ lab_endgetargs:; /*_.IF___V69*/ meltfptr[49] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5457:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5459:/ quasiblock"); /*_.PROGN___V71*/ meltfptr[22] = /*_.IF___V69*/ meltfptr[49];; @@ -4225,7 +4237,7 @@ lab_endgetargs:; /*_.IFCPP___V68*/ meltfptr[23] = /*_.PROGN___V71*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5457:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5459:/ clear"); /*clear *//*_#MELT_NEED_DBG__L36*/ meltfnum[24] = 0; /*^clear */ /*clear *//*_.IF___V69*/ meltfptr[49] = 0; @@ -4242,7 +4254,7 @@ lab_endgetargs:; /*_.LET___V19*/ meltfptr[17] = /*_.IFCPP___V68*/ meltfptr[23];; - MELT_LOCATION ("warmelt-outobj.melt:5413:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5415:/ clear"); /*clear *//*_#ISVALIDMODSRC__L16*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.RLIST__V20*/ meltfptr[19] = 0; @@ -4262,14 +4274,26 @@ lab_endgetargs:; /*clear *//*_.COMPILE_LIST_SEXPR__V67*/ meltfptr[50] = 0; /*^clear */ /*clear *//*_.IFCPP___V68*/ meltfptr[23] = 0; - MELT_LOCATION ("warmelt-outobj.melt:5398:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5400:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V19*/ meltfptr[17];; - MELT_LOCATION ("warmelt-outobj.melt:5398:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:5400:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -4377,7 +4401,7 @@ meltrout_133_warmelt_outobj_GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:5464:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:5466:/ getarg"); /*_.SBUF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -4399,7 +4423,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5467:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5469:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4410,7 +4434,7 @@ lab_endgetargs:; /*_#IS_STRBUF__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1])) == MELTOBMAG_STRBUF);; - MELT_LOCATION ("warmelt-outobj.melt:5467:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5469:/ cond"); /*cond */ if ( /*_#IS_STRBUF__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -4418,7 +4442,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5467:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5469:/ cond.else"); /*^block */ /*anyblock */ @@ -4432,7 +4456,7 @@ lab_endgetargs:; melt_assert_failed (("check sbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5467) ? (5467) : __LINE__, __FUNCTION__); + (5469) ? (5469) : __LINE__, __FUNCTION__); ; } ; @@ -4447,7 +4471,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5467:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5469:/ clear"); /*clear *//*_#IS_STRBUF__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -4460,19 +4484,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5468:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5470:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), ("/** Copyright (C) ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:5469:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5471:/ quasiblock"); /*_#YEAR__L2*/ meltfnum[0] = 0;; { - MELT_LOCATION ("warmelt-outobj.melt:5472:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5474:/ locexp"); /*+ GETYEAR__1 */ time_t GETYEAR__1_now = 0; struct tm *GETYEAR__1_tm = NULL; @@ -4487,17 +4511,17 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5482:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5484:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), ( /*_#YEAR__L2*/ meltfnum[0])); } ; - MELT_LOCATION ("warmelt-outobj.melt:5469:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5471:/ clear"); /*clear *//*_#YEAR__L2*/ meltfnum[0] = 0; { - MELT_LOCATION ("warmelt-outobj.melt:5484:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5486:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (" Free Software Foundation, Inc.")); @@ -4505,26 +4529,26 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5485:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5487:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:5486:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5488:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (" This generated file ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:5487:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5489:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_STRING__L3*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.NAME__V3*/ meltfptr[2])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:5487:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5489:/ cond"); /*cond */ if ( /*_#IS_STRING__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -4534,7 +4558,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:5490:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5492:/ locexp"); /*ADDBASENAME__1 + */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), lbasename (melt_string_str @@ -4550,7 +4574,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5495:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5497:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (" is part of GCC.")); @@ -4558,21 +4582,21 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5496:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5498:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:5497:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5499:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:5498:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5500:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (" [DON\'T EDIT THIS GENERATED FILE]\n\n GCC is free software; you can redistribute it and/or modify\n it under the terms of the GNU General Public License as published by\n the Free Software Foundation; either version 3, or (at your option)\n any later version.\n\n GCC is distributed in the hope that it will be useful,\n but WITHOUT ANY WARRANTY; without even the implied warranty of\n MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\n GNU General Public License for more details.\n\n You should have received a copy of the GNU General Public License\n along with GCC; see the file COPYING3. If not see\n <http://www.gnu.org/licenses/>.\n**/")); @@ -4580,19 +4604,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5514:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5516:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:5515:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5517:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5464:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5466:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ diff --git a/gcc/melt/generated/warmelt-outobj+meltdesc.c b/gcc/melt/generated/warmelt-outobj+meltdesc.c index b037c34310d..5b6e7ba4231 100644 --- a/gcc/melt/generated/warmelt-outobj+meltdesc.c +++ b/gcc/melt/generated/warmelt-outobj+meltdesc.c @@ -19,7 +19,7 @@ #endif /*__cplusplus */ /* version of the GCC compiler & MELT runtime generating this */ -const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revision 188875] MELT_0.9.6-pre" +const char melt_genversionstr[]="4.8.0 20120702 (experimental) [melt-branch revision 189162] MELT_0.9.6-pre" #ifdef __cplusplus " (in C++)" @@ -28,7 +28,7 @@ const char melt_genversionstr[]="4.8.0 20120620 (experimental) [melt-branch revi #endif ; -const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_188875]"; +const char melt_versionmeltstr[]="0.9.6-pre [melt-branch_revision_189162]"; /* source name & real path of the module */ /*MELTMODULENAME MELT-STAGE-ZERO/warmelt-outobj */ @@ -36,18 +36,18 @@ const char melt_modulename[]="warmelt-outobj"; const char melt_modulerealpath[]="/usr/local/libexec/gcc-melt/gcc/x86_64-unknown-linux-gnu/4.8.0/melt-modules/0.9.6-pre/warmelt-outobj"; /* hash of preprocessed melt-run.h generating this */ -const char melt_prepromd5meltrun[]="40fea0fe808f877cf6541857ec8d6c2d"; +const char melt_prepromd5meltrun[]="b3a18a5fcc8e78e7c3ea5bf55f88e347"; /* hexmd5checksum of primary C file */ -const char melt_primaryhexmd5[]="7ed0e06647506684c059a233823b7d7f"; +const char melt_primaryhexmd5[]="f1921d90121354b0d58a49fd211bc3c2"; /* hexmd5checksum of secondary C files */ const char* const melt_secondaryhexmd5tab[]={ /*nosecfile*/ (const char*)0, - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+01.c #1 */ "d602cbda31b94a51288692cf30ffa0f9", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+02.c #2 */ "9fa6f3c24b39d7b55d86d4a76ca04c7f", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+03.c #3 */ "e531f9a5761fc9648aecd5fe11280273", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+04.c #4 */ "1daebaac9f68a926c051590d12130a85", - /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+05.c #5 */ "734ee439fe4eb2b1358ebabab6a99062", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+01.c #1 */ "65251f2f254fc7961581d2ed47e79bab", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+02.c #2 */ "509c586f017e26664871562ec8c718b9", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+03.c #3 */ "1d48c849c5e7a7479cccbe25e21e671e", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+04.c #4 */ "2cfcbd29543326d95ebb33609f04f00a", + /*sechexmd5checksum MELT-STAGE-ZERO/warmelt-outobj+05.c #5 */ "31168f637da814b26556c76ce057061b", /*nosecfile*/ (const char*)0, (const char*)0 }; @@ -55,10 +55,10 @@ const char* const melt_secondaryhexmd5tab[]={ const int melt_lastsecfileindex=5; /* cumulated checksum of primary & secondary files */ -const char melt_cumulated_hexmd5[]="954152e6437441f16700d05e4bbfe5cd" ; +const char melt_cumulated_hexmd5[]="9ebde77058fdb602b36f1aa31e755997" ; /* include the timestamp file */ -#define meltmod_warmelt_outobj_mds__954152e6437441f16700d05e4bbfe5cd 1 +#define meltmod_warmelt_outobj_mds__9ebde77058fdb602b36f1aa31e755997 1 #include "warmelt-outobj+melttime.h" diff --git a/gcc/melt/generated/warmelt-outobj+melttime.h b/gcc/melt/generated/warmelt-outobj+melttime.h index cd9aeb02552..4431dc48f0c 100644 --- a/gcc/melt/generated/warmelt-outobj+melttime.h +++ b/gcc/melt/generated/warmelt-outobj+melttime.h @@ -5,7 +5,7 @@ /* This warmelt-outobj+melttime.h is included from warmelt-outobj+meltdesc.c only. */ -#if meltmod_warmelt_outobj_mds__954152e6437441f16700d05e4bbfe5cd +#if meltmod_warmelt_outobj_mds__9ebde77058fdb602b36f1aa31e755997 /* MELT generation timestamp for MELT-STAGE-ZERO/warmelt-outobj */ #ifdef __cplusplus @@ -18,8 +18,8 @@ extern "C" { /*MELT BOOTSTRAP*/ -const char melt_gen_timestamp[]="Fri Jun 22 15:20:09 2012 CEST"; -const long long melt_gen_timenum=1340371209; +const char melt_gen_timestamp[]="Mon Jul 2 17:04:56 2012 MEST"; +const long long melt_gen_timenum=1341241496; const char melt_build_timestamp[]= __DATE__ "@" __TIME__ #ifdef __cplusplus @@ -34,7 +34,7 @@ const long long melt_gen_timenum=1340371209; } ; /* end extern C */ #endif /*__cplusplus */ - #else /* ! meltmod_warmelt_outobj_mds__954152e6437441f16700d05e4bbfe5cd */ + #else /* ! meltmod_warmelt_outobj_mds__9ebde77058fdb602b36f1aa31e755997 */ #error invalid timestamp file for MELT-STAGE-ZERO/warmelt-outobj - #endif /* meltmod_warmelt_outobj_mds__954152e6437441f16700d05e4bbfe5cd */ + #endif /* meltmod_warmelt_outobj_mds__9ebde77058fdb602b36f1aa31e755997 */ diff --git a/gcc/melt/generated/warmelt-outobj.c b/gcc/melt/generated/warmelt-outobj.c index b865a605915..ad1c0cf4db9 100644 --- a/gcc/melt/generated/warmelt-outobj.c +++ b/gcc/melt/generated/warmelt-outobj.c @@ -2322,7 +2322,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.REFERENCED_VALUE__V2*/ meltfptr[1];; - MELT_LOCATION ("warmelt-outobj.melt:42:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:42:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -2844,7 +2856,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; - MELT_LOCATION ("warmelt-outobj.melt:69:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:69:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3129,7 +3153,19 @@ lab_endgetargs:; /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V8*/ meltfptr[4];; - MELT_LOCATION ("warmelt-outobj.melt:83:/ finalreturn"); + + { + MELT_LOCATION ("warmelt-outobj.melt:83:/ locexp"); + /*ochecknores compilobj_nrep_return */ +#if MELT_HAVE_DEBUG + if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) + melt_warn_for_no_expected_secondary_results (); + /* we warned when secondary results are expected but not returned. */ +#endif /*MELT_HAVE_DEBUG */ + ; + } + ; + /*^finalreturn */ ; /*finalret */ goto labend_rout; /*epilog */ @@ -3233,7 +3269,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, dbgprintf ("start initialize_module_meltdata_warmelt_outobj iniframp__=%p", (void *) iniframp__); melt_assertmsg ("check module initial frame", - iniframp__->mcfr_nbvar == /*minihash */ -3709); + iniframp__->mcfr_nbvar == /*minihash */ -975); struct cdata_st { @@ -3969,7 +4005,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_5__BUFFER_LIMIT_CONT.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - cdat->dobj_5__BUFFER_LIMIT_CONT.obj_hash = 880524850; + cdat->dobj_5__BUFFER_LIMIT_CONT.obj_hash = 782584355; cdat->dobj_5__BUFFER_LIMIT_CONT.obj_len = 1; /*iniboxint dint_6__ */ @@ -5637,7 +5673,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_138__PREVLOC_CONTAINER.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - cdat->dobj_138__PREVLOC_CONTAINER.obj_hash = 13393296; + cdat->dobj_138__PREVLOC_CONTAINER.obj_hash = 179553167; cdat->dobj_138__PREVLOC_CONTAINER.obj_len = 1; @@ -5689,7 +5725,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_141__PREVIMPLBUF_CONTAINER.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - cdat->dobj_141__PREVIMPLBUF_CONTAINER.obj_hash = 444505523; + cdat->dobj_141__PREVIMPLBUF_CONTAINER.obj_hash = 957801173; cdat->dobj_141__PREVIMPLBUF_CONTAINER.obj_len = 1; /*inirout drout_142__LINE_AND_FILE_OF_LOCATION */ @@ -5779,7 +5815,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_148__OUTPUT_LOCATION.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_148__OUTPUT_LOCATION.routdescr, - "OUTPUT_LOCATION @warmelt-outobj.melt:1106", + "OUTPUT_LOCATION @warmelt-outobj.melt:1108", MELT_ROUTDESCR_LEN - 1); cdat->drout_148__OUTPUT_LOCATION.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_148__OUTPUT_LOCATION, @@ -5798,7 +5834,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_150__OUTPUT_CURFRAME_DECLSTRUCT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_150__OUTPUT_CURFRAME_DECLSTRUCT.routdescr, - "OUTPUT_CURFRAME_DECLSTRUCT @warmelt-outobj.melt:1182", + "OUTPUT_CURFRAME_DECLSTRUCT @warmelt-outobj.melt:1184", MELT_ROUTDESCR_LEN - 1); cdat->drout_150__OUTPUT_CURFRAME_DECLSTRUCT.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_150__OUTPUT_CURFRAME_DECLSTRUCT, @@ -5877,7 +5913,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_156__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_156__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:1259", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:1261", MELT_ROUTDESCR_LEN - 1); cdat->drout_156__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_156__LAMBDA_, meltrout_35_warmelt_outobj_LAMBDA___1__); @@ -5949,7 +5985,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_161__OUTPUCOD_MARKER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_161__OUTPUCOD_MARKER.routdescr, - "OUTPUCOD_MARKER @warmelt-outobj.melt:1289", + "OUTPUCOD_MARKER @warmelt-outobj.melt:1291", MELT_ROUTDESCR_LEN - 1); cdat->drout_161__OUTPUCOD_MARKER.nbval = 12; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_161__OUTPUCOD_MARKER, @@ -6029,7 +6065,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_167__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_167__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:1310", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:1312", MELT_ROUTDESCR_LEN - 1); cdat->drout_167__LAMBDA_.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_167__LAMBDA_, meltrout_37_warmelt_outobj_LAMBDA___2__); @@ -6071,7 +6107,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_170__OUTPUT_CURFRAME_DECLSTRUCT_INIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_170__OUTPUT_CURFRAME_DECLSTRUCT_INIT.routdescr, - "OUTPUT_CURFRAME_DECLSTRUCT_INIT @warmelt-outobj.melt:1346", + "OUTPUT_CURFRAME_DECLSTRUCT_INIT @warmelt-outobj.melt:1348", MELT_ROUTDESCR_LEN - 1); cdat->drout_170__OUTPUT_CURFRAME_DECLSTRUCT_INIT.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -6119,7 +6155,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_174__OUTPUCOD_PROCROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_174__OUTPUCOD_PROCROUTINE.routdescr, - "OUTPUCOD_PROCROUTINE @warmelt-outobj.melt:1420", + "OUTPUCOD_PROCROUTINE @warmelt-outobj.melt:1422", MELT_ROUTDESCR_LEN - 1); cdat->drout_174__OUTPUCOD_PROCROUTINE.nbval = 18; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_174__OUTPUCOD_PROCROUTINE, @@ -6238,7 +6274,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_183__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_183__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:1536", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:1538", MELT_ROUTDESCR_LEN - 1); cdat->drout_183__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_183__LAMBDA_, meltrout_40_warmelt_outobj_LAMBDA___3__); @@ -6280,7 +6316,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_186__OUTPUT_CURFRAME_CDAT_STRUCT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_186__OUTPUT_CURFRAME_CDAT_STRUCT.routdescr, - "OUTPUT_CURFRAME_CDAT_STRUCT @warmelt-outobj.melt:1604", + "OUTPUT_CURFRAME_CDAT_STRUCT @warmelt-outobj.melt:1606", MELT_ROUTDESCR_LEN - 1); cdat->drout_186__OUTPUT_CURFRAME_CDAT_STRUCT.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_186__OUTPUT_CURFRAME_CDAT_STRUCT, @@ -6299,7 +6335,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_188__OUTPUT_CURFRAME_CDAT_FILL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_188__OUTPUT_CURFRAME_CDAT_FILL.routdescr, - "OUTPUT_CURFRAME_CDAT_FILL @warmelt-outobj.melt:1626", + "OUTPUT_CURFRAME_CDAT_FILL @warmelt-outobj.melt:1628", MELT_ROUTDESCR_LEN - 1); cdat->drout_188__OUTPUT_CURFRAME_CDAT_FILL.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_188__OUTPUT_CURFRAME_CDAT_FILL, @@ -6332,7 +6368,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_192__OUTPUCOD_INITIALROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_192__OUTPUCOD_INITIALROUTINE.routdescr, - "OUTPUCOD_INITIALROUTINE @warmelt-outobj.melt:1669", + "OUTPUCOD_INITIALROUTINE @warmelt-outobj.melt:1671", MELT_ROUTDESCR_LEN - 1); cdat->drout_192__OUTPUCOD_INITIALROUTINE.nbval = 26; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_192__OUTPUCOD_INITIALROUTINE, @@ -6351,7 +6387,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_194__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_194__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:1802", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:1804", MELT_ROUTDESCR_LEN - 1); cdat->drout_194__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_194__LAMBDA_, meltrout_44_warmelt_outobj_LAMBDA___4__); @@ -6362,7 +6398,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_195__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_195__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:1823", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:1825", MELT_ROUTDESCR_LEN - 1); cdat->drout_195__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_195__LAMBDA_, meltrout_45_warmelt_outobj_LAMBDA___5__); @@ -6526,7 +6562,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_206__OUTPUCOD_GETARG.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_206__OUTPUCOD_GETARG.routdescr, - "OUTPUCOD_GETARG @warmelt-outobj.melt:2041", + "OUTPUCOD_GETARG @warmelt-outobj.melt:2043", MELT_ROUTDESCR_LEN - 1); cdat->drout_206__OUTPUCOD_GETARG.nbval = 9; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_206__OUTPUCOD_GETARG, @@ -6607,7 +6643,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_212__OUTPUCOD_GETARGREST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_212__OUTPUCOD_GETARGREST.routdescr, - "OUTPUCOD_GETARGREST @warmelt-outobj.melt:2106", + "OUTPUCOD_GETARGREST @warmelt-outobj.melt:2108", MELT_ROUTDESCR_LEN - 1); cdat->drout_212__OUTPUCOD_GETARGREST.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_212__OUTPUCOD_GETARGREST, @@ -6657,7 +6693,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_216__OUTPUCOD_OBJLOCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_216__OUTPUCOD_OBJLOCV.routdescr, - "OUTPUCOD_OBJLOCV @warmelt-outobj.melt:2189", + "OUTPUCOD_OBJLOCV @warmelt-outobj.melt:2191", MELT_ROUTDESCR_LEN - 1); cdat->drout_216__OUTPUCOD_OBJLOCV.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_216__OUTPUCOD_OBJLOCV, @@ -6705,7 +6741,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_220__OUTPUCOD_OBJCLOCCV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_220__OUTPUCOD_OBJCLOCCV.routdescr, - "OUTPUCOD_OBJCLOCCV @warmelt-outobj.melt:2220", + "OUTPUCOD_OBJCLOCCV @warmelt-outobj.melt:2222", MELT_ROUTDESCR_LEN - 1); cdat->drout_220__OUTPUCOD_OBJCLOCCV.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_220__OUTPUCOD_OBJCLOCCV, @@ -6755,7 +6791,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_224__OUTPUCOD_OBJCONSTV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_224__OUTPUCOD_OBJCONSTV.routdescr, - "OUTPUCOD_OBJCONSTV @warmelt-outobj.melt:2239", + "OUTPUCOD_OBJCONSTV @warmelt-outobj.melt:2241", MELT_ROUTDESCR_LEN - 1); cdat->drout_224__OUTPUCOD_OBJCONSTV.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_224__OUTPUCOD_OBJCONSTV, @@ -6805,7 +6841,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_228__OUTPUT_CODE_INSTRUCTIONS_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_228__OUTPUT_CODE_INSTRUCTIONS_LIST.routdescr, - "OUTPUT_CODE_INSTRUCTIONS_LIST @warmelt-outobj.melt:2258", + "OUTPUT_CODE_INSTRUCTIONS_LIST @warmelt-outobj.melt:2260", MELT_ROUTDESCR_LEN - 1); cdat->drout_228__OUTPUT_CODE_INSTRUCTIONS_LIST.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_228__OUTPUT_CODE_INSTRUCTIONS_LIST, @@ -6855,7 +6891,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_232__OUTPUCOD_OBJCHECKSIGNAL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_232__OUTPUCOD_OBJCHECKSIGNAL.routdescr, - "OUTPUCOD_OBJCHECKSIGNAL @warmelt-outobj.melt:2292", + "OUTPUCOD_OBJCHECKSIGNAL @warmelt-outobj.melt:2294", MELT_ROUTDESCR_LEN - 1); cdat->drout_232__OUTPUCOD_OBJCHECKSIGNAL.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_232__OUTPUCOD_OBJCHECKSIGNAL, @@ -6905,7 +6941,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_236__OUTPUCOD_OBJANYBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_236__OUTPUCOD_OBJANYBLOCK.routdescr, - "OUTPUCOD_OBJANYBLOCK @warmelt-outobj.melt:2303", + "OUTPUCOD_OBJANYBLOCK @warmelt-outobj.melt:2305", MELT_ROUTDESCR_LEN - 1); cdat->drout_236__OUTPUCOD_OBJANYBLOCK.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_236__OUTPUCOD_OBJANYBLOCK, @@ -6955,7 +6991,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_240__OUTPUCOD_OBJMULTIALLOCBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_240__OUTPUCOD_OBJMULTIALLOCBLOCK.routdescr, - "OUTPUCOD_OBJMULTIALLOCBLOCK @warmelt-outobj.melt:2327", + "OUTPUCOD_OBJMULTIALLOCBLOCK @warmelt-outobj.melt:2329", MELT_ROUTDESCR_LEN - 1); cdat->drout_240__OUTPUCOD_OBJMULTIALLOCBLOCK.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_240__OUTPUCOD_OBJMULTIALLOCBLOCK, @@ -7036,7 +7072,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_246__OUTPUCOD_OBJCITERBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_246__OUTPUCOD_OBJCITERBLOCK.routdescr, - "OUTPUCOD_OBJCITERBLOCK @warmelt-outobj.melt:2399", + "OUTPUCOD_OBJCITERBLOCK @warmelt-outobj.melt:2401", MELT_ROUTDESCR_LEN - 1); cdat->drout_246__OUTPUCOD_OBJCITERBLOCK.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_246__OUTPUCOD_OBJCITERBLOCK, @@ -7117,7 +7153,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_252__OUTPUCOD_OBJCOMMENTINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_252__OUTPUCOD_OBJCOMMENTINSTR.routdescr, - "OUTPUCOD_OBJCOMMENTINSTR @warmelt-outobj.melt:2454", + "OUTPUCOD_OBJCOMMENTINSTR @warmelt-outobj.melt:2456", MELT_ROUTDESCR_LEN - 1); cdat->drout_252__OUTPUCOD_OBJCOMMENTINSTR.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_252__OUTPUCOD_OBJCOMMENTINSTR, @@ -7167,7 +7203,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_256__OUTPUCOD_OBJCOMMENTEDBLOCK.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_256__OUTPUCOD_OBJCOMMENTEDBLOCK.routdescr, - "OUTPUCOD_OBJCOMMENTEDBLOCK @warmelt-outobj.melt:2475", + "OUTPUCOD_OBJCOMMENTEDBLOCK @warmelt-outobj.melt:2477", MELT_ROUTDESCR_LEN - 1); cdat->drout_256__OUTPUCOD_OBJCOMMENTEDBLOCK.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_256__OUTPUCOD_OBJCOMMENTEDBLOCK, @@ -7217,7 +7253,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_260__OUTPUCOD_OBJLABELINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_260__OUTPUCOD_OBJLABELINSTR.routdescr, - "OUTPUCOD_OBJLABELINSTR @warmelt-outobj.melt:2513", + "OUTPUCOD_OBJLABELINSTR @warmelt-outobj.melt:2515", MELT_ROUTDESCR_LEN - 1); cdat->drout_260__OUTPUCOD_OBJLABELINSTR.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_260__OUTPUCOD_OBJLABELINSTR, @@ -7267,7 +7303,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_264__OUTPUCOD_OBJGOTOINSTR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_264__OUTPUCOD_OBJGOTOINSTR.routdescr, - "OUTPUCOD_OBJGOTOINSTR @warmelt-outobj.melt:2532", + "OUTPUCOD_OBJGOTOINSTR @warmelt-outobj.melt:2534", MELT_ROUTDESCR_LEN - 1); cdat->drout_264__OUTPUCOD_OBJGOTOINSTR.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_264__OUTPUCOD_OBJGOTOINSTR, @@ -7317,7 +7353,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_268__ADD2SBUF_CLONSYM.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_268__ADD2SBUF_CLONSYM.routdescr, - "ADD2SBUF_CLONSYM @warmelt-outobj.melt:2549", + "ADD2SBUF_CLONSYM @warmelt-outobj.melt:2551", MELT_ROUTDESCR_LEN - 1); cdat->drout_268__ADD2SBUF_CLONSYM.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_268__ADD2SBUF_CLONSYM, @@ -7367,7 +7403,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_272__OUTPUCOD_OBJLOOP.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_272__OUTPUCOD_OBJLOOP.routdescr, - "OUTPUCOD_OBJLOOP @warmelt-outobj.melt:2562", + "OUTPUCOD_OBJLOOP @warmelt-outobj.melt:2564", MELT_ROUTDESCR_LEN - 1); cdat->drout_272__OUTPUCOD_OBJLOOP.nbval = 16; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_272__OUTPUCOD_OBJLOOP, @@ -7417,7 +7453,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_276__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_276__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:2581", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:2583", MELT_ROUTDESCR_LEN - 1); cdat->drout_276__LAMBDA_.nbval = 2; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_276__LAMBDA_, meltrout_62_warmelt_outobj_LAMBDA___6__); @@ -7428,7 +7464,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_277__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_277__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:2603", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:2605", MELT_ROUTDESCR_LEN - 1); cdat->drout_277__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_277__LAMBDA_, meltrout_63_warmelt_outobj_LAMBDA___7__); @@ -7439,7 +7475,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_278__OUTPUCOD_OBJEXIT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_278__OUTPUCOD_OBJEXIT.routdescr, - "OUTPUCOD_OBJEXIT @warmelt-outobj.melt:2621", + "OUTPUCOD_OBJEXIT @warmelt-outobj.melt:2623", MELT_ROUTDESCR_LEN - 1); cdat->drout_278__OUTPUCOD_OBJEXIT.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_278__OUTPUCOD_OBJEXIT, @@ -7489,7 +7525,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_282__OUTPUCOD_OBJAGAIN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_282__OUTPUCOD_OBJAGAIN.routdescr, - "OUTPUCOD_OBJAGAIN @warmelt-outobj.melt:2641", + "OUTPUCOD_OBJAGAIN @warmelt-outobj.melt:2643", MELT_ROUTDESCR_LEN - 1); cdat->drout_282__OUTPUCOD_OBJAGAIN.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_282__OUTPUCOD_OBJAGAIN, @@ -7539,7 +7575,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_286__OUTPUCOD_OBJCOMPUTE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_286__OUTPUCOD_OBJCOMPUTE.routdescr, - "OUTPUCOD_OBJCOMPUTE @warmelt-outobj.melt:2660", + "OUTPUCOD_OBJCOMPUTE @warmelt-outobj.melt:2662", MELT_ROUTDESCR_LEN - 1); cdat->drout_286__OUTPUCOD_OBJCOMPUTE.nbval = 18; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_286__OUTPUCOD_OBJCOMPUTE, @@ -7589,7 +7625,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_290__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_290__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:2671", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:2673", MELT_ROUTDESCR_LEN - 1); cdat->drout_290__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_290__LAMBDA_, meltrout_67_warmelt_outobj_LAMBDA___8__); @@ -7600,7 +7636,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_291__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_291__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:2680", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:2682", MELT_ROUTDESCR_LEN - 1); cdat->drout_291__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_291__LAMBDA_, meltrout_68_warmelt_outobj_LAMBDA___9__); @@ -7642,7 +7678,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_294__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_294__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:2690", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:2692", MELT_ROUTDESCR_LEN - 1); cdat->drout_294__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_294__LAMBDA_, meltrout_69_warmelt_outobj_LAMBDA___10__); @@ -7653,7 +7689,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_295__OUTPUCOD_OBJCOND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_295__OUTPUCOD_OBJCOND.routdescr, - "OUTPUCOD_OBJCOND @warmelt-outobj.melt:2706", + "OUTPUCOD_OBJCOND @warmelt-outobj.melt:2708", MELT_ROUTDESCR_LEN - 1); cdat->drout_295__OUTPUCOD_OBJCOND.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_295__OUTPUCOD_OBJCOND, @@ -7703,7 +7739,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_299__OUTPUCOD_OBJCPPIF.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_299__OUTPUCOD_OBJCPPIF.routdescr, - "OUTPUCOD_OBJCPPIF @warmelt-outobj.melt:2748", + "OUTPUCOD_OBJCPPIF @warmelt-outobj.melt:2750", MELT_ROUTDESCR_LEN - 1); cdat->drout_299__OUTPUCOD_OBJCPPIF.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_299__OUTPUCOD_OBJCPPIF, @@ -7753,7 +7789,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_303__OUTPUCOD_OBJINTERNSYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_303__OUTPUCOD_OBJINTERNSYMBOL.routdescr, - "OUTPUCOD_OBJINTERNSYMBOL @warmelt-outobj.melt:2781", + "OUTPUCOD_OBJINTERNSYMBOL @warmelt-outobj.melt:2783", MELT_ROUTDESCR_LEN - 1); cdat->drout_303__OUTPUCOD_OBJINTERNSYMBOL.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_303__OUTPUCOD_OBJINTERNSYMBOL, @@ -7834,7 +7870,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_309__OUTPUCOD_OBJINTERNKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_309__OUTPUCOD_OBJINTERNKEYWORD.routdescr, - "OUTPUCOD_OBJINTERNKEYWORD @warmelt-outobj.melt:2806", + "OUTPUCOD_OBJINTERNKEYWORD @warmelt-outobj.melt:2808", MELT_ROUTDESCR_LEN - 1); cdat->drout_309__OUTPUCOD_OBJINTERNKEYWORD.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_309__OUTPUCOD_OBJINTERNKEYWORD, @@ -7915,7 +7951,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_315__OUTPUCOD_OBJGETNAMEDSYMBOL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_315__OUTPUCOD_OBJGETNAMEDSYMBOL.routdescr, - "OUTPUCOD_OBJGETNAMEDSYMBOL @warmelt-outobj.melt:2830", + "OUTPUCOD_OBJGETNAMEDSYMBOL @warmelt-outobj.melt:2832", MELT_ROUTDESCR_LEN - 1); cdat->drout_315__OUTPUCOD_OBJGETNAMEDSYMBOL.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_315__OUTPUCOD_OBJGETNAMEDSYMBOL, @@ -7965,7 +8001,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_319__OUTPUCOD_OBJGETNAMEDKEYWORD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_319__OUTPUCOD_OBJGETNAMEDKEYWORD.routdescr, - "OUTPUCOD_OBJGETNAMEDKEYWORD @warmelt-outobj.melt:2869", + "OUTPUCOD_OBJGETNAMEDKEYWORD @warmelt-outobj.melt:2871", MELT_ROUTDESCR_LEN - 1); cdat->drout_319__OUTPUCOD_OBJGETNAMEDKEYWORD.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_319__OUTPUCOD_OBJGETNAMEDKEYWORD, @@ -8015,7 +8051,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_323__OUTPUCOD_OBJAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_323__OUTPUCOD_OBJAPPLY.routdescr, - "OUTPUCOD_OBJAPPLY @warmelt-outobj.melt:2905", + "OUTPUCOD_OBJAPPLY @warmelt-outobj.melt:2907", MELT_ROUTDESCR_LEN - 1); cdat->drout_323__OUTPUCOD_OBJAPPLY.nbval = 18; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_323__OUTPUCOD_OBJAPPLY, @@ -8094,7 +8130,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_329__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_329__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:2963", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:2965", MELT_ROUTDESCR_LEN - 1); cdat->drout_329__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_329__LAMBDA_, meltrout_77_warmelt_outobj_LAMBDA___11__); @@ -8105,7 +8141,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_330__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_330__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:2980", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:2982", MELT_ROUTDESCR_LEN - 1); cdat->drout_330__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_330__LAMBDA_, meltrout_78_warmelt_outobj_LAMBDA___12__); @@ -8116,7 +8152,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_331__OUTPUCOD_OBJMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_331__OUTPUCOD_OBJMSEND.routdescr, - "OUTPUCOD_OBJMSEND @warmelt-outobj.melt:3002", + "OUTPUCOD_OBJMSEND @warmelt-outobj.melt:3004", MELT_ROUTDESCR_LEN - 1); cdat->drout_331__OUTPUCOD_OBJMSEND.nbval = 13; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_331__OUTPUCOD_OBJMSEND, @@ -8166,7 +8202,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_335__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_335__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:3079", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:3081", MELT_ROUTDESCR_LEN - 1); cdat->drout_335__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_335__LAMBDA_, meltrout_80_warmelt_outobj_LAMBDA___13__); @@ -8177,7 +8213,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_336__OUTPUCOD_OBJMULTIAPPLY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_336__OUTPUCOD_OBJMULTIAPPLY.routdescr, - "OUTPUCOD_OBJMULTIAPPLY @warmelt-outobj.melt:3100", + "OUTPUCOD_OBJMULTIAPPLY @warmelt-outobj.melt:3102", MELT_ROUTDESCR_LEN - 1); cdat->drout_336__OUTPUCOD_OBJMULTIAPPLY.nbval = 24; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_336__OUTPUCOD_OBJMULTIAPPLY, @@ -8227,7 +8263,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_340__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_340__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:3146", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:3148", MELT_ROUTDESCR_LEN - 1); cdat->drout_340__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_340__LAMBDA_, meltrout_82_warmelt_outobj_LAMBDA___14__); @@ -8238,7 +8274,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_341__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_341__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:3189", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:3191", MELT_ROUTDESCR_LEN - 1); cdat->drout_341__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_341__LAMBDA_, meltrout_83_warmelt_outobj_LAMBDA___15__); @@ -8249,7 +8285,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_342__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_342__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:3217", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:3219", MELT_ROUTDESCR_LEN - 1); cdat->drout_342__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_342__LAMBDA_, meltrout_84_warmelt_outobj_LAMBDA___16__); @@ -8260,7 +8296,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_343__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_343__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:3232", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:3234", MELT_ROUTDESCR_LEN - 1); cdat->drout_343__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_343__LAMBDA_, meltrout_85_warmelt_outobj_LAMBDA___17__); @@ -8271,7 +8307,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_344__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_344__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:3243", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:3245", MELT_ROUTDESCR_LEN - 1); cdat->drout_344__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_344__LAMBDA_, meltrout_86_warmelt_outobj_LAMBDA___18__); @@ -8282,7 +8318,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_345__OUTPUCOD_OBJMULTIMSEND.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_345__OUTPUCOD_OBJMULTIMSEND.routdescr, - "OUTPUCOD_OBJMULTIMSEND @warmelt-outobj.melt:3265", + "OUTPUCOD_OBJMULTIMSEND @warmelt-outobj.melt:3267", MELT_ROUTDESCR_LEN - 1); cdat->drout_345__OUTPUCOD_OBJMULTIMSEND.nbval = 24; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_345__OUTPUCOD_OBJMULTIMSEND, @@ -8332,7 +8368,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_349__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_349__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:3298", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:3300", MELT_ROUTDESCR_LEN - 1); cdat->drout_349__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_349__LAMBDA_, meltrout_88_warmelt_outobj_LAMBDA___19__); @@ -8343,7 +8379,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_350__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_350__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:3348", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:3350", MELT_ROUTDESCR_LEN - 1); cdat->drout_350__LAMBDA_.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_350__LAMBDA_, meltrout_89_warmelt_outobj_LAMBDA___20__); @@ -8354,7 +8390,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_351__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_351__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:3376", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:3378", MELT_ROUTDESCR_LEN - 1); cdat->drout_351__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_351__LAMBDA_, meltrout_90_warmelt_outobj_LAMBDA___21__); @@ -8365,7 +8401,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_352__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_352__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:3389", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:3391", MELT_ROUTDESCR_LEN - 1); cdat->drout_352__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_352__LAMBDA_, meltrout_91_warmelt_outobj_LAMBDA___22__); @@ -8376,7 +8412,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_353__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_353__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:3400", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:3402", MELT_ROUTDESCR_LEN - 1); cdat->drout_353__LAMBDA_.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_353__LAMBDA_, meltrout_92_warmelt_outobj_LAMBDA___23__); @@ -8387,7 +8423,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_354__OUTPUCOD_OBJCLEAR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_354__OUTPUCOD_OBJCLEAR.routdescr, - "OUTPUCOD_OBJCLEAR @warmelt-outobj.melt:3420", + "OUTPUCOD_OBJCLEAR @warmelt-outobj.melt:3422", MELT_ROUTDESCR_LEN - 1); cdat->drout_354__OUTPUCOD_OBJCLEAR.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_354__OUTPUCOD_OBJCLEAR, @@ -8437,7 +8473,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_358__OUTPUCOD_OBJRAWALLOCOBJ.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_358__OUTPUCOD_OBJRAWALLOCOBJ.routdescr, - "OUTPUCOD_OBJRAWALLOCOBJ @warmelt-outobj.melt:3436", + "OUTPUCOD_OBJRAWALLOCOBJ @warmelt-outobj.melt:3438", MELT_ROUTDESCR_LEN - 1); cdat->drout_358__OUTPUCOD_OBJRAWALLOCOBJ.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_358__OUTPUCOD_OBJRAWALLOCOBJ, @@ -8487,7 +8523,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_362__OUTPUCOD_OBJNEWCLOSURE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_362__OUTPUCOD_OBJNEWCLOSURE.routdescr, - "OUTPUCOD_OBJNEWCLOSURE @warmelt-outobj.melt:3474", + "OUTPUCOD_OBJNEWCLOSURE @warmelt-outobj.melt:3476", MELT_ROUTDESCR_LEN - 1); cdat->drout_362__OUTPUCOD_OBJNEWCLOSURE.nbval = 11; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_362__OUTPUCOD_OBJNEWCLOSURE, @@ -8537,7 +8573,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_366__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_366__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:3487", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:3489", MELT_ROUTDESCR_LEN - 1); cdat->drout_366__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_366__LAMBDA_, meltrout_96_warmelt_outobj_LAMBDA___24__); @@ -8548,7 +8584,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_367__OUTPUCOD_OBJTOUCH.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_367__OUTPUCOD_OBJTOUCH.routdescr, - "OUTPUCOD_OBJTOUCH @warmelt-outobj.melt:3507", + "OUTPUCOD_OBJTOUCH @warmelt-outobj.melt:3509", MELT_ROUTDESCR_LEN - 1); cdat->drout_367__OUTPUCOD_OBJTOUCH.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_367__OUTPUCOD_OBJTOUCH, @@ -8598,7 +8634,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_371__OUTPUCOD_OBJPUTUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_371__OUTPUCOD_OBJPUTUPLE.routdescr, - "OUTPUCOD_OBJPUTUPLE @warmelt-outobj.melt:3532", + "OUTPUCOD_OBJPUTUPLE @warmelt-outobj.melt:3534", MELT_ROUTDESCR_LEN - 1); cdat->drout_371__OUTPUCOD_OBJPUTUPLE.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_371__OUTPUCOD_OBJPUTUPLE, @@ -8673,7 +8709,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, "OBJPUTPAIRHEAD_COUNTER", sizeof (cdat->dstr_376__OBJPUTPAIRHEAD_C. val) - 1); - MELT_LOCATION ("warmelt-outobj.melt:3604:/ iniobj"); + MELT_LOCATION ("warmelt-outobj.melt:3606:/ iniobj"); /*iniobj dobj_377__OBJPUTPAIRHEAD_COUNTER*/ /*_.VALDATA___V526*/ meltfptr[525] = @@ -8691,7 +8727,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_377__OBJPUTPAIRHEAD_COUNTER.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - cdat->dobj_377__OBJPUTPAIRHEAD_COUNTER.obj_hash = 483514899; + cdat->dobj_377__OBJPUTPAIRHEAD_COUNTER.obj_hash = 198129539; cdat->dobj_377__OBJPUTPAIRHEAD_COUNTER.obj_len = 1; /*iniboxint dint_378__ */ @@ -8707,7 +8743,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_379__OUTPUCOD_OBJPUTPAIRHEAD.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_379__OUTPUCOD_OBJPUTPAIRHEAD.routdescr, - "OUTPUCOD_OBJPUTPAIRHEAD @warmelt-outobj.melt:3606", + "OUTPUCOD_OBJPUTPAIRHEAD @warmelt-outobj.melt:3608", MELT_ROUTDESCR_LEN - 1); cdat->drout_379__OUTPUCOD_OBJPUTPAIRHEAD.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_379__OUTPUCOD_OBJPUTPAIRHEAD, @@ -8788,7 +8824,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_385__OUTPUCOD_OBJPUTPAIRTAIL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_385__OUTPUCOD_OBJPUTPAIRTAIL.routdescr, - "OUTPUCOD_OBJPUTPAIRTAIL @warmelt-outobj.melt:3635", + "OUTPUCOD_OBJPUTPAIRTAIL @warmelt-outobj.melt:3637", MELT_ROUTDESCR_LEN - 1); cdat->drout_385__OUTPUCOD_OBJPUTPAIRTAIL.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_385__OUTPUCOD_OBJPUTPAIRTAIL, @@ -8838,7 +8874,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_389__OUTPUCOD_OBJPUTLIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_389__OUTPUCOD_OBJPUTLIST.routdescr, - "OUTPUCOD_OBJPUTLIST @warmelt-outobj.melt:3661", + "OUTPUCOD_OBJPUTLIST @warmelt-outobj.melt:3663", MELT_ROUTDESCR_LEN - 1); cdat->drout_389__OUTPUCOD_OBJPUTLIST.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_389__OUTPUCOD_OBJPUTLIST, @@ -8888,7 +8924,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_393__OUTPUCOD_OBJGETSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_393__OUTPUCOD_OBJGETSLOT.routdescr, - "OUTPUCOD_OBJGETSLOT @warmelt-outobj.melt:3692", + "OUTPUCOD_OBJGETSLOT @warmelt-outobj.melt:3694", MELT_ROUTDESCR_LEN - 1); cdat->drout_393__OUTPUCOD_OBJGETSLOT.nbval = 12; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_393__OUTPUCOD_OBJGETSLOT, @@ -8968,7 +9004,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_399__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_399__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:3713", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:3715", MELT_ROUTDESCR_LEN - 1); cdat->drout_399__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_399__LAMBDA_, meltrout_103_warmelt_outobj_LAMBDA___25__); @@ -8979,7 +9015,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_400__OUTPUCOD_OBJPUTSLOT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_400__OUTPUCOD_OBJPUTSLOT.routdescr, - "OUTPUCOD_OBJPUTSLOT @warmelt-outobj.melt:3728", + "OUTPUCOD_OBJPUTSLOT @warmelt-outobj.melt:3730", MELT_ROUTDESCR_LEN - 1); cdat->drout_400__OUTPUCOD_OBJPUTSLOT.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_400__OUTPUCOD_OBJPUTSLOT, @@ -9058,7 +9094,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_406__OUTPUCOD_OBJPUTCLOSUROUT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_406__OUTPUCOD_OBJPUTCLOSUROUT.routdescr, - "OUTPUCOD_OBJPUTCLOSUROUT @warmelt-outobj.melt:3803", + "OUTPUCOD_OBJPUTCLOSUROUT @warmelt-outobj.melt:3805", MELT_ROUTDESCR_LEN - 1); cdat->drout_406__OUTPUCOD_OBJPUTCLOSUROUT.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_406__OUTPUCOD_OBJPUTCLOSUROUT, @@ -9108,7 +9144,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_410__OUTPUCOD_OBJPUTCLOSEDV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_410__OUTPUCOD_OBJPUTCLOSEDV.routdescr, - "OUTPUCOD_OBJPUTCLOSEDV @warmelt-outobj.melt:3847", + "OUTPUCOD_OBJPUTCLOSEDV @warmelt-outobj.melt:3849", MELT_ROUTDESCR_LEN - 1); cdat->drout_410__OUTPUCOD_OBJPUTCLOSEDV.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_410__OUTPUCOD_OBJPUTCLOSEDV, @@ -9158,7 +9194,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_414__OUTPUCOD_OBJPUTCLOSEDNOTNULLV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_414__OUTPUCOD_OBJPUTCLOSEDNOTNULLV.routdescr, - "OUTPUCOD_OBJPUTCLOSEDNOTNULLV @warmelt-outobj.melt:3883", + "OUTPUCOD_OBJPUTCLOSEDNOTNULLV @warmelt-outobj.melt:3885", MELT_ROUTDESCR_LEN - 1); cdat->drout_414__OUTPUCOD_OBJPUTCLOSEDNOTNULLV.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_414__OUTPUCOD_OBJPUTCLOSEDNOTNULLV, @@ -9208,7 +9244,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_418__OUTPUCOD_OBJPUTROUTCONST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_418__OUTPUCOD_OBJPUTROUTCONST.routdescr, - "OUTPUCOD_OBJPUTROUTCONST @warmelt-outobj.melt:3923", + "OUTPUCOD_OBJPUTROUTCONST @warmelt-outobj.melt:3925", MELT_ROUTDESCR_LEN - 1); cdat->drout_418__OUTPUCOD_OBJPUTROUTCONST.nbval = 6; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_418__OUTPUCOD_OBJPUTROUTCONST, @@ -9258,7 +9294,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_422__OUTPUCOD_OBJPUTROUTCONSTNOTNULL.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_422__OUTPUCOD_OBJPUTROUTCONSTNOTNULL.routdescr, - "OUTPUCOD_OBJPUTROUTCONSTNOTNULL @warmelt-outobj.melt:3962", + "OUTPUCOD_OBJPUTROUTCONSTNOTNULL @warmelt-outobj.melt:3964", MELT_ROUTDESCR_LEN - 1); cdat->drout_422__OUTPUCOD_OBJPUTROUTCONSTNOTNULL.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -9309,7 +9345,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_426__OUTPUCOD_OBJPUTXTRARESULT.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_426__OUTPUCOD_OBJPUTXTRARESULT.routdescr, - "OUTPUCOD_OBJPUTXTRARESULT @warmelt-outobj.melt:3997", + "OUTPUCOD_OBJPUTXTRARESULT @warmelt-outobj.melt:3999", MELT_ROUTDESCR_LEN - 1); cdat->drout_426__OUTPUCOD_OBJPUTXTRARESULT.nbval = 10; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_426__OUTPUCOD_OBJPUTXTRARESULT, @@ -9359,7 +9395,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_430__OUTPUCOD_OBJEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_430__OUTPUCOD_OBJEXPV.routdescr, - "OUTPUCOD_OBJEXPV @warmelt-outobj.melt:4038", + "OUTPUCOD_OBJEXPV @warmelt-outobj.melt:4040", MELT_ROUTDESCR_LEN - 1); cdat->drout_430__OUTPUCOD_OBJEXPV.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_430__OUTPUCOD_OBJEXPV, @@ -9409,7 +9445,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_434__OUTPUCOD_OBJLOCATEDEXPV.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_434__OUTPUCOD_OBJLOCATEDEXPV.routdescr, - "OUTPUCOD_OBJLOCATEDEXPV @warmelt-outobj.melt:4054", + "OUTPUCOD_OBJLOCATEDEXPV @warmelt-outobj.melt:4056", MELT_ROUTDESCR_LEN - 1); cdat->drout_434__OUTPUCOD_OBJLOCATEDEXPV.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_434__OUTPUCOD_OBJLOCATEDEXPV, @@ -9488,7 +9524,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_440__OUTPUCOD_VERBATIMSTRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_440__OUTPUCOD_VERBATIMSTRING.routdescr, - "OUTPUCOD_VERBATIMSTRING @warmelt-outobj.melt:4093", + "OUTPUCOD_VERBATIMSTRING @warmelt-outobj.melt:4095", MELT_ROUTDESCR_LEN - 1); cdat->drout_440__OUTPUCOD_VERBATIMSTRING.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_440__OUTPUCOD_VERBATIMSTRING, @@ -9507,7 +9543,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_442__OUTPUCOD_STRING.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_442__OUTPUCOD_STRING.routdescr, - "OUTPUCOD_STRING @warmelt-outobj.melt:4106", + "OUTPUCOD_STRING @warmelt-outobj.melt:4108", MELT_ROUTDESCR_LEN - 1); cdat->drout_442__OUTPUCOD_STRING.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_442__OUTPUCOD_STRING, @@ -9526,7 +9562,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_444__OUTPUCOD_INTEGER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_444__OUTPUCOD_INTEGER.routdescr, - "OUTPUCOD_INTEGER @warmelt-outobj.melt:4119", + "OUTPUCOD_INTEGER @warmelt-outobj.melt:4121", MELT_ROUTDESCR_LEN - 1); cdat->drout_444__OUTPUCOD_INTEGER.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_444__OUTPUCOD_INTEGER, @@ -9545,7 +9581,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_446__OUTPUCOD_FINALRETURN.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_446__OUTPUCOD_FINALRETURN.routdescr, - "OUTPUCOD_FINALRETURN @warmelt-outobj.melt:4126", + "OUTPUCOD_FINALRETURN @warmelt-outobj.melt:4128", MELT_ROUTDESCR_LEN - 1); cdat->drout_446__OUTPUCOD_FINALRETURN.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_446__OUTPUCOD_FINALRETURN, @@ -9595,7 +9631,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_450__SORTED_NAMED_DICT_TUPLE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_450__SORTED_NAMED_DICT_TUPLE.routdescr, - "SORTED_NAMED_DICT_TUPLE @warmelt-outobj.melt:4139", + "SORTED_NAMED_DICT_TUPLE @warmelt-outobj.melt:4141", MELT_ROUTDESCR_LEN - 1); cdat->drout_450__SORTED_NAMED_DICT_TUPLE.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_450__SORTED_NAMED_DICT_TUPLE, @@ -9645,7 +9681,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_454__OUTPUT_EXPORTED_OFFSETS.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_454__OUTPUT_EXPORTED_OFFSETS.routdescr, - "OUTPUT_EXPORTED_OFFSETS @warmelt-outobj.melt:4156", + "OUTPUT_EXPORTED_OFFSETS @warmelt-outobj.melt:4158", MELT_ROUTDESCR_LEN - 1); cdat->drout_454__OUTPUT_EXPORTED_OFFSETS.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_454__OUTPUT_EXPORTED_OFFSETS, @@ -9720,7 +9756,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, "CLASS_SECONDARY_C_FILE", sizeof (cdat->dstr_459__CLASS_SECONDARY_. val) - 1); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ iniobj"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ iniobj"); /*iniobj dobj_460__CLASS_SECONDARY_C_FILE*/ /*_.VALDATA___V609*/ meltfptr[608] = @@ -9739,7 +9775,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->dobj_460__CLASS_SECONDARY_C_FILE.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_CLASS)))); cdat->dobj_460__CLASS_SECONDARY_C_FILE.obj_num = MELTOBMAG_OBJECT; - cdat->dobj_460__CLASS_SECONDARY_C_FILE.obj_hash = 441676750; + cdat->dobj_460__CLASS_SECONDARY_C_FILE.obj_hash = 591436026; cdat->dobj_460__CLASS_SECONDARY_C_FILE.obj_len = 8; @@ -9814,7 +9850,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->dobj_466__SECFIL_MODNAM.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_466__SECFIL_MODNAM.obj_num = 0; - cdat->dobj_466__SECFIL_MODNAM.obj_hash = 102311761; + cdat->dobj_466__SECFIL_MODNAM.obj_hash = 898548391; cdat->dobj_466__SECFIL_MODNAM.obj_len = 4; @@ -9876,7 +9912,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->dobj_470__SECFIL_PATH.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_470__SECFIL_PATH.obj_num = 1; - cdat->dobj_470__SECFIL_PATH.obj_hash = 591436026; + cdat->dobj_470__SECFIL_PATH.obj_hash = 46578310; cdat->dobj_470__SECFIL_PATH.obj_len = 4; @@ -9938,7 +9974,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->dobj_474__SECFIL_DECLBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_474__SECFIL_DECLBUF.obj_num = 2; - cdat->dobj_474__SECFIL_DECLBUF.obj_hash = 898548391; + cdat->dobj_474__SECFIL_DECLBUF.obj_hash = 10299183; cdat->dobj_474__SECFIL_DECLBUF.obj_len = 4; @@ -10001,7 +10037,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->dobj_478__SECFIL_IMPLBUF.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FIELD)))); cdat->dobj_478__SECFIL_IMPLBUF.obj_num = 3; - cdat->dobj_478__SECFIL_IMPLBUF.obj_hash = 46578310; + cdat->dobj_478__SECFIL_IMPLBUF.obj_hash = 927583115; cdat->dobj_478__SECFIL_IMPLBUF.obj_len = 4; @@ -10045,7 +10081,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, "GENERATED_C_FILENAME", sizeof (cdat->dstr_481__GENERATED_C_FILE. val) - 1); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ iniobj"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ iniobj"); /*iniobj dobj_482__GENERATED_C_FILENAME*/ /*_.VALDATA___V631*/ meltfptr[630] = @@ -10063,7 +10099,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_482__GENERATED_C_FILENAME.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_482__GENERATED_C_FILENAME.obj_hash = 403218299; + cdat->dobj_482__GENERATED_C_FILENAME.obj_hash = 184762946; cdat->dobj_482__GENERATED_C_FILENAME.obj_len = 5; /*inimult dtup_483__GENERATED_C_FILENAME */ @@ -10124,7 +10160,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->dobj_487.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_487.obj_num = 0; - cdat->dobj_487.obj_hash = 412581344; + cdat->dobj_487.obj_hash = 82445209; cdat->dobj_487.obj_len = 2; @@ -10173,7 +10209,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->dobj_490.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_490.obj_num = 1; - cdat->dobj_490.obj_hash = 519395693; + cdat->dobj_490.obj_hash = 874457841; cdat->dobj_490.obj_len = 2; @@ -10222,7 +10258,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->dobj_493.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_493.obj_num = 2; - cdat->dobj_493.obj_hash = 990026835; + cdat->dobj_493.obj_hash = 595243737; cdat->dobj_493.obj_len = 2; @@ -10271,7 +10307,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->dobj_496.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_496.obj_num = 3; - cdat->dobj_496.obj_hash = 967570472; + cdat->dobj_496.obj_hash = 41303985; cdat->dobj_496.obj_len = 2; @@ -10332,7 +10368,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_503__NTH_SECUNDARY_FILE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_503__NTH_SECUNDARY_FILE.routdescr, - "NTH_SECUNDARY_FILE @warmelt-outobj.melt:4237", + "NTH_SECUNDARY_FILE @warmelt-outobj.melt:4239", MELT_ROUTDESCR_LEN - 1); cdat->drout_503__NTH_SECUNDARY_FILE.nbval = 4; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_503__NTH_SECUNDARY_FILE, @@ -10351,7 +10387,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_505__OUTPUT_MELT_DESCRIPTOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_505__OUTPUT_MELT_DESCRIPTOR.routdescr, - "OUTPUT_MELT_DESCRIPTOR @warmelt-outobj.melt:4271", + "OUTPUT_MELT_DESCRIPTOR @warmelt-outobj.melt:4273", MELT_ROUTDESCR_LEN - 1); cdat->drout_505__OUTPUT_MELT_DESCRIPTOR.nbval = 14; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_505__OUTPUT_MELT_DESCRIPTOR, @@ -10516,7 +10552,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_STRING)))); /*small inistring */ strncpy (cdat->dstr_518__RECV.val, "RECV", sizeof (cdat->dstr_518__RECV.val) - 1); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ iniobj"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ iniobj"); /*iniobj dobj_519*/ /*_.VALDATA___V668*/ meltfptr[667] = (melt_ptr_t) & cdat->dobj_519; @@ -10535,7 +10571,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->dobj_519.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_519.obj_num = 0; - cdat->dobj_519.obj_hash = 866905503; + cdat->dobj_519.obj_hash = 175550944; cdat->dobj_519.obj_len = 2; @@ -10585,7 +10621,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->dobj_522.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_522.obj_num = 1; - cdat->dobj_522.obj_hash = 1073730985; + cdat->dobj_522.obj_hash = 528925797; cdat->dobj_522.obj_len = 2; @@ -10634,7 +10670,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->dobj_525.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_525.obj_num = 2; - cdat->dobj_525.obj_hash = 43386064; + cdat->dobj_525.obj_hash = 385071613; cdat->dobj_525.obj_len = 2; @@ -10684,7 +10720,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->dobj_528.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_528.obj_num = 3; - cdat->dobj_528.obj_hash = 1037785079; + cdat->dobj_528.obj_hash = 729294815; cdat->dobj_528.obj_len = 2; @@ -10733,7 +10769,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->dobj_531.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_531.obj_num = 4; - cdat->dobj_531.obj_hash = 721500045; + cdat->dobj_531.obj_hash = 102825347; cdat->dobj_531.obj_len = 2; /*inimult dtup_532__SYNTAX_TEST_GENERATOR */ @@ -10760,7 +10796,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_533__SYNTAX_TEST_GENERATOR.meltobj_class = (meltobject_ptr_t) ( /*_.CLASS_SELECTOR__V121*/ meltfptr[120]); - cdat->dobj_533__SYNTAX_TEST_GENERATOR.obj_hash = 100897257; + cdat->dobj_533__SYNTAX_TEST_GENERATOR.obj_hash = 423318112; cdat->dobj_533__SYNTAX_TEST_GENERATOR.obj_len = 4; @@ -10779,7 +10815,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_535__SYNTESTGEN_ANY.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_535__SYNTESTGEN_ANY.routdescr, - "SYNTESTGEN_ANY @warmelt-outobj.melt:4684", + "SYNTESTGEN_ANY @warmelt-outobj.melt:4686", MELT_ROUTDESCR_LEN - 1); cdat->drout_535__SYNTESTGEN_ANY.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_535__SYNTESTGEN_ANY, @@ -10860,7 +10896,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_541__SUBSTITUTE_FORMALS_FOR_SYNTEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_541__SUBSTITUTE_FORMALS_FOR_SYNTEST.routdescr, - "SUBSTITUTE_FORMALS_FOR_SYNTEST @warmelt-outobj.melt:4704", + "SUBSTITUTE_FORMALS_FOR_SYNTEST @warmelt-outobj.melt:4706", MELT_ROUTDESCR_LEN - 1); cdat->drout_541__SUBSTITUTE_FORMALS_FOR_SYNTEST.nbval = 8; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_541__SUBSTITUTE_FORMALS_FOR_SYNTEST, @@ -10910,7 +10946,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_545__EXPAND_TUPLE_FOR_SYNTEST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_545__EXPAND_TUPLE_FOR_SYNTEST.routdescr, - "EXPAND_TUPLE_FOR_SYNTEST @warmelt-outobj.melt:4730", + "EXPAND_TUPLE_FOR_SYNTEST @warmelt-outobj.melt:4732", MELT_ROUTDESCR_LEN - 1); cdat->drout_545__EXPAND_TUPLE_FOR_SYNTEST.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_545__EXPAND_TUPLE_FOR_SYNTEST, @@ -10929,7 +10965,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_547__SYNTESTGEN_PRIMITIVE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_547__SYNTESTGEN_PRIMITIVE.routdescr, - "SYNTESTGEN_PRIMITIVE @warmelt-outobj.melt:4754", + "SYNTESTGEN_PRIMITIVE @warmelt-outobj.melt:4756", MELT_ROUTDESCR_LEN - 1); cdat->drout_547__SYNTESTGEN_PRIMITIVE.nbval = 14; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_547__SYNTESTGEN_PRIMITIVE, @@ -11041,7 +11077,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_555__SYNTESTGEN_CITERATOR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_555__SYNTESTGEN_CITERATOR.routdescr, - "SYNTESTGEN_CITERATOR @warmelt-outobj.melt:4814", + "SYNTESTGEN_CITERATOR @warmelt-outobj.melt:4816", MELT_ROUTDESCR_LEN - 1); cdat->drout_555__SYNTESTGEN_CITERATOR.nbval = 15; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_555__SYNTESTGEN_CITERATOR, @@ -11091,7 +11127,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_559__SYNTESTGEN_CMATCHER.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_559__SYNTESTGEN_CMATCHER.routdescr, - "SYNTESTGEN_CMATCHER @warmelt-outobj.melt:4882", + "SYNTESTGEN_CMATCHER @warmelt-outobj.melt:4884", MELT_ROUTDESCR_LEN - 1); cdat->drout_559__SYNTESTGEN_CMATCHER.nbval = 18; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_559__SYNTESTGEN_CMATCHER, @@ -11220,7 +11256,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_569__EMIT_SYNTAX_TESTING_ROUTINE.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_569__EMIT_SYNTAX_TESTING_ROUTINE.routdescr, - "EMIT_SYNTAX_TESTING_ROUTINE @warmelt-outobj.melt:4967", + "EMIT_SYNTAX_TESTING_ROUTINE @warmelt-outobj.melt:4969", MELT_ROUTDESCR_LEN - 1); cdat->drout_569__EMIT_SYNTAX_TESTING_ROUTINE.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_569__EMIT_SYNTAX_TESTING_ROUTINE, @@ -11239,7 +11275,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_571__TRANSLATE_MACROEXPANDED_LIST.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_571__TRANSLATE_MACROEXPANDED_LIST.routdescr, - "TRANSLATE_MACROEXPANDED_LIST @warmelt-outobj.melt:5029", + "TRANSLATE_MACROEXPANDED_LIST @warmelt-outobj.melt:5031", MELT_ROUTDESCR_LEN - 1); cdat->drout_571__TRANSLATE_MACROEXPANDED_LIST.nbval = 42; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_571__TRANSLATE_MACROEXPANDED_LIST, @@ -11427,7 +11463,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_584__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_584__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:5083", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:5085", MELT_ROUTDESCR_LEN - 1); cdat->drout_584__LAMBDA_.nbval = 7; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_584__LAMBDA_, meltrout_129_warmelt_outobj_LAMBDA___26__); @@ -11591,7 +11627,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_595__LAMBDA_.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_595__LAMBDA_.routdescr, - "LAMBDA_ @warmelt-outobj.melt:5164", MELT_ROUTDESCR_LEN - 1); + "LAMBDA_ @warmelt-outobj.melt:5166", MELT_ROUTDESCR_LEN - 1); cdat->drout_595__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_595__LAMBDA_, meltrout_130_warmelt_outobj_LAMBDA___27__); @@ -11664,7 +11700,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_600__COMPILE_LIST_SEXPR.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_600__COMPILE_LIST_SEXPR.routdescr, - "COMPILE_LIST_SEXPR @warmelt-outobj.melt:5335", + "COMPILE_LIST_SEXPR @warmelt-outobj.melt:5337", MELT_ROUTDESCR_LEN - 1); cdat->drout_600__COMPILE_LIST_SEXPR.nbval = 12; MELT_ROUTINE_SET_ROUTCODE (&cdat->drout_600__COMPILE_LIST_SEXPR, @@ -11863,7 +11899,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, "MELT_ARGUMENT", sizeof (cdat->dstr_613__MELT_ARGUMENT.val) - 1); - MELT_LOCATION ("warmelt-outobj.melt:5387:/ iniobj"); + MELT_LOCATION ("warmelt-outobj.melt:5389:/ iniobj"); /*iniobj dobj_614__MELT_ARGUMENT*/ /*_.VALDATA___V763*/ meltfptr[762] = @@ -11881,7 +11917,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, meltobj_magic == MELTOBMAG_OBJECT); cdat->dobj_614__MELT_ARGUMENT.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_PRIMITIVE)))); - cdat->dobj_614__MELT_ARGUMENT.obj_hash = 995139618; + cdat->dobj_614__MELT_ARGUMENT.obj_hash = 318175580; cdat->dobj_614__MELT_ARGUMENT.obj_len = 5; /*inimult dtup_615__MELT_ARGUMENT */ @@ -11942,7 +11978,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->dobj_619.meltobj_class = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (CLASS_FORMAL_BINDING)))); cdat->dobj_619.obj_num = 0; - cdat->dobj_619.obj_hash = 466151534; + cdat->dobj_619.obj_hash = 920726963; cdat->dobj_619.obj_len = 2; @@ -11978,7 +12014,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, cdat->drout_623__TRANSLATE_TO_C_ONE_OR_MORE_MELT_FILES.discr = (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_623__TRANSLATE_TO_C_ONE_OR_MORE_MELT_FILES.routdescr, - "TRANSLATE_TO_C_ONE_OR_MORE_MELT_FILES @warmelt-outobj.melt:5398", + "TRANSLATE_TO_C_ONE_OR_MORE_MELT_FILES @warmelt-outobj.melt:5400", MELT_ROUTDESCR_LEN - 1); cdat->drout_623__TRANSLATE_TO_C_ONE_OR_MORE_MELT_FILES.nbval = 5; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -12031,7 +12067,7 @@ initialize_module_meltdata_warmelt_outobj (initial_frame_st * iniframp__, (meltobject_ptr_t) (((melt_ptr_t) (MELT_PREDEF (DISCR_ROUTINE)))); strncpy (cdat->drout_627__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT. routdescr, - "GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT @warmelt-outobj.melt:5464", + "GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT @warmelt-outobj.melt:5466", MELT_ROUTDESCR_LEN - 1); cdat->drout_627__GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT.nbval = 0; MELT_ROUTINE_SET_ROUTCODE (&cdat-> @@ -12244,8 +12280,7 @@ start_module_melt (void *modargp_) melt_topframe = (struct melt_callframe_st *) &meltfram__; /**initial routine prologue**/ /* set initial frame marking */ - ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = - /*minihash */ -3709; + ((struct melt_callframe_st *) &meltfram__)->mcfr_nbvar = /*minihash */ -975; ((struct melt_callframe_st *) &meltfram__)->mcfr_forwmarkrout = meltmod__warmelt_outobj__forward_or_mark_module_start_frame; /**COMMENT: get previous environment **/ ; @@ -18281,7 +18316,7 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V214*/ meltfptr[213]); - MELT_LOCATION ("warmelt-outobj.melt:1106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1108:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -18298,7 +18333,7 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V215*/ meltfptr[214]); - MELT_LOCATION ("warmelt-outobj.melt:1106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1108:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -18310,7 +18345,7 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V213*/ meltfptr[212])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]); - MELT_LOCATION ("warmelt-outobj.melt:1106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1108:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -18322,7 +18357,7 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V213*/ meltfptr[212])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:1106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1108:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -18335,7 +18370,7 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V213*/ meltfptr[212])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:1106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1108:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -18406,7 +18441,7 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V216*/ meltfptr[215]); - MELT_LOCATION ("warmelt-outobj.melt:1106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1108:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -18418,7 +18453,7 @@ meltmod__warmelt_outobj__initialmeltchunk_0 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V213*/ meltfptr[212])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V216*/ meltfptr[215]); - MELT_LOCATION ("warmelt-outobj.melt:1106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1108:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V213*/ meltfptr[212]); @@ -20008,7 +20043,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V297*/ meltfptr[296]); - MELT_LOCATION ("warmelt-outobj.melt:1182:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1184:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20022,7 +20057,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V299*/ meltfptr[298])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_INITIALROUTINEOBJ__V42*/ meltfptr[41]); - MELT_LOCATION ("warmelt-outobj.melt:1182:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1184:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20036,7 +20071,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V299*/ meltfptr[298])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NAMED__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-outobj.melt:1182:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1184:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20050,7 +20085,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V299*/ meltfptr[298])->tabval[2] = (melt_ptr_t) ( /*_.LIST_EVERY__V43*/ meltfptr[42]); - MELT_LOCATION ("warmelt-outobj.melt:1182:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1184:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20064,7 +20099,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V299*/ meltfptr[298])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V44*/ meltfptr[43]); - MELT_LOCATION ("warmelt-outobj.melt:1182:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1184:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20078,7 +20113,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V299*/ meltfptr[298])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:1182:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1184:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -20090,7 +20125,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V299*/ meltfptr[298])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:1182:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1184:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20104,7 +20139,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V299*/ meltfptr[298])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:1182:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1184:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20118,7 +20153,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V299*/ meltfptr[298])->tabval[7] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:1259:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1261:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20131,7 +20166,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V300*/ meltfptr[299])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V44*/ meltfptr[43]); - MELT_LOCATION ("warmelt-outobj.melt:1259:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1261:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20144,7 +20179,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V300*/ meltfptr[299])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:1259:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1261:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -20156,7 +20191,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V300*/ meltfptr[299])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:1259:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1261:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20169,7 +20204,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V300*/ meltfptr[299])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:1259:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1261:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20182,12 +20217,12 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V300*/ meltfptr[299])->tabval[4] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:1259:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1261:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V300*/ meltfptr[299]); - MELT_LOCATION ("warmelt-outobj.melt:1182:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1184:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20201,7 +20236,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V299*/ meltfptr[298])->tabval[8] = (melt_ptr_t) ( /*_.VALROUT___V300*/ meltfptr[299]); - MELT_LOCATION ("warmelt-outobj.melt:1182:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1184:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V299*/ meltfptr[298]); @@ -20297,7 +20332,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V308*/ meltfptr[307]); - MELT_LOCATION ("warmelt-outobj.melt:1289:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1291:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20310,7 +20345,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V310*/ meltfptr[309])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V46*/ meltfptr[45]); - MELT_LOCATION ("warmelt-outobj.melt:1289:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1291:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20324,7 +20359,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V310*/ meltfptr[309])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_INITIALROUTINEOBJ__V42*/ meltfptr[41]); - MELT_LOCATION ("warmelt-outobj.melt:1289:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1291:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20337,7 +20372,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V310*/ meltfptr[309])->tabval[2] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V47*/ meltfptr[46]); - MELT_LOCATION ("warmelt-outobj.melt:1289:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1291:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20350,7 +20385,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V310*/ meltfptr[309])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:1289:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1291:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20363,7 +20398,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V310*/ meltfptr[309])->tabval[4] = (melt_ptr_t) ( /*_.LIST_EVERY__V43*/ meltfptr[42]); - MELT_LOCATION ("warmelt-outobj.melt:1289:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1291:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20376,7 +20411,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V310*/ meltfptr[309])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V44*/ meltfptr[43]); - MELT_LOCATION ("warmelt-outobj.melt:1289:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1291:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20389,7 +20424,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V310*/ meltfptr[309])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_OBJVALUE__V48*/ meltfptr[47]); - MELT_LOCATION ("warmelt-outobj.melt:1289:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1291:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20402,7 +20437,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V310*/ meltfptr[309])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:1289:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1291:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20415,7 +20450,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V310*/ meltfptr[309])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_NAMED__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-outobj.melt:1289:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1291:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -20427,7 +20462,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V310*/ meltfptr[309])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:1289:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1291:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20440,7 +20475,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V310*/ meltfptr[309])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:1310:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1312:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20453,7 +20488,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V311*/ meltfptr[310])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V44*/ meltfptr[43]); - MELT_LOCATION ("warmelt-outobj.melt:1310:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1312:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20466,7 +20501,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V311*/ meltfptr[310])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJVALUE__V48*/ meltfptr[47]); - MELT_LOCATION ("warmelt-outobj.melt:1310:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1312:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20479,7 +20514,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V311*/ meltfptr[310])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:1310:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1312:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20492,7 +20527,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V311*/ meltfptr[310])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-outobj.melt:1310:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1312:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -20504,7 +20539,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V311*/ meltfptr[310])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:1310:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1312:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20517,12 +20552,12 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V311*/ meltfptr[310])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:1310:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1312:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V311*/ meltfptr[310]); - MELT_LOCATION ("warmelt-outobj.melt:1289:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1291:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20535,7 +20570,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V310*/ meltfptr[309])->tabval[11] = (melt_ptr_t) ( /*_.VALROUT___V311*/ meltfptr[310]); - MELT_LOCATION ("warmelt-outobj.melt:1289:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1291:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V310*/ meltfptr[309]); @@ -20612,7 +20647,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V317*/ meltfptr[316]); - MELT_LOCATION ("warmelt-outobj.melt:1346:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1348:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20626,7 +20661,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V319*/ meltfptr[318])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_INITIALROUTINEOBJ__V42*/ meltfptr[41]); - MELT_LOCATION ("warmelt-outobj.melt:1346:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1348:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20640,7 +20675,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V319*/ meltfptr[318])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NAMED__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-outobj.melt:1346:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1348:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20654,7 +20689,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V319*/ meltfptr[318])->tabval[2] = (melt_ptr_t) ( /*_.ADD2OUT__V49*/ meltfptr[48]); - MELT_LOCATION ("warmelt-outobj.melt:1346:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1348:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -20666,7 +20701,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V319*/ meltfptr[318])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V312*/ meltfptr[311]); - MELT_LOCATION ("warmelt-outobj.melt:1346:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1348:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -20678,7 +20713,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V319*/ meltfptr[318])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:1346:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1348:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20692,7 +20727,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V319*/ meltfptr[318])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:1346:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1348:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V319*/ meltfptr[318]); @@ -20731,7 +20766,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V321*/ meltfptr[320]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20744,7 +20779,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_PROCROUTINEOBJ__V50*/ meltfptr[49]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20757,7 +20792,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[1] = (melt_ptr_t) ( /*_.VALSTR___V324*/ meltfptr[323]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -20769,7 +20804,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V216*/ meltfptr[215]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20782,7 +20817,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[3] = (melt_ptr_t) ( /*_.VARIADIC_INDEX_IDSTR__V51*/ meltfptr[50]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20795,7 +20830,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[4] = (melt_ptr_t) ( /*_.VARIADIC_LENGTH_IDSTR__V52*/ meltfptr[51]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20808,7 +20843,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[5] = (melt_ptr_t) ( /*_.ADD2OUT__V49*/ meltfptr[48]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -20820,7 +20855,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V320*/ meltfptr[319]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -20832,7 +20867,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V301*/ meltfptr[300]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20845,7 +20880,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[8] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -20857,7 +20892,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20871,7 +20906,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20885,7 +20920,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[11] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20899,7 +20934,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[12] = (melt_ptr_t) ( /*_.LIST_EVERY__V43*/ meltfptr[42]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20913,7 +20948,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V53*/ meltfptr[52]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20927,7 +20962,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[14] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -20939,7 +20974,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[15] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20953,7 +20988,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[16] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:1536:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1538:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20966,7 +21001,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V325*/ meltfptr[324])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V53*/ meltfptr[52]); - MELT_LOCATION ("warmelt-outobj.melt:1536:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1538:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -20979,7 +21014,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V325*/ meltfptr[324])->tabval[1] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:1536:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1538:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -20991,7 +21026,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V325*/ meltfptr[324])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:1536:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1538:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21004,12 +21039,12 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V325*/ meltfptr[324])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:1536:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1538:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V325*/ meltfptr[324]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21023,7 +21058,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V323*/ meltfptr[322])->tabval[17] = (melt_ptr_t) ( /*_.VALROUT___V325*/ meltfptr[324]); - MELT_LOCATION ("warmelt-outobj.melt:1420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1422:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V323*/ meltfptr[322]); @@ -21119,7 +21154,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V333*/ meltfptr[332]); - MELT_LOCATION ("warmelt-outobj.melt:1604:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1606:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21133,7 +21168,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V335*/ meltfptr[334])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_DECLINIT__V13*/ meltfptr[12]); - MELT_LOCATION ("warmelt-outobj.melt:1604:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1606:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -21145,7 +21180,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V335*/ meltfptr[334])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:1604:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1606:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21159,7 +21194,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V335*/ meltfptr[334])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:1604:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1606:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21173,7 +21208,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V335*/ meltfptr[334])->tabval[3] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:1604:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1606:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V335*/ meltfptr[334]); @@ -21193,7 +21228,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V336*/ meltfptr[335]); - MELT_LOCATION ("warmelt-outobj.melt:1626:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1628:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21207,7 +21242,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V337*/ meltfptr[336])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_INITIAL_PREDEF__V17*/ meltfptr[16]); - MELT_LOCATION ("warmelt-outobj.melt:1626:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1628:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21221,7 +21256,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V337*/ meltfptr[336])->tabval[1] = (melt_ptr_t) ( /*_.VALSTR___V338*/ meltfptr[337]); - MELT_LOCATION ("warmelt-outobj.melt:1626:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1628:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21235,7 +21270,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V337*/ meltfptr[336])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_INITIAL_FILL__V16*/ meltfptr[15]); - MELT_LOCATION ("warmelt-outobj.melt:1626:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1628:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21249,7 +21284,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V337*/ meltfptr[336])->tabval[3] = (melt_ptr_t) ( /*_.VALSTR___V339*/ meltfptr[338]); - MELT_LOCATION ("warmelt-outobj.melt:1626:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1628:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -21261,7 +21296,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V337*/ meltfptr[336])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:1626:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1628:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21275,7 +21310,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V337*/ meltfptr[336])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:1626:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1628:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21289,7 +21324,7 @@ meltmod__warmelt_outobj__initialmeltchunk_2 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V337*/ meltfptr[336])->tabval[6] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:1626:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1628:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V337*/ meltfptr[336]); @@ -21321,7 +21356,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21335,7 +21370,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_INITIALROUTINEOBJ__V42*/ meltfptr[41]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21349,7 +21384,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ROUTINEOBJ__V46*/ meltfptr[45]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21363,7 +21398,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[2] = (melt_ptr_t) ( /*_.ADD2OUT__V49*/ meltfptr[48]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -21375,7 +21410,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V301*/ meltfptr[300]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -21387,7 +21422,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V336*/ meltfptr[335]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -21399,7 +21434,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V340*/ meltfptr[339]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -21411,7 +21446,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[6] = (melt_ptr_t) ( /*_.VALCLO___V320*/ meltfptr[319]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21425,7 +21460,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[7] = (melt_ptr_t) ( /*_.VALROUT___V342*/ meltfptr[341]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21439,7 +21474,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[8] = (melt_ptr_t) ( /*_.LIST_EVERY__V43*/ meltfptr[42]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21453,7 +21488,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V53*/ meltfptr[52]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21467,7 +21502,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[10] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:1823:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1825:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21480,7 +21515,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V343*/ meltfptr[342])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V53*/ meltfptr[52]); - MELT_LOCATION ("warmelt-outobj.melt:1823:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1825:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21493,12 +21528,12 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V343*/ meltfptr[342])->tabval[1] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:1823:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1825:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V343*/ meltfptr[342]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21512,7 +21547,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[11] = (melt_ptr_t) ( /*_.VALROUT___V343*/ meltfptr[342]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21526,7 +21561,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_LIST__V54*/ meltfptr[53]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21540,7 +21575,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V53*/ meltfptr[52]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21554,7 +21589,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[14] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V55*/ meltfptr[54]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21568,7 +21603,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[15] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V56*/ meltfptr[55]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21582,7 +21617,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[16] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V57*/ meltfptr[56]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -21594,7 +21629,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[17] = (melt_ptr_t) ( /*_.VALDATA___V214*/ meltfptr[213]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -21606,7 +21641,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[18] = (melt_ptr_t) ( /*_.VALDATA___V215*/ meltfptr[214]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21620,7 +21655,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[19] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V58*/ meltfptr[57]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -21632,7 +21667,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[20] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21646,7 +21681,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[21] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -21658,7 +21693,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[22] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21672,7 +21707,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[23] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21686,7 +21721,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[24] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -21698,7 +21733,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V341*/ meltfptr[340])->tabval[25] = (melt_ptr_t) ( /*_.VALCLO___V312*/ meltfptr[311]); - MELT_LOCATION ("warmelt-outobj.melt:1669:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1671:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V341*/ meltfptr[340]); @@ -21813,7 +21848,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V353*/ meltfptr[352]); - MELT_LOCATION ("warmelt-outobj.melt:2041:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2043:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21826,7 +21861,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V355*/ meltfptr[354])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJGETARG__V59*/ meltfptr[58]); - MELT_LOCATION ("warmelt-outobj.melt:2041:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2043:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21839,7 +21874,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V355*/ meltfptr[354])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V60*/ meltfptr[59]); - MELT_LOCATION ("warmelt-outobj.melt:2041:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2043:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -21851,7 +21886,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V355*/ meltfptr[354])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2041:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2043:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21864,7 +21899,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V355*/ meltfptr[354])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V44*/ meltfptr[43]); - MELT_LOCATION ("warmelt-outobj.melt:2041:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2043:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21877,7 +21912,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V355*/ meltfptr[354])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:2041:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2043:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21890,7 +21925,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V355*/ meltfptr[354])->tabval[5] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V47*/ meltfptr[46]); - MELT_LOCATION ("warmelt-outobj.melt:2041:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2043:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21903,7 +21938,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V355*/ meltfptr[354])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2041:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2043:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -21915,7 +21950,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V355*/ meltfptr[354])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2041:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2043:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21928,7 +21963,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V355*/ meltfptr[354])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2041:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2043:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V355*/ meltfptr[354]); @@ -21986,7 +22021,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V359*/ meltfptr[358]); - MELT_LOCATION ("warmelt-outobj.melt:2106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2108:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -21999,7 +22034,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V361*/ meltfptr[360])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJGETARGREST__V61*/ meltfptr[60]); - MELT_LOCATION ("warmelt-outobj.melt:2106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2108:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22012,7 +22047,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V361*/ meltfptr[360])->tabval[1] = (melt_ptr_t) ( /*_.VARIADIC_INDEX_IDSTR__V51*/ meltfptr[50]); - MELT_LOCATION ("warmelt-outobj.melt:2106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2108:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22025,7 +22060,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V361*/ meltfptr[360])->tabval[2] = (melt_ptr_t) ( /*_.VARIADIC_LENGTH_IDSTR__V52*/ meltfptr[51]); - MELT_LOCATION ("warmelt-outobj.melt:2106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2108:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22038,7 +22073,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V361*/ meltfptr[360])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V60*/ meltfptr[59]); - MELT_LOCATION ("warmelt-outobj.melt:2106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2108:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -22050,7 +22085,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V361*/ meltfptr[360])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2108:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22063,7 +22098,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V361*/ meltfptr[360])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V44*/ meltfptr[43]); - MELT_LOCATION ("warmelt-outobj.melt:2106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2108:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22076,7 +22111,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V361*/ meltfptr[360])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:2106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2108:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22089,7 +22124,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V361*/ meltfptr[360])->tabval[7] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V47*/ meltfptr[46]); - MELT_LOCATION ("warmelt-outobj.melt:2106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2108:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22102,7 +22137,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V361*/ meltfptr[360])->tabval[8] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2108:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -22114,7 +22149,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V361*/ meltfptr[360])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2108:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22127,7 +22162,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V361*/ meltfptr[360])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2108:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V361*/ meltfptr[360]); @@ -22166,7 +22201,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V363*/ meltfptr[362]); - MELT_LOCATION ("warmelt-outobj.melt:2189:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2191:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22179,7 +22214,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V365*/ meltfptr[364])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJLOCV__V44*/ meltfptr[43]); - MELT_LOCATION ("warmelt-outobj.melt:2189:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2191:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22192,7 +22227,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V365*/ meltfptr[364])->tabval[1] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V47*/ meltfptr[46]); - MELT_LOCATION ("warmelt-outobj.melt:2189:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2191:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22205,7 +22240,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V365*/ meltfptr[364])->tabval[2] = (melt_ptr_t) ( /*_.CTYPE_LONG__V62*/ meltfptr[61]); - MELT_LOCATION ("warmelt-outobj.melt:2189:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2191:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -22217,7 +22252,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V365*/ meltfptr[364])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2189:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2191:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22230,7 +22265,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V365*/ meltfptr[364])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2189:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2191:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V365*/ meltfptr[364]); @@ -22269,7 +22304,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V367*/ meltfptr[366]); - MELT_LOCATION ("warmelt-outobj.melt:2220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2222:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22282,7 +22317,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V369*/ meltfptr[368])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCLOCCV__V63*/ meltfptr[62]); - MELT_LOCATION ("warmelt-outobj.melt:2220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2222:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22295,7 +22330,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V369*/ meltfptr[368])->tabval[1] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V47*/ meltfptr[46]); - MELT_LOCATION ("warmelt-outobj.melt:2220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2222:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -22307,7 +22342,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V369*/ meltfptr[368])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2222:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22320,7 +22355,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V369*/ meltfptr[368])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2222:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V369*/ meltfptr[368]); @@ -22359,7 +22394,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V371*/ meltfptr[370]); - MELT_LOCATION ("warmelt-outobj.melt:2239:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2241:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22372,7 +22407,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V373*/ meltfptr[372])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCONSTV__V64*/ meltfptr[63]); - MELT_LOCATION ("warmelt-outobj.melt:2239:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2241:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22385,7 +22420,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V373*/ meltfptr[372])->tabval[1] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V47*/ meltfptr[46]); - MELT_LOCATION ("warmelt-outobj.melt:2239:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2241:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -22397,7 +22432,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V373*/ meltfptr[372])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2239:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2241:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22410,7 +22445,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V373*/ meltfptr[372])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2239:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2241:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V373*/ meltfptr[372]); @@ -22449,7 +22484,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V375*/ meltfptr[374]); - MELT_LOCATION ("warmelt-outobj.melt:2258:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2260:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22463,7 +22498,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V377*/ meltfptr[376])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPLAINBLOCK__V65*/ meltfptr[64]); - MELT_LOCATION ("warmelt-outobj.melt:2258:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2260:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -22490,7 +22525,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V378*/ meltfptr[377]); - MELT_LOCATION ("warmelt-outobj.melt:2258:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2260:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -22502,7 +22537,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V377*/ meltfptr[376])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V378*/ meltfptr[377]); - MELT_LOCATION ("warmelt-outobj.melt:2258:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2260:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22516,7 +22551,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V377*/ meltfptr[376])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V53*/ meltfptr[52]); - MELT_LOCATION ("warmelt-outobj.melt:2258:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2260:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22530,7 +22565,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V377*/ meltfptr[376])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2258:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2260:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -22542,7 +22577,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V377*/ meltfptr[376])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2258:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2260:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22556,7 +22591,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V377*/ meltfptr[376])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2258:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2260:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V377*/ meltfptr[376]); @@ -22580,7 +22615,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V379*/ meltfptr[378]); - MELT_LOCATION ("warmelt-outobj.melt:2292:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22594,7 +22629,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V381*/ meltfptr[380])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCHECKSIGNAL__V66*/ meltfptr[65]); - MELT_LOCATION ("warmelt-outobj.melt:2292:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2294:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -22606,7 +22641,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V381*/ meltfptr[380])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2292:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2294:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22620,7 +22655,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V381*/ meltfptr[380])->tabval[2] = (melt_ptr_t) ( /*_.ADD2OUT__V49*/ meltfptr[48]); - MELT_LOCATION ("warmelt-outobj.melt:2292:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2294:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V381*/ meltfptr[380]); @@ -22659,7 +22694,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V383*/ meltfptr[382]); - MELT_LOCATION ("warmelt-outobj.melt:2303:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2305:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22672,7 +22707,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V385*/ meltfptr[384])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJANYBLOCK__V67*/ meltfptr[66]); - MELT_LOCATION ("warmelt-outobj.melt:2303:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2305:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -22684,7 +22719,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V385*/ meltfptr[384])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2303:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2305:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22697,7 +22732,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V385*/ meltfptr[384])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-outobj.melt:2303:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2305:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -22709,7 +22744,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V385*/ meltfptr[384])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V378*/ meltfptr[377]); - MELT_LOCATION ("warmelt-outobj.melt:2303:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2305:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -22721,7 +22756,7 @@ meltmod__warmelt_outobj__initialmeltchunk_3 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V385*/ meltfptr[384])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2303:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2305:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22746,7 +22781,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L - MELT_LOCATION ("warmelt-outobj.melt:2303:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2305:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V385*/ meltfptr[384]); @@ -22785,7 +22820,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V387*/ meltfptr[386]); - MELT_LOCATION ("warmelt-outobj.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2329:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22799,7 +22834,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V389*/ meltfptr[388])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJMULTIALLOCBLOCK__V68*/ meltfptr[67]); - MELT_LOCATION ("warmelt-outobj.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2329:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22813,7 +22848,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V389*/ meltfptr[388])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-outobj.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2329:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22827,7 +22862,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V389*/ meltfptr[388])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V57*/ meltfptr[56]); - MELT_LOCATION ("warmelt-outobj.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2329:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22841,7 +22876,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V389*/ meltfptr[388])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V69*/ meltfptr[68]); - MELT_LOCATION ("warmelt-outobj.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2329:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -22853,7 +22888,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V389*/ meltfptr[388])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2329:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22867,7 +22902,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V389*/ meltfptr[388])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_OBJINITELEM__V14*/ meltfptr[13]); - MELT_LOCATION ("warmelt-outobj.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2329:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22881,7 +22916,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V389*/ meltfptr[388])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_DECLINIT__V13*/ meltfptr[12]); - MELT_LOCATION ("warmelt-outobj.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2329:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -22893,7 +22928,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V389*/ meltfptr[388])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2329:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22907,7 +22942,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V389*/ meltfptr[388])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2329:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -22921,7 +22956,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V389*/ meltfptr[388])->tabval[9] = (melt_ptr_t) ( /*_.OUTPUT_C_INITIAL_FILL__V16*/ meltfptr[15]); - MELT_LOCATION ("warmelt-outobj.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2329:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -22933,7 +22968,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V389*/ meltfptr[388])->tabval[10] = (melt_ptr_t) ( /*_.VALCLO___V378*/ meltfptr[377]); - MELT_LOCATION ("warmelt-outobj.melt:2327:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2329:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V389*/ meltfptr[388]); @@ -22991,7 +23026,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V393*/ meltfptr[392]); - MELT_LOCATION ("warmelt-outobj.melt:2399:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2401:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23005,7 +23040,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V395*/ meltfptr[394])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCITERBLOCK__V70*/ meltfptr[69]); - MELT_LOCATION ("warmelt-outobj.melt:2399:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2401:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23019,7 +23054,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V395*/ meltfptr[394])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-outobj.melt:2399:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2401:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23033,7 +23068,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V395*/ meltfptr[394])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_CITERATOR__V71*/ meltfptr[70]); - MELT_LOCATION ("warmelt-outobj.melt:2399:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2401:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23045,7 +23080,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V395*/ meltfptr[394])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2399:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2401:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23059,7 +23094,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V395*/ meltfptr[394])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2399:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2401:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23071,7 +23106,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V395*/ meltfptr[394])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2399:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2401:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23085,7 +23120,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V395*/ meltfptr[394])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2399:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2401:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23097,7 +23132,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V395*/ meltfptr[394])->tabval[7] = (melt_ptr_t) ( /*_.VALCLO___V378*/ meltfptr[377]); - MELT_LOCATION ("warmelt-outobj.melt:2399:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2401:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V395*/ meltfptr[394]); @@ -23155,7 +23190,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V399*/ meltfptr[398]); - MELT_LOCATION ("warmelt-outobj.melt:2454:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2456:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23169,7 +23204,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V401*/ meltfptr[400])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCOMMENTINSTR__V72*/ meltfptr[71]); - MELT_LOCATION ("warmelt-outobj.melt:2454:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2456:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23183,7 +23218,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V401*/ meltfptr[400])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V57*/ meltfptr[56]); - MELT_LOCATION ("warmelt-outobj.melt:2454:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2456:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23197,7 +23232,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V401*/ meltfptr[400])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRING__V41*/ meltfptr[40]); - MELT_LOCATION ("warmelt-outobj.melt:2454:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2456:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23209,7 +23244,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V401*/ meltfptr[400])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2454:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2456:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23221,7 +23256,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V401*/ meltfptr[400])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2454:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2456:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23235,7 +23270,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V401*/ meltfptr[400])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2454:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2456:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V401*/ meltfptr[400]); @@ -23274,7 +23309,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V403*/ meltfptr[402]); - MELT_LOCATION ("warmelt-outobj.melt:2475:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2477:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23288,7 +23323,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V405*/ meltfptr[404])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCOMMENTEDBLOCK__V73*/ meltfptr[72]); - MELT_LOCATION ("warmelt-outobj.melt:2475:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2477:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23300,7 +23335,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V405*/ meltfptr[404])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2475:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2477:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23314,7 +23349,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V405*/ meltfptr[404])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-outobj.melt:2475:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2477:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23328,7 +23363,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V405*/ meltfptr[404])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V57*/ meltfptr[56]); - MELT_LOCATION ("warmelt-outobj.melt:2475:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2477:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23342,7 +23377,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V405*/ meltfptr[404])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRING__V41*/ meltfptr[40]); - MELT_LOCATION ("warmelt-outobj.melt:2475:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2477:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23354,7 +23389,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V405*/ meltfptr[404])->tabval[5] = (melt_ptr_t) ( /*_.VALCLO___V378*/ meltfptr[377]); - MELT_LOCATION ("warmelt-outobj.melt:2475:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2477:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23366,7 +23401,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V405*/ meltfptr[404])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2475:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2477:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23380,7 +23415,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V405*/ meltfptr[404])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2475:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2477:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V405*/ meltfptr[404]); @@ -23419,7 +23454,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V407*/ meltfptr[406]); - MELT_LOCATION ("warmelt-outobj.melt:2513:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2515:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23433,7 +23468,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V409*/ meltfptr[408])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJLABELINSTR__V74*/ meltfptr[73]); - MELT_LOCATION ("warmelt-outobj.melt:2513:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2515:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23445,7 +23480,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V409*/ meltfptr[408])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2513:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2515:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23459,7 +23494,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V409*/ meltfptr[408])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2513:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2515:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23471,7 +23506,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V409*/ meltfptr[408])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2513:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2515:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V409*/ meltfptr[408]); @@ -23510,7 +23545,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V411*/ meltfptr[410]); - MELT_LOCATION ("warmelt-outobj.melt:2532:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2534:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23524,7 +23559,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V413*/ meltfptr[412])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJGOTOINSTR__V75*/ meltfptr[74]); - MELT_LOCATION ("warmelt-outobj.melt:2532:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2534:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23536,7 +23571,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V413*/ meltfptr[412])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2532:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2534:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23548,7 +23583,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V413*/ meltfptr[412])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2532:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2534:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23562,7 +23597,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V413*/ meltfptr[412])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2532:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2534:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V413*/ meltfptr[412]); @@ -23601,7 +23636,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V415*/ meltfptr[414]); - MELT_LOCATION ("warmelt-outobj.melt:2549:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2551:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23614,7 +23649,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V417*/ meltfptr[416])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V76*/ meltfptr[75]); - MELT_LOCATION ("warmelt-outobj.melt:2549:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2551:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23626,7 +23661,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V417*/ meltfptr[416])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2549:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2551:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23639,7 +23674,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V417*/ meltfptr[416])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2549:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2551:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V417*/ meltfptr[416]); @@ -23678,7 +23713,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V419*/ meltfptr[418]); - MELT_LOCATION ("warmelt-outobj.melt:2562:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23691,7 +23726,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJLOOP__V77*/ meltfptr[76]); - MELT_LOCATION ("warmelt-outobj.melt:2562:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23704,7 +23739,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-outobj.melt:2562:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23717,7 +23752,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V76*/ meltfptr[75]); - MELT_LOCATION ("warmelt-outobj.melt:2562:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23729,7 +23764,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2562:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23741,7 +23776,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V418*/ meltfptr[417]); - MELT_LOCATION ("warmelt-outobj.melt:2562:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23754,7 +23789,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[5] = (melt_ptr_t) ( /*_.LIST_EVERY__V43*/ meltfptr[42]); - MELT_LOCATION ("warmelt-outobj.melt:2562:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23767,7 +23802,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V53*/ meltfptr[52]); - MELT_LOCATION ("warmelt-outobj.melt:2562:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23780,7 +23815,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[7] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2581:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2583:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23793,7 +23828,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V422*/ meltfptr[421])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V53*/ meltfptr[52]); - MELT_LOCATION ("warmelt-outobj.melt:2581:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2583:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23806,12 +23841,12 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V422*/ meltfptr[421])->tabval[1] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2581:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2583:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V422*/ meltfptr[421]); - MELT_LOCATION ("warmelt-outobj.melt:2562:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23824,7 +23859,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[8] = (melt_ptr_t) ( /*_.VALROUT___V422*/ meltfptr[421]); - MELT_LOCATION ("warmelt-outobj.melt:2562:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23837,7 +23872,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V53*/ meltfptr[52]); - MELT_LOCATION ("warmelt-outobj.melt:2562:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23850,7 +23885,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[10] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2562:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23862,7 +23897,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2562:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23875,7 +23910,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2603:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2605:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23888,7 +23923,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V423*/ meltfptr[422])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V53*/ meltfptr[52]); - MELT_LOCATION ("warmelt-outobj.melt:2603:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2605:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23901,7 +23936,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V423*/ meltfptr[422])->tabval[1] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2603:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2605:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23913,7 +23948,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V423*/ meltfptr[422])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2603:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2605:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23926,12 +23961,12 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V423*/ meltfptr[422])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2603:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2605:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V423*/ meltfptr[422]); - MELT_LOCATION ("warmelt-outobj.melt:2562:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23944,7 +23979,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[13] = (melt_ptr_t) ( /*_.VALROUT___V423*/ meltfptr[422]); - MELT_LOCATION ("warmelt-outobj.melt:2562:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -23956,7 +23991,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2562:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -23969,7 +24004,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V421*/ meltfptr[420])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2562:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2564:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V421*/ meltfptr[420]); @@ -24008,7 +24043,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V425*/ meltfptr[424]); - MELT_LOCATION ("warmelt-outobj.melt:2621:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2623:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24021,7 +24056,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V427*/ meltfptr[426])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJEXIT__V78*/ meltfptr[77]); - MELT_LOCATION ("warmelt-outobj.melt:2621:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2623:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24034,7 +24069,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V427*/ meltfptr[426])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V76*/ meltfptr[75]); - MELT_LOCATION ("warmelt-outobj.melt:2621:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2623:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24046,7 +24081,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V427*/ meltfptr[426])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2621:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2623:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24058,7 +24093,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V427*/ meltfptr[426])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V418*/ meltfptr[417]); - MELT_LOCATION ("warmelt-outobj.melt:2621:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2623:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24070,7 +24105,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V427*/ meltfptr[426])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2621:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2623:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24083,7 +24118,7 @@ meltmod__warmelt_outobj__initialmeltchunk_4 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V427*/ meltfptr[426])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2621:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2623:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V427*/ meltfptr[426]); @@ -24134,7 +24169,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L - MELT_LOCATION ("warmelt-outobj.melt:2641:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2643:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24147,7 +24182,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V431*/ meltfptr[430])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJAGAIN__V79*/ meltfptr[78]); - MELT_LOCATION ("warmelt-outobj.melt:2641:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2643:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24160,7 +24195,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V431*/ meltfptr[430])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CLONED_SYMBOL__V76*/ meltfptr[75]); - MELT_LOCATION ("warmelt-outobj.melt:2641:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2643:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24172,7 +24207,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V431*/ meltfptr[430])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2641:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2643:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24184,7 +24219,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V431*/ meltfptr[430])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V418*/ meltfptr[417]); - MELT_LOCATION ("warmelt-outobj.melt:2641:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2643:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24196,7 +24231,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V431*/ meltfptr[430])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2641:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2643:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24209,7 +24244,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V431*/ meltfptr[430])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2641:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2643:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V431*/ meltfptr[430]); @@ -24248,7 +24283,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V433*/ meltfptr[432]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24261,7 +24296,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCOMPUTE__V80*/ meltfptr[79]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24274,7 +24309,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24286,7 +24321,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24299,7 +24334,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[3] = (melt_ptr_t) ( /*_.LIST_EVERY__V43*/ meltfptr[42]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24312,7 +24347,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2671:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2673:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24325,12 +24360,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V436*/ meltfptr[435])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2671:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2673:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V436*/ meltfptr[435]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24343,7 +24378,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[5] = (melt_ptr_t) ( /*_.VALROUT___V436*/ meltfptr[435]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24356,7 +24391,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24368,7 +24403,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24381,7 +24416,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2680:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2682:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24394,7 +24429,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V437*/ meltfptr[436])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2680:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2682:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24406,7 +24441,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V437*/ meltfptr[436])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2680:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2682:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24419,12 +24454,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V437*/ meltfptr[436])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2680:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2682:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V437*/ meltfptr[436]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24437,7 +24472,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[9] = (melt_ptr_t) ( /*_.VALROUT___V437*/ meltfptr[436]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24450,7 +24485,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[10] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V81*/ meltfptr[80]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24463,7 +24498,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[11] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24475,7 +24510,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[12] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24488,7 +24523,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[13] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2690:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2692:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24501,7 +24536,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2690:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2692:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24513,7 +24548,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2690:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2692:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24526,12 +24561,12 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V438*/ meltfptr[437])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2690:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2692:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V438*/ meltfptr[437]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24544,7 +24579,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[14] = (melt_ptr_t) ( /*_.VALROUT___V438*/ meltfptr[437]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24557,7 +24592,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[15] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24569,7 +24604,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[16] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24582,7 +24617,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V435*/ meltfptr[434])->tabval[17] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2660:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2662:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V435*/ meltfptr[434]); @@ -24640,7 +24675,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V442*/ meltfptr[441]); - MELT_LOCATION ("warmelt-outobj.melt:2706:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2708:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24653,7 +24688,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V444*/ meltfptr[443])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCOND__V82*/ meltfptr[81]); - MELT_LOCATION ("warmelt-outobj.melt:2706:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2708:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24665,7 +24700,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V444*/ meltfptr[443])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2706:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2708:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24678,7 +24713,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V444*/ meltfptr[443])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2706:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2708:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24691,7 +24726,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V444*/ meltfptr[443])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_OBJPUREVALUE__V53*/ meltfptr[52]); - MELT_LOCATION ("warmelt-outobj.melt:2706:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2708:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24703,7 +24738,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V444*/ meltfptr[443])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2706:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2708:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24716,7 +24751,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V444*/ meltfptr[443])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2706:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2708:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V444*/ meltfptr[443]); @@ -24755,7 +24790,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V446*/ meltfptr[445]); - MELT_LOCATION ("warmelt-outobj.melt:2748:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2750:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24768,7 +24803,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V448*/ meltfptr[447])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCPPIF__V83*/ meltfptr[82]); - MELT_LOCATION ("warmelt-outobj.melt:2748:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2750:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24780,7 +24815,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V448*/ meltfptr[447])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V216*/ meltfptr[215]); - MELT_LOCATION ("warmelt-outobj.melt:2748:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2750:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24792,7 +24827,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V448*/ meltfptr[447])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2748:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2750:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24805,7 +24840,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V448*/ meltfptr[447])->tabval[3] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2748:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2750:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24817,7 +24852,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V448*/ meltfptr[447])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2748:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2750:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24830,7 +24865,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V448*/ meltfptr[447])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2748:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2750:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V448*/ meltfptr[447]); @@ -24869,7 +24904,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V450*/ meltfptr[449]); - MELT_LOCATION ("warmelt-outobj.melt:2781:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2783:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24883,7 +24918,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V452*/ meltfptr[451])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINTERNSYMBOL__V84*/ meltfptr[83]); - MELT_LOCATION ("warmelt-outobj.melt:2781:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2783:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24897,7 +24932,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V452*/ meltfptr[451])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITOBJECT__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-outobj.melt:2781:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2783:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24911,7 +24946,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V452*/ meltfptr[451])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V85*/ meltfptr[84]); - MELT_LOCATION ("warmelt-outobj.melt:2781:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2783:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24923,7 +24958,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V452*/ meltfptr[451])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2781:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2783:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24937,7 +24972,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V452*/ meltfptr[451])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2781:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2783:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -24949,7 +24984,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V452*/ meltfptr[451])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2781:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2783:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -24963,7 +24998,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V452*/ meltfptr[451])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2781:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2783:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V452*/ meltfptr[451]); @@ -25021,7 +25056,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V456*/ meltfptr[455]); - MELT_LOCATION ("warmelt-outobj.melt:2806:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2808:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25035,7 +25070,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V458*/ meltfptr[457])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJINTERNKEYWORD__V86*/ meltfptr[85]); - MELT_LOCATION ("warmelt-outobj.melt:2806:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2808:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25049,7 +25084,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V458*/ meltfptr[457])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V87*/ meltfptr[86]); - MELT_LOCATION ("warmelt-outobj.melt:2806:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2808:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -25061,7 +25096,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V458*/ meltfptr[457])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2806:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2808:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25075,7 +25110,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V458*/ meltfptr[457])->tabval[3] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2806:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2808:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -25087,7 +25122,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V458*/ meltfptr[457])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2806:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2808:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25101,7 +25136,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V458*/ meltfptr[457])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2806:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2808:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V458*/ meltfptr[457]); @@ -25159,7 +25194,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V462*/ meltfptr[461]); - MELT_LOCATION ("warmelt-outobj.melt:2830:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2832:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25173,7 +25208,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V464*/ meltfptr[463])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJGETNAMEDSYMBOL__V88*/ meltfptr[87]); - MELT_LOCATION ("warmelt-outobj.melt:2830:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2832:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25187,7 +25222,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V464*/ meltfptr[463])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITOBJECT__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-outobj.melt:2830:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2832:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25201,7 +25236,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V464*/ meltfptr[463])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_DATASYMBOL__V85*/ meltfptr[84]); - MELT_LOCATION ("warmelt-outobj.melt:2830:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2832:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -25213,7 +25248,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V464*/ meltfptr[463])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2830:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2832:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25227,7 +25262,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V464*/ meltfptr[463])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2830:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2832:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -25239,7 +25274,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V464*/ meltfptr[463])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2830:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2832:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25253,7 +25288,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V464*/ meltfptr[463])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2830:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2832:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V464*/ meltfptr[463]); @@ -25292,7 +25327,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V466*/ meltfptr[465]); - MELT_LOCATION ("warmelt-outobj.melt:2869:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2871:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25306,7 +25341,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V468*/ meltfptr[467])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJGETNAMEDKEYWORD__V89*/ meltfptr[88]); - MELT_LOCATION ("warmelt-outobj.melt:2869:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2871:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25320,7 +25355,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V468*/ meltfptr[467])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITOBJECT__V22*/ meltfptr[21]); - MELT_LOCATION ("warmelt-outobj.melt:2869:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2871:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25334,7 +25369,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V468*/ meltfptr[467])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NREP_DATAKEYWORD__V87*/ meltfptr[86]); - MELT_LOCATION ("warmelt-outobj.melt:2869:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2871:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -25346,7 +25381,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V468*/ meltfptr[467])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2869:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2871:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25360,7 +25395,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V468*/ meltfptr[467])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2869:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2871:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -25372,7 +25407,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V468*/ meltfptr[467])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2869:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2871:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25386,7 +25421,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V468*/ meltfptr[467])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2869:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2871:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V468*/ meltfptr[467]); @@ -25425,7 +25460,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V470*/ meltfptr[469]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25438,7 +25473,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V472*/ meltfptr[471])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJAPPLY__V90*/ meltfptr[89]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25451,7 +25486,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V472*/ meltfptr[471])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_LIST__V54*/ meltfptr[53]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25464,7 +25499,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V472*/ meltfptr[471])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -25476,7 +25511,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V472*/ meltfptr[471])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25489,7 +25524,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V472*/ meltfptr[471])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_OBJINSTR__V58*/ meltfptr[57]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25502,7 +25537,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V472*/ meltfptr[471])->tabval[5] = (melt_ptr_t) ( /*_.GET_CTYPE__V91*/ meltfptr[90]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25515,7 +25550,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V472*/ meltfptr[471])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25528,7 +25563,7 @@ meltmod__warmelt_outobj__initialmeltchunk_5 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V472*/ meltfptr[471])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_OBJNIL__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25553,7 +25588,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25566,7 +25601,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V472*/ meltfptr[471])->tabval[9] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -25578,7 +25613,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V472*/ meltfptr[471])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25591,7 +25626,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V472*/ meltfptr[471])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25604,7 +25639,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V472*/ meltfptr[471])->tabval[12] = (melt_ptr_t) ( /*_.LIST_EVERY__V43*/ meltfptr[42]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25617,7 +25652,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V472*/ meltfptr[471])->tabval[13] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -25629,7 +25664,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V472*/ meltfptr[471])->tabval[14] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25642,7 +25677,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V472*/ meltfptr[471])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2963:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2965:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25655,7 +25690,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V473*/ meltfptr[472])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:2963:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2965:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -25667,7 +25702,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V473*/ meltfptr[472])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:2963:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2965:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25680,12 +25715,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V473*/ meltfptr[472])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:2963:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2965:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V473*/ meltfptr[472]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25698,7 +25733,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V472*/ meltfptr[471])->tabval[16] = (melt_ptr_t) ( /*_.VALROUT___V473*/ meltfptr[472]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25711,7 +25746,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V472*/ meltfptr[471])->tabval[17] = (melt_ptr_t) ( /*_.VALROUT___V474*/ meltfptr[473]); - MELT_LOCATION ("warmelt-outobj.melt:2905:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2907:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V472*/ meltfptr[471]); @@ -25769,7 +25804,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V478*/ meltfptr[477]); - MELT_LOCATION ("warmelt-outobj.melt:3002:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3004:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25782,7 +25817,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V480*/ meltfptr[479])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJMSEND__V92*/ meltfptr[91]); - MELT_LOCATION ("warmelt-outobj.melt:3002:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3004:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25795,7 +25830,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V480*/ meltfptr[479])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_LIST__V54*/ meltfptr[53]); - MELT_LOCATION ("warmelt-outobj.melt:3002:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3004:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25808,7 +25843,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V480*/ meltfptr[479])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-outobj.melt:3002:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3004:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -25820,7 +25855,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V480*/ meltfptr[479])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3002:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3004:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25833,7 +25868,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V480*/ meltfptr[479])->tabval[4] = (melt_ptr_t) ( /*_.GET_CTYPE__V91*/ meltfptr[90]); - MELT_LOCATION ("warmelt-outobj.melt:3002:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3004:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25846,7 +25881,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V480*/ meltfptr[479])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:3002:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3004:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25859,7 +25894,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V480*/ meltfptr[479])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_OBJNIL__V21*/ meltfptr[20]); - MELT_LOCATION ("warmelt-outobj.melt:3002:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3004:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25872,7 +25907,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V480*/ meltfptr[479])->tabval[7] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V47*/ meltfptr[46]); - MELT_LOCATION ("warmelt-outobj.melt:3002:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3004:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25885,7 +25920,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V480*/ meltfptr[479])->tabval[8] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3002:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3004:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -25897,7 +25932,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V480*/ meltfptr[479])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3002:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3004:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25910,7 +25945,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V480*/ meltfptr[479])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3002:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3004:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25923,7 +25958,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V480*/ meltfptr[479])->tabval[11] = (melt_ptr_t) ( /*_.LIST_EVERY__V43*/ meltfptr[42]); - MELT_LOCATION ("warmelt-outobj.melt:3002:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3004:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25936,7 +25971,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V480*/ meltfptr[479])->tabval[12] = (melt_ptr_t) ( /*_.VALROUT___V481*/ meltfptr[480]); - MELT_LOCATION ("warmelt-outobj.melt:3002:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3004:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V480*/ meltfptr[479]); @@ -25975,7 +26010,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V483*/ meltfptr[482]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -25989,7 +26024,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJMULTIAPPLY__V93*/ meltfptr[92]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26003,7 +26038,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_LIST__V54*/ meltfptr[53]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26017,7 +26052,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -26029,7 +26064,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26043,7 +26078,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[4] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V81*/ meltfptr[80]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26057,7 +26092,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[5] = (melt_ptr_t) ( /*_.GET_CTYPE__V91*/ meltfptr[90]); - MELT_LOCATION ("warmelt-outobj.melt:3146:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3148:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26070,12 +26105,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V486*/ meltfptr[485])->tabval[0] = (melt_ptr_t) ( /*_.GET_CTYPE__V91*/ meltfptr[90]); - MELT_LOCATION ("warmelt-outobj.melt:3146:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3148:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V486*/ meltfptr[485]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26089,7 +26124,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[6] = (melt_ptr_t) ( /*_.VALROUT___V486*/ meltfptr[485]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26103,7 +26138,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[7] = (melt_ptr_t) ( /*_.GET_CTYPE__V91*/ meltfptr[90]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26117,7 +26152,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26131,7 +26166,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[9] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V47*/ meltfptr[46]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26145,7 +26180,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[10] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -26157,7 +26192,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26171,7 +26206,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26185,7 +26220,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[13] = (melt_ptr_t) ( /*_.GET_CTYPE__V91*/ meltfptr[90]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26199,7 +26234,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -26211,7 +26246,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[15] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26225,7 +26260,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[16] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V47*/ meltfptr[46]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26239,7 +26274,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[17] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3189:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3191:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26252,7 +26287,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V487*/ meltfptr[486])->tabval[0] = (melt_ptr_t) ( /*_.GET_CTYPE__V91*/ meltfptr[90]); - MELT_LOCATION ("warmelt-outobj.melt:3189:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3191:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26265,7 +26300,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V487*/ meltfptr[486])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:3189:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3191:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -26277,7 +26312,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V487*/ meltfptr[486])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3189:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3191:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26290,7 +26325,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V487*/ meltfptr[486])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V47*/ meltfptr[46]); - MELT_LOCATION ("warmelt-outobj.melt:3189:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3191:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26303,12 +26338,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V487*/ meltfptr[486])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3189:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3191:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V487*/ meltfptr[486]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26322,7 +26357,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[18] = (melt_ptr_t) ( /*_.VALROUT___V487*/ meltfptr[486]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26336,7 +26371,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[19] = (melt_ptr_t) ( /*_.LIST_EVERY__V43*/ meltfptr[42]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26350,7 +26385,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[20] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3217:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3219:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26363,12 +26398,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V488*/ meltfptr[487])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3217:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3219:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V488*/ meltfptr[487]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26382,7 +26417,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[21] = (melt_ptr_t) ( /*_.VALROUT___V488*/ meltfptr[487]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26396,7 +26431,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[22] = (melt_ptr_t) ( /*_.VALROUT___V489*/ meltfptr[488]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26410,7 +26445,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V485*/ meltfptr[484])->tabval[23] = (melt_ptr_t) ( /*_.VALROUT___V490*/ meltfptr[489]); - MELT_LOCATION ("warmelt-outobj.melt:3100:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3102:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V485*/ meltfptr[484]); @@ -26449,7 +26484,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V492*/ meltfptr[491]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26463,7 +26498,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJMULTIMSEND__V94*/ meltfptr[93]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26477,7 +26512,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_LIST__V54*/ meltfptr[53]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26491,7 +26526,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -26503,7 +26538,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26517,7 +26552,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[4] = (melt_ptr_t) ( /*_.MULTIPLE_EVERY__V81*/ meltfptr[80]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26531,7 +26566,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[5] = (melt_ptr_t) ( /*_.GET_CTYPE__V91*/ meltfptr[90]); - MELT_LOCATION ("warmelt-outobj.melt:3298:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3300:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26544,12 +26579,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V495*/ meltfptr[494])->tabval[0] = (melt_ptr_t) ( /*_.GET_CTYPE__V91*/ meltfptr[90]); - MELT_LOCATION ("warmelt-outobj.melt:3298:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3300:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V495*/ meltfptr[494]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26563,7 +26598,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[6] = (melt_ptr_t) ( /*_.VALROUT___V495*/ meltfptr[494]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26577,7 +26612,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[7] = (melt_ptr_t) ( /*_.GET_CTYPE__V91*/ meltfptr[90]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26591,7 +26626,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26605,7 +26640,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[9] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V47*/ meltfptr[46]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26619,7 +26654,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[10] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -26631,7 +26666,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[11] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26645,7 +26680,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26659,7 +26694,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[13] = (melt_ptr_t) ( /*_.GET_CTYPE__V91*/ meltfptr[90]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26673,7 +26708,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -26685,7 +26720,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[15] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26699,7 +26734,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[16] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V47*/ meltfptr[46]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26713,7 +26748,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[17] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3348:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3350:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26726,7 +26761,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V496*/ meltfptr[495])->tabval[0] = (melt_ptr_t) ( /*_.GET_CTYPE__V91*/ meltfptr[90]); - MELT_LOCATION ("warmelt-outobj.melt:3348:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3350:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26739,7 +26774,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V496*/ meltfptr[495])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:3348:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3350:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -26751,7 +26786,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V496*/ meltfptr[495])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3348:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3350:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26764,7 +26799,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V496*/ meltfptr[495])->tabval[3] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V47*/ meltfptr[46]); - MELT_LOCATION ("warmelt-outobj.melt:3348:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3350:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26777,12 +26812,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V496*/ meltfptr[495])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3348:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3350:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V496*/ meltfptr[495]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26796,7 +26831,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[18] = (melt_ptr_t) ( /*_.VALROUT___V496*/ meltfptr[495]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26810,7 +26845,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[19] = (melt_ptr_t) ( /*_.LIST_EVERY__V43*/ meltfptr[42]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26824,7 +26859,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[20] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3376:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3378:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26837,12 +26872,12 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V497*/ meltfptr[496])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3376:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3378:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V497*/ meltfptr[496]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26856,7 +26891,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[21] = (melt_ptr_t) ( /*_.VALROUT___V497*/ meltfptr[496]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26870,7 +26905,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[22] = (melt_ptr_t) ( /*_.VALROUT___V498*/ meltfptr[497]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26884,7 +26919,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V494*/ meltfptr[493])->tabval[23] = (melt_ptr_t) ( /*_.VALROUT___V499*/ meltfptr[498]); - MELT_LOCATION ("warmelt-outobj.melt:3265:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3267:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V494*/ meltfptr[493]); @@ -26923,7 +26958,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V501*/ meltfptr[500]); - MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3422:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26936,7 +26971,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJCLEAR__V95*/ meltfptr[94]); - MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3422:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -26948,7 +26983,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3422:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26961,7 +26996,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3422:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -26973,7 +27008,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3422:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -26986,7 +27021,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V503*/ meltfptr[502])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3420:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3422:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V503*/ meltfptr[502]); @@ -27025,7 +27060,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V505*/ meltfptr[504]); - MELT_LOCATION ("warmelt-outobj.melt:3436:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3438:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27039,7 +27074,7 @@ meltmod__warmelt_outobj__initialmeltchunk_6 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJRAWALLOCOBJ__V96*/ meltfptr[95]); - MELT_LOCATION ("warmelt-outobj.melt:3436:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3438:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27065,7 +27100,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L - MELT_LOCATION ("warmelt-outobj.melt:3436:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3438:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27079,7 +27114,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_OBJVALUE__V48*/ meltfptr[47]); - MELT_LOCATION ("warmelt-outobj.melt:3436:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3438:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -27091,7 +27126,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3436:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3438:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27105,7 +27140,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3436:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3438:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -27117,7 +27152,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3436:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3438:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27131,7 +27166,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V507*/ meltfptr[506])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3436:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3438:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V507*/ meltfptr[506]); @@ -27170,7 +27205,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V509*/ meltfptr[508]); - MELT_LOCATION ("warmelt-outobj.melt:3474:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3476:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27184,7 +27219,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V511*/ meltfptr[510])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJNEWCLOSURE__V97*/ meltfptr[96]); - MELT_LOCATION ("warmelt-outobj.melt:3474:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3476:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27198,7 +27233,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V511*/ meltfptr[510])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-outobj.melt:3474:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3476:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -27210,7 +27245,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V511*/ meltfptr[510])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3474:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3476:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27224,7 +27259,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V511*/ meltfptr[510])->tabval[3] = (melt_ptr_t) ( /*_.LIST_EVERY__V43*/ meltfptr[42]); - MELT_LOCATION ("warmelt-outobj.melt:3474:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3476:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27238,7 +27273,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V511*/ meltfptr[510])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3474:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3476:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -27250,7 +27285,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V511*/ meltfptr[510])->tabval[5] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3474:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3476:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27264,7 +27299,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V511*/ meltfptr[510])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3487:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3489:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27277,7 +27312,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V512*/ meltfptr[511])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3487:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3489:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -27289,7 +27324,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V512*/ meltfptr[511])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3487:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3489:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27302,12 +27337,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V512*/ meltfptr[511])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3487:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3489:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V512*/ meltfptr[511]); - MELT_LOCATION ("warmelt-outobj.melt:3474:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3476:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27321,7 +27356,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V511*/ meltfptr[510])->tabval[7] = (melt_ptr_t) ( /*_.VALROUT___V512*/ meltfptr[511]); - MELT_LOCATION ("warmelt-outobj.melt:3474:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3476:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27335,7 +27370,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V511*/ meltfptr[510])->tabval[8] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3474:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3476:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -27347,7 +27382,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V511*/ meltfptr[510])->tabval[9] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3474:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3476:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27361,7 +27396,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V511*/ meltfptr[510])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3474:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3476:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V511*/ meltfptr[510]); @@ -27400,7 +27435,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V514*/ meltfptr[513]); - MELT_LOCATION ("warmelt-outobj.melt:3507:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3509:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27413,7 +27448,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V516*/ meltfptr[515])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJTOUCH__V98*/ meltfptr[97]); - MELT_LOCATION ("warmelt-outobj.melt:3507:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3509:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -27425,7 +27460,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V516*/ meltfptr[515])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3507:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3509:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27438,7 +27473,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V516*/ meltfptr[515])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3507:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3509:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V516*/ meltfptr[515]); @@ -27477,7 +27512,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V518*/ meltfptr[517]); - MELT_LOCATION ("warmelt-outobj.melt:3532:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3534:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27490,7 +27525,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V520*/ meltfptr[519])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTUPLE__V99*/ meltfptr[98]); - MELT_LOCATION ("warmelt-outobj.melt:3532:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3534:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -27502,7 +27537,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V520*/ meltfptr[519])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V294*/ meltfptr[293]); - MELT_LOCATION ("warmelt-outobj.melt:3532:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3534:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -27514,7 +27549,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V520*/ meltfptr[519])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3532:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3534:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27527,7 +27562,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V520*/ meltfptr[519])->tabval[3] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3532:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3534:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -27539,7 +27574,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V520*/ meltfptr[519])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3532:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3534:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27552,7 +27587,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V520*/ meltfptr[519])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3532:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3534:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V520*/ meltfptr[519]); @@ -27610,7 +27645,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V524*/ meltfptr[523]); - MELT_LOCATION ("warmelt-outobj.melt:3604:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3606:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -27628,12 +27663,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALBXINT___V527*/ meltfptr[526]); - MELT_LOCATION ("warmelt-outobj.melt:3604:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3606:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V526*/ meltfptr[525]); - MELT_LOCATION ("warmelt-outobj.melt:3606:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3608:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27647,7 +27682,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V528*/ meltfptr[527])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIR__V100*/ meltfptr[99]); - MELT_LOCATION ("warmelt-outobj.melt:3606:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3608:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27661,7 +27696,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V528*/ meltfptr[527])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIRHEAD__V101*/ meltfptr[100]); - MELT_LOCATION ("warmelt-outobj.melt:3606:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3608:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -27673,7 +27708,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V528*/ meltfptr[527])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V526*/ meltfptr[525]); - MELT_LOCATION ("warmelt-outobj.melt:3606:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3608:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27687,7 +27722,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V528*/ meltfptr[527])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3606:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3608:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -27699,7 +27734,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V528*/ meltfptr[527])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3606:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3608:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27713,7 +27748,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V528*/ meltfptr[527])->tabval[5] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3606:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3608:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -27725,7 +27760,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V528*/ meltfptr[527])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3606:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3608:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V528*/ meltfptr[527]); @@ -27783,7 +27818,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V532*/ meltfptr[531]); - MELT_LOCATION ("warmelt-outobj.melt:3635:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3637:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27797,7 +27832,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V534*/ meltfptr[533])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIR__V100*/ meltfptr[99]); - MELT_LOCATION ("warmelt-outobj.melt:3635:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3637:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27811,7 +27846,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V534*/ meltfptr[533])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJPUTPAIRTAIL__V102*/ meltfptr[101]); - MELT_LOCATION ("warmelt-outobj.melt:3635:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3637:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -27823,7 +27858,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V534*/ meltfptr[533])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3635:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3637:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27837,7 +27872,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V534*/ meltfptr[533])->tabval[3] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3635:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3637:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -27849,7 +27884,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V534*/ meltfptr[533])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3635:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3637:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27863,7 +27898,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V534*/ meltfptr[533])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3635:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3637:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V534*/ meltfptr[533]); @@ -27902,7 +27937,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V536*/ meltfptr[535]); - MELT_LOCATION ("warmelt-outobj.melt:3661:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3663:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27915,7 +27950,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V538*/ meltfptr[537])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTLIST__V103*/ meltfptr[102]); - MELT_LOCATION ("warmelt-outobj.melt:3661:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3663:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -27927,7 +27962,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V538*/ meltfptr[537])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3661:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3663:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27940,7 +27975,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V538*/ meltfptr[537])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3661:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3663:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -27952,7 +27987,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V538*/ meltfptr[537])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3661:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3663:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -27965,7 +28000,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V538*/ meltfptr[537])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3661:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3663:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V538*/ meltfptr[537]); @@ -28004,7 +28039,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V540*/ meltfptr[539]); - MELT_LOCATION ("warmelt-outobj.melt:3692:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3694:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28017,7 +28052,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJGETSLOT__V104*/ meltfptr[103]); - MELT_LOCATION ("warmelt-outobj.melt:3692:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3694:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28030,7 +28065,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-outobj.melt:3692:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3694:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28043,7 +28078,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_FIELD__V105*/ meltfptr[104]); - MELT_LOCATION ("warmelt-outobj.melt:3692:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3694:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -28055,7 +28090,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3692:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3694:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28068,7 +28103,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3692:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3694:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28081,7 +28116,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[5] = (melt_ptr_t) ( /*_.LIST_EVERY__V43*/ meltfptr[42]); - MELT_LOCATION ("warmelt-outobj.melt:3692:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3694:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28094,7 +28129,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[6] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3692:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3694:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -28106,7 +28141,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[7] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3692:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3694:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28119,7 +28154,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3713:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3715:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28132,7 +28167,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V543*/ meltfptr[542])->tabval[0] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3713:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3715:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -28144,7 +28179,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V543*/ meltfptr[542])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3713:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3715:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28157,12 +28192,12 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V543*/ meltfptr[542])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3713:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3715:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V543*/ meltfptr[542]); - MELT_LOCATION ("warmelt-outobj.melt:3692:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3694:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28175,7 +28210,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[9] = (melt_ptr_t) ( /*_.VALROUT___V543*/ meltfptr[542]); - MELT_LOCATION ("warmelt-outobj.melt:3692:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3694:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -28187,7 +28222,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[10] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3692:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3694:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28200,7 +28235,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V542*/ meltfptr[541])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3692:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3694:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V542*/ meltfptr[541]); @@ -28258,7 +28293,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V547*/ meltfptr[546]); - MELT_LOCATION ("warmelt-outobj.melt:3728:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3730:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28271,7 +28306,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V549*/ meltfptr[548])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTSLOT__V106*/ meltfptr[105]); - MELT_LOCATION ("warmelt-outobj.melt:3728:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3730:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28284,7 +28319,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V549*/ meltfptr[548])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NREP__V107*/ meltfptr[106]); - MELT_LOCATION ("warmelt-outobj.melt:3728:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3730:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -28296,7 +28331,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V549*/ meltfptr[548])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3728:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3730:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28309,7 +28344,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V549*/ meltfptr[548])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_NAMED__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-outobj.melt:3728:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3730:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28322,7 +28357,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V549*/ meltfptr[548])->tabval[4] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3728:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3730:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28335,7 +28370,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V549*/ meltfptr[548])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_FIELD__V105*/ meltfptr[104]); - MELT_LOCATION ("warmelt-outobj.melt:3728:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3730:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -28347,7 +28382,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V549*/ meltfptr[548])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3728:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3730:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28360,7 +28395,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V549*/ meltfptr[548])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3728:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3730:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V549*/ meltfptr[548]); @@ -28418,7 +28453,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V553*/ meltfptr[552]); - MELT_LOCATION ("warmelt-outobj.melt:3803:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3805:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28432,7 +28467,7 @@ meltmod__warmelt_outobj__initialmeltchunk_7 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V555*/ meltfptr[554])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSUROUT__V108*/ meltfptr[107]); - MELT_LOCATION ("warmelt-outobj.melt:3803:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3805:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -28456,7 +28491,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L - MELT_LOCATION ("warmelt-outobj.melt:3803:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3805:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28470,7 +28505,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V555*/ meltfptr[554])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3803:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3805:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -28482,7 +28517,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V555*/ meltfptr[554])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3803:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3805:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28496,7 +28531,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V555*/ meltfptr[554])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3803:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3805:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V555*/ meltfptr[554]); @@ -28535,7 +28570,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V557*/ meltfptr[556]); - MELT_LOCATION ("warmelt-outobj.melt:3847:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3849:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28549,7 +28584,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V559*/ meltfptr[558])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSEDV__V109*/ meltfptr[108]); - MELT_LOCATION ("warmelt-outobj.melt:3847:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3849:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -28561,7 +28596,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V559*/ meltfptr[558])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3847:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3849:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28575,7 +28610,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V559*/ meltfptr[558])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3847:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3849:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -28587,7 +28622,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V559*/ meltfptr[558])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3847:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3849:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28601,7 +28636,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V559*/ meltfptr[558])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3847:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3849:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V559*/ meltfptr[558]); @@ -28640,7 +28675,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V561*/ meltfptr[560]); - MELT_LOCATION ("warmelt-outobj.melt:3883:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3885:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28654,7 +28689,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V563*/ meltfptr[562])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTCLOSEDNOTNULLV__V110*/ meltfptr[109]); - MELT_LOCATION ("warmelt-outobj.melt:3883:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3885:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -28666,7 +28701,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V563*/ meltfptr[562])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3883:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3885:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28680,7 +28715,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V563*/ meltfptr[562])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3883:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3885:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -28692,7 +28727,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V563*/ meltfptr[562])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3883:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3885:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28706,7 +28741,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V563*/ meltfptr[562])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3883:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3885:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V563*/ meltfptr[562]); @@ -28745,7 +28780,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V565*/ meltfptr[564]); - MELT_LOCATION ("warmelt-outobj.melt:3923:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3925:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28759,7 +28794,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V567*/ meltfptr[566])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTROUTCONST__V111*/ meltfptr[110]); - MELT_LOCATION ("warmelt-outobj.melt:3923:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3925:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28773,7 +28808,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V567*/ meltfptr[566])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_OBJINITROUTINE__V29*/ meltfptr[28]); - MELT_LOCATION ("warmelt-outobj.melt:3923:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3925:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -28785,7 +28820,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V567*/ meltfptr[566])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3923:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3925:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28799,7 +28834,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V567*/ meltfptr[566])->tabval[3] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3923:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3925:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -28811,7 +28846,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V567*/ meltfptr[566])->tabval[4] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3923:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3925:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28825,7 +28860,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V567*/ meltfptr[566])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3923:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3925:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V567*/ meltfptr[566]); @@ -28864,7 +28899,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V569*/ meltfptr[568]); - MELT_LOCATION ("warmelt-outobj.melt:3962:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3964:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28878,7 +28913,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V571*/ meltfptr[570])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTROUTCONSTNOTNULL__V112*/ meltfptr[111]); - MELT_LOCATION ("warmelt-outobj.melt:3962:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3964:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -28890,7 +28925,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V571*/ meltfptr[570])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3962:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3964:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28904,7 +28939,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V571*/ meltfptr[570])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3962:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3964:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -28916,7 +28951,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V571*/ meltfptr[570])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3962:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3964:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28930,7 +28965,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V571*/ meltfptr[570])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3962:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3964:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V571*/ meltfptr[570]); @@ -28969,7 +29004,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V573*/ meltfptr[572]); - MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3999:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28983,7 +29018,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V575*/ meltfptr[574])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJPUTXTRARESULT__V113*/ meltfptr[112]); - MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3999:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -28997,7 +29032,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V575*/ meltfptr[574])->tabval[1] = (melt_ptr_t) ( /*_.GET_CTYPE__V91*/ meltfptr[90]); - MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3999:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -29009,7 +29044,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V575*/ meltfptr[574])->tabval[2] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3999:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29023,7 +29058,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V575*/ meltfptr[574])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3999:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29037,7 +29072,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V575*/ meltfptr[574])->tabval[4] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3999:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29051,7 +29086,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V575*/ meltfptr[574])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3999:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29065,7 +29100,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V575*/ meltfptr[574])->tabval[6] = (melt_ptr_t) ( /*_.CTYPE_VALUE__V47*/ meltfptr[46]); - MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3999:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29079,7 +29114,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V575*/ meltfptr[574])->tabval[7] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3999:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -29091,7 +29126,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V575*/ meltfptr[574])->tabval[8] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3999:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29105,7 +29140,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V575*/ meltfptr[574])->tabval[9] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:3997:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3999:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V575*/ meltfptr[574]); @@ -29144,7 +29179,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V577*/ meltfptr[576]); - MELT_LOCATION ("warmelt-outobj.melt:4038:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4040:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29157,7 +29192,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V579*/ meltfptr[578])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJEXPV__V114*/ meltfptr[113]); - MELT_LOCATION ("warmelt-outobj.melt:4038:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4040:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29170,7 +29205,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V579*/ meltfptr[578])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-outobj.melt:4038:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4040:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29183,7 +29218,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V579*/ meltfptr[578])->tabval[2] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:4038:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4040:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -29195,7 +29230,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V579*/ meltfptr[578])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:4038:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4040:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29208,7 +29243,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V579*/ meltfptr[578])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:4038:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4040:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V579*/ meltfptr[578]); @@ -29247,7 +29282,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V581*/ meltfptr[580]); - MELT_LOCATION ("warmelt-outobj.melt:4054:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4056:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29261,7 +29296,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V583*/ meltfptr[582])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJLOCATEDEXPV__V115*/ meltfptr[114]); - MELT_LOCATION ("warmelt-outobj.melt:4054:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4056:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29275,7 +29310,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V583*/ meltfptr[582])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-outobj.melt:4054:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4056:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29289,7 +29324,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V583*/ meltfptr[582])->tabval[2] = (melt_ptr_t) ( /*_.CTYPE_VOID__V116*/ meltfptr[115]); - MELT_LOCATION ("warmelt-outobj.melt:4054:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4056:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -29301,7 +29336,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V583*/ meltfptr[582])->tabval[3] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:4054:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4056:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -29313,7 +29348,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V583*/ meltfptr[582])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V216*/ meltfptr[215]); - MELT_LOCATION ("warmelt-outobj.melt:4054:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4056:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29327,7 +29362,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V583*/ meltfptr[582])->tabval[5] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:4054:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4056:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -29339,7 +29374,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V583*/ meltfptr[582])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:4054:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4056:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29353,7 +29388,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V583*/ meltfptr[582])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:4054:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4056:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V583*/ meltfptr[582]); @@ -29411,7 +29446,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V587*/ meltfptr[586]); - MELT_LOCATION ("warmelt-outobj.melt:4093:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29425,7 +29460,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V589*/ meltfptr[588])->tabval[0] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V69*/ meltfptr[68]); - MELT_LOCATION ("warmelt-outobj.melt:4093:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -29437,7 +29472,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V589*/ meltfptr[588])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:4093:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29451,7 +29486,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V589*/ meltfptr[588])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:4093:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4095:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V589*/ meltfptr[588]); @@ -29471,7 +29506,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V590*/ meltfptr[589]); - MELT_LOCATION ("warmelt-outobj.melt:4106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4108:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29484,7 +29519,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V591*/ meltfptr[590])->tabval[0] = (melt_ptr_t) ( /*_.DISCR_STRING__V41*/ meltfptr[40]); - MELT_LOCATION ("warmelt-outobj.melt:4106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4108:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -29496,7 +29531,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V591*/ meltfptr[590])->tabval[1] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:4106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4108:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29509,7 +29544,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V591*/ meltfptr[590])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:4106:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4108:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V591*/ meltfptr[590]); @@ -29544,7 +29579,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V594*/ meltfptr[593]); - MELT_LOCATION ("warmelt-outobj.melt:4126:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4128:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29557,7 +29592,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_OBJFINALRETURN__V117*/ meltfptr[116]); - MELT_LOCATION ("warmelt-outobj.melt:4126:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4128:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -29569,7 +29604,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V212*/ meltfptr[211]); - MELT_LOCATION ("warmelt-outobj.melt:4126:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4128:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -29581,7 +29616,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[2] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:4126:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4128:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29594,7 +29629,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V595*/ meltfptr[594])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:4126:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4128:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V595*/ meltfptr[594]); @@ -29633,7 +29668,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V597*/ meltfptr[596]); - MELT_LOCATION ("warmelt-outobj.melt:4139:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4141:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29647,7 +29682,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[0] = (melt_ptr_t) ( /*_.DISCR_LIST__V54*/ meltfptr[53]); - MELT_LOCATION ("warmelt-outobj.melt:4139:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4141:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29661,7 +29696,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_NAMED__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-outobj.melt:4139:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4141:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29675,7 +29710,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[2] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V55*/ meltfptr[54]); - MELT_LOCATION ("warmelt-outobj.melt:4139:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4141:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29689,7 +29724,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[3] = (melt_ptr_t) ( /*_.COMPARE_NAMED_ALPHA__V118*/ meltfptr[117]); - MELT_LOCATION ("warmelt-outobj.melt:4139:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4141:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29703,7 +29738,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V599*/ meltfptr[598])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V56*/ meltfptr[55]); - MELT_LOCATION ("warmelt-outobj.melt:4139:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4141:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V599*/ meltfptr[598]); @@ -29742,7 +29777,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V601*/ meltfptr[600]); - MELT_LOCATION ("warmelt-outobj.melt:4156:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4158:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29756,7 +29791,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V603*/ meltfptr[602])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V119*/ meltfptr[118]); - MELT_LOCATION ("warmelt-outobj.melt:4156:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4158:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -29768,7 +29803,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V603*/ meltfptr[602])->tabval[1] = (melt_ptr_t) ( /*_.VALCLO___V600*/ meltfptr[599]); - MELT_LOCATION ("warmelt-outobj.melt:4156:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4158:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29782,7 +29817,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V603*/ meltfptr[602])->tabval[2] = (melt_ptr_t) ( /*_.ADD2OUT__V49*/ meltfptr[48]); - MELT_LOCATION ("warmelt-outobj.melt:4156:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4158:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29796,7 +29831,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V603*/ meltfptr[602])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_FIELD__V105*/ meltfptr[104]); - MELT_LOCATION ("warmelt-outobj.melt:4156:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4158:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29810,7 +29845,7 @@ meltmod__warmelt_outobj__initialmeltchunk_8 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V603*/ meltfptr[602])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NAMED__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-outobj.melt:4156:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4158:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -29834,7 +29869,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L - MELT_LOCATION ("warmelt-outobj.melt:4156:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4158:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29848,7 +29883,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V603*/ meltfptr[602])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:4156:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4158:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -29862,7 +29897,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V603*/ meltfptr[602])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_CLASS__V24*/ meltfptr[23]); - MELT_LOCATION ("warmelt-outobj.melt:4156:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4158:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V603*/ meltfptr[602]); @@ -29920,7 +29955,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V607*/ meltfptr[606]); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -29938,7 +29973,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALSTR___V610*/ meltfptr[609]); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -29973,7 +30008,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V611*/ meltfptr[610]); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -29991,7 +30026,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALTUP___V611*/ meltfptr[610]); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30009,7 +30044,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALSTR___V613*/ meltfptr[612]); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30027,12 +30062,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALDATA___V609*/ meltfptr[608]); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V612*/ meltfptr[611]); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30050,7 +30085,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALSTR___V615*/ meltfptr[614]); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30068,12 +30103,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALDATA___V609*/ meltfptr[608]); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V614*/ meltfptr[613]); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30091,7 +30126,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALSTR___V617*/ meltfptr[616]); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30109,12 +30144,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALDATA___V609*/ meltfptr[608]); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V616*/ meltfptr[615]); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30132,7 +30167,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALSTR___V619*/ meltfptr[618]); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30150,7 +30185,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALDATA___V609*/ meltfptr[608]); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V618*/ meltfptr[617]); @@ -30214,7 +30249,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V620*/ meltfptr[619]); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30232,7 +30267,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALTUP___V620*/ meltfptr[619]); - MELT_LOCATION ("warmelt-outobj.melt:4220:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4222:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V609*/ meltfptr[608]); @@ -30332,7 +30367,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V629*/ meltfptr[628]); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30369,7 +30404,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V634*/ meltfptr[633]); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30387,7 +30422,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALDATA___V634*/ meltfptr[633]); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30405,7 +30440,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V633*/ meltfptr[632]); @@ -30429,7 +30464,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V637*/ meltfptr[636]); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30447,7 +30482,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALDATA___V637*/ meltfptr[636]); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30465,7 +30500,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V636*/ meltfptr[635]); @@ -30489,7 +30524,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V640*/ meltfptr[639]); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30507,7 +30542,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALDATA___V640*/ meltfptr[639]); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30525,7 +30560,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V639*/ meltfptr[638]); @@ -30549,7 +30584,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V643*/ meltfptr[642]); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30567,7 +30602,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALDATA___V643*/ meltfptr[642]); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30585,7 +30620,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V642*/ meltfptr[641]); @@ -30649,7 +30684,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V645*/ meltfptr[644]); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30667,7 +30702,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALTUP___V645*/ meltfptr[644]); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30814,7 +30849,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V651*/ meltfptr[650]); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -30832,12 +30867,12 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALTUP___V651*/ meltfptr[650]); - MELT_LOCATION ("warmelt-outobj.melt:4229:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4231:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V631*/ meltfptr[630]); - MELT_LOCATION ("warmelt-outobj.melt:4237:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4239:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -30850,7 +30885,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V652*/ meltfptr[651])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V119*/ meltfptr[118]); - MELT_LOCATION ("warmelt-outobj.melt:4237:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4239:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -30863,7 +30898,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V652*/ meltfptr[651])->tabval[1] = (melt_ptr_t) ( /*_.DISCR_STRING__V41*/ meltfptr[40]); - MELT_LOCATION ("warmelt-outobj.melt:4237:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4239:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -30876,7 +30911,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V652*/ meltfptr[651])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V57*/ meltfptr[56]); - MELT_LOCATION ("warmelt-outobj.melt:4237:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4239:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -30888,7 +30923,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V652*/ meltfptr[651])->tabval[3] = (melt_ptr_t) ( /*_.VALDATA___V609*/ meltfptr[608]); - MELT_LOCATION ("warmelt-outobj.melt:4237:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4239:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V652*/ meltfptr[651]); @@ -30908,7 +30943,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V653*/ meltfptr[652]); - MELT_LOCATION ("warmelt-outobj.melt:4271:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4273:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -30922,7 +30957,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V654*/ meltfptr[653])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:4271:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4273:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -30936,7 +30971,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V654*/ meltfptr[653])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V119*/ meltfptr[118]); - MELT_LOCATION ("warmelt-outobj.melt:4271:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4273:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -30950,7 +30985,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V654*/ meltfptr[653])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V57*/ meltfptr[56]); - MELT_LOCATION ("warmelt-outobj.melt:4271:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4273:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -30964,7 +30999,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V654*/ meltfptr[653])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_LIST__V54*/ meltfptr[53]); - MELT_LOCATION ("warmelt-outobj.melt:4271:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4273:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -30978,7 +31013,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V654*/ meltfptr[653])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRING__V41*/ meltfptr[40]); - MELT_LOCATION ("warmelt-outobj.melt:4271:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4273:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -30992,7 +31027,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V654*/ meltfptr[653])->tabval[5] = (melt_ptr_t) ( /*_.STRING4OUT__V120*/ meltfptr[119]); - MELT_LOCATION ("warmelt-outobj.melt:4271:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4273:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31006,7 +31041,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V654*/ meltfptr[653])->tabval[6] = (melt_ptr_t) ( /*_.VALSTR___V655*/ meltfptr[654]); - MELT_LOCATION ("warmelt-outobj.melt:4271:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4273:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31020,7 +31055,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V654*/ meltfptr[653])->tabval[7] = (melt_ptr_t) ( /*_.VALSTR___V656*/ meltfptr[655]); - MELT_LOCATION ("warmelt-outobj.melt:4271:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4273:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31034,7 +31069,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V654*/ meltfptr[653])->tabval[8] = (melt_ptr_t) ( /*_.VALSTR___V657*/ meltfptr[656]); - MELT_LOCATION ("warmelt-outobj.melt:4271:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4273:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31048,7 +31083,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V654*/ meltfptr[653])->tabval[9] = (melt_ptr_t) ( /*_.VALSTR___V658*/ meltfptr[657]); - MELT_LOCATION ("warmelt-outobj.melt:4271:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4273:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31062,7 +31097,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V654*/ meltfptr[653])->tabval[10] = (melt_ptr_t) ( /*_.ADD2OUT__V49*/ meltfptr[48]); - MELT_LOCATION ("warmelt-outobj.melt:4271:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4273:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31076,7 +31111,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V654*/ meltfptr[653])->tabval[11] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V55*/ meltfptr[54]); - MELT_LOCATION ("warmelt-outobj.melt:4271:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4273:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31090,7 +31125,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V654*/ meltfptr[653])->tabval[12] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V56*/ meltfptr[55]); - MELT_LOCATION ("warmelt-outobj.melt:4271:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4273:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -31102,7 +31137,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st ((meltroutine_ptr_t) /*_.VALROUT___V654*/ meltfptr[653])->tabval[13] = (melt_ptr_t) ( /*_.VALDATA___V609*/ meltfptr[608]); - MELT_LOCATION ("warmelt-outobj.melt:4271:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4273:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V654*/ meltfptr[653]); @@ -31198,7 +31233,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V666*/ meltfptr[665]); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -31216,7 +31251,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALDATA___V666*/ meltfptr[665]); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -31234,7 +31269,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V668*/ meltfptr[667]); @@ -31258,7 +31293,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V669*/ meltfptr[668]); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -31276,7 +31311,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALDATA___V669*/ meltfptr[668]); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -31294,7 +31329,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V671*/ meltfptr[670]); @@ -31318,7 +31353,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V672*/ meltfptr[671]); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -31336,7 +31371,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( /*_.VALDATA___V672*/ meltfptr[671]); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -31354,7 +31389,7 @@ meltmod__warmelt_outobj__initialmeltchunk_9 (struct frame_start_module_melt_st (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V674*/ meltfptr[673]); @@ -31391,7 +31426,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V675*/ meltfptr[674]); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -31409,7 +31444,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct (melt_ptr_t) ( /*_.VALDATA___V675*/ meltfptr[674]); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -31427,7 +31462,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_VALUE)))); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V677*/ meltfptr[676]); @@ -31451,7 +31486,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V678*/ meltfptr[677]); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -31469,7 +31504,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct (melt_ptr_t) ( /*_.VALDATA___V678*/ meltfptr[677]); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -31487,7 +31522,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_LONG)))); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V680*/ meltfptr[679]); @@ -31565,7 +31600,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V681*/ meltfptr[680]); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -31583,12 +31618,12 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct (melt_ptr_t) ( /*_.VALSTR___V683*/ meltfptr[682]); - MELT_LOCATION ("warmelt-outobj.melt:4675:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4677:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V682*/ meltfptr[681]); - MELT_LOCATION ("warmelt-outobj.melt:4684:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4686:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31601,7 +31636,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V684*/ meltfptr[683])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NAMED__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-outobj.melt:4684:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4686:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31614,7 +31649,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V684*/ meltfptr[683])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V122*/ meltfptr[121]); - MELT_LOCATION ("warmelt-outobj.melt:4684:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4686:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31627,7 +31662,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V684*/ meltfptr[683])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:4684:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4686:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31642,7 +31677,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V684*/ meltfptr[683])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V123*/ meltfptr[122]); - MELT_LOCATION ("warmelt-outobj.melt:4684:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4686:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31655,7 +31690,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V684*/ meltfptr[683])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V119*/ meltfptr[118]); - MELT_LOCATION ("warmelt-outobj.melt:4684:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4686:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V684*/ meltfptr[683]); @@ -31713,7 +31748,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V688*/ meltfptr[687]); - MELT_LOCATION ("warmelt-outobj.melt:4704:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4706:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31727,7 +31762,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V690*/ meltfptr[689])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:4704:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4706:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31741,7 +31776,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V690*/ meltfptr[689])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_FORMAL_BINDING__V60*/ meltfptr[59]); - MELT_LOCATION ("warmelt-outobj.melt:4704:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4706:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31755,7 +31790,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V690*/ meltfptr[689])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V124*/ meltfptr[123]); - MELT_LOCATION ("warmelt-outobj.melt:4704:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4706:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31769,7 +31804,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V690*/ meltfptr[689])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V57*/ meltfptr[56]); - MELT_LOCATION ("warmelt-outobj.melt:4704:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4706:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31783,7 +31818,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V690*/ meltfptr[689])->tabval[4] = (melt_ptr_t) ( /*_.ADD2OUT__V49*/ meltfptr[48]); - MELT_LOCATION ("warmelt-outobj.melt:4704:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4706:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31797,7 +31832,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V690*/ meltfptr[689])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-outobj.melt:4704:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4706:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31811,7 +31846,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V690*/ meltfptr[689])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V69*/ meltfptr[68]); - MELT_LOCATION ("warmelt-outobj.melt:4704:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4706:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31825,7 +31860,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V690*/ meltfptr[689])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:4704:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4706:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V690*/ meltfptr[689]); @@ -31864,7 +31899,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V692*/ meltfptr[691]); - MELT_LOCATION ("warmelt-outobj.melt:4730:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4732:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31878,7 +31913,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V694*/ meltfptr[693])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:4730:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4732:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31892,7 +31927,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V694*/ meltfptr[693])->tabval[1] = (melt_ptr_t) ( /*_.ADD2OUT__V49*/ meltfptr[48]); - MELT_LOCATION ("warmelt-outobj.melt:4730:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4732:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31906,7 +31941,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V694*/ meltfptr[693])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NAMED__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-outobj.melt:4730:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4732:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V694*/ meltfptr[693]); @@ -31926,7 +31961,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct /*touch:DATACLOSURE_ */ meltgc_touch ( /*_.VALCLO___V695*/ meltfptr[694]); - MELT_LOCATION ("warmelt-outobj.melt:4754:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4756:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31939,7 +31974,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V696*/ meltfptr[695])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:4754:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4756:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31952,7 +31987,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V696*/ meltfptr[695])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_PRIMITIVE__V125*/ meltfptr[124]); - MELT_LOCATION ("warmelt-outobj.melt:4754:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4756:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31967,7 +32002,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V696*/ meltfptr[695])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V123*/ meltfptr[122]); - MELT_LOCATION ("warmelt-outobj.melt:4754:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4756:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31980,7 +32015,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V696*/ meltfptr[695])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V119*/ meltfptr[118]); - MELT_LOCATION ("warmelt-outobj.melt:4754:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4756:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -31993,7 +32028,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V696*/ meltfptr[695])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V122*/ meltfptr[121]); - MELT_LOCATION ("warmelt-outobj.melt:4754:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4756:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32006,7 +32041,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V696*/ meltfptr[695])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-outobj.melt:4754:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4756:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32020,7 +32055,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V696*/ meltfptr[695])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFPRIMITIVE__V126*/ meltfptr[125]); - MELT_LOCATION ("warmelt-outobj.melt:4754:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4756:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32033,7 +32068,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V696*/ meltfptr[695])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V127*/ meltfptr[126]); - MELT_LOCATION ("warmelt-outobj.melt:4754:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4756:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32046,7 +32081,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V696*/ meltfptr[695])->tabval[8] = (melt_ptr_t) ( /*_.ADD2OUT__V49*/ meltfptr[48]); - MELT_LOCATION ("warmelt-outobj.melt:4754:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4756:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -32058,7 +32093,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V696*/ meltfptr[695])->tabval[9] = (melt_ptr_t) ( /*_.VALCLO___V691*/ meltfptr[690]); - MELT_LOCATION ("warmelt-outobj.melt:4754:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4756:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32072,7 +32107,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V696*/ meltfptr[695])->tabval[10] = (melt_ptr_t) ( /*_.CTYPE_VOID__V116*/ meltfptr[115]); - MELT_LOCATION ("warmelt-outobj.melt:4754:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4756:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32086,7 +32121,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V696*/ meltfptr[695])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_CTYPE__V45*/ meltfptr[44]); - MELT_LOCATION ("warmelt-outobj.melt:4754:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4756:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -32098,7 +32133,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V696*/ meltfptr[695])->tabval[12] = (melt_ptr_t) ( /*_.VALCLO___V216*/ meltfptr[215]); - MELT_LOCATION ("warmelt-outobj.melt:4754:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4756:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -32110,7 +32145,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V696*/ meltfptr[695])->tabval[13] = (melt_ptr_t) ( /*_.VALCLO___V695*/ meltfptr[694]); - MELT_LOCATION ("warmelt-outobj.melt:4754:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4756:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V696*/ meltfptr[695]); @@ -32187,7 +32222,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V702*/ meltfptr[701]); - MELT_LOCATION ("warmelt-outobj.melt:4814:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32200,7 +32235,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V704*/ meltfptr[703])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:4814:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32213,7 +32248,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V704*/ meltfptr[703])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CITERATOR__V71*/ meltfptr[70]); - MELT_LOCATION ("warmelt-outobj.melt:4814:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32228,7 +32263,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V704*/ meltfptr[703])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V123*/ meltfptr[122]); - MELT_LOCATION ("warmelt-outobj.melt:4814:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32241,7 +32276,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V704*/ meltfptr[703])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V119*/ meltfptr[118]); - MELT_LOCATION ("warmelt-outobj.melt:4814:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32254,7 +32289,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V704*/ meltfptr[703])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V122*/ meltfptr[121]); - MELT_LOCATION ("warmelt-outobj.melt:4814:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32267,7 +32302,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V704*/ meltfptr[703])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-outobj.melt:4814:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32280,7 +32315,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V704*/ meltfptr[703])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V127*/ meltfptr[126]); - MELT_LOCATION ("warmelt-outobj.melt:4814:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32293,7 +32328,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V704*/ meltfptr[703])->tabval[7] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V57*/ meltfptr[56]); - MELT_LOCATION ("warmelt-outobj.melt:4814:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32306,7 +32341,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V704*/ meltfptr[703])->tabval[8] = (melt_ptr_t) ( /*_.ADD2OUT__V49*/ meltfptr[48]); - MELT_LOCATION ("warmelt-outobj.melt:4814:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32319,7 +32354,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V704*/ meltfptr[703])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V69*/ meltfptr[68]); - MELT_LOCATION ("warmelt-outobj.melt:4814:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32333,7 +32368,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V704*/ meltfptr[703])->tabval[10] = (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFCITERATOR__V128*/ meltfptr[127]); - MELT_LOCATION ("warmelt-outobj.melt:4814:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -32345,7 +32380,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V704*/ meltfptr[703])->tabval[11] = (melt_ptr_t) ( /*_.VALCLO___V216*/ meltfptr[215]); - MELT_LOCATION ("warmelt-outobj.melt:4814:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -32357,7 +32392,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V704*/ meltfptr[703])->tabval[12] = (melt_ptr_t) ( /*_.VALCLO___V691*/ meltfptr[690]); - MELT_LOCATION ("warmelt-outobj.melt:4814:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -32369,7 +32404,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V704*/ meltfptr[703])->tabval[13] = (melt_ptr_t) ( /*_.VALCLO___V695*/ meltfptr[694]); - MELT_LOCATION ("warmelt-outobj.melt:4814:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32383,7 +32418,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V704*/ meltfptr[703])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V124*/ meltfptr[123]); - MELT_LOCATION ("warmelt-outobj.melt:4814:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4816:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V704*/ meltfptr[703]); @@ -32422,7 +32457,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V706*/ meltfptr[705]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32435,7 +32470,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32448,7 +32483,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_CMATCHER__V129*/ meltfptr[128]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32463,7 +32498,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V123*/ meltfptr[122]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32476,7 +32511,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V119*/ meltfptr[118]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32489,7 +32524,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V122*/ meltfptr[121]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32502,7 +32537,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NAMED__V31*/ meltfptr[30]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32515,7 +32550,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[6] = (melt_ptr_t) ( /*_.CLASS_ANY_MATCHER__V130*/ meltfptr[129]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32529,7 +32564,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[7] = (melt_ptr_t) ( /*_.CLASS_SOURCE_DEFCMATCHER__V131*/ meltfptr[130]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32542,7 +32577,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[8] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V127*/ meltfptr[126]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32555,7 +32590,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[9] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V57*/ meltfptr[56]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32568,7 +32603,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[10] = (melt_ptr_t) ( /*_.ADD2OUT__V49*/ meltfptr[48]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32581,7 +32616,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[11] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V69*/ meltfptr[68]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -32593,7 +32628,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[12] = (melt_ptr_t) ( /*_.VALCLO___V691*/ meltfptr[690]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -32605,7 +32640,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[13] = (melt_ptr_t) ( /*_.VALCLO___V216*/ meltfptr[215]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -32617,7 +32652,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[14] = (melt_ptr_t) ( /*_.VALCLO___V695*/ meltfptr[694]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32630,7 +32665,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_ANY_BINDING__V124*/ meltfptr[123]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32643,7 +32678,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[16] = (melt_ptr_t) ( /*_.VALSTR___V709*/ meltfptr[708]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32656,7 +32691,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V708*/ meltfptr[707])->tabval[17] = (melt_ptr_t) ( /*_.VALSTR___V710*/ meltfptr[709]); - MELT_LOCATION ("warmelt-outobj.melt:4882:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4884:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V708*/ meltfptr[707]); @@ -32733,7 +32768,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V716*/ meltfptr[715]); - MELT_LOCATION ("warmelt-outobj.melt:4967:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4969:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32747,7 +32782,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V718*/ meltfptr[717])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:4967:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4969:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32761,7 +32796,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V718*/ meltfptr[717])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V119*/ meltfptr[118]); - MELT_LOCATION ("warmelt-outobj.melt:4967:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4969:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32775,7 +32810,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V718*/ meltfptr[717])->tabval[2] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V57*/ meltfptr[56]); - MELT_LOCATION ("warmelt-outobj.melt:4967:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4969:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32789,7 +32824,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V718*/ meltfptr[717])->tabval[3] = (melt_ptr_t) ( /*_.ADD2OUT__V49*/ meltfptr[48]); - MELT_LOCATION ("warmelt-outobj.melt:4967:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4969:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32803,7 +32838,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V718*/ meltfptr[717])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_VERBATIM_STRING__V69*/ meltfptr[68]); - MELT_LOCATION ("warmelt-outobj.melt:4967:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4969:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32817,7 +32852,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V718*/ meltfptr[717])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SOURCE_GENERATOR_DEVICE__V123*/ meltfptr[122]); - MELT_LOCATION ("warmelt-outobj.melt:4967:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4969:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -32829,7 +32864,7 @@ meltmod__warmelt_outobj__initialmeltchunk_10 (struct ((meltroutine_ptr_t) /*_.VALROUT___V718*/ meltfptr[717])->tabval[6] = (melt_ptr_t) ( /*_.VALDATA___V682*/ meltfptr[681]); - MELT_LOCATION ("warmelt-outobj.melt:4967:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4969:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V718*/ meltfptr[717]); @@ -32862,7 +32897,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct /*touch:DATACLOSURE_*/ meltgc_touch ( /*_.VALCLO___V719*/ meltfptr[718]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32876,7 +32911,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32890,7 +32925,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V119*/ meltfptr[118]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32904,7 +32939,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V132*/ meltfptr[131]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32918,7 +32953,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[3] = (melt_ptr_t) ( /*_.CLASS_SOURCE__V133*/ meltfptr[132]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32932,7 +32967,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_STRBUF__V57*/ meltfptr[56]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32948,7 +32983,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_SOURCE_UPDATE_CURRENT_MODULE_ENVIRONMENT_CONTAINER__V134*/ meltfptr[133]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32962,7 +32997,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[6] = (melt_ptr_t) ( /*_.VALSTR___V721*/ meltfptr[720]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32976,7 +33011,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[7] = (melt_ptr_t) ( /*_.INITIAL_ENVIRONMENT__V135*/ meltfptr[134]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -32990,7 +33025,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_NREP_INITPROC__V136*/ meltfptr[135]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33004,7 +33039,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[9] = (melt_ptr_t) ( /*_.LIST_EVERY__V43*/ meltfptr[42]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33018,7 +33053,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[10] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33032,7 +33067,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[11] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V122*/ meltfptr[121]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33046,7 +33081,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[12] = (melt_ptr_t) ( /*_.CLASS_SOURCE_COMMENT__V137*/ meltfptr[136]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33060,7 +33095,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[13] = (melt_ptr_t) ( /*_.NORMAL_EXP__V138*/ meltfptr[137]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33074,7 +33109,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[14] = (melt_ptr_t) ( /*_.CLASS_NREP__V107*/ meltfptr[106]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33088,7 +33123,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[15] = (melt_ptr_t) ( /*_.CLASS_NREP_ANYPROC__V139*/ meltfptr[138]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33102,7 +33137,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[16] = (melt_ptr_t) ( /*_.WRAP_NORMAL_LET1__V140*/ meltfptr[139]); - MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5085:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33115,7 +33150,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V722*/ meltfptr[721])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5085:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33128,7 +33163,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V722*/ meltfptr[721])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V122*/ meltfptr[121]); - MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5085:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33141,7 +33176,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V722*/ meltfptr[721])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_SOURCE_COMMENT__V137*/ meltfptr[136]); - MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5085:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33154,7 +33189,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V722*/ meltfptr[721])->tabval[3] = (melt_ptr_t) ( /*_.NORMAL_EXP__V138*/ meltfptr[137]); - MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5085:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33167,7 +33202,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V722*/ meltfptr[721])->tabval[4] = (melt_ptr_t) ( /*_.CLASS_NREP__V107*/ meltfptr[106]); - MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5085:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33180,7 +33215,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V722*/ meltfptr[721])->tabval[5] = (melt_ptr_t) ( /*_.CLASS_NREP_ANYPROC__V139*/ meltfptr[138]); - MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5085:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33193,12 +33228,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V722*/ meltfptr[721])->tabval[6] = (melt_ptr_t) ( /*_.WRAP_NORMAL_LET1__V140*/ meltfptr[139]); - MELT_LOCATION ("warmelt-outobj.melt:5083:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5085:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V722*/ meltfptr[721]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33212,7 +33247,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[17] = (melt_ptr_t) ( /*_.VALROUT___V722*/ meltfptr[721]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33226,7 +33261,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[18] = (melt_ptr_t) ( /*_.DISCR_LIST__V54*/ meltfptr[53]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33240,7 +33275,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[19] = (melt_ptr_t) ( /*_.DISCR_MAP_OBJECTS__V127*/ meltfptr[126]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33254,7 +33289,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[20] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33268,7 +33303,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[21] = (melt_ptr_t) ( /*_.LIST_TO_MULTIPLE__V55*/ meltfptr[54]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33282,7 +33317,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[22] = (melt_ptr_t) ( /*_.DISCR_MULTIPLE__V56*/ meltfptr[55]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33296,7 +33331,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[23] = (melt_ptr_t) ( /*_.ADD2OUT__V49*/ meltfptr[48]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33310,7 +33345,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[24] = (melt_ptr_t) ( /*_.CLASS_SOURCE_CHEADER__V141*/ meltfptr[140]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33324,7 +33359,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[25] = (melt_ptr_t) ( /*_.CLASS_LOCATED__V122*/ meltfptr[121]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -33336,7 +33371,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[26] = (melt_ptr_t) ( /*_.VALCLO___V216*/ meltfptr[215]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33350,7 +33385,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[27] = (melt_ptr_t) ( /*_.CLASS_NREP_ANYPROC__V139*/ meltfptr[138]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33364,7 +33399,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[28] = (melt_ptr_t) ( /*_.COMPILE2OBJ_PROCEDURE__V142*/ meltfptr[141]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33378,7 +33413,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[29] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:5164:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5166:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33391,7 +33426,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V723*/ meltfptr[722])->tabval[0] = (melt_ptr_t) ( /*_.CLASS_NREP_ANYPROC__V139*/ meltfptr[138]); - MELT_LOCATION ("warmelt-outobj.melt:5164:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5166:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33405,7 +33440,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V723*/ meltfptr[722])->tabval[1] = (melt_ptr_t) ( /*_.COMPILE2OBJ_PROCEDURE__V142*/ meltfptr[141]); - MELT_LOCATION ("warmelt-outobj.melt:5164:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5166:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33418,12 +33453,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V723*/ meltfptr[722])->tabval[2] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:5164:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5166:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V723*/ meltfptr[722]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33437,7 +33472,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[30] = (melt_ptr_t) ( /*_.VALROUT___V723*/ meltfptr[722]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33451,7 +33486,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[31] = (melt_ptr_t) ( /*_.COMPILE2OBJ_INITPROC__V143*/ meltfptr[142]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33465,7 +33500,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[32] = (melt_ptr_t) ( /*_.CLASS_PROCROUTINEOBJ__V50*/ meltfptr[49]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -33477,7 +33512,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[33] = (melt_ptr_t) ( /*_.VALCLO___V653*/ meltfptr[652]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -33489,7 +33524,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[34] = (melt_ptr_t) ( /*_.VALDATA___V609*/ meltfptr[608]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33503,7 +33538,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[35] = (melt_ptr_t) ( /*_.OUTPUT_C_CODE__V15*/ meltfptr[14]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -33515,7 +33550,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[36] = (melt_ptr_t) ( /*_.VALCLO___V719*/ meltfptr[718]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -33527,7 +33562,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[37] = (melt_ptr_t) ( /*_.VALCLO___V604*/ meltfptr[603]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -33539,7 +33574,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[38] = (melt_ptr_t) ( /*_.VALDATA___V154*/ meltfptr[153]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33553,7 +33588,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[39] = (melt_ptr_t) ( /*_.CLASS_REFERENCE__V7*/ meltfptr[6]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -33565,7 +33600,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[40] = (melt_ptr_t) ( /*_.VALCLO___V659*/ meltfptr[658]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33579,7 +33614,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V720*/ meltfptr[719])->tabval[41] = (melt_ptr_t) ( /*_.DISCR_STRING__V41*/ meltfptr[40]); - MELT_LOCATION ("warmelt-outobj.melt:5029:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5031:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V720*/ meltfptr[719]); @@ -33827,7 +33862,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V747*/ meltfptr[746]); - MELT_LOCATION ("warmelt-outobj.melt:5335:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5337:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33840,7 +33875,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V749*/ meltfptr[748])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:5335:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5337:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33853,7 +33888,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V749*/ meltfptr[748])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V144*/ meltfptr[143]); - MELT_LOCATION ("warmelt-outobj.melt:5335:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5337:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33866,7 +33901,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V749*/ meltfptr[748])->tabval[2] = (melt_ptr_t) ( /*_.CLASS_MODULE_CONTEXT__V119*/ meltfptr[118]); - MELT_LOCATION ("warmelt-outobj.melt:5335:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5337:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33879,7 +33914,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V749*/ meltfptr[748])->tabval[3] = (melt_ptr_t) ( /*_.DISCR_STRING__V41*/ meltfptr[40]); - MELT_LOCATION ("warmelt-outobj.melt:5335:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5337:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33892,7 +33927,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V749*/ meltfptr[748])->tabval[4] = (melt_ptr_t) ( /*_.DISCR_MAP_STRINGS__V145*/ meltfptr[144]); - MELT_LOCATION ("warmelt-outobj.melt:5335:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5337:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33905,7 +33940,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V749*/ meltfptr[748])->tabval[5] = (melt_ptr_t) ( /*_.DISCR_INTEGER__V40*/ meltfptr[39]); - MELT_LOCATION ("warmelt-outobj.melt:5335:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5337:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33918,7 +33953,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V749*/ meltfptr[748])->tabval[6] = (melt_ptr_t) ( /*_.DISCR_LIST__V54*/ meltfptr[53]); - MELT_LOCATION ("warmelt-outobj.melt:5335:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5337:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33931,7 +33966,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V749*/ meltfptr[748])->tabval[7] = (melt_ptr_t) ( /*_.CREATE_NORMCONTEXT__V146*/ meltfptr[145]); - MELT_LOCATION ("warmelt-outobj.melt:5335:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5337:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33945,7 +33980,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V749*/ meltfptr[748])->tabval[8] = (melt_ptr_t) ( /*_.CLASS_NORMALIZATION_CONTEXT__V132*/ meltfptr[131]); - MELT_LOCATION ("warmelt-outobj.melt:5335:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5337:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33959,7 +33994,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V749*/ meltfptr[748])->tabval[9] = (melt_ptr_t) ( /*_.MACROEXPAND_TOPLEVEL_LIST__V147*/ meltfptr[146]); - MELT_LOCATION ("warmelt-outobj.melt:5335:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5337:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -33972,7 +34007,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V749*/ meltfptr[748])->tabval[10] = (melt_ptr_t) ( /*_.MACROEXPAND_1__V148*/ meltfptr[147]); - MELT_LOCATION ("warmelt-outobj.melt:5335:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5337:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -33984,7 +34019,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V749*/ meltfptr[748])->tabval[11] = (melt_ptr_t) ( /*_.VALCLO___V724*/ meltfptr[723]); - MELT_LOCATION ("warmelt-outobj.melt:5335:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5337:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V749*/ meltfptr[748]); @@ -34118,7 +34153,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V761*/ meltfptr[760]); - MELT_LOCATION ("warmelt-outobj.melt:5387:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5389:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -34155,7 +34190,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V766*/ meltfptr[765]); - MELT_LOCATION ("warmelt-outobj.melt:5387:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5389:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -34173,7 +34208,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct (melt_ptr_t) ( /*_.VALDATA___V766*/ meltfptr[765]); - MELT_LOCATION ("warmelt-outobj.melt:5387:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5389:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -34191,7 +34226,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct (melt_ptr_t) ( ((melt_ptr_t) (MELT_PREDEF (CTYPE_CSTRING)))); - MELT_LOCATION ("warmelt-outobj.melt:5387:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5389:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V765*/ meltfptr[764]); @@ -34213,7 +34248,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V768*/ meltfptr[767]); - MELT_LOCATION ("warmelt-outobj.melt:5387:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5389:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -34231,7 +34266,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct (melt_ptr_t) ( /*_.VALTUP___V768*/ meltfptr[767]); - MELT_LOCATION ("warmelt-outobj.melt:5387:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5389:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -34294,7 +34329,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct /*touch:INITUP_ */ meltgc_touch ( /*_.VALTUP___V771*/ meltfptr[770]); - MELT_LOCATION ("warmelt-outobj.melt:5387:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5389:/ initchunk"); /*^putslot */ /*putslot */ melt_assertmsg ("putslot checkobj", @@ -34312,12 +34347,12 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct (melt_ptr_t) ( /*_.VALTUP___V771*/ meltfptr[770]); - MELT_LOCATION ("warmelt-outobj.melt:5387:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5389:/ initchunk"); /*^touch */ /*touch:VALUEDATA_ */ meltgc_touch ( /*_.VALDATA___V763*/ meltfptr[762]); - MELT_LOCATION ("warmelt-outobj.melt:5398:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5400:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -34331,7 +34366,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V772*/ meltfptr[771])->tabval[0] = (melt_ptr_t) ( /*_.MELT_DEBUG_FUN__V8*/ meltfptr[7]); - MELT_LOCATION ("warmelt-outobj.melt:5398:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5400:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -34345,7 +34380,7 @@ meltmod__warmelt_outobj__initialmeltchunk_11 (struct ((meltroutine_ptr_t) /*_.VALROUT___V772*/ meltfptr[771])->tabval[1] = (melt_ptr_t) ( /*_.CLASS_ENVIRONMENT__V144*/ meltfptr[143]); - MELT_LOCATION ("warmelt-outobj.melt:5398:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5400:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -34372,7 +34407,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct #define meltfram__ (*meltmeltframptr__) #undef meltcallcount #define meltcallcount 0L - MELT_LOCATION ("warmelt-outobj.melt:5398:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5400:/ initchunk"); /*^putroutconst */ /*putroutconst */ melt_assertmsg ("putroutconst checkrout", @@ -34386,7 +34421,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct ((meltroutine_ptr_t) /*_.VALROUT___V772*/ meltfptr[771])->tabval[3] = (melt_ptr_t) ( /*_.LIST_APPEND2LIST__V149*/ meltfptr[148]); - MELT_LOCATION ("warmelt-outobj.melt:5398:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5400:/ initchunk"); /*^putroutconstnotnull */ /*putroutconstnotnull */ melt_assertmsg ("putroutconstnotnull checkrout", @@ -34398,7 +34433,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct ((meltroutine_ptr_t) /*_.VALROUT___V772*/ meltfptr[771])->tabval[4] = (melt_ptr_t) ( /*_.VALCLO___V750*/ meltfptr[749]); - MELT_LOCATION ("warmelt-outobj.melt:5398:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5400:/ initchunk"); /*^touch */ /*touch:IROUTVAL_ */ meltgc_touch ( /*_.VALROUT___V772*/ meltfptr[771]); @@ -35527,7 +35562,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V817*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:1598:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:1600:/ initchunk"); /*^block */ /*anyblock */ { @@ -35561,7 +35596,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V818*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2036:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2038:/ initchunk"); /*^block */ /*anyblock */ { @@ -35595,7 +35630,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V819*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2102:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2104:/ initchunk"); /*^block */ /*anyblock */ { @@ -35628,7 +35663,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V820*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2184:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2186:/ initchunk"); /*^block */ /*anyblock */ { @@ -35662,7 +35697,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V821*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2216:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2218:/ initchunk"); /*^block */ /*anyblock */ { @@ -35695,7 +35730,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V822*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2234:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2236:/ initchunk"); /*^block */ /*anyblock */ { @@ -35728,7 +35763,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V823*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2254:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2256:/ initchunk"); /*^block */ /*anyblock */ { @@ -35761,7 +35796,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V824*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2300:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2302:/ initchunk"); /*^block */ /*anyblock */ { @@ -35795,7 +35830,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V825*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2324:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2326:/ initchunk"); /*^block */ /*anyblock */ { @@ -35828,7 +35863,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V826*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2396:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2398:/ initchunk"); /*^block */ /*anyblock */ { @@ -35862,7 +35897,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V827*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2451:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2453:/ initchunk"); /*^block */ /*anyblock */ { @@ -35896,7 +35931,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V828*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2471:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2473:/ initchunk"); /*^block */ /*anyblock */ { @@ -35930,7 +35965,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V829*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2508:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2510:/ initchunk"); /*^block */ /*anyblock */ { @@ -35964,7 +35999,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V830*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2527:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2529:/ initchunk"); /*^block */ /*anyblock */ { @@ -35998,7 +36033,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V831*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2545:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2547:/ initchunk"); /*^block */ /*anyblock */ { @@ -36032,7 +36067,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V832*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2617:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2619:/ initchunk"); /*^block */ /*anyblock */ { @@ -36065,7 +36100,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V833*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2637:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2639:/ initchunk"); /*^block */ /*anyblock */ { @@ -36098,7 +36133,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V834*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2657:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2659:/ initchunk"); /*^block */ /*anyblock */ { @@ -36131,7 +36166,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V835*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2702:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2704:/ initchunk"); /*^block */ /*anyblock */ { @@ -36164,7 +36199,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V836*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2744:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2746:/ initchunk"); /*^block */ /*anyblock */ { @@ -36197,7 +36232,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V837*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2778:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2780:/ initchunk"); /*^block */ /*anyblock */ { @@ -36230,7 +36265,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V838*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2803:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2805:/ initchunk"); /*^block */ /*anyblock */ { @@ -36264,7 +36299,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V839*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2827:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2829:/ initchunk"); /*^block */ /*anyblock */ { @@ -36298,7 +36333,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V840*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2866:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2868:/ initchunk"); /*^block */ /*anyblock */ { @@ -36332,7 +36367,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V841*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2901:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:2903:/ initchunk"); /*^block */ /*anyblock */ { @@ -36366,7 +36401,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V842*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:2998:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3000:/ initchunk"); /*^block */ /*anyblock */ { @@ -36399,7 +36434,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V843*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3095:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3097:/ initchunk"); /*^block */ /*anyblock */ { @@ -36432,7 +36467,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V844*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3259:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3261:/ initchunk"); /*^block */ /*anyblock */ { @@ -36466,7 +36501,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V845*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3415:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3417:/ initchunk"); /*^block */ /*anyblock */ { @@ -36500,7 +36535,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V846*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3433:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3435:/ initchunk"); /*^block */ /*anyblock */ { @@ -36533,7 +36568,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V847*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3470:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3472:/ initchunk"); /*^block */ /*anyblock */ { @@ -36567,7 +36602,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V848*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3504:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3506:/ initchunk"); /*^block */ /*anyblock */ { @@ -36601,7 +36636,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V849*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3527:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3529:/ initchunk"); /*^block */ /*anyblock */ { @@ -36634,7 +36669,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V850*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3601:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3603:/ initchunk"); /*^block */ /*anyblock */ { @@ -36667,7 +36702,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V851*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3632:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3634:/ initchunk"); /*^block */ /*anyblock */ { @@ -36701,7 +36736,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V852*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3658:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3660:/ initchunk"); /*^block */ /*anyblock */ { @@ -36735,7 +36770,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V853*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3689:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3691:/ initchunk"); /*^block */ /*anyblock */ { @@ -36769,7 +36804,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V854*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3723:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3725:/ initchunk"); /*^block */ /*anyblock */ { @@ -36803,7 +36838,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V855*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3799:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3801:/ initchunk"); /*^block */ /*anyblock */ { @@ -36837,7 +36872,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V856*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3844:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3846:/ initchunk"); /*^block */ /*anyblock */ { @@ -36871,7 +36906,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V857*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3879:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3881:/ initchunk"); /*^block */ /*anyblock */ { @@ -36905,7 +36940,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V858*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3919:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3921:/ initchunk"); /*^block */ /*anyblock */ { @@ -36939,7 +36974,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V859*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3959:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3961:/ initchunk"); /*^block */ /*anyblock */ { @@ -36973,7 +37008,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V860*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:3992:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:3994:/ initchunk"); /*^block */ /*anyblock */ { @@ -37007,7 +37042,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V861*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:4035:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4037:/ initchunk"); /*^block */ /*anyblock */ { @@ -37041,7 +37076,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V862*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:4051:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4053:/ initchunk"); /*^block */ /*anyblock */ { @@ -37074,7 +37109,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V863*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:4090:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4092:/ initchunk"); /*^block */ /*anyblock */ { @@ -37108,7 +37143,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V864*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:4101:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4103:/ initchunk"); /*^block */ /*anyblock */ { @@ -37142,7 +37177,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V865*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:4114:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4116:/ initchunk"); /*^block */ /*anyblock */ { @@ -37175,7 +37210,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V866*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:4123:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4125:/ initchunk"); /*^block */ /*anyblock */ { @@ -37208,7 +37243,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V867*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:4135:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4137:/ initchunk"); /*^block */ /*anyblock */ { @@ -37242,7 +37277,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V868*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:4700:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4702:/ initchunk"); /*^block */ /*anyblock */ { @@ -37276,7 +37311,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V869*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:4807:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4809:/ initchunk"); /*^block */ /*anyblock */ { @@ -37309,7 +37344,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V870*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:4878:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4880:/ initchunk"); /*^block */ /*anyblock */ { @@ -37342,7 +37377,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V871*/ meltfptr[787] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:4964:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:4966:/ initchunk"); /*^block */ /*anyblock */ { @@ -37375,7 +37410,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.INSTALL_METHOD__V872*/ meltfptr[788] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:5522:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5524:/ initchunk"); /*^block */ /*anyblock */ { @@ -37527,7 +37562,7 @@ meltmod__warmelt_outobj__initialmeltchunk_12 (struct /*clear *//*_.VALUEXPORTER___V873*/ meltfptr[789] = 0; } - MELT_LOCATION ("warmelt-outobj.melt:5532:/ initchunk"); + MELT_LOCATION ("warmelt-outobj.melt:5534:/ initchunk"); /*^block */ /*anyblock */ { @@ -38428,7 +38463,7 @@ meltmod__warmelt_outobj__forward_or_mark_module_start_frame (struct int ix = 0; initial_frame_st *meltframptr_ = (initial_frame_st *) fp; melt_assertmsg ("check module frame", - meltframptr_->mcfr_nbvar == /*minihash */ -3709); + meltframptr_->mcfr_nbvar == /*minihash */ -975); if (!marking && melt_is_forwarding) { dbgprintf |