/* GCC MELT GENERATED FILE warmelt-base.0.c - DO NOT EDIT */ #ifndef MELTGCC_DYNAMIC_OBJSTRUCT /* version string of the gcc executable generating this file: */ const char genversionstr_melt[]= "4.5.0 20100223 (experimental) [melt-branch revision 157055]"; #endif #include "run-melt.h" /**** warmelt-base.0.c declarations ****/ #define MELT_HAS_INITIAL_ENVIRONMENT 1 /**!!** *** Copyright 2008, 2009, 2010 Free Software Foundation, Inc. Contributed by Basile Starynkevitch This file is part of GCC. GCC is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3, or (at your option) any later version. GCC is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with GCC; see the file COPYING3. If not see . *****!!**/ melt_ptr_t MELT_MODULE_VISIBILITY meltrout_1_warmelt_base_COMPARE_NAMED_ALPHA(meltclosure_ptr_t closp_, melt_ptr_t firstargp_, const char xargdescr_[], union meltparam_un *xargtab_, const char xresdescr_[], union meltparam_un *xrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_2_warmelt_base_MAPSTRING_EVERY(meltclosure_ptr_t closp_, melt_ptr_t firstargp_, const char xargdescr_[], union meltparam_un *xargtab_, const char xresdescr_[], union meltparam_un *xrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_3_warmelt_base_MAPSTRING_ITERATE_TEST(meltclosure_ptr_t closp_, melt_ptr_t firstargp_, const char xargdescr_[], union meltparam_un *xargtab_, const char xresdescr_[], union meltparam_un *xrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_4_warmelt_base_MULTIPLE_EVERY(meltclosure_ptr_t closp_, melt_ptr_t firstargp_, const char xargdescr_[], union meltparam_un *xargtab_, const char xresdescr_[], union meltparam_un *xrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_5_warmelt_base_MULTIPLE_BACKWARD_EVERY(meltclosure_ptr_t closp_, melt_ptr_t firstargp_, const char xargdescr_[], union meltparam_un *xargtab_, const char xresdescr_[], union meltparam_un *xrestab_); melt_ptr_t MELT_MODULE_VISIBILITY meltrout_6_warmelt_base_MULTIPLE_EVERY_BOTH(meltclosure_ptr_t closp_, melt_ptr_t firstargp_, const char xargdescr_[], union meltparam_un *xargtab_, const char xresdescr_[], union meltparam_un *xrestab_); void* start_module_melt(void*); void mark_module_melt(void*); void* initial_frame_melt; struct frame_start_module_melt_st; void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_0 (struct frame_start_module_melt_st*, char*); void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_1 (struct frame_start_module_melt_st*, char*); void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_2 (struct frame_start_module_melt_st*, char*); void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_3 (struct frame_start_module_melt_st*, char*); void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_4 (struct frame_start_module_melt_st*, char*); void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_5 (struct frame_start_module_melt_st*, char*); void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_6 (struct frame_start_module_melt_st*, char*); void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_7 (struct frame_start_module_melt_st*, char*); void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_8 (struct frame_start_module_melt_st*, char*); void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_9 (struct frame_start_module_melt_st*, char*); void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_10 (struct frame_start_module_melt_st*, char*); void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_11 (struct frame_start_module_melt_st*, char*); void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_12 (struct frame_start_module_melt_st*, char*); /**** warmelt-base.0.c implementations ****/ melt_ptr_t MELT_MODULE_VISIBILITY meltrout_1_warmelt_base_COMPARE_NAMED_ALPHA(meltclosure_ptr_t closp_, melt_ptr_t firstargp_, const char xargdescr_[], union meltparam_un *xargtab_, const char xresdescr_[], union meltparam_un *xrestab_) { #if ENABLE_CHECKING static long call_counter__; long thiscallcounter__ ATTRIBUTE_UNUSED = ++ call_counter__; #undef meltcallcount #define meltcallcount thiscallcounter__ #else #undef meltcallcount #define meltcallcount 0L #endif struct frame_meltrout_1_warmelt_base_COMPARE_NAMED_ALPHA_st { unsigned nbvar; #if ENABLE_CHECKING const char* flocs; #endif struct meltclosure_st *clos; struct excepth_melt_st *exh; struct callframe_melt_st *prev; #define MELTFRAM_NBVARPTR 13 void* varptr[13]; #define MELTFRAM_NBVARNUM 5 long varnum[5]; /*others*/ long _spare_; } *framptr_=0, meltframe; #define meltfram__ meltframe if (MELT_UNLIKELY(xargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc*/ int ix=0; framptr_ = (void*)firstargp_; gt_ggc_mx_melt_un (framptr_->clos); for(ix=0; ix<13; ix++) if (framptr_->varptr[ix]) gt_ggc_mx_melt_un (framptr_->varptr[ix]); return NULL; }/*end markggc*/; memset(&meltfram__, 0, sizeof(meltfram__)); meltfram__.nbvar = 13; meltfram__.clos = closp_; meltfram__.prev = (struct callframe_melt_st *) melt_topframe; melt_topframe = (struct callframe_melt_st *) &meltfram__; melt_trace_start("COMPARE_NAMED_ALPHA", meltcallcount); /*getargs*/ /*getarg#0*/ MELT_LOCATION("warmelt-base.melt:535:/ getarg"); /*_.N1__V2*/ meltfptr[1] = (melt_ptr_t) firstargp_; /*getarg#1*/ /*^getarg*/ if (xargdescr_[0] != BPAR_PTR) goto lab_endgetargs; /*_.N2__V3*/ meltfptr[2] = (xargtab_[0].bp_aptr) ? (*(xargtab_[0].bp_aptr)) : NULL; gcc_assert(melt_discr((melt_ptr_t)(/*_.N2__V3*/ meltfptr[2])) != NULL); ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/{ /*_#__L1*/ meltfnum[0] = ((/*_.N1__V2*/ meltfptr[1]) == (/*_.N2__V3*/ meltfptr[2]));; MELT_LOCATION("warmelt-base.melt:539:/ cond"); /*cond*/ if (/*_#__L1*/ meltfnum[0]) /*then*/ { /*^cond.then*/ /*_.IFELSE___V4*/ meltfptr[3] = (/*!konst_0*/ meltfrout->tabval[0]);; } else {MELT_LOCATION("warmelt-base.melt:539:/ cond.else"); /*^block*/ /*anyblock*/{ /*_#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:540:/ cond"); /*cond*/ if (/*_#IS_NOT_A__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ /*_.IFELSE___V5*/ meltfptr[4] = (/*!konst_2*/ meltfrout->tabval[2]);; } else {MELT_LOCATION("warmelt-base.melt:540:/ cond.else"); /*^block*/ /*anyblock*/{ /*_#IS_NOT_A__L3*/ meltfnum[2] = !melt_is_instance_of((melt_ptr_t)(/*_.N2__V3*/ meltfptr[2]), (melt_ptr_t)((/*!CLASS_NAMED*/ meltfrout->tabval[1])));; MELT_LOCATION("warmelt-base.melt:542:/ cond"); /*cond*/ if (/*_#IS_NOT_A__L3*/ meltfnum[2]) /*then*/ { /*^cond.then*/ /*_.IFELSE___V6*/ meltfptr[5] = (/*!konst_3*/ meltfrout->tabval[3]);; } else {MELT_LOCATION("warmelt-base.melt:542:/ cond.else"); /*^block*/ /*anyblock*/{ MELT_LOCATION("warmelt-base.melt:545:/ 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; }; ; MELT_LOCATION("warmelt-base.melt:546:/ 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; }; ; /*_#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:548:/ cond"); /*cond*/ if (/*_#STRING___L4*/ meltfnum[3]) /*then*/ { /*^cond.then*/ /*_.IFELSE___V10*/ meltfptr[9] = (/*!konst_4*/ meltfrout->tabval[4]);; } else {MELT_LOCATION("warmelt-base.melt:548:/ cond.else"); /*^block*/ /*anyblock*/{ /*_#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:550:/ cond"); /*cond*/ if (/*_#STRING___L5*/ meltfnum[4]) /*then*/ { /*^cond.then*/ /*_.IFELSE___V11*/ meltfptr[10] = (/*!konst_5*/ meltfrout->tabval[5]);; } else {MELT_LOCATION("warmelt-base.melt:550:/ cond.else"); /*^block*/ /*anyblock*/{ MELT_LOCATION("warmelt-base.melt:552:/ quasiblock"); /*_.PROGN___V12*/ meltfptr[11] = (/*!konst_6*/ meltfrout->tabval[6]);; /*^compute*/ /*_.IFELSE___V11*/ meltfptr[10] = /*_.PROGN___V12*/ meltfptr[11];; /*epilog*/ MELT_LOCATION("warmelt-base.melt:550:/ clear"); /*clear*/ /*_.PROGN___V12*/ meltfptr[11] = 0 ;} ; } ; /*_.IFELSE___V10*/ meltfptr[9] = /*_.IFELSE___V11*/ meltfptr[10];; /*epilog*/ MELT_LOCATION("warmelt-base.melt:548:/ clear"); /*clear*/ /*_#STRING___L5*/ meltfnum[4] = 0 ; /*^clear*/ /*clear*/ /*_.IFELSE___V11*/ meltfptr[10] = 0 ;} ; } ; /*_.LET___V7*/ meltfptr[6] = /*_.IFELSE___V10*/ meltfptr[9];; MELT_LOCATION("warmelt-base.melt:545:/ clear"); /*clear*/ /*_.SN1__V8*/ meltfptr[7] = 0 ; /*^clear*/ /*clear*/ /*_.SN2__V9*/ meltfptr[8] = 0 ; /*^clear*/ /*clear*/ /*_#STRING___L4*/ meltfnum[3] = 0 ; /*^clear*/ /*clear*/ /*_.IFELSE___V10*/ meltfptr[9] = 0 ; MELT_LOCATION("warmelt-base.melt:544:/ quasiblock"); /*_.PROGN___V13*/ meltfptr[11] = /*_.LET___V7*/ meltfptr[6];; /*^compute*/ /*_.IFELSE___V6*/ meltfptr[5] = /*_.PROGN___V13*/ meltfptr[11];; /*epilog*/ MELT_LOCATION("warmelt-base.melt:542:/ clear"); /*clear*/ /*_.LET___V7*/ meltfptr[6] = 0 ; /*^clear*/ /*clear*/ /*_.PROGN___V13*/ meltfptr[11] = 0 ;} ; } ; /*_.IFELSE___V5*/ meltfptr[4] = /*_.IFELSE___V6*/ meltfptr[5];; /*epilog*/ MELT_LOCATION("warmelt-base.melt:540:/ clear"); /*clear*/ /*_#IS_NOT_A__L3*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_.IFELSE___V6*/ meltfptr[5] = 0 ;} ; } ; /*_.IFELSE___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog*/ MELT_LOCATION("warmelt-base.melt:539:/ clear"); /*clear*/ /*_#IS_NOT_A__L2*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_.IFELSE___V5*/ meltfptr[4] = 0 ;} ; } ; MELT_LOCATION("warmelt-base.melt:535:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.IFELSE___V4*/ meltfptr[3];; MELT_LOCATION("warmelt-base.melt:535:/ finalreturn"); ; /*finalret*/ goto labend_rout ; /*epilog*/ /*^clear*/ /*clear*/ /*_#__L1*/ meltfnum[0] = 0 ; /*^clear*/ /*clear*/ /*_.IFELSE___V4*/ meltfptr[3] = 0 ;} ; goto labend_rout; labend_rout: melt_trace_end("COMPARE_NAMED_ALPHA", meltcallcount); melt_topframe = (struct callframe_melt_st*) meltfram__.prev; return (melt_ptr_t)(/*_.RETVAL___V1*/ meltfptr[0]); #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR } /*end meltrout_1_warmelt_base_COMPARE_NAMED_ALPHA*/ melt_ptr_t MELT_MODULE_VISIBILITY meltrout_2_warmelt_base_MAPSTRING_EVERY(meltclosure_ptr_t closp_, melt_ptr_t firstargp_, const char xargdescr_[], union meltparam_un *xargtab_, const char xresdescr_[], union meltparam_un *xrestab_) { #if ENABLE_CHECKING static long call_counter__; long thiscallcounter__ ATTRIBUTE_UNUSED = ++ call_counter__; #undef meltcallcount #define meltcallcount thiscallcounter__ #else #undef meltcallcount #define meltcallcount 0L #endif struct frame_meltrout_2_warmelt_base_MAPSTRING_EVERY_st { unsigned nbvar; #if ENABLE_CHECKING const char* flocs; #endif struct meltclosure_st *clos; struct excepth_melt_st *exh; struct callframe_melt_st *prev; #define MELTFRAM_NBVARPTR 6 void* varptr[6]; #define MELTFRAM_NBVARNUM 2 long varnum[2]; /*others*/ long _spare_; } *framptr_=0, meltframe; #define meltfram__ meltframe if (MELT_UNLIKELY(xargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc*/ int ix=0; framptr_ = (void*)firstargp_; gt_ggc_mx_melt_un (framptr_->clos); for(ix=0; ix<6; ix++) if (framptr_->varptr[ix]) gt_ggc_mx_melt_un (framptr_->varptr[ix]); return NULL; }/*end markggc*/; memset(&meltfram__, 0, sizeof(meltfram__)); meltfram__.nbvar = 6; meltfram__.clos = closp_; meltfram__.prev = (struct callframe_melt_st *) melt_topframe; melt_topframe = (struct callframe_melt_st *) &meltfram__; melt_trace_start("MAPSTRING_EVERY", meltcallcount); /*getargs*/ /*getarg#0*/ MELT_LOCATION("warmelt-base.melt:813:/ getarg"); /*_.MAP__V2*/ meltfptr[1] = (melt_ptr_t) firstargp_; /*getarg#1*/ /*^getarg*/ if (xargdescr_[0] != BPAR_PTR) goto lab_endgetargs; /*_.F__V3*/ meltfptr[2] = (xargtab_[0].bp_aptr) ? (*(xargtab_[0].bp_aptr)) : NULL; gcc_assert(melt_discr((melt_ptr_t)(/*_.F__V3*/ meltfptr[2])) != NULL); ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/{ /*_#IS_MAPSTRING__L1*/ meltfnum[0] = (melt_magic_discr((melt_ptr_t)(/*_.MAP__V2*/ meltfptr[1])) == OBMAG_MAPSTRINGS);; MELT_LOCATION("warmelt-base.melt:817:/ cond"); /*cond*/ if (/*_#IS_MAPSTRING__L1*/ meltfnum[0]) /*then*/ { /*^cond.then*/ /*^block*/ /*anyblock*/{ /*_#IS_CLOSURE__L2*/ meltfnum[1] = (melt_magic_discr((melt_ptr_t)(/*_.F__V3*/ meltfptr[2])) == OBMAG_CLOSURE);; MELT_LOCATION("warmelt-base.melt:818:/ cond"); /*cond*/ if (/*_#IS_CLOSURE__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ /*^block*/ /*anyblock*/{ /*citerblock FOREACH_IN_MAPSTRING*/ { /*cit1__EACHSTRMAP :*/ int cit1__EACHSTRMAP_ix=0, cit1__EACHSTRMAP_siz=0; for (cit1__EACHSTRMAP_ix=0; /* we retrieve in cit1__EACHSTRMAP_siz the size at each iteration since it could change. */ cit1__EACHSTRMAP_ix>=0 && (cit1__EACHSTRMAP_siz= melt_size_mapstrings(/*_.MAP__V2*/ meltfptr[1]))>0 && cit1__EACHSTRMAP_ix < cit1__EACHSTRMAP_siz; cit1__EACHSTRMAP_ix++) { const char* cit1__EACHSTRMAP_str = NULL; const char* cit1__EACHSTRMAP_nam = NULL; /*_.CURAT__V4*/ meltfptr[3] = NULL; /*_.CURVAL__V5*/ meltfptr[4] = NULL; cit1__EACHSTRMAP_str = ((struct meltmapstrings_st*)/*_.MAP__V2*/ meltfptr[1])->entab[cit1__EACHSTRMAP_ix].e_at; if (cit1__EACHSTRMAP_str == HTAB_DELETED_ENTRY) { /*_.CURAT__V4*/ meltfptr[3] = NULL; continue; }; if (!cit1__EACHSTRMAP_str) continue; /*_.CURVAL__V5*/ meltfptr[4] = ((struct meltmapstrings_st*)/*_.MAP__V2*/ meltfptr[1])->entab[cit1__EACHSTRMAP_ix].e_va; if (!/*_.CURVAL__V5*/ meltfptr[4]) continue; if (melt_is_instance_of(/*_.CURVAL__V5*/ meltfptr[4], MELT_PREDEF (CLASS_NAMED)) && (/*_.CURAT__V4*/ meltfptr[3] = melt_object_nth_field ((melt_ptr_t) /*_.CURVAL__V5*/ meltfptr[4], FNAMED_NAME)) != NULL && (cit1__EACHSTRMAP_nam = melt_string_str ((melt_ptr_t) /*_.CURAT__V4*/ meltfptr[3])) != (char*)0 && !strcmp (cit1__EACHSTRMAP_nam, cit1__EACHSTRMAP_str)) /*_.CURAT__V4*/ meltfptr[3] = /*_.CURAT__V4*/ meltfptr[3]; else { /*_.CURAT__V4*/ meltfptr[3] = NULL; /*_.CURAT__V4*/ meltfptr[3] = meltgc_new_stringdup((meltobject_ptr_t) MELT_PREDEF (DISCR_STRING), cit1__EACHSTRMAP_str); } cit1__EACHSTRMAP_str = (const char*)0; cit1__EACHSTRMAP_nam = (const char*)0; MELT_LOCATION("warmelt-base.melt:822:/ apply"); /*apply*/{ union meltparam_un argtab[1]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.CURVAL__V5*/ meltfptr[4]; /*_.F__V6*/ meltfptr[5] = melt_apply ((meltclosure_ptr_t)(/*_.F__V3*/ meltfptr[2]), (melt_ptr_t)(/*_.CURAT__V4*/ meltfptr[3]), (BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /* end cit1__EACHSTRMAP */ /*_.CURAT__V4*/ meltfptr[3] = NULL; /*_.CURVAL__V5*/ meltfptr[4] = NULL; } /*citerepilog*/ MELT_LOCATION("warmelt-base.melt:819:/ clear"); /*clear*/ /*_.CURAT__V4*/ meltfptr[3] = 0 ; /*^clear*/ /*clear*/ /*_.CURVAL__V5*/ meltfptr[4] = 0 ; /*^clear*/ /*clear*/ /*_.F__V6*/ meltfptr[5] = 0 ;} /*endciterblock FOREACH_IN_MAPSTRING*/ ; /*epilog*/ } ; } /*noelse*/ ; /*epilog*/ MELT_LOCATION("warmelt-base.melt:817:/ clear"); /*clear*/ /*_#IS_CLOSURE__L2*/ meltfnum[1] = 0 ;} ; } /*noelse*/ ; /*epilog*/ MELT_LOCATION("warmelt-base.melt:813:/ clear"); /*clear*/ /*_#IS_MAPSTRING__L1*/ meltfnum[0] = 0 ;} ; goto labend_rout; labend_rout: melt_trace_end("MAPSTRING_EVERY", meltcallcount); melt_topframe = (struct callframe_melt_st*) meltfram__.prev; return (melt_ptr_t)(/*noretval*/ NULL); #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR } /*end meltrout_2_warmelt_base_MAPSTRING_EVERY*/ melt_ptr_t MELT_MODULE_VISIBILITY meltrout_3_warmelt_base_MAPSTRING_ITERATE_TEST(meltclosure_ptr_t closp_, melt_ptr_t firstargp_, const char xargdescr_[], union meltparam_un *xargtab_, const char xresdescr_[], union meltparam_un *xrestab_) { #if ENABLE_CHECKING static long call_counter__; long thiscallcounter__ ATTRIBUTE_UNUSED = ++ call_counter__; #undef meltcallcount #define meltcallcount thiscallcounter__ #else #undef meltcallcount #define meltcallcount 0L #endif struct frame_meltrout_3_warmelt_base_MAPSTRING_ITERATE_TEST_st { unsigned nbvar; #if ENABLE_CHECKING const char* flocs; #endif struct meltclosure_st *clos; struct excepth_melt_st *exh; struct callframe_melt_st *prev; #define MELTFRAM_NBVARPTR 10 void* varptr[10]; #define MELTFRAM_NBVARNUM 3 long varnum[3]; /*others*/ long _spare_; } *framptr_=0, meltframe; #define meltfram__ meltframe if (MELT_UNLIKELY(xargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc*/ int ix=0; framptr_ = (void*)firstargp_; gt_ggc_mx_melt_un (framptr_->clos); for(ix=0; ix<10; ix++) if (framptr_->varptr[ix]) gt_ggc_mx_melt_un (framptr_->varptr[ix]); return NULL; }/*end markggc*/; memset(&meltfram__, 0, sizeof(meltfram__)); meltfram__.nbvar = 10; meltfram__.clos = closp_; meltfram__.prev = (struct callframe_melt_st *) melt_topframe; melt_topframe = (struct callframe_melt_st *) &meltfram__; melt_trace_start("MAPSTRING_ITERATE_TEST", meltcallcount); /*getargs*/ /*getarg#0*/ MELT_LOCATION("warmelt-base.melt:826:/ getarg"); /*_.MAP__V2*/ meltfptr[1] = (melt_ptr_t) firstargp_; /*getarg#1*/ /*^getarg*/ if (xargdescr_[0] != BPAR_PTR) goto lab_endgetargs; /*_.F__V3*/ meltfptr[2] = (xargtab_[0].bp_aptr) ? (*(xargtab_[0].bp_aptr)) : NULL; gcc_assert(melt_discr((melt_ptr_t)(/*_.F__V3*/ meltfptr[2])) != NULL); ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/{ /*_#IS_MAPSTRING__L1*/ meltfnum[0] = (melt_magic_discr((melt_ptr_t)(/*_.MAP__V2*/ meltfptr[1])) == OBMAG_MAPSTRINGS);; MELT_LOCATION("warmelt-base.melt:831:/ cond"); /*cond*/ if (/*_#IS_MAPSTRING__L1*/ meltfnum[0]) /*then*/ { /*^cond.then*/ /*^block*/ /*anyblock*/{ /*_#IS_CLOSURE__L2*/ meltfnum[1] = (melt_magic_discr((melt_ptr_t)(/*_.F__V3*/ meltfptr[2])) == OBMAG_CLOSURE);; MELT_LOCATION("warmelt-base.melt:832:/ cond"); /*cond*/ if (/*_#IS_CLOSURE__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ /*^block*/ /*anyblock*/{ /*citerblock FOREACH_IN_MAPSTRING*/ { /*cit1__EACHSTRMAP :*/ int cit1__EACHSTRMAP_ix=0, cit1__EACHSTRMAP_siz=0; for (cit1__EACHSTRMAP_ix=0; /* we retrieve in cit1__EACHSTRMAP_siz the size at each iteration since it could change. */ cit1__EACHSTRMAP_ix>=0 && (cit1__EACHSTRMAP_siz= melt_size_mapstrings(/*_.MAP__V2*/ meltfptr[1]))>0 && cit1__EACHSTRMAP_ix < cit1__EACHSTRMAP_siz; cit1__EACHSTRMAP_ix++) { const char* cit1__EACHSTRMAP_str = NULL; const char* cit1__EACHSTRMAP_nam = NULL; /*_.CURAT__V4*/ meltfptr[3] = NULL; /*_.CURVAL__V5*/ meltfptr[4] = NULL; cit1__EACHSTRMAP_str = ((struct meltmapstrings_st*)/*_.MAP__V2*/ meltfptr[1])->entab[cit1__EACHSTRMAP_ix].e_at; if (cit1__EACHSTRMAP_str == HTAB_DELETED_ENTRY) { /*_.CURAT__V4*/ meltfptr[3] = NULL; continue; }; if (!cit1__EACHSTRMAP_str) continue; /*_.CURVAL__V5*/ meltfptr[4] = ((struct meltmapstrings_st*)/*_.MAP__V2*/ meltfptr[1])->entab[cit1__EACHSTRMAP_ix].e_va; if (!/*_.CURVAL__V5*/ meltfptr[4]) continue; if (melt_is_instance_of(/*_.CURVAL__V5*/ meltfptr[4], MELT_PREDEF (CLASS_NAMED)) && (/*_.CURAT__V4*/ meltfptr[3] = melt_object_nth_field ((melt_ptr_t) /*_.CURVAL__V5*/ meltfptr[4], FNAMED_NAME)) != NULL && (cit1__EACHSTRMAP_nam = melt_string_str ((melt_ptr_t) /*_.CURAT__V4*/ meltfptr[3])) != (char*)0 && !strcmp (cit1__EACHSTRMAP_nam, cit1__EACHSTRMAP_str)) /*_.CURAT__V4*/ meltfptr[3] = /*_.CURAT__V4*/ meltfptr[3]; else { /*_.CURAT__V4*/ meltfptr[3] = NULL; /*_.CURAT__V4*/ meltfptr[3] = meltgc_new_stringdup((meltobject_ptr_t) MELT_PREDEF (DISCR_STRING), cit1__EACHSTRMAP_str); } cit1__EACHSTRMAP_str = (const char*)0; cit1__EACHSTRMAP_nam = (const char*)0; MELT_LOCATION("warmelt-base.melt:836:/ quasiblock"); /*^multiapply*/ /*multiapply 2args, 1x.res*/ { union meltparam_un argtab[1]; union meltparam_un restab[1]; memset(&restab, 0, sizeof(restab)); memset(&argtab, 0, sizeof(argtab)); /*^multiapply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.CURVAL__V5*/ meltfptr[4]; /*^multiapply.xres*/ restab[0].bp_aptr = (melt_ptr_t*) &/*_.OTHER__V8*/ meltfptr[7]; /*^multiapply.appl*/ /*_.TEST__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t)(/*_.F__V3*/ meltfptr[2]), (melt_ptr_t)(/*_.CURAT__V4*/ meltfptr[3]), (BPARSTR_PTR ""), argtab, (BPARSTR_PTR ""), restab); } ; /*^quasiblock*/ /*_#NULL__L3*/ meltfnum[2] = ((/*_.TEST__V7*/ meltfptr[6]) == NULL);; MELT_LOCATION("warmelt-base.melt:839:/ cond"); /*cond*/ if (/*_#NULL__L3*/ meltfnum[2]) /*then*/ { /*^cond.then*/ /*^block*/ /*anyblock*/{ MELT_LOCATION("warmelt-base.melt:840:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.CURAT__V4*/ meltfptr[3];; MELT_LOCATION("warmelt-base.melt:840:/ putxtraresult"); if (!xrestab_ || !xresdescr_) goto labend_rout; if (xresdescr_[0] != BPAR_PTR) goto labend_rout; if (xrestab_[0].bp_aptr) *(xrestab_[0].bp_aptr) = (melt_ptr_t) (/*_.CURVAL__V5*/ meltfptr[4]); ; /*^putxtraresult*/ if (!xrestab_ || !xresdescr_) goto labend_rout; if (xresdescr_[1] != BPAR_PTR) goto labend_rout; if (xrestab_[1].bp_aptr) *(xrestab_[1].bp_aptr) = (melt_ptr_t) (/*_.OTHER__V8*/ meltfptr[7]); ; /*^finalreturn*/ ; /*finalret*/ goto labend_rout ; /*_.IF___V9*/ meltfptr[8] = /*_.RETURN___V10*/ meltfptr[9];; /*epilog*/ MELT_LOCATION("warmelt-base.melt:839:/ clear"); /*clear*/ /*_.RETURN___V10*/ meltfptr[9] = 0 ;} ; } else {/*^cond.else*/ /*_.IF___V9*/ meltfptr[8] = NULL;; } ; /*^compute*/ /*_.MULTI___V6*/ meltfptr[5] = /*_.IF___V9*/ meltfptr[8];; MELT_LOCATION("warmelt-base.melt:836:/ clear"); /*clear*/ /*_#NULL__L3*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_.IF___V9*/ meltfptr[8] = 0 ; /*^clear*/ /*clear*/ /*_.OTHER__V8*/ meltfptr[7] = 0 ; /* end cit1__EACHSTRMAP */ /*_.CURAT__V4*/ meltfptr[3] = NULL; /*_.CURVAL__V5*/ meltfptr[4] = NULL; } /*citerepilog*/ MELT_LOCATION("warmelt-base.melt:833:/ clear"); /*clear*/ /*_.CURAT__V4*/ meltfptr[3] = 0 ; /*^clear*/ /*clear*/ /*_.CURVAL__V5*/ meltfptr[4] = 0 ; /*^clear*/ /*clear*/ /*_.MULTI___V6*/ meltfptr[5] = 0 ;} /*endciterblock FOREACH_IN_MAPSTRING*/ ; /*epilog*/ } ; } /*noelse*/ ; /*epilog*/ MELT_LOCATION("warmelt-base.melt:831:/ clear"); /*clear*/ /*_#IS_CLOSURE__L2*/ meltfnum[1] = 0 ;} ; } /*noelse*/ ; /*epilog*/ MELT_LOCATION("warmelt-base.melt:826:/ clear"); /*clear*/ /*_#IS_MAPSTRING__L1*/ meltfnum[0] = 0 ;} ; goto labend_rout; labend_rout: melt_trace_end("MAPSTRING_ITERATE_TEST", meltcallcount); melt_topframe = (struct callframe_melt_st*) meltfram__.prev; return (melt_ptr_t)(/*_.RETVAL___V1*/ meltfptr[0]); #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR } /*end meltrout_3_warmelt_base_MAPSTRING_ITERATE_TEST*/ melt_ptr_t MELT_MODULE_VISIBILITY meltrout_4_warmelt_base_MULTIPLE_EVERY(meltclosure_ptr_t closp_, melt_ptr_t firstargp_, const char xargdescr_[], union meltparam_un *xargtab_, const char xresdescr_[], union meltparam_un *xrestab_) { #if ENABLE_CHECKING static long call_counter__; long thiscallcounter__ ATTRIBUTE_UNUSED = ++ call_counter__; #undef meltcallcount #define meltcallcount thiscallcounter__ #else #undef meltcallcount #define meltcallcount 0L #endif struct frame_meltrout_4_warmelt_base_MULTIPLE_EVERY_st { unsigned nbvar; #if ENABLE_CHECKING const char* flocs; #endif struct meltclosure_st *clos; struct excepth_melt_st *exh; struct callframe_melt_st *prev; #define MELTFRAM_NBVARPTR 5 void* varptr[5]; #define MELTFRAM_NBVARNUM 3 long varnum[3]; /*others*/ long _spare_; } *framptr_=0, meltframe; #define meltfram__ meltframe if (MELT_UNLIKELY(xargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc*/ int ix=0; framptr_ = (void*)firstargp_; gt_ggc_mx_melt_un (framptr_->clos); for(ix=0; ix<5; ix++) if (framptr_->varptr[ix]) gt_ggc_mx_melt_un (framptr_->varptr[ix]); return NULL; }/*end markggc*/; memset(&meltfram__, 0, sizeof(meltfram__)); meltfram__.nbvar = 5; meltfram__.clos = closp_; meltfram__.prev = (struct callframe_melt_st *) melt_topframe; melt_topframe = (struct callframe_melt_st *) &meltfram__; melt_trace_start("MULTIPLE_EVERY", meltcallcount); /*getargs*/ /*getarg#0*/ MELT_LOCATION("warmelt-base.melt:875:/ getarg"); /*_.TUP__V2*/ meltfptr[1] = (melt_ptr_t) firstargp_; /*getarg#1*/ /*^getarg*/ if (xargdescr_[0] != BPAR_PTR) goto lab_endgetargs; /*_.F__V3*/ meltfptr[2] = (xargtab_[0].bp_aptr) ? (*(xargtab_[0].bp_aptr)) : NULL; gcc_assert(melt_discr((melt_ptr_t)(/*_.F__V3*/ meltfptr[2])) != NULL); ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/{ /*_#IS_MULTIPLE__L1*/ meltfnum[0] = (melt_magic_discr((melt_ptr_t)(/*_.TUP__V2*/ meltfptr[1])) == OBMAG_MULTIPLE);; MELT_LOCATION("warmelt-base.melt:878:/ cond"); /*cond*/ if (/*_#IS_MULTIPLE__L1*/ meltfnum[0]) /*then*/ { /*^cond.then*/ /*^block*/ /*anyblock*/{ /*_#IS_CLOSURE__L2*/ meltfnum[1] = (melt_magic_discr((melt_ptr_t)(/*_.F__V3*/ meltfptr[2])) == OBMAG_CLOSURE);; MELT_LOCATION("warmelt-base.melt:879:/ cond"); /*cond*/ if (/*_#IS_CLOSURE__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ /*^block*/ /*anyblock*/{ /*citerblock FOREACH_IN_MULTIPLE*/ { /* start cit1__EACHTUP: */ long cit1__EACHTUP_ln = melt_multiple_length((melt_ptr_t)/*_.TUP__V2*/ meltfptr[1]); for (/*_#IX__L3*/ meltfnum[2] = 0; (/*_#IX__L3*/ meltfnum[2] >= 0) && (/*_#IX__L3*/ meltfnum[2] < cit1__EACHTUP_ln); /*_#IX__L3*/ meltfnum[2]++) { /*_.COMP__V4*/ meltfptr[3] = melt_multiple_nth((melt_ptr_t)(/*_.TUP__V2*/ meltfptr[1]), /*_#IX__L3*/ meltfnum[2]); MELT_LOCATION("warmelt-base.melt:883:/ apply"); /*apply*/{ union meltparam_un argtab[1]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_long = /*_#IX__L3*/ meltfnum[2]; /*_.F__V5*/ meltfptr[4] = melt_apply ((meltclosure_ptr_t)(/*_.F__V3*/ meltfptr[2]), (melt_ptr_t)(/*_.COMP__V4*/ meltfptr[3]), (BPARSTR_LONG ""), argtab, "", (union meltparam_un*)0); } ; if (/*_#IX__L3*/ meltfnum[2]<0) break; } /* end cit1__EACHTUP */ /*citerepilog*/ MELT_LOCATION("warmelt-base.melt:880:/ clear"); /*clear*/ /*_.COMP__V4*/ meltfptr[3] = 0 ; /*^clear*/ /*clear*/ /*_#IX__L3*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_.F__V5*/ meltfptr[4] = 0 ;} /*endciterblock FOREACH_IN_MULTIPLE*/ ; /*epilog*/ } ; } /*noelse*/ ; /*epilog*/ MELT_LOCATION("warmelt-base.melt:878:/ clear"); /*clear*/ /*_#IS_CLOSURE__L2*/ meltfnum[1] = 0 ;} ; } /*noelse*/ ; /*epilog*/ MELT_LOCATION("warmelt-base.melt:875:/ clear"); /*clear*/ /*_#IS_MULTIPLE__L1*/ meltfnum[0] = 0 ;} ; goto labend_rout; labend_rout: melt_trace_end("MULTIPLE_EVERY", meltcallcount); melt_topframe = (struct callframe_melt_st*) meltfram__.prev; return (melt_ptr_t)(/*noretval*/ NULL); #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR } /*end meltrout_4_warmelt_base_MULTIPLE_EVERY*/ melt_ptr_t MELT_MODULE_VISIBILITY meltrout_5_warmelt_base_MULTIPLE_BACKWARD_EVERY(meltclosure_ptr_t closp_, melt_ptr_t firstargp_, const char xargdescr_[], union meltparam_un *xargtab_, const char xresdescr_[], union meltparam_un *xrestab_) { #if ENABLE_CHECKING static long call_counter__; long thiscallcounter__ ATTRIBUTE_UNUSED = ++ call_counter__; #undef meltcallcount #define meltcallcount thiscallcounter__ #else #undef meltcallcount #define meltcallcount 0L #endif struct frame_meltrout_5_warmelt_base_MULTIPLE_BACKWARD_EVERY_st { unsigned nbvar; #if ENABLE_CHECKING const char* flocs; #endif struct meltclosure_st *clos; struct excepth_melt_st *exh; struct callframe_melt_st *prev; #define MELTFRAM_NBVARPTR 5 void* varptr[5]; #define MELTFRAM_NBVARNUM 3 long varnum[3]; /*others*/ long _spare_; } *framptr_=0, meltframe; #define meltfram__ meltframe if (MELT_UNLIKELY(xargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc*/ int ix=0; framptr_ = (void*)firstargp_; gt_ggc_mx_melt_un (framptr_->clos); for(ix=0; ix<5; ix++) if (framptr_->varptr[ix]) gt_ggc_mx_melt_un (framptr_->varptr[ix]); return NULL; }/*end markggc*/; memset(&meltfram__, 0, sizeof(meltfram__)); meltfram__.nbvar = 5; meltfram__.clos = closp_; meltfram__.prev = (struct callframe_melt_st *) melt_topframe; melt_topframe = (struct callframe_melt_st *) &meltfram__; melt_trace_start("MULTIPLE_BACKWARD_EVERY", meltcallcount); /*getargs*/ /*getarg#0*/ MELT_LOCATION("warmelt-base.melt:886:/ getarg"); /*_.TUP__V2*/ meltfptr[1] = (melt_ptr_t) firstargp_; /*getarg#1*/ /*^getarg*/ if (xargdescr_[0] != BPAR_PTR) goto lab_endgetargs; /*_.F__V3*/ meltfptr[2] = (xargtab_[0].bp_aptr) ? (*(xargtab_[0].bp_aptr)) : NULL; gcc_assert(melt_discr((melt_ptr_t)(/*_.F__V3*/ meltfptr[2])) != NULL); ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/{ /*_#IS_MULTIPLE__L1*/ meltfnum[0] = (melt_magic_discr((melt_ptr_t)(/*_.TUP__V2*/ meltfptr[1])) == OBMAG_MULTIPLE);; MELT_LOCATION("warmelt-base.melt:889:/ cond"); /*cond*/ if (/*_#IS_MULTIPLE__L1*/ meltfnum[0]) /*then*/ { /*^cond.then*/ /*^block*/ /*anyblock*/{ /*_#IS_CLOSURE__L2*/ meltfnum[1] = (melt_magic_discr((melt_ptr_t)(/*_.F__V3*/ meltfptr[2])) == OBMAG_CLOSURE);; MELT_LOCATION("warmelt-base.melt:890:/ cond"); /*cond*/ if (/*_#IS_CLOSURE__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ /*^block*/ /*anyblock*/{ /*citerblock FOREACH_IN_MULTIPLE_BACKWARD*/ { /* start cit1__EACHTUPBACK: */ long cit1__EACHTUPBACK_ln = melt_multiple_length((melt_ptr_t)/*_.TUP__V2*/ meltfptr[1]); long cit1__EACHTUPBACK_ix = 0; for (cit1__EACHTUPBACK_ix = cit1__EACHTUPBACK_ln - 1; cit1__EACHTUPBACK_ix >= 0; cit1__EACHTUPBACK_ix--) { /*_.COMP__V4*/ meltfptr[3] = melt_multiple_nth((melt_ptr_t)(/*_.TUP__V2*/ meltfptr[1]), cit1__EACHTUPBACK_ix); /*_#IX__L3*/ meltfnum[2] = cit1__EACHTUPBACK_ix; MELT_LOCATION("warmelt-base.melt:894:/ apply"); /*apply*/{ union meltparam_un argtab[1]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_long = /*_#IX__L3*/ meltfnum[2]; /*_.F__V5*/ meltfptr[4] = melt_apply ((meltclosure_ptr_t)(/*_.F__V3*/ meltfptr[2]), (melt_ptr_t)(/*_.COMP__V4*/ meltfptr[3]), (BPARSTR_LONG ""), argtab, "", (union meltparam_un*)0); } ; } /* end cit1__EACHTUPBACK */ /*citerepilog*/ MELT_LOCATION("warmelt-base.melt:891:/ clear"); /*clear*/ /*_.COMP__V4*/ meltfptr[3] = 0 ; /*^clear*/ /*clear*/ /*_#IX__L3*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_.F__V5*/ meltfptr[4] = 0 ;} /*endciterblock FOREACH_IN_MULTIPLE_BACKWARD*/ ; /*epilog*/ } ; } /*noelse*/ ; /*epilog*/ MELT_LOCATION("warmelt-base.melt:889:/ clear"); /*clear*/ /*_#IS_CLOSURE__L2*/ meltfnum[1] = 0 ;} ; } /*noelse*/ ; /*epilog*/ MELT_LOCATION("warmelt-base.melt:886:/ clear"); /*clear*/ /*_#IS_MULTIPLE__L1*/ meltfnum[0] = 0 ;} ; goto labend_rout; labend_rout: melt_trace_end("MULTIPLE_BACKWARD_EVERY", meltcallcount); melt_topframe = (struct callframe_melt_st*) meltfram__.prev; return (melt_ptr_t)(/*noretval*/ NULL); #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR } /*end meltrout_5_warmelt_base_MULTIPLE_BACKWARD_EVERY*/ melt_ptr_t MELT_MODULE_VISIBILITY meltrout_6_warmelt_base_MULTIPLE_EVERY_BOTH(meltclosure_ptr_t closp_, melt_ptr_t firstargp_, const char xargdescr_[], union meltparam_un *xargtab_, const char xresdescr_[], union meltparam_un *xrestab_) { #if ENABLE_CHECKING static long call_counter__; long thiscallcounter__ ATTRIBUTE_UNUSED = ++ call_counter__; #undef meltcallcount #define meltcallcount thiscallcounter__ #else #undef meltcallcount #define meltcallcount 0L #endif struct frame_meltrout_6_warmelt_base_MULTIPLE_EVERY_BOTH_st { unsigned nbvar; #if ENABLE_CHECKING const char* flocs; #endif struct meltclosure_st *clos; struct excepth_melt_st *exh; struct callframe_melt_st *prev; #define MELTFRAM_NBVARPTR 13 void* varptr[13]; #define MELTFRAM_NBVARNUM 10 long varnum[10]; /*others*/ long _spare_; } *framptr_=0, meltframe; #define meltfram__ meltframe if (MELT_UNLIKELY(xargdescr_ == MELTPAR_MARKGGC)) { /*mark for ggc*/ int ix=0; framptr_ = (void*)firstargp_; gt_ggc_mx_melt_un (framptr_->clos); for(ix=0; ix<13; ix++) if (framptr_->varptr[ix]) gt_ggc_mx_melt_un (framptr_->varptr[ix]); return NULL; }/*end markggc*/; memset(&meltfram__, 0, sizeof(meltfram__)); meltfram__.nbvar = 13; meltfram__.clos = closp_; meltfram__.prev = (struct callframe_melt_st *) melt_topframe; melt_topframe = (struct callframe_melt_st *) &meltfram__; melt_trace_start("MULTIPLE_EVERY_BOTH", meltcallcount); /*getargs*/ /*getarg#0*/ MELT_LOCATION("warmelt-base.melt:898:/ getarg"); /*_.TUP1__V2*/ meltfptr[1] = (melt_ptr_t) firstargp_; /*getarg#1*/ /*^getarg*/ if (xargdescr_[0] != BPAR_PTR) goto lab_endgetargs; /*_.TUP2__V3*/ meltfptr[2] = (xargtab_[0].bp_aptr) ? (*(xargtab_[0].bp_aptr)) : NULL; gcc_assert(melt_discr((melt_ptr_t)(/*_.TUP2__V3*/ meltfptr[2])) != NULL); /*getarg#2*/ /*^getarg*/ if (xargdescr_[1] != BPAR_PTR) goto lab_endgetargs; /*_.F__V4*/ meltfptr[3] = (xargtab_[1].bp_aptr) ? (*(xargtab_[1].bp_aptr)) : NULL; gcc_assert(melt_discr((melt_ptr_t)(/*_.F__V4*/ meltfptr[3])) != NULL); ; goto lab_endgetargs; lab_endgetargs:; /*body*/ /*^block*/ /*anyblock*/{ /*_#IS_MULTIPLE__L1*/ meltfnum[0] = (melt_magic_discr((melt_ptr_t)(/*_.TUP1__V2*/ meltfptr[1])) == OBMAG_MULTIPLE);; MELT_LOCATION("warmelt-base.melt:901:/ cond"); /*cond*/ if (/*_#IS_MULTIPLE__L1*/ meltfnum[0]) /*then*/ { /*^cond.then*/ /*^block*/ /*anyblock*/{ /*_#IS_MULTIPLE__L2*/ meltfnum[1] = (melt_magic_discr((melt_ptr_t)(/*_.TUP2__V3*/ meltfptr[2])) == OBMAG_MULTIPLE);; MELT_LOCATION("warmelt-base.melt:902:/ cond"); /*cond*/ if (/*_#IS_MULTIPLE__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ /*^block*/ /*anyblock*/{ /*_#IS_CLOSURE__L3*/ meltfnum[2] = (melt_magic_discr((melt_ptr_t)(/*_.F__V4*/ meltfptr[3])) == OBMAG_CLOSURE);; MELT_LOCATION("warmelt-base.melt:903:/ cond"); /*cond*/ if (/*_#IS_CLOSURE__L3*/ meltfnum[2]) /*then*/ { /*^cond.then*/ /*^block*/ /*anyblock*/{ MELT_LOCATION("warmelt-base.melt:904:/ quasiblock"); /*_#LN1__L4*/ meltfnum[3] = (melt_multiple_length((melt_ptr_t)(/*_.TUP1__V2*/ meltfptr[1])));; /*^compute*/ /*_#LN2__L5*/ meltfnum[4] = (melt_multiple_length((melt_ptr_t)(/*_.TUP2__V3*/ meltfptr[2])));; /*^compute*/ /*_#IX__L6*/ meltfnum[5] = 0;; MELT_LOCATION("warmelt-base.melt:907:/ loop"); /*loop*/{ labloop_TUPLOOP_1:;/*^loopbody*/ /*^block*/ /*anyblock*/{ /*_#I__L7*/ meltfnum[6] = ((/*_#IX__L6*/ meltfnum[5]) >= (/*_#LN1__L4*/ meltfnum[3]));; MELT_LOCATION("warmelt-base.melt:908:/ cond"); /*cond*/ if (/*_#I__L7*/ meltfnum[6]) /*then*/ { /*^cond.then*/ /*^block*/ /*anyblock*/{ /*^quasiblock*/ /*^compute*/ /*_.TUPLOOP__V10*/ meltfptr[9] = NULL;; /*^exit*/ /*exit*/{ goto labexit_TUPLOOP_1;} ; /*epilog*/ } ; } /*noelse*/ ; /*_#I__L8*/ meltfnum[7] = ((/*_#IX__L6*/ meltfnum[5]) >= (/*_#LN2__L5*/ meltfnum[4]));; MELT_LOCATION("warmelt-base.melt:909:/ cond"); /*cond*/ if (/*_#I__L8*/ meltfnum[7]) /*then*/ { /*^cond.then*/ /*^block*/ /*anyblock*/{ /*^quasiblock*/ /*^compute*/ /*_.TUPLOOP__V10*/ meltfptr[9] = NULL;; /*^exit*/ /*exit*/{ goto labexit_TUPLOOP_1;} ; /*epilog*/ } ; } /*noelse*/ ; /*_.MULTIPLE_NTH__V11*/ meltfptr[10] = (melt_multiple_nth((melt_ptr_t)(/*_.TUP1__V2*/ meltfptr[1]), (/*_#IX__L6*/ meltfnum[5])));; /*^compute*/ /*_.MULTIPLE_NTH__V12*/ meltfptr[11] = (melt_multiple_nth((melt_ptr_t)(/*_.TUP2__V3*/ meltfptr[2]), (/*_#IX__L6*/ meltfnum[5])));; MELT_LOCATION("warmelt-base.melt:910:/ apply"); /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.MULTIPLE_NTH__V12*/ meltfptr[11]; /*^apply.arg*/ argtab[1].bp_long = /*_#IX__L6*/ meltfnum[5]; /*_.F__V13*/ meltfptr[12] = melt_apply ((meltclosure_ptr_t)(/*_.F__V4*/ meltfptr[3]), (melt_ptr_t)(/*_.MULTIPLE_NTH__V11*/ meltfptr[10]), (BPARSTR_PTR BPARSTR_LONG ""), argtab, "", (union meltparam_un*)0); } ; /*_#I__L9*/ meltfnum[8] = ((/*_#IX__L6*/ meltfnum[5]) + (1));; MELT_LOCATION("warmelt-base.melt:911:/ compute"); /*_#IX__L6*/ meltfnum[5] = /*_#SETQ___L10*/ meltfnum[9] = /*_#I__L9*/ meltfnum[8];; /*epilog*/ MELT_LOCATION("warmelt-base.melt:907:/ clear"); /*clear*/ /*_#I__L7*/ meltfnum[6] = 0 ; /*^clear*/ /*clear*/ /*_#I__L8*/ meltfnum[7] = 0 ; /*^clear*/ /*clear*/ /*_.MULTIPLE_NTH__V11*/ meltfptr[10] = 0 ; /*^clear*/ /*clear*/ /*_.MULTIPLE_NTH__V12*/ meltfptr[11] = 0 ; /*^clear*/ /*clear*/ /*_.F__V13*/ meltfptr[12] = 0 ; /*^clear*/ /*clear*/ /*_#I__L9*/ meltfnum[8] = 0 ; /*^clear*/ /*clear*/ /*_#SETQ___L10*/ meltfnum[9] = 0 ;} ; ; goto labloop_TUPLOOP_1; labexit_TUPLOOP_1:;/*^loopepilog*/ /*loopepilog*/ /*_.FOREVER___V9*/ meltfptr[8] = /*_.TUPLOOP__V10*/ meltfptr[9];; } ; /*^compute*/ /*_.LET___V8*/ meltfptr[7] = /*_.FOREVER___V9*/ meltfptr[8];; MELT_LOCATION("warmelt-base.melt:904:/ clear"); /*clear*/ /*_#LN1__L4*/ meltfnum[3] = 0 ; /*^clear*/ /*clear*/ /*_#LN2__L5*/ meltfnum[4] = 0 ; /*^clear*/ /*clear*/ /*_#IX__L6*/ meltfnum[5] = 0 ; /*^clear*/ /*clear*/ /*_.FOREVER___V9*/ meltfptr[8] = 0 ; /*_.IF___V7*/ meltfptr[6] = /*_.LET___V8*/ meltfptr[7];; /*epilog*/ MELT_LOCATION("warmelt-base.melt:903:/ clear"); /*clear*/ /*_.LET___V8*/ meltfptr[7] = 0 ;} ; } else {/*^cond.else*/ /*_.IF___V7*/ meltfptr[6] = NULL;; } ; /*^compute*/ /*_.IF___V6*/ meltfptr[5] = /*_.IF___V7*/ meltfptr[6];; /*epilog*/ MELT_LOCATION("warmelt-base.melt:902:/ clear"); /*clear*/ /*_#IS_CLOSURE__L3*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_.IF___V7*/ meltfptr[6] = 0 ;} ; } else {/*^cond.else*/ /*_.IF___V6*/ meltfptr[5] = NULL;; } ; /*^compute*/ /*_.IF___V5*/ meltfptr[4] = /*_.IF___V6*/ meltfptr[5];; /*epilog*/ MELT_LOCATION("warmelt-base.melt:901:/ clear"); /*clear*/ /*_#IS_MULTIPLE__L2*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_.IF___V6*/ meltfptr[5] = 0 ;} ; } else {/*^cond.else*/ /*_.IF___V5*/ meltfptr[4] = NULL;; } ; MELT_LOCATION("warmelt-base.melt:898:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = /*_.IF___V5*/ meltfptr[4];; MELT_LOCATION("warmelt-base.melt:898:/ finalreturn"); ; /*finalret*/ goto labend_rout ; /*epilog*/ /*^clear*/ /*clear*/ /*_#IS_MULTIPLE__L1*/ meltfnum[0] = 0 ; /*^clear*/ /*clear*/ /*_.IF___V5*/ meltfptr[4] = 0 ;} ; goto labend_rout; labend_rout: melt_trace_end("MULTIPLE_EVERY_BOTH", meltcallcount); melt_topframe = (struct callframe_melt_st*) meltfram__.prev; return (melt_ptr_t)(/*_.RETVAL___V1*/ meltfptr[0]); #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR } /*end meltrout_6_warmelt_base_MULTIPLE_EVERY_BOTH*/ typedef struct frame_start_module_melt_st { unsigned nbvar; #if ENABLE_CHECKING const char* flocs; #endif struct meltclosure_st *noinitialclos; struct excepth_melt_st *exh; struct callframe_melt_st *prev; #define MELTFRAM_NBVARPTR 1647 void* varptr[1647]; /*no varnum*/ #define MELTFRAM_NBVARNUM /*none*/0 /*others*/ long _spare_; } initial_frame_st; static void initialize_module_meltdata(initial_frame_st *iniframp__, char predefinited[]) { #define meltfram__ (*iniframp__) struct cdata_st { struct MELT_OBJECT_STRUCT(3) dsym_1__IGNORE; struct MELT_STRING_STRUCT(6) dstr_2__IGNORE; struct MELT_OBJECT_STRUCT(5) dobj_3__IGNORE; struct MELT_MULTIPLE_STRUCT(3) dtup_4__IGNORE; struct MELT_MULTIPLE_STRUCT(1) dtup_5__IGNORE; struct MELT_OBJECT_STRUCT(3) dsym_6__V; struct MELT_STRING_STRUCT(1) dstr_7__V; struct MELT_OBJECT_STRUCT(2) dobj_8; struct MELT_STRING_STRUCT(17) dstr_9__ignore_void_; struct MELT_STRING_STRUCT(1) dstr_10__; struct MELT_STRING_STRUCT(6) dstr_11__IGNORE; struct MELT_OBJECT_STRUCT(3) dsym_12__VOID; struct MELT_STRING_STRUCT(4) dstr_13__VOID; struct MELT_OBJECT_STRUCT(5) dobj_14__VOID; struct MELT_MULTIPLE_STRUCT(1) dtup_15__VOID; struct MELT_MULTIPLE_STRUCT(0) dtup_16__VOID; struct MELT_STRING_STRUCT(9) dstr_17__void_0; struct MELT_STRING_STRUCT(4) dstr_18__VOID; struct MELT_OBJECT_STRUCT(3) dsym_19__IS_NOT_OBJECT; struct MELT_STRING_STRUCT(13) dstr_20__IS_NOT_OBJECT; struct MELT_OBJECT_STRUCT(5) dobj_21__IS_NOT_OBJECT; struct MELT_MULTIPLE_STRUCT(3) dtup_22__IS_NOT_OBJECT; struct MELT_MULTIPLE_STRUCT(1) dtup_23__IS_NOT_OBJECT; struct MELT_OBJECT_STRUCT(3) dsym_24__OBJ; struct MELT_STRING_STRUCT(3) dstr_25__OBJ; struct MELT_OBJECT_STRUCT(2) dobj_26; struct MELT_STRING_STRUCT(31) dstr_27__melt_magic_disc; struct MELT_STRING_STRUCT(19) dstr_28__OBMAG_OBJE; struct MELT_STRING_STRUCT(13) dstr_29__IS_NOT_OBJECT; struct MELT_OBJECT_STRUCT(3) dsym_30__GET_GLOBPREDEF; struct MELT_STRING_STRUCT(14) dstr_31__GET_GLOBPREDEF; struct MELT_OBJECT_STRUCT(5) dobj_32__GET_GLOBPREDEF; struct MELT_MULTIPLE_STRUCT(3) dtup_33__GET_GLOBPREDEF; struct MELT_MULTIPLE_STRUCT(1) dtup_34__GET_GLOBPREDEF; struct MELT_OBJECT_STRUCT(3) dsym_35__IX; struct MELT_STRING_STRUCT(2) dstr_36__IX; struct MELT_OBJECT_STRUCT(2) dobj_37; struct MELT_STRING_STRUCT(17) dstr_38__melt_globpredef; struct MELT_STRING_STRUCT(2) dstr_39__; struct MELT_STRING_STRUCT(14) dstr_40__GET_GLOBPREDEF; struct MELT_OBJECT_STRUCT(3) dsym_41__OBJ_HASH; struct MELT_STRING_STRUCT(8) dstr_42__OBJ_HASH; struct MELT_OBJECT_STRUCT(5) dobj_43__OBJ_HASH; struct MELT_MULTIPLE_STRUCT(3) dtup_44__OBJ_HASH; struct MELT_MULTIPLE_STRUCT(1) dtup_45__OBJ_HASH; struct MELT_OBJECT_STRUCT(2) dobj_46; struct MELT_STRING_STRUCT(28) dstr_47__melt_obj_hash_; struct MELT_STRING_STRUCT(3) dstr_48__; struct MELT_STRING_STRUCT(8) dstr_49__OBJ_HASH; struct MELT_OBJECT_STRUCT(3) dsym_50__OBJ_LEN; struct MELT_STRING_STRUCT(7) dstr_51__OBJ_LEN; struct MELT_OBJECT_STRUCT(5) dobj_52__OBJ_LEN; struct MELT_MULTIPLE_STRUCT(3) dtup_53__OBJ_LEN; struct MELT_MULTIPLE_STRUCT(1) dtup_54__OBJ_LEN; struct MELT_OBJECT_STRUCT(2) dobj_55; struct MELT_STRING_STRUCT(27) dstr_56__melt_obj_len_m; struct MELT_STRING_STRUCT(3) dstr_57__; struct MELT_STRING_STRUCT(7) dstr_58__OBJ_LEN; struct MELT_OBJECT_STRUCT(3) dsym_59__OBJ_NUM; struct MELT_STRING_STRUCT(7) dstr_60__OBJ_NUM; struct MELT_OBJECT_STRUCT(5) dobj_61__OBJ_NUM; struct MELT_MULTIPLE_STRUCT(3) dtup_62__OBJ_NUM; struct MELT_MULTIPLE_STRUCT(1) dtup_63__OBJ_NUM; struct MELT_OBJECT_STRUCT(2) dobj_64; struct MELT_STRING_STRUCT(27) dstr_65__melt_obj_num_m; struct MELT_STRING_STRUCT(3) dstr_66__; struct MELT_STRING_STRUCT(7) dstr_67__OBJ_NUM; struct MELT_OBJECT_STRUCT(3) dsym_68__NONZERO_HASH; struct MELT_STRING_STRUCT(12) dstr_69__NONZERO_HASH; struct MELT_OBJECT_STRUCT(5) dobj_70__NONZERO_HASH; struct MELT_MULTIPLE_STRUCT(1) dtup_71__NONZERO_HASH; struct MELT_MULTIPLE_STRUCT(0) dtup_72__NONZERO_HASH; struct MELT_STRING_STRUCT(20) dstr_73__melt_nonzerohas; struct MELT_STRING_STRUCT(12) dstr_74__NONZERO_HASH; struct MELT_OBJECT_STRUCT(3) dsym_75__MINOR_GARBCOLL; struct MELT_STRING_STRUCT(14) dstr_76__MINOR_GARBCOLL; struct MELT_OBJECT_STRUCT(5) dobj_77__MINOR_GARBCOLL; struct MELT_MULTIPLE_STRUCT(3) dtup_78__MINOR_GARBCOLL; struct MELT_MULTIPLE_STRUCT(1) dtup_79__MINOR_GARBCOLL; struct MELT_OBJECT_STRUCT(3) dsym_80__SIZ; struct MELT_STRING_STRUCT(3) dstr_81__SIZ; struct MELT_OBJECT_STRUCT(2) dobj_82; struct MELT_STRING_STRUCT(15) dstr_83__melt_garbcoll_; struct MELT_STRING_STRUCT(22) dstr_84__MELT_MINOR_OR; struct MELT_STRING_STRUCT(14) dstr_85__MINOR_GARBCOLL; struct MELT_OBJECT_STRUCT(3) dsym_86__FULL_GARBCOLL; struct MELT_STRING_STRUCT(13) dstr_87__FULL_GARBCOLL; struct MELT_OBJECT_STRUCT(5) dobj_88__FULL_GARBCOLL; struct MELT_MULTIPLE_STRUCT(3) dtup_89__FULL_GARBCOLL; struct MELT_MULTIPLE_STRUCT(1) dtup_90__FULL_GARBCOLL; struct MELT_OBJECT_STRUCT(2) dobj_91; struct MELT_STRING_STRUCT(15) dstr_92__melt_garbcoll_; struct MELT_STRING_STRUCT(18) dstr_93__MELT_NEED_FUL; struct MELT_STRING_STRUCT(13) dstr_94__FULL_GARBCOLL; struct MELT_OBJECT_STRUCT(3) dsym_95__CHECKCALLSTACK_MSG; struct MELT_STRING_STRUCT(18) dstr_96__CHECKCALLSTACK_M; struct MELT_OBJECT_STRUCT(5) dobj_97__CHECKCALLSTACK_MSG; struct MELT_MULTIPLE_STRUCT(3) dtup_98__CHECKCALLSTACK_MSG; struct MELT_MULTIPLE_STRUCT(1) dtup_99__CHECKCALLSTACK_MSG; struct MELT_OBJECT_STRUCT(3) dsym_100__MSG; struct MELT_STRING_STRUCT(3) dstr_101__MSG; struct MELT_OBJECT_STRUCT(2) dobj_102; struct MELT_STRING_STRUCT(38) dstr_103__melt_check_call_; struct MELT_STRING_STRUCT(2) dstr_104__; struct MELT_STRING_STRUCT(18) dstr_105__CHECKCALLSTACK_M; struct MELT_OBJECT_STRUCT(3) dsym_106__CBREAK_MSG; struct MELT_STRING_STRUCT(10) dstr_107__CBREAK_MSG; struct MELT_OBJECT_STRUCT(5) dobj_108__CBREAK_MSG; struct MELT_MULTIPLE_STRUCT(3) dtup_109__CBREAK_MSG; struct MELT_MULTIPLE_STRUCT(1) dtup_110__CBREAK_MSG; struct MELT_OBJECT_STRUCT(2) dobj_111; struct MELT_STRING_STRUCT(12) dstr_112__melt_cbreak_; struct MELT_STRING_STRUCT(1) dstr_113__; struct MELT_STRING_STRUCT(10) dstr_114__CBREAK_MSG; struct MELT_OBJECT_STRUCT(3) dsym_115__I; struct MELT_STRING_STRUCT(3) dstr_116__I; struct MELT_OBJECT_STRUCT(5) dobj_117__I; struct MELT_MULTIPLE_STRUCT(5) dtup_118__I; struct MELT_MULTIPLE_STRUCT(2) dtup_119__I; struct MELT_OBJECT_STRUCT(3) dsym_120__A; struct MELT_STRING_STRUCT(1) dstr_121__A; struct MELT_OBJECT_STRUCT(2) dobj_122; struct MELT_OBJECT_STRUCT(3) dsym_123__B; struct MELT_STRING_STRUCT(1) dstr_124__B; struct MELT_OBJECT_STRUCT(2) dobj_125; struct MELT_STRING_STRUCT(2) dstr_126__; struct MELT_STRING_STRUCT(6) dstr_127__; struct MELT_STRING_STRUCT(2) dstr_128__; struct MELT_STRING_STRUCT(3) dstr_129__I; struct MELT_OBJECT_STRUCT(3) dsym_130__I; struct MELT_STRING_STRUCT(3) dstr_131__I; struct MELT_OBJECT_STRUCT(5) dobj_132__I; struct MELT_MULTIPLE_STRUCT(5) dtup_133__I; struct MELT_MULTIPLE_STRUCT(2) dtup_134__I; struct MELT_OBJECT_STRUCT(2) dobj_135; struct MELT_OBJECT_STRUCT(2) dobj_136; struct MELT_STRING_STRUCT(2) dstr_137__; struct MELT_STRING_STRUCT(6) dstr_138__; struct MELT_STRING_STRUCT(2) dstr_139__; struct MELT_STRING_STRUCT(3) dstr_140__I; struct MELT_OBJECT_STRUCT(3) dsym_141__I; struct MELT_STRING_STRUCT(3) dstr_142__I; struct MELT_OBJECT_STRUCT(5) dobj_143__I; struct MELT_MULTIPLE_STRUCT(5) dtup_144__I; struct MELT_MULTIPLE_STRUCT(2) dtup_145__I; struct MELT_OBJECT_STRUCT(2) dobj_146; struct MELT_OBJECT_STRUCT(2) dobj_147; struct MELT_STRING_STRUCT(2) dstr_148__; struct MELT_STRING_STRUCT(6) dstr_149__; struct MELT_STRING_STRUCT(2) dstr_150__; struct MELT_STRING_STRUCT(3) dstr_151__I; struct MELT_OBJECT_STRUCT(3) dsym_152__I; struct MELT_STRING_STRUCT(2) dstr_153__I; struct MELT_OBJECT_STRUCT(5) dobj_154__I; struct MELT_MULTIPLE_STRUCT(5) dtup_155__I; struct MELT_MULTIPLE_STRUCT(2) dtup_156__I; struct MELT_OBJECT_STRUCT(2) dobj_157; struct MELT_OBJECT_STRUCT(2) dobj_158; struct MELT_STRING_STRUCT(2) dstr_159__; struct MELT_STRING_STRUCT(5) dstr_160__; struct MELT_STRING_STRUCT(2) dstr_161__; struct MELT_STRING_STRUCT(2) dstr_162__I; struct MELT_OBJECT_STRUCT(3) dsym_163__I; struct MELT_STRING_STRUCT(2) dstr_164__I; struct MELT_OBJECT_STRUCT(5) dobj_165__I; struct MELT_MULTIPLE_STRUCT(5) dtup_166__I; struct MELT_MULTIPLE_STRUCT(2) dtup_167__I; struct MELT_OBJECT_STRUCT(2) dobj_168; struct MELT_OBJECT_STRUCT(2) dobj_169; struct MELT_STRING_STRUCT(2) dstr_170__; struct MELT_STRING_STRUCT(5) dstr_171__; struct MELT_STRING_STRUCT(2) dstr_172__; struct MELT_STRING_STRUCT(2) dstr_173__I; struct MELT_OBJECT_STRUCT(3) dsym_174__ANDI; struct MELT_STRING_STRUCT(4) dstr_175__ANDI; struct MELT_OBJECT_STRUCT(5) dobj_176__ANDI; struct MELT_MULTIPLE_STRUCT(5) dtup_177__ANDI; struct MELT_MULTIPLE_STRUCT(2) dtup_178__ANDI; struct MELT_OBJECT_STRUCT(2) dobj_179; struct MELT_OBJECT_STRUCT(2) dobj_180; struct MELT_STRING_STRUCT(2) dstr_181__; struct MELT_STRING_STRUCT(5) dstr_182__; struct MELT_STRING_STRUCT(2) dstr_183__; struct MELT_STRING_STRUCT(4) dstr_184__ANDI; struct MELT_OBJECT_STRUCT(3) dsym_185__ORI; struct MELT_STRING_STRUCT(3) dstr_186__ORI; struct MELT_OBJECT_STRUCT(5) dobj_187__ORI; struct MELT_MULTIPLE_STRUCT(5) dtup_188__ORI; struct MELT_MULTIPLE_STRUCT(2) dtup_189__ORI; struct MELT_OBJECT_STRUCT(2) dobj_190; struct MELT_OBJECT_STRUCT(2) dobj_191; struct MELT_STRING_STRUCT(2) dstr_192__; struct MELT_STRING_STRUCT(5) dstr_193__; struct MELT_STRING_STRUCT(2) dstr_194__; struct MELT_STRING_STRUCT(3) dstr_195__ORI; struct MELT_OBJECT_STRUCT(3) dsym_196__XORI; struct MELT_STRING_STRUCT(4) dstr_197__XORI; struct MELT_OBJECT_STRUCT(5) dobj_198__XORI; struct MELT_MULTIPLE_STRUCT(5) dtup_199__XORI; struct MELT_MULTIPLE_STRUCT(2) dtup_200__XORI; struct MELT_OBJECT_STRUCT(2) dobj_201; struct MELT_OBJECT_STRUCT(2) dobj_202; struct MELT_STRING_STRUCT(2) dstr_203__; struct MELT_STRING_STRUCT(5) dstr_204__; struct MELT_STRING_STRUCT(2) dstr_205__; struct MELT_STRING_STRUCT(4) dstr_206__XORI; struct MELT_OBJECT_STRUCT(3) dsym_207__NEGI; struct MELT_STRING_STRUCT(4) dstr_208__NEGI; struct MELT_OBJECT_STRUCT(5) dobj_209__NEGI; struct MELT_MULTIPLE_STRUCT(3) dtup_210__NEGI; struct MELT_MULTIPLE_STRUCT(1) dtup_211__NEGI; struct MELT_OBJECT_STRUCT(3) dsym_212__I; struct MELT_STRING_STRUCT(1) dstr_213__I; struct MELT_OBJECT_STRUCT(2) dobj_214; struct MELT_STRING_STRUCT(3) dstr_215__; struct MELT_STRING_STRUCT(2) dstr_216__; struct MELT_STRING_STRUCT(4) dstr_217__NEGI; struct MELT_OBJECT_STRUCT(3) dsym_218__NOTI; struct MELT_STRING_STRUCT(4) dstr_219__NOTI; struct MELT_OBJECT_STRUCT(5) dobj_220__NOTI; struct MELT_MULTIPLE_STRUCT(3) dtup_221__NOTI; struct MELT_MULTIPLE_STRUCT(1) dtup_222__NOTI; struct MELT_OBJECT_STRUCT(2) dobj_223; struct MELT_STRING_STRUCT(3) dstr_224__; struct MELT_STRING_STRUCT(2) dstr_225__; struct MELT_STRING_STRUCT(4) dstr_226__NOTI; struct MELT_OBJECT_STRUCT(3) dsym_227__NOTNULL; struct MELT_STRING_STRUCT(7) dstr_228__NOTNULL; struct MELT_OBJECT_STRUCT(5) dobj_229__NOTNULL; struct MELT_MULTIPLE_STRUCT(3) dtup_230__NOTNULL; struct MELT_MULTIPLE_STRUCT(1) dtup_231__NOTNULL; struct MELT_OBJECT_STRUCT(2) dobj_232; struct MELT_STRING_STRUCT(2) dstr_233__; struct MELT_STRING_STRUCT(10) dstr_234__NULL_; struct MELT_STRING_STRUCT(7) dstr_235__NOTNULL; struct MELT_OBJECT_STRUCT(3) dsym_236__ZEROP; struct MELT_STRING_STRUCT(5) dstr_237__ZEROP; struct MELT_OBJECT_STRUCT(5) dobj_238__ZEROP; struct MELT_MULTIPLE_STRUCT(3) dtup_239__ZEROP; struct MELT_MULTIPLE_STRUCT(1) dtup_240__ZEROP; struct MELT_OBJECT_STRUCT(2) dobj_241; struct MELT_STRING_STRUCT(2) dstr_242__; struct MELT_STRING_STRUCT(8) dstr_243__OL_; struct MELT_STRING_STRUCT(5) dstr_244__ZEROP; struct MELT_OBJECT_STRUCT(3) dsym_245__OUTCSTRING_DBG; struct MELT_STRING_STRUCT(14) dstr_246__OUTCSTRING_DBG; struct MELT_OBJECT_STRUCT(5) dobj_247__OUTCSTRING_DBG; struct MELT_MULTIPLE_STRUCT(3) dtup_248__OUTCSTRING_DBG; struct MELT_MULTIPLE_STRUCT(1) dtup_249__OUTCSTRING_DBG; struct MELT_OBJECT_STRUCT(3) dsym_250__S; struct MELT_STRING_STRUCT(1) dstr_251__S; struct MELT_OBJECT_STRUCT(2) dobj_252; struct MELT_STRING_STRUCT(21) dstr_253__melt_puts_dump_f; struct MELT_STRING_STRUCT(2) dstr_254__; struct MELT_STRING_STRUCT(14) dstr_255__OUTCSTRING_DBG; struct MELT_OBJECT_STRUCT(3) dsym_256__OUTNUM_DBG; struct MELT_STRING_STRUCT(10) dstr_257__OUTNUM_DBG; struct MELT_OBJECT_STRUCT(5) dobj_258__OUTNUM_DBG; struct MELT_MULTIPLE_STRUCT(7) dtup_259__OUTNUM_DBG; struct MELT_MULTIPLE_STRUCT(3) dtup_260__OUTNUM_DBG; struct MELT_OBJECT_STRUCT(3) dsym_261__PREF; struct MELT_STRING_STRUCT(4) dstr_262__PREF; struct MELT_OBJECT_STRUCT(2) dobj_263; struct MELT_OBJECT_STRUCT(3) dsym_264__L; struct MELT_STRING_STRUCT(1) dstr_265__L; struct MELT_OBJECT_STRUCT(2) dobj_266; struct MELT_OBJECT_STRUCT(3) dsym_267__SUF; struct MELT_STRING_STRUCT(3) dstr_268__SUF; struct MELT_OBJECT_STRUCT(2) dobj_269; struct MELT_STRING_STRUCT(23) dstr_270__melt_putnum_dump; struct MELT_STRING_STRUCT(4) dstr_271__; struct MELT_STRING_STRUCT(4) dstr_272__; struct MELT_STRING_STRUCT(2) dstr_273__; struct MELT_STRING_STRUCT(10) dstr_274__OUTNUM_DBG; struct MELT_OBJECT_STRUCT(3) dsym_275__OUTSTR_DBG; struct MELT_STRING_STRUCT(10) dstr_276__OUTSTR_DBG; struct MELT_OBJECT_STRUCT(5) dobj_277__OUTSTR_DBG; struct MELT_MULTIPLE_STRUCT(3) dtup_278__OUTSTR_DBG; struct MELT_MULTIPLE_STRUCT(1) dtup_279__OUTSTR_DBG; struct MELT_OBJECT_STRUCT(3) dsym_280__STR; struct MELT_STRING_STRUCT(3) dstr_281__STR; struct MELT_OBJECT_STRUCT(2) dobj_282; struct MELT_STRING_STRUCT(35) dstr_283__melt_putstr_dump; struct MELT_STRING_STRUCT(2) dstr_284__; struct MELT_STRING_STRUCT(10) dstr_285__OUTSTR_DBG; struct MELT_OBJECT_STRUCT(3) dsym_286__OUTSTRBUF_DBG; struct MELT_STRING_STRUCT(13) dstr_287__OUTSTRBUF_DBG; struct MELT_OBJECT_STRUCT(5) dobj_288__OUTSTRBUF_DBG; struct MELT_MULTIPLE_STRUCT(3) dtup_289__OUTSTRBUF_DBG; struct MELT_MULTIPLE_STRUCT(1) dtup_290__OUTSTRBUF_DBG; struct MELT_OBJECT_STRUCT(3) dsym_291__SBUF; struct MELT_STRING_STRUCT(4) dstr_292__SBUF; struct MELT_OBJECT_STRUCT(2) dobj_293; struct MELT_STRING_STRUCT(38) dstr_294__melt_putstrbuf_d; struct MELT_STRING_STRUCT(2) dstr_295__; struct MELT_STRING_STRUCT(13) dstr_296__OUTSTRBUF_DBG; struct MELT_OBJECT_STRUCT(3) dsym_297__OUTNEWLINE_DBG; struct MELT_STRING_STRUCT(14) dstr_298__OUTNEWLINE_DBG; struct MELT_OBJECT_STRUCT(5) dobj_299__OUTNEWLINE_DBG; struct MELT_MULTIPLE_STRUCT(1) dtup_300__OUTNEWLINE_DBG; struct MELT_MULTIPLE_STRUCT(0) dtup_301__OUTNEWLINE_DBG; struct MELT_STRING_STRUCT(28) dstr_302__melt_newlineflus; struct MELT_STRING_STRUCT(14) dstr_303__OUTNEWLINE_DBG; struct MELT_OBJECT_STRUCT(3) dsym_304__OUTNUM_ERR; struct MELT_STRING_STRUCT(10) dstr_305__OUTNUM_ERR; struct MELT_OBJECT_STRUCT(5) dobj_306__OUTNUM_ERR; struct MELT_MULTIPLE_STRUCT(7) dtup_307__OUTNUM_ERR; struct MELT_MULTIPLE_STRUCT(3) dtup_308__OUTNUM_ERR; struct MELT_OBJECT_STRUCT(2) dobj_309; struct MELT_OBJECT_STRUCT(2) dobj_310; struct MELT_OBJECT_STRUCT(2) dobj_311; struct MELT_STRING_STRUCT(20) dstr_312__melt_putnum_stde; struct MELT_STRING_STRUCT(4) dstr_313__; struct MELT_STRING_STRUCT(4) dstr_314__; struct MELT_STRING_STRUCT(2) dstr_315__; struct MELT_STRING_STRUCT(10) dstr_316__OUTNUM_ERR; struct MELT_OBJECT_STRUCT(3) dsym_317__OUTCSTRING_ERR; struct MELT_STRING_STRUCT(14) dstr_318__OUTCSTRING_ERR; struct MELT_OBJECT_STRUCT(5) dobj_319__OUTCSTRING_ERR; struct MELT_MULTIPLE_STRUCT(3) dtup_320__OUTCSTRING_ERR; struct MELT_MULTIPLE_STRUCT(1) dtup_321__OUTCSTRING_ERR; struct MELT_OBJECT_STRUCT(2) dobj_322; struct MELT_STRING_STRUCT(18) dstr_323__melt_puts_stderr; struct MELT_STRING_STRUCT(2) dstr_324__; struct MELT_STRING_STRUCT(14) dstr_325__OUTCSTRING_ERR; struct MELT_OBJECT_STRUCT(3) dsym_326__OUTSTRBUF_ERR; struct MELT_STRING_STRUCT(13) dstr_327__OUTSTRBUF_ERR; struct MELT_OBJECT_STRUCT(5) dobj_328__OUTSTRBUF_ERR; struct MELT_MULTIPLE_STRUCT(3) dtup_329__OUTSTRBUF_ERR; struct MELT_MULTIPLE_STRUCT(1) dtup_330__OUTSTRBUF_ERR; struct MELT_OBJECT_STRUCT(2) dobj_331; struct MELT_STRING_STRUCT(35) dstr_332__melt_putstrbuf_s; struct MELT_STRING_STRUCT(2) dstr_333__; struct MELT_STRING_STRUCT(13) dstr_334__OUTSTRBUF_ERR; struct MELT_OBJECT_STRUCT(3) dsym_335__PAIR_SET_HEAD; struct MELT_STRING_STRUCT(13) dstr_336__PAIR_SET_HEAD; struct MELT_OBJECT_STRUCT(5) dobj_337__PAIR_SET_HEAD; struct MELT_MULTIPLE_STRUCT(5) dtup_338__PAIR_SET_HEAD; struct MELT_MULTIPLE_STRUCT(2) dtup_339__PAIR_SET_HEAD; struct MELT_OBJECT_STRUCT(3) dsym_340__PA; struct MELT_STRING_STRUCT(2) dstr_341__PA; struct MELT_OBJECT_STRUCT(2) dobj_342; struct MELT_OBJECT_STRUCT(3) dsym_343__HD; struct MELT_STRING_STRUCT(2) dstr_344__HD; struct MELT_OBJECT_STRUCT(2) dobj_345; struct MELT_STRING_STRUCT(34) dstr_346__meltgc_pair_set_; struct MELT_STRING_STRUCT(4) dstr_347__; struct MELT_STRING_STRUCT(2) dstr_348__; struct MELT_STRING_STRUCT(13) dstr_349__PAIR_SET_HEAD; struct MELT_OBJECT_STRUCT(3) dsym_350__PAIR_LISTLENGTH; struct MELT_STRING_STRUCT(15) dstr_351__PAIR_LISTLENGTH; struct MELT_OBJECT_STRUCT(5) dobj_352__PAIR_LISTLENGTH; struct MELT_MULTIPLE_STRUCT(3) dtup_353__PAIR_LISTLENGTH; struct MELT_MULTIPLE_STRUCT(1) dtup_354__PAIR_LISTLENGTH; struct MELT_OBJECT_STRUCT(2) dobj_355; struct MELT_STRING_STRUCT(35) dstr_356__melt_pair_listl; struct MELT_STRING_STRUCT(3) dstr_357__; struct MELT_STRING_STRUCT(15) dstr_358__PAIR_LISTLENGTH; struct MELT_OBJECT_STRUCT(3) dsym_359__MAKE_PAIR; struct MELT_STRING_STRUCT(9) dstr_360__MAKE_PAIR; struct MELT_OBJECT_STRUCT(5) dobj_361__MAKE_PAIR; struct MELT_MULTIPLE_STRUCT(7) dtup_362__MAKE_PAIR; struct MELT_MULTIPLE_STRUCT(3) dtup_363__MAKE_PAIR; struct MELT_OBJECT_STRUCT(3) dsym_364__DISCR; struct MELT_STRING_STRUCT(5) dstr_365__DISCR; struct MELT_OBJECT_STRUCT(2) dobj_366; struct MELT_OBJECT_STRUCT(2) dobj_367; struct MELT_OBJECT_STRUCT(3) dsym_368__TL; struct MELT_STRING_STRUCT(2) dstr_369__TL; struct MELT_OBJECT_STRUCT(2) dobj_370; struct MELT_STRING_STRUCT(36) dstr_371__meltgc_new_pair; struct MELT_STRING_STRUCT(16) dstr_372__melt_ptr_t_; struct MELT_STRING_STRUCT(16) dstr_373__melt_ptr_t_; struct MELT_STRING_STRUCT(3) dstr_374__; struct MELT_STRING_STRUCT(9) dstr_375__MAKE_PAIR; struct MELT_OBJECT_STRUCT(3) dsym_376__IS_MIXINT; struct MELT_STRING_STRUCT(9) dstr_377__IS_MIXINT; struct MELT_OBJECT_STRUCT(5) dobj_378__IS_MIXINT; struct MELT_MULTIPLE_STRUCT(3) dtup_379__IS_MIXINT; struct MELT_MULTIPLE_STRUCT(1) dtup_380__IS_MIXINT; struct MELT_OBJECT_STRUCT(3) dsym_381__MI; struct MELT_STRING_STRUCT(2) dstr_382__MI; struct MELT_OBJECT_STRUCT(2) dobj_383; struct MELT_STRING_STRUCT(31) dstr_384__melt_magic_disc; struct MELT_STRING_STRUCT(19) dstr_385__OBMAG_MIXI; struct MELT_STRING_STRUCT(9) dstr_386__IS_MIXINT; struct MELT_OBJECT_STRUCT(3) dsym_387__MIXINT_VAL; struct MELT_STRING_STRUCT(10) dstr_388__MIXINT_VAL; struct MELT_OBJECT_STRUCT(5) dobj_389__MIXINT_VAL; struct MELT_MULTIPLE_STRUCT(3) dtup_390__MIXINT_VAL; struct MELT_MULTIPLE_STRUCT(1) dtup_391__MIXINT_VAL; struct MELT_OBJECT_STRUCT(2) dobj_392; struct MELT_STRING_STRUCT(30) dstr_393__melt_val_mixint; struct MELT_STRING_STRUCT(3) dstr_394__; struct MELT_STRING_STRUCT(10) dstr_395__MIXINT_VAL; struct MELT_OBJECT_STRUCT(3) dsym_396__MAKE_MIXINT; struct MELT_STRING_STRUCT(11) dstr_397__MAKE_MIXINT; struct MELT_OBJECT_STRUCT(5) dobj_398__MAKE_MIXINT; struct MELT_MULTIPLE_STRUCT(7) dtup_399__MAKE_MIXINT; struct MELT_MULTIPLE_STRUCT(3) dtup_400__MAKE_MIXINT; struct MELT_OBJECT_STRUCT(3) dsym_401__DIS; struct MELT_STRING_STRUCT(3) dstr_402__DIS; struct MELT_OBJECT_STRUCT(2) dobj_403; struct MELT_OBJECT_STRUCT(3) dsym_404__VAL; struct MELT_STRING_STRUCT(3) dstr_405__VAL; struct MELT_OBJECT_STRUCT(2) dobj_406; struct MELT_OBJECT_STRUCT(3) dsym_407__NUM; struct MELT_STRING_STRUCT(3) dstr_408__NUM; struct MELT_OBJECT_STRUCT(2) dobj_409; struct MELT_STRING_STRUCT(38) dstr_410__meltgc_new_mixi; struct MELT_STRING_STRUCT(16) dstr_411__melt_ptr_t_; struct MELT_STRING_STRUCT(4) dstr_412__; struct MELT_STRING_STRUCT(3) dstr_413__; struct MELT_STRING_STRUCT(11) dstr_414__MAKE_MIXINT; struct MELT_OBJECT_STRUCT(3) dsym_415__IS_MIXLOC; struct MELT_STRING_STRUCT(9) dstr_416__IS_MIXLOC; struct MELT_OBJECT_STRUCT(5) dobj_417__IS_MIXLOC; struct MELT_MULTIPLE_STRUCT(3) dtup_418__IS_MIXLOC; struct MELT_MULTIPLE_STRUCT(1) dtup_419__IS_MIXLOC; struct MELT_OBJECT_STRUCT(2) dobj_420; struct MELT_STRING_STRUCT(31) dstr_421__melt_magic_disc; struct MELT_STRING_STRUCT(19) dstr_422__OBMAG_MIXL; struct MELT_STRING_STRUCT(9) dstr_423__IS_MIXLOC; struct MELT_OBJECT_STRUCT(3) dsym_424__MIXLOC_VAL; struct MELT_STRING_STRUCT(10) dstr_425__MIXLOC_VAL; struct MELT_OBJECT_STRUCT(5) dobj_426__MIXLOC_VAL; struct MELT_MULTIPLE_STRUCT(3) dtup_427__MIXLOC_VAL; struct MELT_MULTIPLE_STRUCT(1) dtup_428__MIXLOC_VAL; struct MELT_OBJECT_STRUCT(2) dobj_429; struct MELT_STRING_STRUCT(30) dstr_430__melt_val_mixloc; struct MELT_STRING_STRUCT(3) dstr_431__; struct MELT_STRING_STRUCT(10) dstr_432__MIXLOC_VAL; struct MELT_OBJECT_STRUCT(3) dsym_433__MIXLOC_LOCATION; struct MELT_STRING_STRUCT(15) dstr_434__MIXLOC_LOCATION; struct MELT_OBJECT_STRUCT(5) dobj_435__MIXLOC_LOCATION; struct MELT_MULTIPLE_STRUCT(3) dtup_436__MIXLOC_LOCATION; struct MELT_MULTIPLE_STRUCT(1) dtup_437__MIXLOC_LOCATION; struct MELT_OBJECT_STRUCT(2) dobj_438; struct MELT_STRING_STRUCT(42) dstr_439__long_melt_loc; struct MELT_STRING_STRUCT(3) dstr_440__; struct MELT_STRING_STRUCT(15) dstr_441__MIXLOC_LOCATION; struct MELT_OBJECT_STRUCT(3) dsym_442__MIXLOC_LOCLINE; struct MELT_STRING_STRUCT(14) dstr_443__MIXLOC_LOCLINE; struct MELT_OBJECT_STRUCT(5) dobj_444__MIXLOC_LOCLINE; struct MELT_MULTIPLE_STRUCT(3) dtup_445__MIXLOC_LOCLINE; struct MELT_MULTIPLE_STRUCT(1) dtup_446__MIXLOC_LOCLINE; struct MELT_OBJECT_STRUCT(2) dobj_447; struct MELT_STRING_STRUCT(48) dstr_448__LOCATION_LINE_m; struct MELT_STRING_STRUCT(3) dstr_449__; struct MELT_STRING_STRUCT(14) dstr_450__MIXLOC_LOCLINE; struct MELT_OBJECT_STRUCT(3) dsym_451__MIXLOC_LOCFILE; struct MELT_STRING_STRUCT(14) dstr_452__MIXLOC_LOCFILE; struct MELT_OBJECT_STRUCT(5) dobj_453__MIXLOC_LOCFILE; struct MELT_MULTIPLE_STRUCT(3) dtup_454__MIXLOC_LOCFILE; struct MELT_MULTIPLE_STRUCT(1) dtup_455__MIXLOC_LOCFILE; struct MELT_OBJECT_STRUCT(2) dobj_456; struct MELT_STRING_STRUCT(48) dstr_457__LOCATION_FILE_m; struct MELT_STRING_STRUCT(3) dstr_458__; struct MELT_STRING_STRUCT(14) dstr_459__MIXLOC_LOCFILE; struct MELT_OBJECT_STRUCT(3) dsym_460__MAKE_MIXLOC; struct MELT_STRING_STRUCT(11) dstr_461__MAKE_MIXLOC; struct MELT_OBJECT_STRUCT(5) dobj_462__MAKE_MIXLOC; struct MELT_MULTIPLE_STRUCT(9) dtup_463__MAKE_MIXLOC; struct MELT_MULTIPLE_STRUCT(4) dtup_464__MAKE_MIXLOC; struct MELT_OBJECT_STRUCT(2) dobj_465; struct MELT_OBJECT_STRUCT(2) dobj_466; struct MELT_OBJECT_STRUCT(2) dobj_467; struct MELT_OBJECT_STRUCT(3) dsym_468__LOC; struct MELT_STRING_STRUCT(3) dstr_469__LOC; struct MELT_OBJECT_STRUCT(2) dobj_470; struct MELT_STRING_STRUCT(38) dstr_471__meltgc_new_mixl; struct MELT_STRING_STRUCT(16) dstr_472__melt_ptr_t_; struct MELT_STRING_STRUCT(14) dstr_473__; struct MELT_STRING_STRUCT(16) dstr_474__location_t_; struct MELT_STRING_STRUCT(3) dstr_475__; struct MELT_STRING_STRUCT(11) dstr_476__MAKE_MIXLOC; struct MELT_OBJECT_STRUCT(3) dsym_477__IS_MIXBIGINT; struct MELT_STRING_STRUCT(12) dstr_478__IS_MIXBIGINT; struct MELT_OBJECT_STRUCT(5) dobj_479__IS_MIXBIGINT; struct MELT_MULTIPLE_STRUCT(3) dtup_480__IS_MIXBIGINT; struct MELT_MULTIPLE_STRUCT(1) dtup_481__IS_MIXBIGINT; struct MELT_OBJECT_STRUCT(3) dsym_482__MB; struct MELT_STRING_STRUCT(2) dstr_483__MB; struct MELT_OBJECT_STRUCT(2) dobj_484; struct MELT_STRING_STRUCT(31) dstr_485__melt_magic_disc; struct MELT_STRING_STRUCT(22) dstr_486__OBMAG_MIXB; struct MELT_STRING_STRUCT(12) dstr_487__IS_MIXBIGINT; struct MELT_OBJECT_STRUCT(3) dsym_488__MIXBIGINT_VAL; struct MELT_STRING_STRUCT(13) dstr_489__MIXBIGINT_VAL; struct MELT_OBJECT_STRUCT(5) dobj_490__MIXBIGINT_VAL; struct MELT_MULTIPLE_STRUCT(3) dtup_491__MIXBIGINT_VAL; struct MELT_MULTIPLE_STRUCT(1) dtup_492__MIXBIGINT_VAL; struct MELT_OBJECT_STRUCT(2) dobj_493; struct MELT_STRING_STRUCT(19) dstr_494__melt_val_mixbigi; struct MELT_STRING_STRUCT(1) dstr_495__; struct MELT_STRING_STRUCT(13) dstr_496__MIXBIGINT_VAL; struct MELT_OBJECT_STRUCT(3) dsym_497__PPSTRBUF_MIXBIGINT; struct MELT_STRING_STRUCT(18) dstr_498__PPSTRBUF_MIXBIGI; struct MELT_OBJECT_STRUCT(5) dobj_499__PPSTRBUF_MIXBIGINT; struct MELT_MULTIPLE_STRUCT(7) dtup_500__PPSTRBUF_MIXBIGINT; struct MELT_MULTIPLE_STRUCT(3) dtup_501__PPSTRBUF_MIXBIGINT; struct MELT_OBJECT_STRUCT(2) dobj_502; struct MELT_OBJECT_STRUCT(3) dsym_503__INDENT; struct MELT_STRING_STRUCT(6) dstr_504__INDENT; struct MELT_OBJECT_STRUCT(2) dobj_505; struct MELT_OBJECT_STRUCT(2) dobj_506; struct MELT_STRING_STRUCT(26) dstr_507__meltgc_ppstrbuf_; struct MELT_STRING_STRUCT(1) dstr_508__; struct MELT_STRING_STRUCT(1) dstr_509__; struct MELT_STRING_STRUCT(2) dstr_510__; struct MELT_STRING_STRUCT(18) dstr_511__PPSTRBUF_MIXBIGI; struct MELT_OBJECT_STRUCT(3) dsym_512__READ_FILE; struct MELT_STRING_STRUCT(9) dstr_513__READ_FILE; struct MELT_OBJECT_STRUCT(5) dobj_514__READ_FILE; struct MELT_MULTIPLE_STRUCT(3) dtup_515__READ_FILE; struct MELT_MULTIPLE_STRUCT(1) dtup_516__READ_FILE; struct MELT_OBJECT_STRUCT(3) dsym_517__FILNAM; struct MELT_STRING_STRUCT(6) dstr_518__FILNAM; struct MELT_OBJECT_STRUCT(2) dobj_519; struct MELT_STRING_STRUCT(48) dstr_520__meltgc_read_fil; struct MELT_STRING_STRUCT(14) dstr_521__char_0_; struct MELT_STRING_STRUCT(9) dstr_522__READ_FILE; struct MELT_OBJECT_STRUCT(3) dsym_523__ERROR_STRV; struct MELT_STRING_STRUCT(10) dstr_524__ERROR_STRV; struct MELT_OBJECT_STRUCT(5) dobj_525__ERROR_STRV; struct MELT_MULTIPLE_STRUCT(7) dtup_526__ERROR_STRV; struct MELT_MULTIPLE_STRUCT(3) dtup_527__ERROR_STRV; struct MELT_OBJECT_STRUCT(2) dobj_528; struct MELT_OBJECT_STRUCT(3) dsym_529__CMSG; struct MELT_STRING_STRUCT(4) dstr_530__CMSG; struct MELT_OBJECT_STRUCT(2) dobj_531; struct MELT_OBJECT_STRUCT(3) dsym_532__STRV; struct MELT_STRING_STRUCT(4) dstr_533__STRV; struct MELT_OBJECT_STRUCT(2) dobj_534; struct MELT_STRING_STRUCT(28) dstr_535__melt_error_str_; struct MELT_STRING_STRUCT(4) dstr_536__; struct MELT_STRING_STRUCT(16) dstr_537__melt_ptr_t_; struct MELT_STRING_STRUCT(2) dstr_538__; struct MELT_STRING_STRUCT(10) dstr_539__ERROR_STRV; struct MELT_OBJECT_STRUCT(3) dsym_540__ERROR_PLAIN; struct MELT_STRING_STRUCT(11) dstr_541__ERROR_PLAIN; struct MELT_OBJECT_STRUCT(5) dobj_542__ERROR_PLAIN; struct MELT_MULTIPLE_STRUCT(5) dtup_543__ERROR_PLAIN; struct MELT_MULTIPLE_STRUCT(2) dtup_544__ERROR_PLAIN; struct MELT_OBJECT_STRUCT(2) dobj_545; struct MELT_OBJECT_STRUCT(2) dobj_546; struct MELT_STRING_STRUCT(28) dstr_547__melt_error_str_; struct MELT_STRING_STRUCT(4) dstr_548__; struct MELT_STRING_STRUCT(17) dstr_549__melt_ptr_t_0; struct MELT_STRING_STRUCT(11) dstr_550__ERROR_PLAIN; struct MELT_OBJECT_STRUCT(3) dsym_551__WARNING_STRV; struct MELT_STRING_STRUCT(12) dstr_552__WARNING_STRV; struct MELT_OBJECT_STRUCT(5) dobj_553__WARNING_STRV; struct MELT_MULTIPLE_STRUCT(7) dtup_554__WARNING_STRV; struct MELT_MULTIPLE_STRUCT(3) dtup_555__WARNING_STRV; struct MELT_OBJECT_STRUCT(2) dobj_556; struct MELT_OBJECT_STRUCT(2) dobj_557; struct MELT_OBJECT_STRUCT(2) dobj_558; struct MELT_STRING_STRUCT(33) dstr_559__melt_warning_str; struct MELT_STRING_STRUCT(4) dstr_560__; struct MELT_STRING_STRUCT(16) dstr_561__melt_ptr_t_; struct MELT_STRING_STRUCT(2) dstr_562__; struct MELT_STRING_STRUCT(12) dstr_563__WARNING_STRV; struct MELT_OBJECT_STRUCT(3) dsym_564__WARNING_PLAIN; struct MELT_STRING_STRUCT(13) dstr_565__WARNING_PLAIN; struct MELT_OBJECT_STRUCT(5) dobj_566__WARNING_PLAIN; struct MELT_MULTIPLE_STRUCT(5) dtup_567__WARNING_PLAIN; struct MELT_MULTIPLE_STRUCT(2) dtup_568__WARNING_PLAIN; struct MELT_OBJECT_STRUCT(2) dobj_569; struct MELT_OBJECT_STRUCT(2) dobj_570; struct MELT_STRING_STRUCT(33) dstr_571__melt_warning_str; struct MELT_STRING_STRUCT(4) dstr_572__; struct MELT_STRING_STRUCT(17) dstr_573__melt_ptr_t_0; struct MELT_STRING_STRUCT(13) dstr_574__WARNING_PLAIN; struct MELT_OBJECT_STRUCT(3) dsym_575__WARNINGMSG_PLAIN; struct MELT_STRING_STRUCT(16) dstr_576__WARNINGMSG_PLAIN; struct MELT_OBJECT_STRUCT(5) dobj_577__WARNINGMSG_PLAIN; struct MELT_MULTIPLE_STRUCT(3) dtup_578__WARNINGMSG_PLAIN; struct MELT_MULTIPLE_STRUCT(1) dtup_579__WARNINGMSG_PLAIN; struct MELT_OBJECT_STRUCT(2) dobj_580; struct MELT_STRING_STRUCT(62) dstr_581__warning_0_MELT; struct MELT_STRING_STRUCT(2) dstr_582__; struct MELT_STRING_STRUCT(16) dstr_583__WARNINGMSG_PLAIN; struct MELT_OBJECT_STRUCT(3) dsym_584__ERRORMSG_PLAIN; struct MELT_STRING_STRUCT(14) dstr_585__ERRORMSG_PLAIN; struct MELT_OBJECT_STRUCT(5) dobj_586__ERRORMSG_PLAIN; struct MELT_MULTIPLE_STRUCT(3) dtup_587__ERRORMSG_PLAIN; struct MELT_MULTIPLE_STRUCT(1) dtup_588__ERRORMSG_PLAIN; struct MELT_OBJECT_STRUCT(2) dobj_589; struct MELT_STRING_STRUCT(56) dstr_590__error_MELT_ERR; struct MELT_STRING_STRUCT(2) dstr_591__; struct MELT_STRING_STRUCT(14) dstr_592__ERRORMSG_PLAIN; struct MELT_OBJECT_STRUCT(3) dsym_593__ERRORMSG_STRV; struct MELT_STRING_STRUCT(13) dstr_594__ERRORMSG_STRV; struct MELT_OBJECT_STRUCT(5) dobj_595__ERRORMSG_STRV; struct MELT_MULTIPLE_STRUCT(5) dtup_596__ERRORMSG_STRV; struct MELT_MULTIPLE_STRUCT(2) dtup_597__ERRORMSG_STRV; struct MELT_OBJECT_STRUCT(2) dobj_598; struct MELT_OBJECT_STRUCT(2) dobj_599; struct MELT_STRING_STRUCT(60) dstr_600__error_MELT_ERRO; struct MELT_STRING_STRUCT(35) dstr_601__melt_strin; struct MELT_STRING_STRUCT(3) dstr_602__; struct MELT_STRING_STRUCT(13) dstr_603__ERRORMSG_STRV; struct MELT_OBJECT_STRUCT(3) dsym_604__INFORM_STRV; struct MELT_STRING_STRUCT(11) dstr_605__INFORM_STRV; struct MELT_OBJECT_STRUCT(5) dobj_606__INFORM_STRV; struct MELT_MULTIPLE_STRUCT(7) dtup_607__INFORM_STRV; struct MELT_MULTIPLE_STRUCT(3) dtup_608__INFORM_STRV; struct MELT_OBJECT_STRUCT(2) dobj_609; struct MELT_OBJECT_STRUCT(2) dobj_610; struct MELT_OBJECT_STRUCT(2) dobj_611; struct MELT_STRING_STRUCT(29) dstr_612__melt_inform_str_; struct MELT_STRING_STRUCT(4) dstr_613__; struct MELT_STRING_STRUCT(16) dstr_614__melt_ptr_t_; struct MELT_STRING_STRUCT(2) dstr_615__; struct MELT_STRING_STRUCT(11) dstr_616__INFORM_STRV; struct MELT_OBJECT_STRUCT(3) dsym_617__INFORM_PLAIN; struct MELT_STRING_STRUCT(12) dstr_618__INFORM_PLAIN; struct MELT_OBJECT_STRUCT(5) dobj_619__INFORM_PLAIN; struct MELT_MULTIPLE_STRUCT(5) dtup_620__INFORM_PLAIN; struct MELT_MULTIPLE_STRUCT(2) dtup_621__INFORM_PLAIN; struct MELT_OBJECT_STRUCT(2) dobj_622; struct MELT_OBJECT_STRUCT(2) dobj_623; struct MELT_STRING_STRUCT(29) dstr_624__melt_inform_str_; struct MELT_STRING_STRUCT(4) dstr_625__; struct MELT_STRING_STRUCT(17) dstr_626__melt_ptr_t_0; struct MELT_STRING_STRUCT(12) dstr_627__INFORM_PLAIN; struct MELT_OBJECT_STRUCT(3) dsym_628__INFORMSG_PLAIN; struct MELT_STRING_STRUCT(14) dstr_629__INFORMSG_PLAIN; struct MELT_OBJECT_STRUCT(5) dobj_630__INFORMSG_PLAIN; struct MELT_MULTIPLE_STRUCT(3) dtup_631__INFORMSG_PLAIN; struct MELT_MULTIPLE_STRUCT(1) dtup_632__INFORMSG_PLAIN; struct MELT_OBJECT_STRUCT(2) dobj_633; struct MELT_STRING_STRUCT(70) dstr_634__inform_UNKNOWN_L; struct MELT_STRING_STRUCT(2) dstr_635__; struct MELT_STRING_STRUCT(14) dstr_636__INFORMSG_PLAIN; struct MELT_OBJECT_STRUCT(7) dobj_637__FOREACH_LONG_UPTO; struct MELT_STRING_STRUCT(17) dstr_638__FOREACH_LONG_UPT; struct MELT_OBJECT_STRUCT(3) dsym_639__IMIN; struct MELT_STRING_STRUCT(4) dstr_640__IMIN; struct MELT_OBJECT_STRUCT(2) dobj_641; struct MELT_OBJECT_STRUCT(3) dsym_642__IMAX; struct MELT_STRING_STRUCT(4) dstr_643__IMAX; struct MELT_OBJECT_STRUCT(2) dobj_644; struct MELT_MULTIPLE_STRUCT(2) dtup_645__FOREACH_LONG_UPTO; struct MELT_OBJECT_STRUCT(3) dsym_646__EACHLONG; struct MELT_STRING_STRUCT(8) dstr_647__EACHLONG; struct MELT_OBJECT_STRUCT(2) dobj_648; struct MELT_MULTIPLE_STRUCT(1) dtup_649__FOREACH_LONG_UPTO; struct MELT_STRING_STRUCT(8) dstr_650__start_; struct MELT_STRING_STRUCT(13) dstr_651__long_; struct MELT_STRING_STRUCT(8) dstr_652__min_; struct MELT_STRING_STRUCT(11) dstr_653__long_; struct MELT_STRING_STRUCT(7) dstr_654__max_; struct MELT_STRING_STRUCT(11) dstr_655__long_; struct MELT_STRING_STRUCT(19) dstr_656__cur_0_fo; struct MELT_STRING_STRUCT(7) dstr_657__cur_; struct MELT_STRING_STRUCT(15) dstr_658__min_; struct MELT_STRING_STRUCT(8) dstr_659__cur_; struct MELT_STRING_STRUCT(8) dstr_660__max_; struct MELT_STRING_STRUCT(16) dstr_661__cur_; struct MELT_STRING_STRUCT(3) dstr_662__; struct MELT_STRING_STRUCT(11) dstr_663__cur_; struct MELT_MULTIPLE_STRUCT(27) dtup_664__FOREACH_LONG_UPTO; struct MELT_STRING_STRUCT(20) dstr_665__end_eachlon; struct MELT_MULTIPLE_STRUCT(1) dtup_666__FOREACH_LONG_UPTO; struct MELT_OBJECT_STRUCT(9) dobj_667__SOME_INTEGER_MULTIPLE; struct MELT_STRING_STRUCT(21) dstr_668__SOME_INTEGER_MUL; struct MELT_OBJECT_STRUCT(3) dsym_669__N; struct MELT_STRING_STRUCT(1) dstr_670__N; struct MELT_OBJECT_STRUCT(2) dobj_671; struct MELT_MULTIPLE_STRUCT(1) dtup_672__SOME_INTEGER_MULTIPLE; struct MELT_OBJECT_STRUCT(2) dobj_673; struct MELT_OBJECT_STRUCT(3) dsym_674__Q; struct MELT_STRING_STRUCT(1) dstr_675__Q; struct MELT_OBJECT_STRUCT(2) dobj_676; struct MELT_MULTIPLE_STRUCT(1) dtup_677__SOME_INTEGER_MULTIPLE; struct MELT_OBJECT_STRUCT(3) dsym_678__INTMULT; struct MELT_STRING_STRUCT(7) dstr_679__INTMULT; struct MELT_STRING_STRUCT(3) dstr_680__; struct MELT_STRING_STRUCT(6) dstr_681__; struct MELT_STRING_STRUCT(8) dstr_682__0_; struct MELT_STRING_STRUCT(5) dstr_683__; struct MELT_STRING_STRUCT(7) dstr_684__0_; struct MELT_MULTIPLE_STRUCT(9) dtup_685__SOME_INTEGER_MULTIPLE; struct MELT_STRING_STRUCT(3) dstr_686__; struct MELT_STRING_STRUCT(5) dstr_687__; struct MELT_STRING_STRUCT(4) dstr_688__; struct MELT_STRING_STRUCT(5) dstr_689__; struct MELT_STRING_STRUCT(3) dstr_690__; struct MELT_MULTIPLE_STRUCT(9) dtup_691__SOME_INTEGER_MULTIPLE; struct MELT_OBJECT_STRUCT(9) dobj_692__SOME_INTEGER_GREATER_THAN; struct MELT_STRING_STRUCT(25) dstr_693__SOME_INTEGER_GRE; struct MELT_OBJECT_STRUCT(2) dobj_694; struct MELT_MULTIPLE_STRUCT(1) dtup_695__SOME_INTEGER_GREATER_THAN; struct MELT_OBJECT_STRUCT(2) dobj_696; struct MELT_MULTIPLE_STRUCT(0) dtup_697__SOME_INTEGER_GREATER_THAN; struct MELT_OBJECT_STRUCT(3) dsym_698__INTGREATHAN; struct MELT_STRING_STRUCT(11) dstr_699__INTGREATHAN; struct MELT_STRING_STRUCT(3) dstr_700__; struct MELT_STRING_STRUCT(6) dstr_701__; struct MELT_STRING_STRUCT(3) dstr_702__; struct MELT_STRING_STRUCT(2) dstr_703__; struct MELT_MULTIPLE_STRUCT(7) dtup_704__SOME_INTEGER_GREATER_THAN; struct MELT_OBJECT_STRUCT(3) dsym_705__OUTNEWLINE_ERR; struct MELT_STRING_STRUCT(14) dstr_706__OUTNEWLINE_ERR; struct MELT_OBJECT_STRUCT(5) dobj_707__OUTNEWLINE_ERR; struct MELT_MULTIPLE_STRUCT(1) dtup_708__OUTNEWLINE_ERR; struct MELT_MULTIPLE_STRUCT(0) dtup_709__OUTNEWLINE_ERR; struct MELT_STRING_STRUCT(25) dstr_710__melt_newlineflus; struct MELT_STRING_STRUCT(14) dstr_711__OUTNEWLINE_ERR; struct MELT_OBJECT_STRUCT(3) dsym_712__OUTSTR_ERR; struct MELT_STRING_STRUCT(10) dstr_713__OUTSTR_ERR; struct MELT_OBJECT_STRUCT(5) dobj_714__OUTSTR_ERR; struct MELT_MULTIPLE_STRUCT(3) dtup_715__OUTSTR_ERR; struct MELT_MULTIPLE_STRUCT(1) dtup_716__OUTSTR_ERR; struct MELT_OBJECT_STRUCT(2) dobj_717; struct MELT_STRING_STRUCT(33) dstr_718__melt_putstr_stde; struct MELT_STRING_STRUCT(2) dstr_719__; struct MELT_STRING_STRUCT(10) dstr_720__OUTSTR_ERR; struct MELT_OBJECT_STRUCT(3) dsym_721__MESSAGE_DBG; struct MELT_STRING_STRUCT(11) dstr_722__MESSAGE_DBG; struct MELT_OBJECT_STRUCT(5) dobj_723__MESSAGE_DBG; struct MELT_MULTIPLE_STRUCT(3) dtup_724__MESSAGE_DBG; struct MELT_MULTIPLE_STRUCT(1) dtup_725__MESSAGE_DBG; struct MELT_OBJECT_STRUCT(2) dobj_726; struct MELT_STRING_STRUCT(12) dstr_727__debugeputs_; struct MELT_STRING_STRUCT(2) dstr_728__; struct MELT_STRING_STRUCT(11) dstr_729__MESSAGE_DBG; struct MELT_OBJECT_STRUCT(3) dsym_730__MESSAGENUM_DBG; struct MELT_STRING_STRUCT(14) dstr_731__MESSAGENUM_DBG; struct MELT_OBJECT_STRUCT(5) dobj_732__MESSAGENUM_DBG; struct MELT_MULTIPLE_STRUCT(5) dtup_733__MESSAGENUM_DBG; struct MELT_MULTIPLE_STRUCT(2) dtup_734__MESSAGENUM_DBG; struct MELT_OBJECT_STRUCT(2) dobj_735; struct MELT_OBJECT_STRUCT(2) dobj_736; struct MELT_STRING_STRUCT(10) dstr_737__debugnum_; struct MELT_STRING_STRUCT(4) dstr_738__; struct MELT_STRING_STRUCT(2) dstr_739__; struct MELT_STRING_STRUCT(14) dstr_740__MESSAGENUM_DBG; struct MELT_OBJECT_STRUCT(3) dsym_741__MESSAGEVAL_DBG; struct MELT_STRING_STRUCT(14) dstr_742__MESSAGEVAL_DBG; struct MELT_OBJECT_STRUCT(5) dobj_743__MESSAGEVAL_DBG; struct MELT_MULTIPLE_STRUCT(5) dtup_744__MESSAGEVAL_DBG; struct MELT_MULTIPLE_STRUCT(2) dtup_745__MESSAGEVAL_DBG; struct MELT_OBJECT_STRUCT(2) dobj_746; struct MELT_OBJECT_STRUCT(2) dobj_747; struct MELT_STRING_STRUCT(12) dstr_748__debugvalue_; struct MELT_STRING_STRUCT(12) dstr_749__void_; struct MELT_STRING_STRUCT(3) dstr_750__; struct MELT_STRING_STRUCT(14) dstr_751__MESSAGEVAL_DBG; struct MELT_OBJECT_STRUCT(3) dsym_752__LONGBACKTRACE_DBG; struct MELT_STRING_STRUCT(17) dstr_753__LONGBACKTRACE_DB; struct MELT_OBJECT_STRUCT(5) dobj_754__LONGBACKTRACE_DBG; struct MELT_MULTIPLE_STRUCT(3) dtup_755__LONGBACKTRACE_DBG; struct MELT_MULTIPLE_STRUCT(2) dtup_756__LONGBACKTRACE_DBG; struct MELT_OBJECT_STRUCT(2) dobj_757; struct MELT_OBJECT_STRUCT(3) dsym_758__MAXDEPTH; struct MELT_STRING_STRUCT(8) dstr_759__MAXDEPTH; struct MELT_OBJECT_STRUCT(2) dobj_760; struct MELT_STRING_STRUCT(16) dstr_761__debugbacktrace_; struct MELT_STRING_STRUCT(19) dstr_762__int_maxdept; struct MELT_STRING_STRUCT(17) dstr_763__LONGBACKTRACE_DB; struct MELT_OBJECT_STRUCT(3) dsym_764__CHECKVAL_DBG; struct MELT_STRING_STRUCT(12) dstr_765__CHECKVAL_DBG; struct MELT_OBJECT_STRUCT(5) dobj_766__CHECKVAL_DBG; struct MELT_MULTIPLE_STRUCT(5) dtup_767__CHECKVAL_DBG; struct MELT_MULTIPLE_STRUCT(2) dtup_768__CHECKVAL_DBG; struct MELT_OBJECT_STRUCT(2) dobj_769; struct MELT_OBJECT_STRUCT(2) dobj_770; struct MELT_STRING_STRUCT(25) dstr_771__melt_checked_ass; struct MELT_STRING_STRUCT(3) dstr_772__; struct MELT_STRING_STRUCT(2) dstr_773__; struct MELT_STRING_STRUCT(12) dstr_774__CHECKVAL_DBG; struct MELT_OBJECT_STRUCT(3) dsym_775__DEBUGCSTRING; struct MELT_STRING_STRUCT(12) dstr_776__DEBUGCSTRING; struct MELT_OBJECT_STRUCT(5) dobj_777__DEBUGCSTRING; struct MELT_MULTIPLE_STRUCT(5) dtup_778__DEBUGCSTRING; struct MELT_MULTIPLE_STRUCT(2) dtup_779__DEBUGCSTRING; struct MELT_OBJECT_STRUCT(2) dobj_780; struct MELT_OBJECT_STRUCT(2) dobj_781; struct MELT_STRING_STRUCT(37) dstr_782__debugeprintf_de; struct MELT_STRING_STRUCT(2) dstr_783__; struct MELT_STRING_STRUCT(1) dstr_784__; struct MELT_STRING_STRUCT(12) dstr_785__DEBUGCSTRING; struct MELT_OBJECT_STRUCT(3) dsym_786__MAKE_STRBUF; struct MELT_STRING_STRUCT(11) dstr_787__MAKE_STRBUF; struct MELT_OBJECT_STRUCT(5) dobj_788__MAKE_STRBUF; struct MELT_MULTIPLE_STRUCT(3) dtup_789__MAKE_STRBUF; struct MELT_MULTIPLE_STRUCT(1) dtup_790__MAKE_STRBUF; struct MELT_OBJECT_STRUCT(2) dobj_791; struct MELT_STRING_STRUCT(37) dstr_792__meltgc_new_strbu; struct MELT_STRING_STRUCT(12) dstr_793__char_0_; struct MELT_STRING_STRUCT(11) dstr_794__MAKE_STRBUF; struct MELT_OBJECT_STRUCT(3) dsym_795__STRBUF_USEDLENGTH; struct MELT_STRING_STRUCT(17) dstr_796__STRBUF_USEDLENGT; struct MELT_OBJECT_STRUCT(5) dobj_797__STRBUF_USEDLENGTH; struct MELT_MULTIPLE_STRUCT(3) dtup_798__STRBUF_USEDLENGTH; struct MELT_MULTIPLE_STRUCT(1) dtup_799__STRBUF_USEDLENGTH; struct MELT_OBJECT_STRUCT(2) dobj_800; struct MELT_STRING_STRUCT(36) dstr_801__melt_strbuf_used; struct MELT_STRING_STRUCT(2) dstr_802__; struct MELT_STRING_STRUCT(17) dstr_803__STRBUF_USEDLENGT; struct MELT_OBJECT_STRUCT(3) dsym_804__IS_STRBUF; struct MELT_STRING_STRUCT(9) dstr_805__IS_STRBUF; struct MELT_OBJECT_STRUCT(5) dobj_806__IS_STRBUF; struct MELT_MULTIPLE_STRUCT(3) dtup_807__IS_STRBUF; struct MELT_MULTIPLE_STRUCT(1) dtup_808__IS_STRBUF; struct MELT_OBJECT_STRUCT(2) dobj_809; struct MELT_STRING_STRUCT(31) dstr_810__melt_magic_disc; struct MELT_STRING_STRUCT(19) dstr_811__OBMAG_STRB; struct MELT_STRING_STRUCT(9) dstr_812__IS_STRBUF; struct MELT_OBJECT_STRUCT(3) dsym_813__MAKE_STRING; struct MELT_STRING_STRUCT(11) dstr_814__MAKE_STRING; struct MELT_OBJECT_STRUCT(5) dobj_815__MAKE_STRING; struct MELT_MULTIPLE_STRUCT(5) dtup_816__MAKE_STRING; struct MELT_MULTIPLE_STRUCT(2) dtup_817__MAKE_STRING; struct MELT_OBJECT_STRUCT(2) dobj_818; struct MELT_OBJECT_STRUCT(2) dobj_819; struct MELT_STRING_STRUCT(41) dstr_820__meltgc_new_stri; struct MELT_STRING_STRUCT(38) dstr_821__melt_st; struct MELT_STRING_STRUCT(4) dstr_822__; struct MELT_STRING_STRUCT(11) dstr_823__MAKE_STRING; struct MELT_OBJECT_STRUCT(3) dsym_824__IS_STRINGCONST; struct MELT_STRING_STRUCT(14) dstr_825__IS_STRINGCONST; struct MELT_OBJECT_STRUCT(5) dobj_826__IS_STRINGCONST; struct MELT_MULTIPLE_STRUCT(5) dtup_827__IS_STRINGCONST; struct MELT_MULTIPLE_STRUCT(2) dtup_828__IS_STRINGCONST; struct MELT_OBJECT_STRUCT(2) dobj_829; struct MELT_OBJECT_STRUCT(3) dsym_830__CS; struct MELT_STRING_STRUCT(2) dstr_831__CS; struct MELT_OBJECT_STRUCT(2) dobj_832; struct MELT_STRING_STRUCT(35) dstr_833__melt_is_string_; struct MELT_STRING_STRUCT(4) dstr_834__; struct MELT_STRING_STRUCT(3) dstr_835__; struct MELT_STRING_STRUCT(14) dstr_836__IS_STRINGCONST; struct MELT_OBJECT_STRUCT(3) dsym_837__STRING_LENGTH; struct MELT_STRING_STRUCT(13) dstr_838__STRING_LENGTH; struct MELT_OBJECT_STRUCT(5) dobj_839__STRING_LENGTH; struct MELT_MULTIPLE_STRUCT(3) dtup_840__STRING_LENGTH; struct MELT_MULTIPLE_STRUCT(1) dtup_841__STRING_LENGTH; struct MELT_OBJECT_STRUCT(2) dobj_842; struct MELT_STRING_STRUCT(32) dstr_843__melt_string_leng; struct MELT_STRING_STRUCT(2) dstr_844__; struct MELT_STRING_STRUCT(13) dstr_845__STRING_LENGTH; struct MELT_OBJECT_STRUCT(3) dsym_846__STRING_; struct MELT_STRING_STRUCT(7) dstr_847__STRING_; struct MELT_OBJECT_STRUCT(5) dobj_848__STRING_; struct MELT_MULTIPLE_STRUCT(5) dtup_849__STRING_; struct MELT_MULTIPLE_STRUCT(2) dtup_850__STRING_; struct MELT_OBJECT_STRUCT(3) dsym_851__S1; struct MELT_STRING_STRUCT(2) dstr_852__S1; struct MELT_OBJECT_STRUCT(2) dobj_853; struct MELT_OBJECT_STRUCT(3) dsym_854__S2; struct MELT_STRING_STRUCT(2) dstr_855__S2; struct MELT_OBJECT_STRUCT(2) dobj_856; struct MELT_STRING_STRUCT(18) dstr_857__melt_string_same; struct MELT_STRING_STRUCT(4) dstr_858__; struct MELT_STRING_STRUCT(2) dstr_859__; struct MELT_STRING_STRUCT(7) dstr_860__STRING_; struct MELT_OBJECT_STRUCT(3) dsym_861__SPLIT_STRING_SPACE; struct MELT_STRING_STRUCT(18) dstr_862__SPLIT_STRING_SPA; struct MELT_OBJECT_STRUCT(5) dobj_863__SPLIT_STRING_SPACE; struct MELT_MULTIPLE_STRUCT(5) dtup_864__SPLIT_STRING_SPACE; struct MELT_MULTIPLE_STRUCT(2) dtup_865__SPLIT_STRING_SPACE; struct MELT_OBJECT_STRUCT(2) dobj_866; struct MELT_OBJECT_STRUCT(2) dobj_867; struct MELT_STRING_STRUCT(24) dstr_868__meltgc_new_split; struct MELT_STRING_STRUCT(20) dstr_869__melt_ptr; struct MELT_STRING_STRUCT(1) dstr_870__; struct MELT_STRING_STRUCT(18) dstr_871__SPLIT_STRING_SPA; struct MELT_OBJECT_STRUCT(3) dsym_872__SPLIT_STRING_COMMA; struct MELT_STRING_STRUCT(18) dstr_873__SPLIT_STRING_COM; struct MELT_OBJECT_STRUCT(5) dobj_874__SPLIT_STRING_COMMA; struct MELT_MULTIPLE_STRUCT(5) dtup_875__SPLIT_STRING_COMMA; struct MELT_MULTIPLE_STRUCT(2) dtup_876__SPLIT_STRING_COMMA; struct MELT_OBJECT_STRUCT(2) dobj_877; struct MELT_OBJECT_STRUCT(2) dobj_878; struct MELT_STRING_STRUCT(24) dstr_879__meltgc_new_split; struct MELT_STRING_STRUCT(20) dstr_880__melt_ptr; struct MELT_STRING_STRUCT(1) dstr_881__; struct MELT_STRING_STRUCT(18) dstr_882__SPLIT_STRING_COM; struct MELT_OBJECT_STRUCT(3) dsym_883__SPLIT_STRING_COLON; struct MELT_STRING_STRUCT(18) dstr_884__SPLIT_STRING_COL; struct MELT_OBJECT_STRUCT(5) dobj_885__SPLIT_STRING_COLON; struct MELT_MULTIPLE_STRUCT(5) dtup_886__SPLIT_STRING_COLON; struct MELT_MULTIPLE_STRUCT(2) dtup_887__SPLIT_STRING_COLON; struct MELT_OBJECT_STRUCT(2) dobj_888; struct MELT_OBJECT_STRUCT(2) dobj_889; struct MELT_STRING_STRUCT(24) dstr_890__meltgc_new_split; struct MELT_STRING_STRUCT(19) dstr_891__melt_ptr; struct MELT_STRING_STRUCT(1) dstr_892__; struct MELT_STRING_STRUCT(18) dstr_893__SPLIT_STRING_COL; struct MELT_OBJECT_STRUCT(3) dsym_894__STRBUF2STRING; struct MELT_STRING_STRUCT(13) dstr_895__STRBUF2STRING; struct MELT_OBJECT_STRUCT(5) dobj_896__STRBUF2STRING; struct MELT_MULTIPLE_STRUCT(5) dtup_897__STRBUF2STRING; struct MELT_MULTIPLE_STRUCT(2) dtup_898__STRBUF2STRING; struct MELT_OBJECT_STRUCT(2) dobj_899; struct MELT_OBJECT_STRUCT(2) dobj_900; struct MELT_STRING_STRUCT(41) dstr_901__meltgc_new_stri; struct MELT_STRING_STRUCT(32) dstr_902__melt_strbuf_s; struct MELT_STRING_STRUCT(4) dstr_903__; struct MELT_STRING_STRUCT(13) dstr_904__STRBUF2STRING; struct MELT_OBJECT_STRUCT(3) dsym_905__MAKE_STRING_NAKEDBASENAME; struct MELT_STRING_STRUCT(25) dstr_906__MAKE_STRING_NAKE; struct MELT_OBJECT_STRUCT(5) dobj_907__MAKE_STRING_NAKEDBASENAME; struct MELT_MULTIPLE_STRUCT(5) dtup_908__MAKE_STRING_NAKEDBASENAME; struct MELT_MULTIPLE_STRUCT(2) dtup_909__MAKE_STRING_NAKEDBASENAME; struct MELT_OBJECT_STRUCT(2) dobj_910; struct MELT_OBJECT_STRUCT(2) dobj_911; struct MELT_STRING_STRUCT(52) dstr_912__meltgc_new_stri; struct MELT_STRING_STRUCT(32) dstr_913__melt_string_s; struct MELT_STRING_STRUCT(4) dstr_914__; struct MELT_STRING_STRUCT(25) dstr_915__MAKE_STRING_NAKE; struct MELT_OBJECT_STRUCT(3) dsym_916__MAKE_STRING_TEMPNAME_SUFFIXED; struct MELT_STRING_STRUCT(29) dstr_917__MAKE_STRING_TEMP; struct MELT_OBJECT_STRUCT(5) dobj_918__MAKE_STRING_TEMPNAME_SUFFIXED; struct MELT_MULTIPLE_STRUCT(7) dtup_919__MAKE_STRING_TEMPNAME_SUFFIXED; struct MELT_MULTIPLE_STRUCT(3) dtup_920__MAKE_STRING_TEMPNAME_SUFFIXED; struct MELT_OBJECT_STRUCT(2) dobj_921; struct MELT_OBJECT_STRUCT(2) dobj_922; struct MELT_OBJECT_STRUCT(3) dsym_923__SUFF; struct MELT_STRING_STRUCT(4) dstr_924__SUFF; struct MELT_OBJECT_STRUCT(2) dobj_925; struct MELT_STRING_STRUCT(56) dstr_926__meltgc_new_stri; struct MELT_STRING_STRUCT(39) dstr_927__melt_s; struct MELT_STRING_STRUCT(12) dstr_928__; struct MELT_STRING_STRUCT(3) dstr_929__; struct MELT_STRING_STRUCT(29) dstr_930__MAKE_STRING_TEMP; struct MELT_OBJECT_STRUCT(3) dsym_931__LOAD_MELT_MODULE; struct MELT_STRING_STRUCT(16) dstr_932__LOAD_MELT_MODULE; struct MELT_OBJECT_STRUCT(5) dobj_933__LOAD_MELT_MODULE; struct MELT_MULTIPLE_STRUCT(5) dtup_934__LOAD_MELT_MODULE; struct MELT_MULTIPLE_STRUCT(2) dtup_935__LOAD_MELT_MODULE; struct MELT_OBJECT_STRUCT(3) dsym_936__ENV; struct MELT_STRING_STRUCT(3) dstr_937__ENV; struct MELT_OBJECT_STRUCT(2) dobj_938; struct MELT_OBJECT_STRUCT(2) dobj_939; struct MELT_STRING_STRUCT(38) dstr_940__meltgc_load_mel; struct MELT_STRING_STRUCT(34) dstr_941__melt_string; struct MELT_STRING_STRUCT(4) dstr_942__; struct MELT_STRING_STRUCT(16) dstr_943__LOAD_MELT_MODULE; struct MELT_OBJECT_STRUCT(3) dsym_944__GENERATE_MELT_MODULE; struct MELT_STRING_STRUCT(20) dstr_945__GENERATE_MELT_MO; struct MELT_OBJECT_STRUCT(5) dobj_946__GENERATE_MELT_MODULE; struct MELT_MULTIPLE_STRUCT(5) dtup_947__GENERATE_MELT_MODULE; struct MELT_MULTIPLE_STRUCT(2) dtup_948__GENERATE_MELT_MODULE; struct MELT_OBJECT_STRUCT(3) dsym_949__SRC; struct MELT_STRING_STRUCT(3) dstr_950__SRC; struct MELT_OBJECT_STRUCT(2) dobj_951; struct MELT_OBJECT_STRUCT(3) dsym_952__OUTNAM; struct MELT_STRING_STRUCT(6) dstr_953__OUTNAM; struct MELT_OBJECT_STRUCT(2) dobj_954; struct MELT_STRING_STRUCT(28) dstr_955__meltgc_generate_; struct MELT_STRING_STRUCT(1) dstr_956__; struct MELT_STRING_STRUCT(2) dstr_957__; struct MELT_STRING_STRUCT(20) dstr_958__GENERATE_MELT_MO; struct MELT_OBJECT_STRUCT(3) dsym_959__OBJECT_LENGTH; struct MELT_STRING_STRUCT(13) dstr_960__OBJECT_LENGTH; struct MELT_OBJECT_STRUCT(5) dobj_961__OBJECT_LENGTH; struct MELT_MULTIPLE_STRUCT(3) dtup_962__OBJECT_LENGTH; struct MELT_MULTIPLE_STRUCT(1) dtup_963__OBJECT_LENGTH; struct MELT_OBJECT_STRUCT(3) dsym_964__OB; struct MELT_STRING_STRUCT(2) dstr_965__OB; struct MELT_OBJECT_STRUCT(2) dobj_966; struct MELT_STRING_STRUCT(39) dstr_967__long_melt_obje; struct MELT_STRING_STRUCT(3) dstr_968__; struct MELT_STRING_STRUCT(13) dstr_969__OBJECT_LENGTH; struct MELT_OBJECT_STRUCT(3) dsym_970__OBJECT_NTH_FIELD; struct MELT_STRING_STRUCT(16) dstr_971__OBJECT_NTH_FIELD; struct MELT_OBJECT_STRUCT(5) dobj_972__OBJECT_NTH_FIELD; struct MELT_MULTIPLE_STRUCT(5) dtup_973__OBJECT_NTH_FIELD; struct MELT_MULTIPLE_STRUCT(2) dtup_974__OBJECT_NTH_FIELD; struct MELT_OBJECT_STRUCT(2) dobj_975; struct MELT_OBJECT_STRUCT(2) dobj_976; struct MELT_STRING_STRUCT(32) dstr_977__melt_field_obje; struct MELT_STRING_STRUCT(4) dstr_978__; struct MELT_STRING_STRUCT(3) dstr_979__; struct MELT_STRING_STRUCT(16) dstr_980__OBJECT_NTH_FIELD; struct MELT_OBJECT_STRUCT(3) dsym_981__SUBCLASS_OF; struct MELT_STRING_STRUCT(11) dstr_982__SUBCLASS_OF; struct MELT_OBJECT_STRUCT(5) dobj_983__SUBCLASS_OF; struct MELT_MULTIPLE_STRUCT(5) dtup_984__SUBCLASS_OF; struct MELT_MULTIPLE_STRUCT(2) dtup_985__SUBCLASS_OF; struct MELT_OBJECT_STRUCT(3) dsym_986__CL1; struct MELT_STRING_STRUCT(3) dstr_987__CL1; struct MELT_OBJECT_STRUCT(2) dobj_988; struct MELT_OBJECT_STRUCT(3) dsym_989__CL2; struct MELT_STRING_STRUCT(3) dstr_990__CL2; struct MELT_OBJECT_STRUCT(2) dobj_991; struct MELT_STRING_STRUCT(39) dstr_992__melt_is_subclass; struct MELT_STRING_STRUCT(22) dstr_993__meltobject_p; struct MELT_STRING_STRUCT(2) dstr_994__; struct MELT_STRING_STRUCT(11) dstr_995__SUBCLASS_OF; struct MELT_OBJECT_STRUCT(3) dsym_996__SUBCLASS_OR_EQ; struct MELT_STRING_STRUCT(14) dstr_997__SUBCLASS_OR_EQ; struct MELT_OBJECT_STRUCT(5) dobj_998__SUBCLASS_OR_EQ; struct MELT_MULTIPLE_STRUCT(9) dtup_999__SUBCLASS_OR_EQ; struct MELT_MULTIPLE_STRUCT(2) dtup_1000__SUBCLASS_OR_EQ; struct MELT_OBJECT_STRUCT(2) dobj_1001; struct MELT_OBJECT_STRUCT(2) dobj_1002; struct MELT_STRING_STRUCT(2) dstr_1003__; struct MELT_STRING_STRUCT(4) dstr_1004__; struct MELT_STRING_STRUCT(44) dstr_1005__melt_is_sub; struct MELT_STRING_STRUCT(22) dstr_1006__meltobject_p; struct MELT_STRING_STRUCT(3) dstr_1007__; struct MELT_STRING_STRUCT(14) dstr_1008__SUBCLASS_OR_EQ; struct MELT_OBJECT_STRUCT(3) dsym_1009__IS_MULTIPLE_OR_NULL; struct MELT_STRING_STRUCT(19) dstr_1010__IS_MULTIPLE_OR_N; struct MELT_OBJECT_STRUCT(5) dobj_1011__IS_MULTIPLE_OR_NULL; struct MELT_MULTIPLE_STRUCT(5) dtup_1012__IS_MULTIPLE_OR_NULL; struct MELT_MULTIPLE_STRUCT(1) dtup_1013__IS_MULTIPLE_OR_NULL; struct MELT_OBJECT_STRUCT(3) dsym_1014__MUL; struct MELT_STRING_STRUCT(3) dstr_1015__MUL; struct MELT_OBJECT_STRUCT(2) dobj_1016; struct MELT_STRING_STRUCT(2) dstr_1017__; struct MELT_STRING_STRUCT(51) dstr_1018__NULL_me; struct MELT_STRING_STRUCT(22) dstr_1019__OBMAG_MULT; struct MELT_STRING_STRUCT(19) dstr_1020__IS_MULTIPLE_OR_N; struct MELT_OBJECT_STRUCT(3) dsym_1021__SUBSEQ_MULTIPLE; struct MELT_STRING_STRUCT(15) dstr_1022__SUBSEQ_MULTIPLE; struct MELT_OBJECT_STRUCT(5) dobj_1023__SUBSEQ_MULTIPLE; struct MELT_MULTIPLE_STRUCT(7) dtup_1024__SUBSEQ_MULTIPLE; struct MELT_MULTIPLE_STRUCT(3) dtup_1025__SUBSEQ_MULTIPLE; struct MELT_OBJECT_STRUCT(2) dobj_1026; struct MELT_OBJECT_STRUCT(3) dsym_1027__STARTIX; struct MELT_STRING_STRUCT(7) dstr_1028__STARTIX; struct MELT_OBJECT_STRUCT(2) dobj_1029; struct MELT_OBJECT_STRUCT(3) dsym_1030__ENDIX; struct MELT_STRING_STRUCT(5) dstr_1031__ENDIX; struct MELT_OBJECT_STRUCT(2) dobj_1032; struct MELT_STRING_STRUCT(41) dstr_1033__meltgc_new_subs; struct MELT_STRING_STRUCT(15) dstr_1034__int_; struct MELT_STRING_STRUCT(9) dstr_1035__int_; struct MELT_STRING_STRUCT(3) dstr_1036__; struct MELT_STRING_STRUCT(15) dstr_1037__SUBSEQ_MULTIPLE; struct MELT_OBJECT_STRUCT(9) dobj_1038__TUPLE_NTH; struct MELT_STRING_STRUCT(9) dstr_1039__TUPLE_NTH; struct MELT_OBJECT_STRUCT(3) dsym_1040__MATCHEDRK; struct MELT_STRING_STRUCT(9) dstr_1041__MATCHEDRK; struct MELT_OBJECT_STRUCT(2) dobj_1042; struct MELT_MULTIPLE_STRUCT(1) dtup_1043__TUPLE_NTH; struct MELT_OBJECT_STRUCT(3) dsym_1044__MATCHEDTUP; struct MELT_STRING_STRUCT(10) dstr_1045__MATCHEDTUP; struct MELT_OBJECT_STRUCT(2) dobj_1046; struct MELT_OBJECT_STRUCT(3) dsym_1047__OUTCOMP; struct MELT_STRING_STRUCT(7) dstr_1048__OUTCOMP; struct MELT_OBJECT_STRUCT(2) dobj_1049; struct MELT_MULTIPLE_STRUCT(1) dtup_1050__TUPLE_NTH; struct MELT_OBJECT_STRUCT(3) dsym_1051__TUPNTH; struct MELT_STRING_STRUCT(6) dstr_1052__TUPNTH; struct MELT_STRING_STRUCT(2) dstr_1053__; struct MELT_STRING_STRUCT(45) dstr_1054__melt_is_mu; struct MELT_STRING_STRUCT(12) dstr_1055__1_int_; struct MELT_STRING_STRUCT(3) dstr_1056__; struct MELT_MULTIPLE_STRUCT(7) dtup_1057__TUPLE_NTH; struct MELT_STRING_STRUCT(2) dstr_1058__; struct MELT_STRING_STRUCT(5) dstr_1059__; struct MELT_STRING_STRUCT(34) dstr_1060__melt_multiple; struct MELT_STRING_STRUCT(8) dstr_1061__int_; struct MELT_STRING_STRUCT(7) dstr_1062__; struct MELT_MULTIPLE_STRUCT(9) dtup_1063__TUPLE_NTH; struct MELT_OBJECT_STRUCT(9) dobj_1064__TUPLE_SIZED; struct MELT_STRING_STRUCT(11) dstr_1065__TUPLE_SIZED; struct MELT_OBJECT_STRUCT(3) dsym_1066__LN; struct MELT_STRING_STRUCT(2) dstr_1067__LN; struct MELT_OBJECT_STRUCT(2) dobj_1068; struct MELT_MULTIPLE_STRUCT(1) dtup_1069__TUPLE_SIZED; struct MELT_OBJECT_STRUCT(3) dsym_1070__TUP; struct MELT_STRING_STRUCT(3) dstr_1071__TUP; struct MELT_OBJECT_STRUCT(2) dobj_1072; struct MELT_MULTIPLE_STRUCT(0) dtup_1073__TUPLE_SIZED; struct MELT_OBJECT_STRUCT(3) dsym_1074__TUPSIZ; struct MELT_STRING_STRUCT(6) dstr_1075__TUPSIZ; struct MELT_STRING_STRUCT(41) dstr_1076__melt_is_multipl; struct MELT_STRING_STRUCT(10) dstr_1077__int_; struct MELT_STRING_STRUCT(3) dstr_1078__; struct MELT_MULTIPLE_STRUCT(5) dtup_1079__TUPLE_SIZED; struct MELT_ROUTINE_STRUCT(7) drout_1080__COMPARE_NAMED_ALPHA; struct MELT_CLOSURE_STRUCT(0) dclo_1081__COMPARE_NAMED_ALPHA; struct meltint_st dint_1082__; struct MELT_OBJECT_STRUCT(3) dsym_1083__CLASS_NAMED; struct MELT_STRING_STRUCT(11) dstr_1084__CLASS_NAMED; struct meltint_st dint_1085__; struct meltint_st dint_1086__; struct meltint_st dint_1087__; struct meltint_st dint_1088__; struct meltint_st dint_1089__; struct MELT_OBJECT_STRUCT(3) dsym_1090__IS_OUT; struct MELT_STRING_STRUCT(6) dstr_1091__IS_OUT; struct MELT_OBJECT_STRUCT(5) dobj_1092__IS_OUT; struct MELT_MULTIPLE_STRUCT(3) dtup_1093__IS_OUT; struct MELT_MULTIPLE_STRUCT(1) dtup_1094__IS_OUT; struct MELT_OBJECT_STRUCT(2) dobj_1095; struct MELT_STRING_STRUCT(28) dstr_1096__melt_is_out_; struct MELT_STRING_STRUCT(3) dstr_1097__; struct MELT_STRING_STRUCT(6) dstr_1098__IS_OUT; struct MELT_OBJECT_STRUCT(3) dsym_1099__ADD2SBUF_STRCONST; struct MELT_STRING_STRUCT(17) dstr_1100__ADD2SBUF_STRCONS; struct MELT_OBJECT_STRUCT(5) dobj_1101__ADD2SBUF_STRCONST; struct MELT_MULTIPLE_STRUCT(5) dtup_1102__ADD2SBUF_STRCONST; struct MELT_MULTIPLE_STRUCT(2) dtup_1103__ADD2SBUF_STRCONST; struct MELT_OBJECT_STRUCT(2) dobj_1104; struct MELT_OBJECT_STRUCT(2) dobj_1105; struct MELT_STRING_STRUCT(31) dstr_1106__meltgc_add_strbu; struct MELT_STRING_STRUCT(4) dstr_1107__; struct MELT_STRING_STRUCT(2) dstr_1108__; struct MELT_STRING_STRUCT(17) dstr_1109__ADD2SBUF_STRCONS; struct MELT_OBJECT_STRUCT(3) dsym_1110__ADD2SBUF_STRING; struct MELT_STRING_STRUCT(15) dstr_1111__ADD2SBUF_STRING; struct MELT_OBJECT_STRUCT(5) dobj_1112__ADD2SBUF_STRING; struct MELT_MULTIPLE_STRUCT(5) dtup_1113__ADD2SBUF_STRING; struct MELT_MULTIPLE_STRUCT(2) dtup_1114__ADD2SBUF_STRING; struct MELT_OBJECT_STRUCT(2) dobj_1115; struct MELT_OBJECT_STRUCT(2) dobj_1116; struct MELT_STRING_STRUCT(31) dstr_1117__meltgc_add_strbu; struct MELT_STRING_STRUCT(32) dstr_1118__melt_string_s; struct MELT_STRING_STRUCT(3) dstr_1119__; struct MELT_STRING_STRUCT(15) dstr_1120__ADD2SBUF_STRING; struct MELT_OBJECT_STRUCT(3) dsym_1121__ADD2SBUF_MIXLOC; struct MELT_STRING_STRUCT(15) dstr_1122__ADD2SBUF_MIXLOC; struct MELT_OBJECT_STRUCT(5) dobj_1123__ADD2SBUF_MIXLOC; struct MELT_MULTIPLE_STRUCT(7) dtup_1124__ADD2SBUF_MIXLOC; struct MELT_MULTIPLE_STRUCT(2) dtup_1125__ADD2SBUF_MIXLOC; struct MELT_OBJECT_STRUCT(2) dobj_1126; struct MELT_OBJECT_STRUCT(3) dsym_1127__MIXL; struct MELT_STRING_STRUCT(4) dstr_1128__MIXL; struct MELT_OBJECT_STRUCT(2) dobj_1129; struct MELT_STRING_STRUCT(53) dstr_1130__add2sbufmixloc; struct MELT_STRING_STRUCT(101) dstr_1131__OBMAG_MIXL; struct MELT_STRING_STRUCT(222) dstr_1132__memset_s; struct MELT_STRING_STRUCT(41) dstr_1133__smallbuf_; struct MELT_STRING_STRUCT(15) dstr_1134__ADD2SBUF_MIXLOC; struct MELT_OBJECT_STRUCT(3) dsym_1135__ADD2SBUF_SHORT_MIXLOC; struct MELT_STRING_STRUCT(21) dstr_1136__ADD2SBUF_SHORT_M; struct MELT_OBJECT_STRUCT(5) dobj_1137__ADD2SBUF_SHORT_MIXLOC; struct MELT_MULTIPLE_STRUCT(7) dtup_1138__ADD2SBUF_SHORT_MIXLOC; struct MELT_MULTIPLE_STRUCT(2) dtup_1139__ADD2SBUF_SHORT_MIXLOC; struct MELT_OBJECT_STRUCT(2) dobj_1140; struct MELT_OBJECT_STRUCT(2) dobj_1141; struct MELT_STRING_STRUCT(59) dstr_1142__add2sbufshortm; struct MELT_STRING_STRUCT(74) dstr_1143__OBMAG_MIXL; struct MELT_STRING_STRUCT(39) dstr_1144__meltgc_strb; struct MELT_STRING_STRUCT(145) dstr_1145__s_d_d_; struct MELT_STRING_STRUCT(21) dstr_1146__ADD2SBUF_SHORT_M; struct MELT_OBJECT_STRUCT(3) dsym_1147__ADD2SBUF_TEXI_MIXLOC; struct MELT_STRING_STRUCT(20) dstr_1148__ADD2SBUF_TEXI_MI; struct MELT_OBJECT_STRUCT(5) dobj_1149__ADD2SBUF_TEXI_MIXLOC; struct MELT_MULTIPLE_STRUCT(7) dtup_1150__ADD2SBUF_TEXI_MIXLOC; struct MELT_MULTIPLE_STRUCT(2) dtup_1151__ADD2SBUF_TEXI_MIXLOC; struct MELT_OBJECT_STRUCT(2) dobj_1152; struct MELT_OBJECT_STRUCT(2) dobj_1153; struct MELT_STRING_STRUCT(57) dstr_1154__add2sbufteximi; struct MELT_STRING_STRUCT(74) dstr_1155__OBMAG_MIXL; struct MELT_STRING_STRUCT(39) dstr_1156__meltgc_strb; struct MELT_STRING_STRUCT(136) dstr_1157__file_file_; struct MELT_STRING_STRUCT(20) dstr_1158__ADD2SBUF_TEXI_MI; struct MELT_OBJECT_STRUCT(3) dsym_1159__ADD2SBUF_INDENT; struct MELT_STRING_STRUCT(15) dstr_1160__ADD2SBUF_INDENT; struct MELT_OBJECT_STRUCT(5) dobj_1161__ADD2SBUF_INDENT; struct MELT_MULTIPLE_STRUCT(5) dtup_1162__ADD2SBUF_INDENT; struct MELT_MULTIPLE_STRUCT(2) dtup_1163__ADD2SBUF_INDENT; struct MELT_OBJECT_STRUCT(2) dobj_1164; struct MELT_OBJECT_STRUCT(3) dsym_1165__DEPTH; struct MELT_STRING_STRUCT(5) dstr_1166__DEPTH; struct MELT_OBJECT_STRUCT(2) dobj_1167; struct MELT_STRING_STRUCT(38) dstr_1168__meltgc_strbuf_ad; struct MELT_STRING_STRUCT(4) dstr_1169__; struct MELT_STRING_STRUCT(6) dstr_1170__64_; struct MELT_STRING_STRUCT(15) dstr_1171__ADD2SBUF_INDENT; struct MELT_OBJECT_STRUCT(3) dsym_1172__ADD2SBUF_INDENTNL; struct MELT_STRING_STRUCT(17) dstr_1173__ADD2SBUF_INDENTN; struct MELT_OBJECT_STRUCT(5) dobj_1174__ADD2SBUF_INDENTNL; struct MELT_MULTIPLE_STRUCT(5) dtup_1175__ADD2SBUF_INDENTNL; struct MELT_MULTIPLE_STRUCT(2) dtup_1176__ADD2SBUF_INDENTNL; struct MELT_OBJECT_STRUCT(2) dobj_1177; struct MELT_OBJECT_STRUCT(2) dobj_1178; struct MELT_STRING_STRUCT(38) dstr_1179__meltgc_strbuf_ad; struct MELT_STRING_STRUCT(4) dstr_1180__; struct MELT_STRING_STRUCT(5) dstr_1181__0_; struct MELT_STRING_STRUCT(17) dstr_1182__ADD2SBUF_INDENTN; struct MELT_OBJECT_STRUCT(3) dsym_1183__ADD2SBUF_SBUF; struct MELT_STRING_STRUCT(13) dstr_1184__ADD2SBUF_SBUF; struct MELT_OBJECT_STRUCT(5) dobj_1185__ADD2SBUF_SBUF; struct MELT_MULTIPLE_STRUCT(5) dtup_1186__ADD2SBUF_SBUF; struct MELT_MULTIPLE_STRUCT(2) dtup_1187__ADD2SBUF_SBUF; struct MELT_OBJECT_STRUCT(2) dobj_1188; struct MELT_OBJECT_STRUCT(3) dsym_1189__ASBUF; struct MELT_STRING_STRUCT(5) dstr_1190__ASBUF; struct MELT_OBJECT_STRUCT(2) dobj_1191; struct MELT_STRING_STRUCT(31) dstr_1192__meltgc_add_strbu; struct MELT_STRING_STRUCT(19) dstr_1193__melt_strbuf_s; struct MELT_STRING_STRUCT(2) dstr_1194__; struct MELT_STRING_STRUCT(13) dstr_1195__ADD2SBUF_SBUF; struct MELT_OBJECT_STRUCT(3) dsym_1196__ADD2SBUF_CENCSTRING; struct MELT_STRING_STRUCT(19) dstr_1197__ADD2SBUF_CENCSTR; struct MELT_OBJECT_STRUCT(5) dobj_1198__ADD2SBUF_CENCSTRING; struct MELT_MULTIPLE_STRUCT(5) dtup_1199__ADD2SBUF_CENCSTRING; struct MELT_MULTIPLE_STRUCT(2) dtup_1200__ADD2SBUF_CENCSTRING; struct MELT_OBJECT_STRUCT(2) dobj_1201; struct MELT_OBJECT_STRUCT(2) dobj_1202; struct MELT_STRING_STRUCT(36) dstr_1203__meltgc_add_strbu; struct MELT_STRING_STRUCT(32) dstr_1204__melt_string_s; struct MELT_STRING_STRUCT(3) dstr_1205__; struct MELT_STRING_STRUCT(19) dstr_1206__ADD2SBUF_CENCSTR; struct MELT_OBJECT_STRUCT(3) dsym_1207__ADD2SBUF_CENCSTRBUF; struct MELT_STRING_STRUCT(19) dstr_1208__ADD2SBUF_CENCSTR; struct MELT_OBJECT_STRUCT(5) dobj_1209__ADD2SBUF_CENCSTRBUF; struct MELT_MULTIPLE_STRUCT(5) dtup_1210__ADD2SBUF_CENCSTRBUF; struct MELT_MULTIPLE_STRUCT(2) dtup_1211__ADD2SBUF_CENCSTRBUF; struct MELT_OBJECT_STRUCT(2) dobj_1212; struct MELT_OBJECT_STRUCT(2) dobj_1213; struct MELT_STRING_STRUCT(36) dstr_1214__meltgc_add_strbu; struct MELT_STRING_STRUCT(32) dstr_1215__melt_strbuf_s; struct MELT_STRING_STRUCT(3) dstr_1216__; struct MELT_STRING_STRUCT(19) dstr_1217__ADD2SBUF_CENCSTR; struct MELT_OBJECT_STRUCT(3) dsym_1218__ADD2SBUF_CCOMSTRING; struct MELT_STRING_STRUCT(19) dstr_1219__ADD2SBUF_CCOMSTR; struct MELT_OBJECT_STRUCT(5) dobj_1220__ADD2SBUF_CCOMSTRING; struct MELT_MULTIPLE_STRUCT(5) dtup_1221__ADD2SBUF_CCOMSTRING; struct MELT_MULTIPLE_STRUCT(2) dtup_1222__ADD2SBUF_CCOMSTRING; struct MELT_OBJECT_STRUCT(2) dobj_1223; struct MELT_OBJECT_STRUCT(2) dobj_1224; struct MELT_STRING_STRUCT(40) dstr_1225__meltgc_add_strbu; struct MELT_STRING_STRUCT(32) dstr_1226__melt_string_s; struct MELT_STRING_STRUCT(3) dstr_1227__; struct MELT_STRING_STRUCT(19) dstr_1228__ADD2SBUF_CCOMSTR; struct MELT_OBJECT_STRUCT(3) dsym_1229__ADD2SBUF_CCOMSTRBUF; struct MELT_STRING_STRUCT(19) dstr_1230__ADD2SBUF_CCOMSTR; struct MELT_OBJECT_STRUCT(5) dobj_1231__ADD2SBUF_CCOMSTRBUF; struct MELT_MULTIPLE_STRUCT(5) dtup_1232__ADD2SBUF_CCOMSTRBUF; struct MELT_MULTIPLE_STRUCT(2) dtup_1233__ADD2SBUF_CCOMSTRBUF; struct MELT_OBJECT_STRUCT(2) dobj_1234; struct MELT_OBJECT_STRUCT(2) dobj_1235; struct MELT_STRING_STRUCT(40) dstr_1236__meltgc_add_strbu; struct MELT_STRING_STRUCT(43) dstr_1237__me; struct MELT_STRING_STRUCT(3) dstr_1238__; struct MELT_STRING_STRUCT(19) dstr_1239__ADD2SBUF_CCOMSTR; struct MELT_OBJECT_STRUCT(3) dsym_1240__ADD2SBUF_CCOMCONST; struct MELT_STRING_STRUCT(18) dstr_1241__ADD2SBUF_CCOMCON; struct MELT_OBJECT_STRUCT(5) dobj_1242__ADD2SBUF_CCOMCONST; struct MELT_MULTIPLE_STRUCT(5) dtup_1243__ADD2SBUF_CCOMCONST; struct MELT_MULTIPLE_STRUCT(2) dtup_1244__ADD2SBUF_CCOMCONST; struct MELT_OBJECT_STRUCT(2) dobj_1245; struct MELT_OBJECT_STRUCT(3) dsym_1246__CSTR; struct MELT_STRING_STRUCT(4) dstr_1247__CSTR; struct MELT_OBJECT_STRUCT(2) dobj_1248; struct MELT_STRING_STRUCT(28) dstr_1249__meltgc_add_strbu; struct MELT_STRING_STRUCT(3) dstr_1250__; struct MELT_STRING_STRUCT(1) dstr_1251__; struct MELT_STRING_STRUCT(18) dstr_1252__ADD2SBUF_CCOMCON; struct MELT_OBJECT_STRUCT(3) dsym_1253__ADD2SBUF_CIDENT; struct MELT_STRING_STRUCT(15) dstr_1254__ADD2SBUF_CIDENT; struct MELT_OBJECT_STRUCT(5) dobj_1255__ADD2SBUF_CIDENT; struct MELT_MULTIPLE_STRUCT(5) dtup_1256__ADD2SBUF_CIDENT; struct MELT_MULTIPLE_STRUCT(2) dtup_1257__ADD2SBUF_CIDENT; struct MELT_OBJECT_STRUCT(2) dobj_1258; struct MELT_OBJECT_STRUCT(2) dobj_1259; struct MELT_STRING_STRUCT(38) dstr_1260__meltgc_add_strbu; struct MELT_STRING_STRUCT(34) dstr_1261__melt_string; struct MELT_STRING_STRUCT(3) dstr_1262__; struct MELT_STRING_STRUCT(15) dstr_1263__ADD2SBUF_CIDENT; struct MELT_OBJECT_STRUCT(3) dsym_1264__ADD2SBUF_CIDENTPREFIX; struct MELT_STRING_STRUCT(21) dstr_1265__ADD2SBUF_CIDENTP; struct MELT_OBJECT_STRUCT(5) dobj_1266__ADD2SBUF_CIDENTPREFIX; struct MELT_MULTIPLE_STRUCT(7) dtup_1267__ADD2SBUF_CIDENTPREFIX; struct MELT_MULTIPLE_STRUCT(3) dtup_1268__ADD2SBUF_CIDENTPREFIX; struct MELT_OBJECT_STRUCT(2) dobj_1269; struct MELT_OBJECT_STRUCT(2) dobj_1270; struct MELT_OBJECT_STRUCT(3) dsym_1271__PREFLEN; struct MELT_STRING_STRUCT(7) dstr_1272__PREFLEN; struct MELT_OBJECT_STRUCT(2) dobj_1273; struct MELT_STRING_STRUCT(44) dstr_1274__meltgc_add_strbu; struct MELT_STRING_STRUCT(32) dstr_1275__melt_string_s; struct MELT_STRING_STRUCT(5) dstr_1276__; struct MELT_STRING_STRUCT(2) dstr_1277__; struct MELT_STRING_STRUCT(21) dstr_1278__ADD2SBUF_CIDENTP; struct MELT_OBJECT_STRUCT(3) dsym_1279__ADD2SBUF_LONGDEC; struct MELT_STRING_STRUCT(16) dstr_1280__ADD2SBUF_LONGDEC; struct MELT_OBJECT_STRUCT(5) dobj_1281__ADD2SBUF_LONGDEC; struct MELT_MULTIPLE_STRUCT(5) dtup_1282__ADD2SBUF_LONGDEC; struct MELT_MULTIPLE_STRUCT(2) dtup_1283__ADD2SBUF_LONGDEC; struct MELT_OBJECT_STRUCT(2) dobj_1284; struct MELT_OBJECT_STRUCT(2) dobj_1285; struct MELT_STRING_STRUCT(35) dstr_1286__meltgc_add_strbu; struct MELT_STRING_STRUCT(4) dstr_1287__; struct MELT_STRING_STRUCT(2) dstr_1288__; struct MELT_STRING_STRUCT(16) dstr_1289__ADD2SBUF_LONGDEC; struct MELT_OBJECT_STRUCT(3) dsym_1290__ADD2SBUF_LONGHEX; struct MELT_STRING_STRUCT(16) dstr_1291__ADD2SBUF_LONGHEX; struct MELT_OBJECT_STRUCT(5) dobj_1292__ADD2SBUF_LONGHEX; struct MELT_MULTIPLE_STRUCT(5) dtup_1293__ADD2SBUF_LONGHEX; struct MELT_MULTIPLE_STRUCT(2) dtup_1294__ADD2SBUF_LONGHEX; struct MELT_OBJECT_STRUCT(2) dobj_1295; struct MELT_OBJECT_STRUCT(2) dobj_1296; struct MELT_STRING_STRUCT(35) dstr_1297__meltgc_add_strbu; struct MELT_STRING_STRUCT(4) dstr_1298__; struct MELT_STRING_STRUCT(2) dstr_1299__; struct MELT_STRING_STRUCT(16) dstr_1300__ADD2SBUF_LONGHEX; struct MELT_OBJECT_STRUCT(3) dsym_1301__ADD2SBUF_ROUTINEDESCR; struct MELT_STRING_STRUCT(21) dstr_1302__ADD2SBUF_ROUTINE; struct MELT_OBJECT_STRUCT(5) dobj_1303__ADD2SBUF_ROUTINEDESCR; struct MELT_MULTIPLE_STRUCT(5) dtup_1304__ADD2SBUF_ROUTINEDESCR; struct MELT_MULTIPLE_STRUCT(2) dtup_1305__ADD2SBUF_ROUTINEDESCR; struct MELT_OBJECT_STRUCT(2) dobj_1306; struct MELT_OBJECT_STRUCT(3) dsym_1307__ROUT; struct MELT_STRING_STRUCT(4) dstr_1308__ROUT; struct MELT_OBJECT_STRUCT(2) dobj_1309; struct MELT_STRING_STRUCT(31) dstr_1310__meltgc_add_strbu; struct MELT_STRING_STRUCT(38) dstr_1311__melt_routine_; struct MELT_STRING_STRUCT(3) dstr_1312__; struct MELT_STRING_STRUCT(21) dstr_1313__ADD2SBUF_ROUTINE; struct MELT_OBJECT_STRUCT(3) dsym_1314__OUTPUT_SBUF_STRCONST; struct MELT_STRING_STRUCT(20) dstr_1315__OUTPUT_SBUF_STRC; struct MELT_OBJECT_STRUCT(5) dobj_1316__OUTPUT_SBUF_STRCONST; struct MELT_MULTIPLE_STRUCT(5) dtup_1317__OUTPUT_SBUF_STRCONST; struct MELT_MULTIPLE_STRUCT(2) dtup_1318__OUTPUT_SBUF_STRCONST; struct MELT_OBJECT_STRUCT(2) dobj_1319; struct MELT_OBJECT_STRUCT(3) dsym_1320__NAM; struct MELT_STRING_STRUCT(3) dstr_1321__NAM; struct MELT_OBJECT_STRUCT(2) dobj_1322; struct MELT_STRING_STRUCT(29) dstr_1323__melt_output_str; struct MELT_STRING_STRUCT(4) dstr_1324__; struct MELT_STRING_STRUCT(3) dstr_1325__; struct MELT_STRING_STRUCT(20) dstr_1326__OUTPUT_SBUF_STRC; struct MELT_OBJECT_STRUCT(3) dsym_1327__OUTPUT_SBUF_STRVAL; struct MELT_STRING_STRUCT(18) dstr_1328__OUTPUT_SBUF_STRV; struct MELT_OBJECT_STRUCT(5) dobj_1329__OUTPUT_SBUF_STRVAL; struct MELT_MULTIPLE_STRUCT(5) dtup_1330__OUTPUT_SBUF_STRVAL; struct MELT_MULTIPLE_STRUCT(2) dtup_1331__OUTPUT_SBUF_STRVAL; struct MELT_OBJECT_STRUCT(2) dobj_1332; struct MELT_OBJECT_STRUCT(3) dsym_1333__VNAM; struct MELT_STRING_STRUCT(4) dstr_1334__VNAM; struct MELT_OBJECT_STRUCT(2) dobj_1335; struct MELT_STRING_STRUCT(29) dstr_1336__melt_output_str; struct MELT_STRING_STRUCT(19) dstr_1337__melt_string_s; struct MELT_STRING_STRUCT(3) dstr_1338__; struct MELT_STRING_STRUCT(18) dstr_1339__OUTPUT_SBUF_STRV; struct MELT_OBJECT_STRUCT(3) dsym_1340__ADD2OUT_STRCONST; struct MELT_STRING_STRUCT(16) dstr_1341__ADD2OUT_STRCONST; struct MELT_OBJECT_STRUCT(5) dobj_1342__ADD2OUT_STRCONST; struct MELT_MULTIPLE_STRUCT(5) dtup_1343__ADD2OUT_STRCONST; struct MELT_MULTIPLE_STRUCT(2) dtup_1344__ADD2OUT_STRCONST; struct MELT_OBJECT_STRUCT(3) dsym_1345__OUT; struct MELT_STRING_STRUCT(3) dstr_1346__OUT; struct MELT_OBJECT_STRUCT(2) dobj_1347; struct MELT_OBJECT_STRUCT(2) dobj_1348; struct MELT_STRING_STRUCT(28) dstr_1349__meltgc_add_out_; struct MELT_STRING_STRUCT(4) dstr_1350__; struct MELT_STRING_STRUCT(2) dstr_1351__; struct MELT_STRING_STRUCT(16) dstr_1352__ADD2OUT_STRCONST; struct MELT_OBJECT_STRUCT(3) dsym_1353__ADD2OUT_STRING; struct MELT_STRING_STRUCT(14) dstr_1354__ADD2OUT_STRING; struct MELT_OBJECT_STRUCT(5) dobj_1355__ADD2OUT_STRING; struct MELT_MULTIPLE_STRUCT(5) dtup_1356__ADD2OUT_STRING; struct MELT_MULTIPLE_STRUCT(2) dtup_1357__ADD2OUT_STRING; struct MELT_OBJECT_STRUCT(2) dobj_1358; struct MELT_OBJECT_STRUCT(2) dobj_1359; struct MELT_STRING_STRUCT(28) dstr_1360__meltgc_add_out_; struct MELT_STRING_STRUCT(32) dstr_1361__melt_string_s; struct MELT_STRING_STRUCT(3) dstr_1362__; struct MELT_STRING_STRUCT(14) dstr_1363__ADD2OUT_STRING; struct MELT_OBJECT_STRUCT(3) dsym_1364__ADD2OUT_MIXLOC; struct MELT_STRING_STRUCT(14) dstr_1365__ADD2OUT_MIXLOC; struct MELT_OBJECT_STRUCT(5) dobj_1366__ADD2OUT_MIXLOC; struct MELT_MULTIPLE_STRUCT(7) dtup_1367__ADD2OUT_MIXLOC; struct MELT_MULTIPLE_STRUCT(2) dtup_1368__ADD2OUT_MIXLOC; struct MELT_OBJECT_STRUCT(2) dobj_1369; struct MELT_OBJECT_STRUCT(2) dobj_1370; struct MELT_STRING_STRUCT(52) dstr_1371__add2outmixloc_; struct MELT_STRING_STRUCT(95) dstr_1372__OBMAG_MIXL; struct MELT_STRING_STRUCT(193) dstr_1373__memset_loc; struct MELT_STRING_STRUCT(37) dstr_1374__locbuf_; struct MELT_STRING_STRUCT(14) dstr_1375__ADD2OUT_MIXLOC; struct MELT_OBJECT_STRUCT(3) dsym_1376__ADD2OUT_INDENT; struct MELT_STRING_STRUCT(14) dstr_1377__ADD2OUT_INDENT; struct MELT_OBJECT_STRUCT(5) dobj_1378__ADD2OUT_INDENT; struct MELT_MULTIPLE_STRUCT(5) dtup_1379__ADD2OUT_INDENT; struct MELT_MULTIPLE_STRUCT(2) dtup_1380__ADD2OUT_INDENT; struct MELT_OBJECT_STRUCT(2) dobj_1381; struct MELT_OBJECT_STRUCT(2) dobj_1382; struct MELT_STRING_STRUCT(35) dstr_1383__meltgc_out_add_i; struct MELT_STRING_STRUCT(4) dstr_1384__; struct MELT_STRING_STRUCT(7) dstr_1385__64_; struct MELT_STRING_STRUCT(14) dstr_1386__ADD2OUT_INDENT; struct MELT_OBJECT_STRUCT(3) dsym_1387__ADD2OUT_INDENTNL; struct MELT_STRING_STRUCT(16) dstr_1388__ADD2OUT_INDENTNL; struct MELT_OBJECT_STRUCT(5) dobj_1389__ADD2OUT_INDENTNL; struct MELT_MULTIPLE_STRUCT(5) dtup_1390__ADD2OUT_INDENTNL; struct MELT_MULTIPLE_STRUCT(2) dtup_1391__ADD2OUT_INDENTNL; struct MELT_OBJECT_STRUCT(2) dobj_1392; struct MELT_OBJECT_STRUCT(2) dobj_1393; struct MELT_STRING_STRUCT(35) dstr_1394__meltgc_out_add_i; struct MELT_STRING_STRUCT(4) dstr_1395__; struct MELT_STRING_STRUCT(6) dstr_1396__0_; struct MELT_STRING_STRUCT(16) dstr_1397__ADD2OUT_INDENTNL; struct MELT_OBJECT_STRUCT(3) dsym_1398__ADD2OUT_SBUF; struct MELT_STRING_STRUCT(12) dstr_1399__ADD2OUT_SBUF; struct MELT_OBJECT_STRUCT(5) dobj_1400__ADD2OUT_SBUF; struct MELT_MULTIPLE_STRUCT(5) dtup_1401__ADD2OUT_SBUF; struct MELT_MULTIPLE_STRUCT(2) dtup_1402__ADD2OUT_SBUF; struct MELT_OBJECT_STRUCT(2) dobj_1403; struct MELT_OBJECT_STRUCT(2) dobj_1404; struct MELT_STRING_STRUCT(28) dstr_1405__meltgc_add_out_; struct MELT_STRING_STRUCT(16) dstr_1406__melt_out_str_; struct MELT_STRING_STRUCT(2) dstr_1407__; struct MELT_STRING_STRUCT(12) dstr_1408__ADD2OUT_SBUF; struct MELT_OBJECT_STRUCT(3) dsym_1409__ADD2OUT_CENCSTRING; struct MELT_STRING_STRUCT(18) dstr_1410__ADD2OUT_CENCSTRI; struct MELT_OBJECT_STRUCT(5) dobj_1411__ADD2OUT_CENCSTRING; struct MELT_MULTIPLE_STRUCT(5) dtup_1412__ADD2OUT_CENCSTRING; struct MELT_MULTIPLE_STRUCT(2) dtup_1413__ADD2OUT_CENCSTRING; struct MELT_OBJECT_STRUCT(2) dobj_1414; struct MELT_OBJECT_STRUCT(2) dobj_1415; struct MELT_STRING_STRUCT(33) dstr_1416__meltgc_add_out_c; struct MELT_STRING_STRUCT(32) dstr_1417__melt_string_s; struct MELT_STRING_STRUCT(3) dstr_1418__; struct MELT_STRING_STRUCT(18) dstr_1419__ADD2OUT_CENCSTRI; struct MELT_OBJECT_STRUCT(3) dsym_1420__ADD2OUT_CENCSTRBUF; struct MELT_STRING_STRUCT(18) dstr_1421__ADD2OUT_CENCSTRB; struct MELT_OBJECT_STRUCT(5) dobj_1422__ADD2OUT_CENCSTRBUF; struct MELT_MULTIPLE_STRUCT(5) dtup_1423__ADD2OUT_CENCSTRBUF; struct MELT_MULTIPLE_STRUCT(2) dtup_1424__ADD2OUT_CENCSTRBUF; struct MELT_OBJECT_STRUCT(2) dobj_1425; struct MELT_OBJECT_STRUCT(2) dobj_1426; struct MELT_STRING_STRUCT(33) dstr_1427__meltgc_add_out_c; struct MELT_STRING_STRUCT(29) dstr_1428__melt_out_str_; struct MELT_STRING_STRUCT(3) dstr_1429__; struct MELT_STRING_STRUCT(18) dstr_1430__ADD2OUT_CENCSTRB; struct MELT_OBJECT_STRUCT(3) dsym_1431__ADD2OUT_CCOMSTRING; struct MELT_STRING_STRUCT(18) dstr_1432__ADD2OUT_CCOMSTRI; struct MELT_OBJECT_STRUCT(5) dobj_1433__ADD2OUT_CCOMSTRING; struct MELT_MULTIPLE_STRUCT(5) dtup_1434__ADD2OUT_CCOMSTRING; struct MELT_MULTIPLE_STRUCT(2) dtup_1435__ADD2OUT_CCOMSTRING; struct MELT_OBJECT_STRUCT(2) dobj_1436; struct MELT_OBJECT_STRUCT(2) dobj_1437; struct MELT_STRING_STRUCT(37) dstr_1438__meltgc_add_out_c; struct MELT_STRING_STRUCT(32) dstr_1439__melt_string_s; struct MELT_STRING_STRUCT(3) dstr_1440__; struct MELT_STRING_STRUCT(18) dstr_1441__ADD2OUT_CCOMSTRI; struct MELT_OBJECT_STRUCT(3) dsym_1442__ADD2OUT_CCOMSTRBUF; struct MELT_STRING_STRUCT(18) dstr_1443__ADD2OUT_CCOMSTRB; struct MELT_OBJECT_STRUCT(5) dobj_1444__ADD2OUT_CCOMSTRBUF; struct MELT_MULTIPLE_STRUCT(5) dtup_1445__ADD2OUT_CCOMSTRBUF; struct MELT_MULTIPLE_STRUCT(2) dtup_1446__ADD2OUT_CCOMSTRBUF; struct MELT_OBJECT_STRUCT(2) dobj_1447; struct MELT_OBJECT_STRUCT(2) dobj_1448; struct MELT_STRING_STRUCT(37) dstr_1449__meltgc_add_out_c; struct MELT_STRING_STRUCT(29) dstr_1450__melt_out_str_; struct MELT_STRING_STRUCT(3) dstr_1451__; struct MELT_STRING_STRUCT(18) dstr_1452__ADD2OUT_CCOMSTRB; struct MELT_OBJECT_STRUCT(3) dsym_1453__ADD2OUT_CCOMCONST; struct MELT_STRING_STRUCT(17) dstr_1454__ADD2OUT_CCOMCONS; struct MELT_OBJECT_STRUCT(5) dobj_1455__ADD2OUT_CCOMCONST; struct MELT_MULTIPLE_STRUCT(5) dtup_1456__ADD2OUT_CCOMCONST; struct MELT_MULTIPLE_STRUCT(2) dtup_1457__ADD2OUT_CCOMCONST; struct MELT_OBJECT_STRUCT(2) dobj_1458; struct MELT_OBJECT_STRUCT(2) dobj_1459; struct MELT_STRING_STRUCT(25) dstr_1460__meltgc_add_out_c; struct MELT_STRING_STRUCT(3) dstr_1461__; struct MELT_STRING_STRUCT(1) dstr_1462__; struct MELT_STRING_STRUCT(17) dstr_1463__ADD2OUT_CCOMCONS; struct MELT_OBJECT_STRUCT(3) dsym_1464__ADD2OUT_CIDENT; struct MELT_STRING_STRUCT(14) dstr_1465__ADD2OUT_CIDENT; struct MELT_OBJECT_STRUCT(5) dobj_1466__ADD2OUT_CIDENT; struct MELT_MULTIPLE_STRUCT(5) dtup_1467__ADD2OUT_CIDENT; struct MELT_MULTIPLE_STRUCT(2) dtup_1468__ADD2OUT_CIDENT; struct MELT_OBJECT_STRUCT(2) dobj_1469; struct MELT_OBJECT_STRUCT(2) dobj_1470; struct MELT_STRING_STRUCT(35) dstr_1471__meltgc_add_out_c; struct MELT_STRING_STRUCT(38) dstr_1472__melt_st; struct MELT_STRING_STRUCT(3) dstr_1473__; struct MELT_STRING_STRUCT(14) dstr_1474__ADD2OUT_CIDENT; struct MELT_OBJECT_STRUCT(3) dsym_1475__ADD2OUT_CIDENTPREFIX; struct MELT_STRING_STRUCT(20) dstr_1476__ADD2OUT_CIDENTPR; struct MELT_OBJECT_STRUCT(5) dobj_1477__ADD2OUT_CIDENTPREFIX; struct MELT_MULTIPLE_STRUCT(7) dtup_1478__ADD2OUT_CIDENTPREFIX; struct MELT_MULTIPLE_STRUCT(3) dtup_1479__ADD2OUT_CIDENTPREFIX; struct MELT_OBJECT_STRUCT(2) dobj_1480; struct MELT_OBJECT_STRUCT(2) dobj_1481; struct MELT_OBJECT_STRUCT(2) dobj_1482; struct MELT_STRING_STRUCT(41) dstr_1483__meltgc_add_out_c; struct MELT_STRING_STRUCT(37) dstr_1484__melt_str; struct MELT_STRING_STRUCT(10) dstr_1485__; struct MELT_STRING_STRUCT(2) dstr_1486__; struct MELT_STRING_STRUCT(20) dstr_1487__ADD2OUT_CIDENTPR; struct MELT_OBJECT_STRUCT(3) dsym_1488__ADD2OUT_LONGDEC; struct MELT_STRING_STRUCT(15) dstr_1489__ADD2OUT_LONGDEC; struct MELT_OBJECT_STRUCT(5) dobj_1490__ADD2OUT_LONGDEC; struct MELT_MULTIPLE_STRUCT(5) dtup_1491__ADD2OUT_LONGDEC; struct MELT_MULTIPLE_STRUCT(2) dtup_1492__ADD2OUT_LONGDEC; struct MELT_OBJECT_STRUCT(2) dobj_1493; struct MELT_OBJECT_STRUCT(2) dobj_1494; struct MELT_STRING_STRUCT(32) dstr_1495__meltgc_add_out_d; struct MELT_STRING_STRUCT(4) dstr_1496__; struct MELT_STRING_STRUCT(2) dstr_1497__; struct MELT_STRING_STRUCT(15) dstr_1498__ADD2OUT_LONGDEC; struct MELT_OBJECT_STRUCT(3) dsym_1499__ADD2OUT_LONGHEX; struct MELT_STRING_STRUCT(15) dstr_1500__ADD2OUT_LONGHEX; struct MELT_OBJECT_STRUCT(5) dobj_1501__ADD2OUT_LONGHEX; struct MELT_MULTIPLE_STRUCT(5) dtup_1502__ADD2OUT_LONGHEX; struct MELT_MULTIPLE_STRUCT(2) dtup_1503__ADD2OUT_LONGHEX; struct MELT_OBJECT_STRUCT(2) dobj_1504; struct MELT_OBJECT_STRUCT(2) dobj_1505; struct MELT_STRING_STRUCT(32) dstr_1506__meltgc_add_out_h; struct MELT_STRING_STRUCT(4) dstr_1507__; struct MELT_STRING_STRUCT(2) dstr_1508__; struct MELT_STRING_STRUCT(15) dstr_1509__ADD2OUT_LONGHEX; struct MELT_OBJECT_STRUCT(3) dsym_1510__ADD2OUT_ROUTINEDESCR; struct MELT_STRING_STRUCT(20) dstr_1511__ADD2OUT_ROUTINED; struct MELT_OBJECT_STRUCT(5) dobj_1512__ADD2OUT_ROUTINEDESCR; struct MELT_MULTIPLE_STRUCT(5) dtup_1513__ADD2OUT_ROUTINEDESCR; struct MELT_MULTIPLE_STRUCT(2) dtup_1514__ADD2OUT_ROUTINEDESCR; struct MELT_OBJECT_STRUCT(2) dobj_1515; struct MELT_OBJECT_STRUCT(2) dobj_1516; struct MELT_STRING_STRUCT(28) dstr_1517__meltgc_add_out_; struct MELT_STRING_STRUCT(44) dstr_1518__melt_ro; struct MELT_STRING_STRUCT(3) dstr_1519__; struct MELT_STRING_STRUCT(20) dstr_1520__ADD2OUT_ROUTINED; struct MELT_OBJECT_STRUCT(9) dobj_1521__CSTRING_SAME; struct MELT_STRING_STRUCT(12) dstr_1522__CSTRING_SAME; struct MELT_OBJECT_STRUCT(2) dobj_1523; struct MELT_MULTIPLE_STRUCT(1) dtup_1524__CSTRING_SAME; struct MELT_OBJECT_STRUCT(2) dobj_1525; struct MELT_MULTIPLE_STRUCT(0) dtup_1526__CSTRING_SAME; struct MELT_OBJECT_STRUCT(3) dsym_1527__STRSAM; struct MELT_STRING_STRUCT(6) dstr_1528__STRSAM; struct MELT_STRING_STRUCT(2) dstr_1529__; struct MELT_STRING_STRUCT(9) dstr_1530__test_; struct MELT_STRING_STRUCT(4) dstr_1531__; struct MELT_STRING_STRUCT(12) dstr_1532__strcmp_; struct MELT_STRING_STRUCT(2) dstr_1533__; struct MELT_STRING_STRUCT(3) dstr_1534__; struct MELT_MULTIPLE_STRUCT(11) dtup_1535__CSTRING_SAME; struct MELT_OBJECT_STRUCT(3) dsym_1536__CSTRING_LENGTH; struct MELT_STRING_STRUCT(14) dstr_1537__CSTRING_LENGTH; struct MELT_OBJECT_STRUCT(5) dobj_1538__CSTRING_LENGTH; struct MELT_MULTIPLE_STRUCT(5) dtup_1539__CSTRING_LENGTH; struct MELT_MULTIPLE_STRUCT(1) dtup_1540__CSTRING_LENGTH; struct MELT_OBJECT_STRUCT(2) dobj_1541; struct MELT_STRING_STRUCT(2) dstr_1542__; struct MELT_STRING_STRUCT(9) dstr_1543__strlen_; struct MELT_STRING_STRUCT(4) dstr_1544__0_; struct MELT_STRING_STRUCT(14) dstr_1545__CSTRING_LENGTH; struct MELT_ROUTINE_STRUCT(0) drout_1546__MAPSTRING_EVERY; struct MELT_CLOSURE_STRUCT(0) dclo_1547__MAPSTRING_EVERY; struct MELT_ROUTINE_STRUCT(0) drout_1548__MAPSTRING_ITERATE_TEST; struct MELT_CLOSURE_STRUCT(0) dclo_1549__MAPSTRING_ITERATE_TEST; struct MELT_OBJECT_STRUCT(3) dsym_1550__MAPSTRING_SIZE; struct MELT_STRING_STRUCT(14) dstr_1551__MAPSTRING_SIZE; struct MELT_OBJECT_STRUCT(5) dobj_1552__MAPSTRING_SIZE; struct MELT_MULTIPLE_STRUCT(3) dtup_1553__MAPSTRING_SIZE; struct MELT_MULTIPLE_STRUCT(1) dtup_1554__MAPSTRING_SIZE; struct MELT_OBJECT_STRUCT(3) dsym_1555__MAP; struct MELT_STRING_STRUCT(3) dstr_1556__MAP; struct MELT_OBJECT_STRUCT(2) dobj_1557; struct MELT_STRING_STRUCT(50) dstr_1558__melt_size_mapst; struct MELT_STRING_STRUCT(3) dstr_1559__; struct MELT_STRING_STRUCT(14) dstr_1560__MAPSTRING_SIZE; struct MELT_OBJECT_STRUCT(3) dsym_1561__MAPSTRING_COUNT; struct MELT_STRING_STRUCT(15) dstr_1562__MAPSTRING_COUNT; struct MELT_OBJECT_STRUCT(5) dobj_1563__MAPSTRING_COUNT; struct MELT_MULTIPLE_STRUCT(3) dtup_1564__MAPSTRING_COUNT; struct MELT_MULTIPLE_STRUCT(1) dtup_1565__MAPSTRING_COUNT; struct MELT_OBJECT_STRUCT(2) dobj_1566; struct MELT_STRING_STRUCT(51) dstr_1567__melt_count_maps; struct MELT_STRING_STRUCT(3) dstr_1568__; struct MELT_STRING_STRUCT(15) dstr_1569__MAPSTRING_COUNT; struct MELT_OBJECT_STRUCT(3) dsym_1570__MAPSTRING_RAWGET; struct MELT_STRING_STRUCT(16) dstr_1571__MAPSTRING_RAWGET; struct MELT_OBJECT_STRUCT(5) dobj_1572__MAPSTRING_RAWGET; struct MELT_MULTIPLE_STRUCT(5) dtup_1573__MAPSTRING_RAWGET; struct MELT_MULTIPLE_STRUCT(2) dtup_1574__MAPSTRING_RAWGET; struct MELT_OBJECT_STRUCT(2) dobj_1575; struct MELT_OBJECT_STRUCT(2) dobj_1576; struct MELT_STRING_STRUCT(49) dstr_1577__melt_get_mapstr; struct MELT_STRING_STRUCT(4) dstr_1578__; struct MELT_STRING_STRUCT(3) dstr_1579__; struct MELT_STRING_STRUCT(16) dstr_1580__MAPSTRING_RAWGET; struct MELT_OBJECT_STRUCT(3) dsym_1581__MAPSTRING_RAWPUT; struct MELT_STRING_STRUCT(16) dstr_1582__MAPSTRING_RAWPUT; struct MELT_OBJECT_STRUCT(5) dobj_1583__MAPSTRING_RAWPUT; struct MELT_MULTIPLE_STRUCT(7) dtup_1584__MAPSTRING_RAWPUT; struct MELT_MULTIPLE_STRUCT(3) dtup_1585__MAPSTRING_RAWPUT; struct MELT_OBJECT_STRUCT(2) dobj_1586; struct MELT_OBJECT_STRUCT(3) dsym_1587__KEY; struct MELT_STRING_STRUCT(3) dstr_1588__KEY; struct MELT_OBJECT_STRUCT(2) dobj_1589; struct MELT_OBJECT_STRUCT(2) dobj_1590; struct MELT_STRING_STRUCT(53) dstr_1591__meltgc_put_mapst; struct MELT_STRING_STRUCT(4) dstr_1592__; struct MELT_STRING_STRUCT(17) dstr_1593__melt_ptr_t_; struct MELT_STRING_STRUCT(2) dstr_1594__; struct MELT_STRING_STRUCT(16) dstr_1595__MAPSTRING_RAWPUT; struct MELT_OBJECT_STRUCT(3) dsym_1596__MAPSTRING_RAWREMOVE; struct MELT_STRING_STRUCT(19) dstr_1597__MAPSTRING_RAWREM; struct MELT_OBJECT_STRUCT(5) dobj_1598__MAPSTRING_RAWREMOVE; struct MELT_MULTIPLE_STRUCT(5) dtup_1599__MAPSTRING_RAWREMOVE; struct MELT_MULTIPLE_STRUCT(2) dtup_1600__MAPSTRING_RAWREMOVE; struct MELT_OBJECT_STRUCT(2) dobj_1601; struct MELT_OBJECT_STRUCT(2) dobj_1602; struct MELT_STRING_STRUCT(54) dstr_1603__meltgc_remove_ma; struct MELT_STRING_STRUCT(4) dstr_1604__; struct MELT_STRING_STRUCT(2) dstr_1605__; struct MELT_STRING_STRUCT(19) dstr_1606__MAPSTRING_RAWREM; struct MELT_ROUTINE_STRUCT(0) drout_1607__MULTIPLE_EVERY; struct MELT_CLOSURE_STRUCT(0) dclo_1608__MULTIPLE_EVERY; struct MELT_ROUTINE_STRUCT(0) drout_1609__MULTIPLE_BACKWARD_EVERY; struct MELT_CLOSURE_STRUCT(0) dclo_1610__MULTIPLE_BACKWARD_EVERY; struct MELT_ROUTINE_STRUCT(0) drout_1611__MULTIPLE_EVERY_BOTH; struct MELT_CLOSURE_STRUCT(0) dclo_1612__MULTIPLE_EVERY_BOTH; struct MELT_OBJECT_STRUCT(3) dsym_1613__FOREACH_LONG_UPTO; struct MELT_STRING_STRUCT(17) dstr_1614__FOREACH_LONG_UPT; struct MELT_OBJECT_STRUCT(3) dsym_1615__SOME_INTEGER_MULTIPLE; struct MELT_STRING_STRUCT(21) dstr_1616__SOME_INTEGER_MUL; struct MELT_OBJECT_STRUCT(3) dsym_1617__SOME_INTEGER_GREATER_THAN; struct MELT_STRING_STRUCT(25) dstr_1618__SOME_INTEGER_GRE; struct MELT_OBJECT_STRUCT(3) dsym_1619__COMPARE_NAMED_ALPHA; struct MELT_STRING_STRUCT(19) dstr_1620__COMPARE_NAMED_AL; struct MELT_OBJECT_STRUCT(3) dsym_1621__TUPLE_NTH; struct MELT_STRING_STRUCT(9) dstr_1622__TUPLE_NTH; struct MELT_OBJECT_STRUCT(3) dsym_1623__TUPLE_SIZED; struct MELT_STRING_STRUCT(11) dstr_1624__TUPLE_SIZED; struct MELT_OBJECT_STRUCT(3) dsym_1625__CSTRING_SAME; struct MELT_STRING_STRUCT(12) dstr_1626__CSTRING_SAME; struct MELT_OBJECT_STRUCT(3) dsym_1627__MAPSTRING_EVERY; struct MELT_STRING_STRUCT(15) dstr_1628__MAPSTRING_EVERY; struct MELT_OBJECT_STRUCT(3) dsym_1629__MAPSTRING_ITERATE_TEST; struct MELT_STRING_STRUCT(22) dstr_1630__MAPSTRING_ITERAT; struct MELT_OBJECT_STRUCT(3) dsym_1631__MULTIPLE_EVERY_BOTH; struct MELT_STRING_STRUCT(19) dstr_1632__MULTIPLE_EVERY_B; struct MELT_OBJECT_STRUCT(3) dsym_1633__MULTIPLE_EVERY; struct MELT_STRING_STRUCT(14) dstr_1634__MULTIPLE_EVERY; struct MELT_OBJECT_STRUCT(3) dsym_1635__MULTIPLE_BACKWARD_EVERY; struct MELT_STRING_STRUCT(23) dstr_1636__MULTIPLE_BACKWAR; long spare_; } *cdat = NULL; cdat = (struct cdata_st*) meltgc_allocate(sizeof(*cdat),0); melt_prohibit_garbcoll = TRUE; /*initial routine predef*/ /*initial routine fill*/ /*iniobj dsym_1__IGNORE*/ /*uniqueobj*/ if (!/*_.VALDATA___V8*/ meltfptr[7]) /*_.VALDATA___V8*/ meltfptr[7] = (void*)&cdat->dsym_1__IGNORE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1__IGNORE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1__IGNORE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1__IGNORE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1__IGNORE.obj_hash = 40367397; cdat->dsym_1__IGNORE.obj_len = 3; /*inistring dstr_2__IGNORE*/ /*_.VALSTR___V9*/ meltfptr[8] = (void*)&cdat->dstr_2__IGNORE; cdat->dstr_2__IGNORE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_2__IGNORE.val, "IGNORE", sizeof (cdat->dstr_2__IGNORE.val)-1); MELT_LOCATION("warmelt-base.melt:35:/ iniobj"); /*iniobj dobj_3__IGNORE*/ /*_.VALDATA___V10*/ meltfptr[9] = (void*)&cdat->dobj_3__IGNORE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_3__IGNORE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_3__IGNORE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_3__IGNORE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_3__IGNORE.obj_hash = 345754032; cdat->dobj_3__IGNORE.obj_len = 5; /*inimult dtup_4__IGNORE*/ /*_.VALTUP___V18*/ meltfptr[17] = (void*)&cdat->dtup_4__IGNORE; cdat->dtup_4__IGNORE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_4__IGNORE.nbval = 3; /*inimult dtup_5__IGNORE*/ /*_.VALTUP___V15*/ meltfptr[14] = (void*)&cdat->dtup_5__IGNORE; cdat->dtup_5__IGNORE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_5__IGNORE.nbval = 1; /*iniobj dsym_6__V*/ /*uniqueobj*/ if (!/*_.VALDATA___V13*/ meltfptr[12]) /*_.VALDATA___V13*/ meltfptr[12] = (void*)&cdat->dsym_6__V; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_6__V", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_6__V", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_6__V.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_6__V.obj_hash = 16163707; cdat->dsym_6__V.obj_len = 3; /*inistring dstr_7__V*/ /*_.VALSTR___V14*/ meltfptr[13] = (void*)&cdat->dstr_7__V; cdat->dstr_7__V.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_7__V.val, "V", sizeof (cdat->dstr_7__V.val)-1); /*^iniobj*/ /*iniobj dobj_8*/ /*_.VALDATA___V12*/ meltfptr[11] = (void*)&cdat->dobj_8; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_8", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_8", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_8.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_8.obj_num = 0; cdat->dobj_8.obj_hash = 839475927; cdat->dobj_8.obj_len = 2; /*inistring dstr_9__ignore_void_*/ /*_.VALSTR___V16*/ meltfptr[15] = (void*)&cdat->dstr_9__ignore_void_; cdat->dstr_9__ignore_void_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_9__ignore_void_.val, "/*ignore*/(void)(", sizeof (cdat->dstr_9__ignore_void_.val)-1); /*inistring dstr_10__*/ /*_.VALSTR___V17*/ meltfptr[16] = (void*)&cdat->dstr_10__; cdat->dstr_10__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_10__.val, ")", sizeof (cdat->dstr_10__.val)-1); /*inistring dstr_11__IGNORE*/ /*_.VALSTR___V11*/ meltfptr[10] = (void*)&cdat->dstr_11__IGNORE; cdat->dstr_11__IGNORE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_11__IGNORE.val, "IGNORE", sizeof (cdat->dstr_11__IGNORE.val)-1); /*iniobj dsym_12__VOID*/ /*uniqueobj*/ if (!/*_.VALDATA___V19*/ meltfptr[18]) /*_.VALDATA___V19*/ meltfptr[18] = (void*)&cdat->dsym_12__VOID; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_12__VOID", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_12__VOID", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_12__VOID.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_12__VOID.obj_hash = 667258433; cdat->dsym_12__VOID.obj_len = 3; /*inistring dstr_13__VOID*/ /*_.VALSTR___V20*/ meltfptr[19] = (void*)&cdat->dstr_13__VOID; cdat->dstr_13__VOID.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_13__VOID.val, "VOID", sizeof (cdat->dstr_13__VOID.val)-1); MELT_LOCATION("warmelt-base.melt:41:/ iniobj"); /*iniobj dobj_14__VOID*/ /*_.VALDATA___V21*/ meltfptr[20] = (void*)&cdat->dobj_14__VOID; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_14__VOID", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_14__VOID", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_14__VOID.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_14__VOID.obj_hash = 26246882; cdat->dobj_14__VOID.obj_len = 5; /*inimult dtup_15__VOID*/ /*_.VALTUP___V25*/ meltfptr[24] = (void*)&cdat->dtup_15__VOID; cdat->dtup_15__VOID.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_15__VOID.nbval = 1; /*inimult dtup_16__VOID*/ /*_.VALTUP___V23*/ meltfptr[22] = (void*)&cdat->dtup_16__VOID; cdat->dtup_16__VOID.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_16__VOID.nbval = 0; /*inistring dstr_17__void_0*/ /*_.VALSTR___V24*/ meltfptr[23] = (void*)&cdat->dstr_17__void_0; cdat->dstr_17__void_0.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_17__void_0.val, "/*void*/0", sizeof (cdat->dstr_17__void_0.val)-1); /*inistring dstr_18__VOID*/ /*_.VALSTR___V22*/ meltfptr[21] = (void*)&cdat->dstr_18__VOID; cdat->dstr_18__VOID.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_18__VOID.val, "VOID", sizeof (cdat->dstr_18__VOID.val)-1); /*iniobj dsym_19__IS_NOT_OBJECT*/ /*uniqueobj*/ if (!/*_.VALDATA___V26*/ meltfptr[25]) /*_.VALDATA___V26*/ meltfptr[25] = (void*)&cdat->dsym_19__IS_NOT_OBJECT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_19__IS_NOT_OBJECT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_19__IS_NOT_OBJECT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_19__IS_NOT_OBJECT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_19__IS_NOT_OBJECT.obj_hash = 616371880; cdat->dsym_19__IS_NOT_OBJECT.obj_len = 3; /*inistring dstr_20__IS_NOT_OBJECT*/ /*_.VALSTR___V27*/ meltfptr[26] = (void*)&cdat->dstr_20__IS_NOT_OBJECT; cdat->dstr_20__IS_NOT_OBJECT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_20__IS_NOT_OBJECT.val, "IS_NOT_OBJECT", sizeof (cdat->dstr_20__IS_NOT_OBJECT.val)-1); MELT_LOCATION("warmelt-base.melt:46:/ iniobj"); /*iniobj dobj_21__IS_NOT_OBJECT*/ /*_.VALDATA___V28*/ meltfptr[27] = (void*)&cdat->dobj_21__IS_NOT_OBJECT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_21__IS_NOT_OBJECT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_21__IS_NOT_OBJECT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_21__IS_NOT_OBJECT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_21__IS_NOT_OBJECT.obj_hash = 223600930; cdat->dobj_21__IS_NOT_OBJECT.obj_len = 5; /*inimult dtup_22__IS_NOT_OBJECT*/ /*_.VALTUP___V36*/ meltfptr[35] = (void*)&cdat->dtup_22__IS_NOT_OBJECT; cdat->dtup_22__IS_NOT_OBJECT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_22__IS_NOT_OBJECT.nbval = 3; /*inimult dtup_23__IS_NOT_OBJECT*/ /*_.VALTUP___V33*/ meltfptr[32] = (void*)&cdat->dtup_23__IS_NOT_OBJECT; cdat->dtup_23__IS_NOT_OBJECT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_23__IS_NOT_OBJECT.nbval = 1; /*iniobj dsym_24__OBJ*/ /*uniqueobj*/ if (!/*_.VALDATA___V31*/ meltfptr[30]) /*_.VALDATA___V31*/ meltfptr[30] = (void*)&cdat->dsym_24__OBJ; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_24__OBJ", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_24__OBJ", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_24__OBJ.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_24__OBJ.obj_hash = 123734377; cdat->dsym_24__OBJ.obj_len = 3; /*inistring dstr_25__OBJ*/ /*_.VALSTR___V32*/ meltfptr[31] = (void*)&cdat->dstr_25__OBJ; cdat->dstr_25__OBJ.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_25__OBJ.val, "OBJ", sizeof (cdat->dstr_25__OBJ.val)-1); /*^iniobj*/ /*iniobj dobj_26*/ /*_.VALDATA___V30*/ meltfptr[29] = (void*)&cdat->dobj_26; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_26", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_26", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_26.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_26.obj_num = 0; cdat->dobj_26.obj_hash = 413821876; cdat->dobj_26.obj_len = 2; /*inistring dstr_27__melt_magic_disc*/ /*_.VALSTR___V34*/ meltfptr[33] = (void*)&cdat->dstr_27__melt_magic_disc; cdat->dstr_27__melt_magic_disc.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_27__melt_magic_disc.val, "(melt_magic_discr((melt_ptr_t)(", sizeof (cdat->dstr_27__melt_magic_disc.val)-1); /*inistring dstr_28__OBMAG_OBJE*/ /*_.VALSTR___V35*/ meltfptr[34] = (void*)&cdat->dstr_28__OBMAG_OBJE; cdat->dstr_28__OBMAG_OBJE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_28__OBMAG_OBJE.val, ")) != OBMAG_OBJECT)", sizeof (cdat->dstr_28__OBMAG_OBJE.val)-1); /*inistring dstr_29__IS_NOT_OBJECT*/ /*_.VALSTR___V29*/ meltfptr[28] = (void*)&cdat->dstr_29__IS_NOT_OBJECT; cdat->dstr_29__IS_NOT_OBJECT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_29__IS_NOT_OBJECT.val, "IS_NOT_OBJECT", sizeof (cdat->dstr_29__IS_NOT_OBJECT.val)-1); /*iniobj dsym_30__GET_GLOBPREDEF*/ /*uniqueobj*/ if (!/*_.VALDATA___V37*/ meltfptr[36]) /*_.VALDATA___V37*/ meltfptr[36] = (void*)&cdat->dsym_30__GET_GLOBPREDEF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_30__GET_GLOBPREDEF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_30__GET_GLOBPREDEF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_30__GET_GLOBPREDEF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_30__GET_GLOBPREDEF.obj_hash = 844364001; cdat->dsym_30__GET_GLOBPREDEF.obj_len = 3; /*inistring dstr_31__GET_GLOBPREDEF*/ /*_.VALSTR___V38*/ meltfptr[37] = (void*)&cdat->dstr_31__GET_GLOBPREDEF; cdat->dstr_31__GET_GLOBPREDEF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_31__GET_GLOBPREDEF.val, "GET_GLOBPREDEF", sizeof (cdat->dstr_31__GET_GLOBPREDEF.val)-1); MELT_LOCATION("warmelt-base.melt:52:/ iniobj"); /*iniobj dobj_32__GET_GLOBPREDEF*/ /*_.VALDATA___V39*/ meltfptr[38] = (void*)&cdat->dobj_32__GET_GLOBPREDEF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_32__GET_GLOBPREDEF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_32__GET_GLOBPREDEF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_32__GET_GLOBPREDEF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_32__GET_GLOBPREDEF.obj_hash = 543713903; cdat->dobj_32__GET_GLOBPREDEF.obj_len = 5; /*inimult dtup_33__GET_GLOBPREDEF*/ /*_.VALTUP___V47*/ meltfptr[46] = (void*)&cdat->dtup_33__GET_GLOBPREDEF; cdat->dtup_33__GET_GLOBPREDEF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_33__GET_GLOBPREDEF.nbval = 3; /*inimult dtup_34__GET_GLOBPREDEF*/ /*_.VALTUP___V44*/ meltfptr[43] = (void*)&cdat->dtup_34__GET_GLOBPREDEF; cdat->dtup_34__GET_GLOBPREDEF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_34__GET_GLOBPREDEF.nbval = 1; /*iniobj dsym_35__IX*/ /*uniqueobj*/ if (!/*_.VALDATA___V42*/ meltfptr[41]) /*_.VALDATA___V42*/ meltfptr[41] = (void*)&cdat->dsym_35__IX; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_35__IX", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_35__IX", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_35__IX.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_35__IX.obj_hash = 57004009; cdat->dsym_35__IX.obj_len = 3; /*inistring dstr_36__IX*/ /*_.VALSTR___V43*/ meltfptr[42] = (void*)&cdat->dstr_36__IX; cdat->dstr_36__IX.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_36__IX.val, "IX", sizeof (cdat->dstr_36__IX.val)-1); /*^iniobj*/ /*iniobj dobj_37*/ /*_.VALDATA___V41*/ meltfptr[40] = (void*)&cdat->dobj_37; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_37", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_37", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_37.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_37.obj_num = 0; cdat->dobj_37.obj_hash = 1007224154; cdat->dobj_37.obj_len = 2; /*inistring dstr_38__melt_globpredef*/ /*_.VALSTR___V45*/ meltfptr[44] = (void*)&cdat->dstr_38__melt_globpredef; cdat->dstr_38__melt_globpredef.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_38__melt_globpredef.val, "(melt_globpredef(", sizeof (cdat->dstr_38__melt_globpredef.val)-1); /*inistring dstr_39__*/ /*_.VALSTR___V46*/ meltfptr[45] = (void*)&cdat->dstr_39__; cdat->dstr_39__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_39__.val, "))", sizeof (cdat->dstr_39__.val)-1); /*inistring dstr_40__GET_GLOBPREDEF*/ /*_.VALSTR___V40*/ meltfptr[39] = (void*)&cdat->dstr_40__GET_GLOBPREDEF; cdat->dstr_40__GET_GLOBPREDEF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_40__GET_GLOBPREDEF.val, "GET_GLOBPREDEF", sizeof (cdat->dstr_40__GET_GLOBPREDEF.val)-1); /*iniobj dsym_41__OBJ_HASH*/ /*uniqueobj*/ if (!/*_.VALDATA___V48*/ meltfptr[47]) /*_.VALDATA___V48*/ meltfptr[47] = (void*)&cdat->dsym_41__OBJ_HASH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_41__OBJ_HASH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_41__OBJ_HASH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_41__OBJ_HASH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_41__OBJ_HASH.obj_hash = 147240164; cdat->dsym_41__OBJ_HASH.obj_len = 3; /*inistring dstr_42__OBJ_HASH*/ /*_.VALSTR___V49*/ meltfptr[48] = (void*)&cdat->dstr_42__OBJ_HASH; cdat->dstr_42__OBJ_HASH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_42__OBJ_HASH.val, "OBJ_HASH", sizeof (cdat->dstr_42__OBJ_HASH.val)-1); MELT_LOCATION("warmelt-base.melt:57:/ iniobj"); /*iniobj dobj_43__OBJ_HASH*/ /*_.VALDATA___V50*/ meltfptr[49] = (void*)&cdat->dobj_43__OBJ_HASH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_43__OBJ_HASH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_43__OBJ_HASH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_43__OBJ_HASH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_43__OBJ_HASH.obj_hash = 318609548; cdat->dobj_43__OBJ_HASH.obj_len = 5; /*inimult dtup_44__OBJ_HASH*/ /*_.VALTUP___V56*/ meltfptr[55] = (void*)&cdat->dtup_44__OBJ_HASH; cdat->dtup_44__OBJ_HASH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_44__OBJ_HASH.nbval = 3; /*inimult dtup_45__OBJ_HASH*/ /*_.VALTUP___V53*/ meltfptr[52] = (void*)&cdat->dtup_45__OBJ_HASH; cdat->dtup_45__OBJ_HASH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_45__OBJ_HASH.nbval = 1; /*^iniobj*/ /*iniobj dobj_46*/ /*_.VALDATA___V52*/ meltfptr[51] = (void*)&cdat->dobj_46; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_46", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_46", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_46.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_46.obj_num = 0; cdat->dobj_46.obj_hash = 621462895; cdat->dobj_46.obj_len = 2; /*inistring dstr_47__melt_obj_hash_*/ /*_.VALSTR___V54*/ meltfptr[53] = (void*)&cdat->dstr_47__melt_obj_hash_; cdat->dstr_47__melt_obj_hash_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_47__melt_obj_hash_.val, "(melt_obj_hash((melt_ptr_t)(", sizeof (cdat->dstr_47__melt_obj_hash_.val)-1); /*inistring dstr_48__*/ /*_.VALSTR___V55*/ meltfptr[54] = (void*)&cdat->dstr_48__; cdat->dstr_48__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_48__.val, ")))", sizeof (cdat->dstr_48__.val)-1); /*inistring dstr_49__OBJ_HASH*/ /*_.VALSTR___V51*/ meltfptr[50] = (void*)&cdat->dstr_49__OBJ_HASH; cdat->dstr_49__OBJ_HASH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_49__OBJ_HASH.val, "OBJ_HASH", sizeof (cdat->dstr_49__OBJ_HASH.val)-1); /*iniobj dsym_50__OBJ_LEN*/ /*uniqueobj*/ if (!/*_.VALDATA___V57*/ meltfptr[56]) /*_.VALDATA___V57*/ meltfptr[56] = (void*)&cdat->dsym_50__OBJ_LEN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_50__OBJ_LEN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_50__OBJ_LEN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_50__OBJ_LEN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_50__OBJ_LEN.obj_hash = 933389776; cdat->dsym_50__OBJ_LEN.obj_len = 3; /*inistring dstr_51__OBJ_LEN*/ /*_.VALSTR___V58*/ meltfptr[57] = (void*)&cdat->dstr_51__OBJ_LEN; cdat->dstr_51__OBJ_LEN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_51__OBJ_LEN.val, "OBJ_LEN", sizeof (cdat->dstr_51__OBJ_LEN.val)-1); MELT_LOCATION("warmelt-base.melt:63:/ iniobj"); /*iniobj dobj_52__OBJ_LEN*/ /*_.VALDATA___V59*/ meltfptr[58] = (void*)&cdat->dobj_52__OBJ_LEN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_52__OBJ_LEN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_52__OBJ_LEN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_52__OBJ_LEN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_52__OBJ_LEN.obj_hash = 240801873; cdat->dobj_52__OBJ_LEN.obj_len = 5; /*inimult dtup_53__OBJ_LEN*/ /*_.VALTUP___V65*/ meltfptr[64] = (void*)&cdat->dtup_53__OBJ_LEN; cdat->dtup_53__OBJ_LEN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_53__OBJ_LEN.nbval = 3; /*inimult dtup_54__OBJ_LEN*/ /*_.VALTUP___V62*/ meltfptr[61] = (void*)&cdat->dtup_54__OBJ_LEN; cdat->dtup_54__OBJ_LEN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_54__OBJ_LEN.nbval = 1; /*^iniobj*/ /*iniobj dobj_55*/ /*_.VALDATA___V61*/ meltfptr[60] = (void*)&cdat->dobj_55; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_55", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_55", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_55.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_55.obj_num = 0; cdat->dobj_55.obj_hash = 502251091; cdat->dobj_55.obj_len = 2; /*inistring dstr_56__melt_obj_len_m*/ /*_.VALSTR___V63*/ meltfptr[62] = (void*)&cdat->dstr_56__melt_obj_len_m; cdat->dstr_56__melt_obj_len_m.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_56__melt_obj_len_m.val, "(melt_obj_len((melt_ptr_t)(", sizeof (cdat->dstr_56__melt_obj_len_m.val)-1); /*inistring dstr_57__*/ /*_.VALSTR___V64*/ meltfptr[63] = (void*)&cdat->dstr_57__; cdat->dstr_57__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_57__.val, ")))", sizeof (cdat->dstr_57__.val)-1); /*inistring dstr_58__OBJ_LEN*/ /*_.VALSTR___V60*/ meltfptr[59] = (void*)&cdat->dstr_58__OBJ_LEN; cdat->dstr_58__OBJ_LEN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_58__OBJ_LEN.val, "OBJ_LEN", sizeof (cdat->dstr_58__OBJ_LEN.val)-1); /*iniobj dsym_59__OBJ_NUM*/ /*uniqueobj*/ if (!/*_.VALDATA___V66*/ meltfptr[65]) /*_.VALDATA___V66*/ meltfptr[65] = (void*)&cdat->dsym_59__OBJ_NUM; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_59__OBJ_NUM", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_59__OBJ_NUM", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_59__OBJ_NUM.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_59__OBJ_NUM.obj_hash = 537004636; cdat->dsym_59__OBJ_NUM.obj_len = 3; /*inistring dstr_60__OBJ_NUM*/ /*_.VALSTR___V67*/ meltfptr[66] = (void*)&cdat->dstr_60__OBJ_NUM; cdat->dstr_60__OBJ_NUM.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_60__OBJ_NUM.val, "OBJ_NUM", sizeof (cdat->dstr_60__OBJ_NUM.val)-1); MELT_LOCATION("warmelt-base.melt:69:/ iniobj"); /*iniobj dobj_61__OBJ_NUM*/ /*_.VALDATA___V68*/ meltfptr[67] = (void*)&cdat->dobj_61__OBJ_NUM; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_61__OBJ_NUM", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_61__OBJ_NUM", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_61__OBJ_NUM.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_61__OBJ_NUM.obj_hash = 309267713; cdat->dobj_61__OBJ_NUM.obj_len = 5; /*inimult dtup_62__OBJ_NUM*/ /*_.VALTUP___V74*/ meltfptr[73] = (void*)&cdat->dtup_62__OBJ_NUM; cdat->dtup_62__OBJ_NUM.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_62__OBJ_NUM.nbval = 3; /*inimult dtup_63__OBJ_NUM*/ /*_.VALTUP___V71*/ meltfptr[70] = (void*)&cdat->dtup_63__OBJ_NUM; cdat->dtup_63__OBJ_NUM.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_63__OBJ_NUM.nbval = 1; /*^iniobj*/ /*iniobj dobj_64*/ /*_.VALDATA___V70*/ meltfptr[69] = (void*)&cdat->dobj_64; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_64", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_64", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_64.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_64.obj_num = 0; cdat->dobj_64.obj_hash = 893875919; cdat->dobj_64.obj_len = 2; /*inistring dstr_65__melt_obj_num_m*/ /*_.VALSTR___V72*/ meltfptr[71] = (void*)&cdat->dstr_65__melt_obj_num_m; cdat->dstr_65__melt_obj_num_m.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_65__melt_obj_num_m.val, "(melt_obj_num((melt_ptr_t)(", sizeof (cdat->dstr_65__melt_obj_num_m.val)-1); /*inistring dstr_66__*/ /*_.VALSTR___V73*/ meltfptr[72] = (void*)&cdat->dstr_66__; cdat->dstr_66__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_66__.val, ")))", sizeof (cdat->dstr_66__.val)-1); /*inistring dstr_67__OBJ_NUM*/ /*_.VALSTR___V69*/ meltfptr[68] = (void*)&cdat->dstr_67__OBJ_NUM; cdat->dstr_67__OBJ_NUM.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_67__OBJ_NUM.val, "OBJ_NUM", sizeof (cdat->dstr_67__OBJ_NUM.val)-1); /*iniobj dsym_68__NONZERO_HASH*/ /*uniqueobj*/ if (!/*_.VALDATA___V75*/ meltfptr[74]) /*_.VALDATA___V75*/ meltfptr[74] = (void*)&cdat->dsym_68__NONZERO_HASH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_68__NONZERO_HASH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_68__NONZERO_HASH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_68__NONZERO_HASH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_68__NONZERO_HASH.obj_hash = 1008930877; cdat->dsym_68__NONZERO_HASH.obj_len = 3; /*inistring dstr_69__NONZERO_HASH*/ /*_.VALSTR___V76*/ meltfptr[75] = (void*)&cdat->dstr_69__NONZERO_HASH; cdat->dstr_69__NONZERO_HASH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_69__NONZERO_HASH.val, "NONZERO_HASH", sizeof (cdat->dstr_69__NONZERO_HASH.val)-1); MELT_LOCATION("warmelt-base.melt:74:/ iniobj"); /*iniobj dobj_70__NONZERO_HASH*/ /*_.VALDATA___V77*/ meltfptr[76] = (void*)&cdat->dobj_70__NONZERO_HASH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_70__NONZERO_HASH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_70__NONZERO_HASH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_70__NONZERO_HASH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_70__NONZERO_HASH.obj_hash = 354190544; cdat->dobj_70__NONZERO_HASH.obj_len = 5; /*inimult dtup_71__NONZERO_HASH*/ /*_.VALTUP___V81*/ meltfptr[80] = (void*)&cdat->dtup_71__NONZERO_HASH; cdat->dtup_71__NONZERO_HASH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_71__NONZERO_HASH.nbval = 1; /*inimult dtup_72__NONZERO_HASH*/ /*_.VALTUP___V79*/ meltfptr[78] = (void*)&cdat->dtup_72__NONZERO_HASH; cdat->dtup_72__NONZERO_HASH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_72__NONZERO_HASH.nbval = 0; /*inistring dstr_73__melt_nonzerohas*/ /*_.VALSTR___V80*/ meltfptr[79] = (void*)&cdat->dstr_73__melt_nonzerohas; cdat->dstr_73__melt_nonzerohas.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_73__melt_nonzerohas.val, "(melt_nonzerohash())", sizeof (cdat->dstr_73__melt_nonzerohas.val)-1); /*inistring dstr_74__NONZERO_HASH*/ /*_.VALSTR___V78*/ meltfptr[77] = (void*)&cdat->dstr_74__NONZERO_HASH; cdat->dstr_74__NONZERO_HASH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_74__NONZERO_HASH.val, "NONZERO_HASH", sizeof (cdat->dstr_74__NONZERO_HASH.val)-1); /*iniobj dsym_75__MINOR_GARBCOLL*/ /*uniqueobj*/ if (!/*_.VALDATA___V82*/ meltfptr[81]) /*_.VALDATA___V82*/ meltfptr[81] = (void*)&cdat->dsym_75__MINOR_GARBCOLL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_75__MINOR_GARBCOLL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_75__MINOR_GARBCOLL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_75__MINOR_GARBCOLL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_75__MINOR_GARBCOLL.obj_hash = 614408054; cdat->dsym_75__MINOR_GARBCOLL.obj_len = 3; /*inistring dstr_76__MINOR_GARBCOLL*/ /*_.VALSTR___V83*/ meltfptr[82] = (void*)&cdat->dstr_76__MINOR_GARBCOLL; cdat->dstr_76__MINOR_GARBCOLL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_76__MINOR_GARBCOLL.val, "MINOR_GARBCOLL", sizeof (cdat->dstr_76__MINOR_GARBCOLL.val)-1); MELT_LOCATION("warmelt-base.melt:80:/ iniobj"); /*iniobj dobj_77__MINOR_GARBCOLL*/ /*_.VALDATA___V84*/ meltfptr[83] = (void*)&cdat->dobj_77__MINOR_GARBCOLL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_77__MINOR_GARBCOLL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_77__MINOR_GARBCOLL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_77__MINOR_GARBCOLL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_77__MINOR_GARBCOLL.obj_hash = 745180870; cdat->dobj_77__MINOR_GARBCOLL.obj_len = 5; /*inimult dtup_78__MINOR_GARBCOLL*/ /*_.VALTUP___V92*/ meltfptr[91] = (void*)&cdat->dtup_78__MINOR_GARBCOLL; cdat->dtup_78__MINOR_GARBCOLL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_78__MINOR_GARBCOLL.nbval = 3; /*inimult dtup_79__MINOR_GARBCOLL*/ /*_.VALTUP___V89*/ meltfptr[88] = (void*)&cdat->dtup_79__MINOR_GARBCOLL; cdat->dtup_79__MINOR_GARBCOLL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_79__MINOR_GARBCOLL.nbval = 1; /*iniobj dsym_80__SIZ*/ /*uniqueobj*/ if (!/*_.VALDATA___V87*/ meltfptr[86]) /*_.VALDATA___V87*/ meltfptr[86] = (void*)&cdat->dsym_80__SIZ; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_80__SIZ", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_80__SIZ", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_80__SIZ.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_80__SIZ.obj_hash = 2526359; cdat->dsym_80__SIZ.obj_len = 3; /*inistring dstr_81__SIZ*/ /*_.VALSTR___V88*/ meltfptr[87] = (void*)&cdat->dstr_81__SIZ; cdat->dstr_81__SIZ.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_81__SIZ.val, "SIZ", sizeof (cdat->dstr_81__SIZ.val)-1); /*^iniobj*/ /*iniobj dobj_82*/ /*_.VALDATA___V86*/ meltfptr[85] = (void*)&cdat->dobj_82; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_82", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_82", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_82.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_82.obj_num = 0; cdat->dobj_82.obj_hash = 625080199; cdat->dobj_82.obj_len = 2; /*inistring dstr_83__melt_garbcoll_*/ /*_.VALSTR___V90*/ meltfptr[89] = (void*)&cdat->dstr_83__melt_garbcoll_; cdat->dstr_83__melt_garbcoll_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_83__melt_garbcoll_.val, "melt_garbcoll((", sizeof (cdat->dstr_83__melt_garbcoll_.val)-1); /*inistring dstr_84__MELT_MINOR_OR*/ /*_.VALSTR___V91*/ meltfptr[90] = (void*)&cdat->dstr_84__MELT_MINOR_OR; cdat->dstr_84__MELT_MINOR_OR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_84__MELT_MINOR_OR.val, "), MELT_MINOR_OR_FULL)", sizeof (cdat->dstr_84__MELT_MINOR_OR.val)-1); /*inistring dstr_85__MINOR_GARBCOLL*/ /*_.VALSTR___V85*/ meltfptr[84] = (void*)&cdat->dstr_85__MINOR_GARBCOLL; cdat->dstr_85__MINOR_GARBCOLL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_85__MINOR_GARBCOLL.val, "MINOR_GARBCOLL", sizeof (cdat->dstr_85__MINOR_GARBCOLL.val)-1); /*iniobj dsym_86__FULL_GARBCOLL*/ /*uniqueobj*/ if (!/*_.VALDATA___V93*/ meltfptr[92]) /*_.VALDATA___V93*/ meltfptr[92] = (void*)&cdat->dsym_86__FULL_GARBCOLL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_86__FULL_GARBCOLL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_86__FULL_GARBCOLL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_86__FULL_GARBCOLL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_86__FULL_GARBCOLL.obj_hash = 904349259; cdat->dsym_86__FULL_GARBCOLL.obj_len = 3; /*inistring dstr_87__FULL_GARBCOLL*/ /*_.VALSTR___V94*/ meltfptr[93] = (void*)&cdat->dstr_87__FULL_GARBCOLL; cdat->dstr_87__FULL_GARBCOLL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_87__FULL_GARBCOLL.val, "FULL_GARBCOLL", sizeof (cdat->dstr_87__FULL_GARBCOLL.val)-1); MELT_LOCATION("warmelt-base.melt:85:/ iniobj"); /*iniobj dobj_88__FULL_GARBCOLL*/ /*_.VALDATA___V95*/ meltfptr[94] = (void*)&cdat->dobj_88__FULL_GARBCOLL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_88__FULL_GARBCOLL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_88__FULL_GARBCOLL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_88__FULL_GARBCOLL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_88__FULL_GARBCOLL.obj_hash = 558083781; cdat->dobj_88__FULL_GARBCOLL.obj_len = 5; /*inimult dtup_89__FULL_GARBCOLL*/ /*_.VALTUP___V101*/ meltfptr[100] = (void*)&cdat->dtup_89__FULL_GARBCOLL; cdat->dtup_89__FULL_GARBCOLL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_89__FULL_GARBCOLL.nbval = 3; /*inimult dtup_90__FULL_GARBCOLL*/ /*_.VALTUP___V98*/ meltfptr[97] = (void*)&cdat->dtup_90__FULL_GARBCOLL; cdat->dtup_90__FULL_GARBCOLL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_90__FULL_GARBCOLL.nbval = 1; /*^iniobj*/ /*iniobj dobj_91*/ /*_.VALDATA___V97*/ meltfptr[96] = (void*)&cdat->dobj_91; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_91", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_91", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_91.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_91.obj_num = 0; cdat->dobj_91.obj_hash = 993426341; cdat->dobj_91.obj_len = 2; /*inistring dstr_92__melt_garbcoll_*/ /*_.VALSTR___V99*/ meltfptr[98] = (void*)&cdat->dstr_92__melt_garbcoll_; cdat->dstr_92__melt_garbcoll_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_92__melt_garbcoll_.val, "melt_garbcoll((", sizeof (cdat->dstr_92__melt_garbcoll_.val)-1); /*inistring dstr_93__MELT_NEED_FUL*/ /*_.VALSTR___V100*/ meltfptr[99] = (void*)&cdat->dstr_93__MELT_NEED_FUL; cdat->dstr_93__MELT_NEED_FUL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_93__MELT_NEED_FUL.val, "), MELT_NEED_FULL)", sizeof (cdat->dstr_93__MELT_NEED_FUL.val)-1); /*inistring dstr_94__FULL_GARBCOLL*/ /*_.VALSTR___V96*/ meltfptr[95] = (void*)&cdat->dstr_94__FULL_GARBCOLL; cdat->dstr_94__FULL_GARBCOLL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_94__FULL_GARBCOLL.val, "FULL_GARBCOLL", sizeof (cdat->dstr_94__FULL_GARBCOLL.val)-1); /*iniobj dsym_95__CHECKCALLSTACK_MSG*/ /*uniqueobj*/ if (!/*_.VALDATA___V102*/ meltfptr[101]) /*_.VALDATA___V102*/ meltfptr[101] = (void*)&cdat->dsym_95__CHECKCALLSTACK_MSG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_95__CHECKCALLSTACK_MSG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_95__CHECKCALLSTACK_MSG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_95__CHECKCALLSTACK_MSG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_95__CHECKCALLSTACK_MSG.obj_hash = 498174313; cdat->dsym_95__CHECKCALLSTACK_MSG.obj_len = 3; /*inistring dstr_96__CHECKCALLSTACK_M*/ /*_.VALSTR___V103*/ meltfptr[102] = (void*)&cdat->dstr_96__CHECKCALLSTACK_M; cdat->dstr_96__CHECKCALLSTACK_M.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_96__CHECKCALLSTACK_M.val, "CHECKCALLSTACK_MSG", sizeof (cdat->dstr_96__CHECKCALLSTACK_M.val)-1); MELT_LOCATION("warmelt-base.melt:92:/ iniobj"); /*iniobj dobj_97__CHECKCALLSTACK_MSG*/ /*_.VALDATA___V104*/ meltfptr[103] = (void*)&cdat->dobj_97__CHECKCALLSTACK_MSG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_97__CHECKCALLSTACK_MSG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_97__CHECKCALLSTACK_MSG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_97__CHECKCALLSTACK_MSG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_97__CHECKCALLSTACK_MSG.obj_hash = 907143192; cdat->dobj_97__CHECKCALLSTACK_MSG.obj_len = 5; /*inimult dtup_98__CHECKCALLSTACK_MSG*/ /*_.VALTUP___V112*/ meltfptr[111] = (void*)&cdat->dtup_98__CHECKCALLSTACK_MSG; cdat->dtup_98__CHECKCALLSTACK_MSG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_98__CHECKCALLSTACK_MSG.nbval = 3; /*inimult dtup_99__CHECKCALLSTACK_MSG*/ /*_.VALTUP___V109*/ meltfptr[108] = (void*)&cdat->dtup_99__CHECKCALLSTACK_MSG; cdat->dtup_99__CHECKCALLSTACK_MSG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_99__CHECKCALLSTACK_MSG.nbval = 1; /*iniobj dsym_100__MSG*/ /*uniqueobj*/ if (!/*_.VALDATA___V107*/ meltfptr[106]) /*_.VALDATA___V107*/ meltfptr[106] = (void*)&cdat->dsym_100__MSG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_100__MSG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_100__MSG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_100__MSG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_100__MSG.obj_hash = 97118120; cdat->dsym_100__MSG.obj_len = 3; /*inistring dstr_101__MSG*/ /*_.VALSTR___V108*/ meltfptr[107] = (void*)&cdat->dstr_101__MSG; cdat->dstr_101__MSG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_101__MSG.val, "MSG", sizeof (cdat->dstr_101__MSG.val)-1); /*^iniobj*/ /*iniobj dobj_102*/ /*_.VALDATA___V106*/ meltfptr[105] = (void*)&cdat->dobj_102; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_102", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_102", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_102.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_102.obj_num = 0; cdat->dobj_102.obj_hash = 410166713; cdat->dobj_102.obj_len = 2; /*inistring dstr_103__melt_check_call_*/ /*_.VALSTR___V110*/ meltfptr[109] = (void*)&cdat->dstr_103__melt_check_call_; cdat->dstr_103__melt_check_call_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_103__melt_check_call_.val, "melt_check_call_frames(MELT_ANYWHERE, ", sizeof (cdat->dstr_103__melt_check_call_.val)-1); /*inistring dstr_104__*/ /*_.VALSTR___V111*/ meltfptr[110] = (void*)&cdat->dstr_104__; cdat->dstr_104__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_104__.val, ");", sizeof (cdat->dstr_104__.val)-1); /*inistring dstr_105__CHECKCALLSTACK_M*/ /*_.VALSTR___V105*/ meltfptr[104] = (void*)&cdat->dstr_105__CHECKCALLSTACK_M; cdat->dstr_105__CHECKCALLSTACK_M.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_105__CHECKCALLSTACK_M.val, "CHECKCALLSTACK_MSG", sizeof (cdat->dstr_105__CHECKCALLSTACK_M.val)-1); /*iniobj dsym_106__CBREAK_MSG*/ /*uniqueobj*/ if (!/*_.VALDATA___V113*/ meltfptr[112]) /*_.VALDATA___V113*/ meltfptr[112] = (void*)&cdat->dsym_106__CBREAK_MSG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_106__CBREAK_MSG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_106__CBREAK_MSG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_106__CBREAK_MSG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_106__CBREAK_MSG.obj_hash = 336826642; cdat->dsym_106__CBREAK_MSG.obj_len = 3; /*inistring dstr_107__CBREAK_MSG*/ /*_.VALSTR___V114*/ meltfptr[113] = (void*)&cdat->dstr_107__CBREAK_MSG; cdat->dstr_107__CBREAK_MSG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_107__CBREAK_MSG.val, "CBREAK_MSG", sizeof (cdat->dstr_107__CBREAK_MSG.val)-1); MELT_LOCATION("warmelt-base.melt:100:/ iniobj"); /*iniobj dobj_108__CBREAK_MSG*/ /*_.VALDATA___V115*/ meltfptr[114] = (void*)&cdat->dobj_108__CBREAK_MSG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_108__CBREAK_MSG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_108__CBREAK_MSG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_108__CBREAK_MSG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_108__CBREAK_MSG.obj_hash = 306510243; cdat->dobj_108__CBREAK_MSG.obj_len = 5; /*inimult dtup_109__CBREAK_MSG*/ /*_.VALTUP___V121*/ meltfptr[120] = (void*)&cdat->dtup_109__CBREAK_MSG; cdat->dtup_109__CBREAK_MSG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_109__CBREAK_MSG.nbval = 3; /*inimult dtup_110__CBREAK_MSG*/ /*_.VALTUP___V118*/ meltfptr[117] = (void*)&cdat->dtup_110__CBREAK_MSG; cdat->dtup_110__CBREAK_MSG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_110__CBREAK_MSG.nbval = 1; /*^iniobj*/ /*iniobj dobj_111*/ /*_.VALDATA___V117*/ meltfptr[116] = (void*)&cdat->dobj_111; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_111", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_111", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_111.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_111.obj_num = 0; cdat->dobj_111.obj_hash = 193753348; cdat->dobj_111.obj_len = 2; /*inistring dstr_112__melt_cbreak_*/ /*_.VALSTR___V119*/ meltfptr[118] = (void*)&cdat->dstr_112__melt_cbreak_; cdat->dstr_112__melt_cbreak_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_112__melt_cbreak_.val, "melt_cbreak(", sizeof (cdat->dstr_112__melt_cbreak_.val)-1); /*inistring dstr_113__*/ /*_.VALSTR___V120*/ meltfptr[119] = (void*)&cdat->dstr_113__; cdat->dstr_113__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_113__.val, ")", sizeof (cdat->dstr_113__.val)-1); /*inistring dstr_114__CBREAK_MSG*/ /*_.VALSTR___V116*/ meltfptr[115] = (void*)&cdat->dstr_114__CBREAK_MSG; cdat->dstr_114__CBREAK_MSG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_114__CBREAK_MSG.val, "CBREAK_MSG", sizeof (cdat->dstr_114__CBREAK_MSG.val)-1); /*iniobj dsym_115__I*/ /*uniqueobj*/ if (!/*_.VALDATA___V122*/ meltfptr[121]) /*_.VALDATA___V122*/ meltfptr[121] = (void*)&cdat->dsym_115__I; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_115__I", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_115__I", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_115__I.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_115__I.obj_hash = 113283346; cdat->dsym_115__I.obj_len = 3; /*inistring dstr_116__I*/ /*_.VALSTR___V123*/ meltfptr[122] = (void*)&cdat->dstr_116__I; cdat->dstr_116__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_116__I.val, "<=I", sizeof (cdat->dstr_116__I.val)-1); MELT_LOCATION("warmelt-base.melt:109:/ iniobj"); /*iniobj dobj_117__I*/ /*_.VALDATA___V124*/ meltfptr[123] = (void*)&cdat->dobj_117__I; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_117__I", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_117__I", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_117__I.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_117__I.obj_hash = 97105016; cdat->dobj_117__I.obj_len = 5; /*inimult dtup_118__I*/ /*_.VALTUP___V136*/ meltfptr[135] = (void*)&cdat->dtup_118__I; cdat->dtup_118__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_118__I.nbval = 5; /*inimult dtup_119__I*/ /*_.VALTUP___V132*/ meltfptr[131] = (void*)&cdat->dtup_119__I; cdat->dtup_119__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_119__I.nbval = 2; /*iniobj dsym_120__A*/ /*uniqueobj*/ if (!/*_.VALDATA___V127*/ meltfptr[126]) /*_.VALDATA___V127*/ meltfptr[126] = (void*)&cdat->dsym_120__A; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_120__A", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_120__A", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_120__A.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_120__A.obj_hash = 16202693; cdat->dsym_120__A.obj_len = 3; /*inistring dstr_121__A*/ /*_.VALSTR___V128*/ meltfptr[127] = (void*)&cdat->dstr_121__A; cdat->dstr_121__A.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_121__A.val, "A", sizeof (cdat->dstr_121__A.val)-1); /*^iniobj*/ /*iniobj dobj_122*/ /*_.VALDATA___V126*/ meltfptr[125] = (void*)&cdat->dobj_122; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_122", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_122", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_122.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_122.obj_num = 0; cdat->dobj_122.obj_hash = 1029566709; cdat->dobj_122.obj_len = 2; /*iniobj dsym_123__B*/ /*uniqueobj*/ if (!/*_.VALDATA___V130*/ meltfptr[129]) /*_.VALDATA___V130*/ meltfptr[129] = (void*)&cdat->dsym_123__B; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_123__B", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_123__B", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_123__B.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_123__B.obj_hash = 12245345; cdat->dsym_123__B.obj_len = 3; /*inistring dstr_124__B*/ /*_.VALSTR___V131*/ meltfptr[130] = (void*)&cdat->dstr_124__B; cdat->dstr_124__B.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_124__B.val, "B", sizeof (cdat->dstr_124__B.val)-1); /*^iniobj*/ /*iniobj dobj_125*/ /*_.VALDATA___V129*/ meltfptr[128] = (void*)&cdat->dobj_125; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_125", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_125", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_125.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_125.obj_num = 1; cdat->dobj_125.obj_hash = 315958044; cdat->dobj_125.obj_len = 2; /*inistring dstr_126__*/ /*_.VALSTR___V133*/ meltfptr[132] = (void*)&cdat->dstr_126__; cdat->dstr_126__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_126__.val, "((", sizeof (cdat->dstr_126__.val)-1); /*inistring dstr_127__*/ /*_.VALSTR___V134*/ meltfptr[133] = (void*)&cdat->dstr_127__; cdat->dstr_127__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_127__.val, ") <= (", sizeof (cdat->dstr_127__.val)-1); /*inistring dstr_128__*/ /*_.VALSTR___V135*/ meltfptr[134] = (void*)&cdat->dstr_128__; cdat->dstr_128__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_128__.val, "))", sizeof (cdat->dstr_128__.val)-1); /*inistring dstr_129__I*/ /*_.VALSTR___V125*/ meltfptr[124] = (void*)&cdat->dstr_129__I; cdat->dstr_129__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_129__I.val, "<=I", sizeof (cdat->dstr_129__I.val)-1); /*iniobj dsym_130__I*/ /*uniqueobj*/ if (!/*_.VALDATA___V137*/ meltfptr[136]) /*_.VALDATA___V137*/ meltfptr[136] = (void*)&cdat->dsym_130__I; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_130__I", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_130__I", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_130__I.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_130__I.obj_hash = 147589638; cdat->dsym_130__I.obj_len = 3; /*inistring dstr_131__I*/ /*_.VALSTR___V138*/ meltfptr[137] = (void*)&cdat->dstr_131__I; cdat->dstr_131__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_131__I.val, "==I", sizeof (cdat->dstr_131__I.val)-1); MELT_LOCATION("warmelt-base.melt:112:/ iniobj"); /*iniobj dobj_132__I*/ /*_.VALDATA___V139*/ meltfptr[138] = (void*)&cdat->dobj_132__I; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_132__I", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_132__I", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_132__I.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_132__I.obj_hash = 529371072; cdat->dobj_132__I.obj_len = 5; /*inimult dtup_133__I*/ /*_.VALTUP___V147*/ meltfptr[146] = (void*)&cdat->dtup_133__I; cdat->dtup_133__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_133__I.nbval = 5; /*inimult dtup_134__I*/ /*_.VALTUP___V143*/ meltfptr[142] = (void*)&cdat->dtup_134__I; cdat->dtup_134__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_134__I.nbval = 2; /*^iniobj*/ /*iniobj dobj_135*/ /*_.VALDATA___V141*/ meltfptr[140] = (void*)&cdat->dobj_135; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_135", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_135", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_135.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_135.obj_num = 0; cdat->dobj_135.obj_hash = 391760376; cdat->dobj_135.obj_len = 2; /*^iniobj*/ /*iniobj dobj_136*/ /*_.VALDATA___V142*/ meltfptr[141] = (void*)&cdat->dobj_136; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_136", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_136", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_136.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_136.obj_num = 1; cdat->dobj_136.obj_hash = 434457131; cdat->dobj_136.obj_len = 2; /*inistring dstr_137__*/ /*_.VALSTR___V144*/ meltfptr[143] = (void*)&cdat->dstr_137__; cdat->dstr_137__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_137__.val, "((", sizeof (cdat->dstr_137__.val)-1); /*inistring dstr_138__*/ /*_.VALSTR___V145*/ meltfptr[144] = (void*)&cdat->dstr_138__; cdat->dstr_138__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_138__.val, ") == (", sizeof (cdat->dstr_138__.val)-1); /*inistring dstr_139__*/ /*_.VALSTR___V146*/ meltfptr[145] = (void*)&cdat->dstr_139__; cdat->dstr_139__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_139__.val, "))", sizeof (cdat->dstr_139__.val)-1); /*inistring dstr_140__I*/ /*_.VALSTR___V140*/ meltfptr[139] = (void*)&cdat->dstr_140__I; cdat->dstr_140__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_140__I.val, "==I", sizeof (cdat->dstr_140__I.val)-1); /*iniobj dsym_141__I*/ /*uniqueobj*/ if (!/*_.VALDATA___V148*/ meltfptr[147]) /*_.VALDATA___V148*/ meltfptr[147] = (void*)&cdat->dsym_141__I; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_141__I", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_141__I", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_141__I.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_141__I.obj_hash = 48223074; cdat->dsym_141__I.obj_len = 3; /*inistring dstr_142__I*/ /*_.VALSTR___V149*/ meltfptr[148] = (void*)&cdat->dstr_142__I; cdat->dstr_142__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_142__I.val, "!=I", sizeof (cdat->dstr_142__I.val)-1); MELT_LOCATION("warmelt-base.melt:116:/ iniobj"); /*iniobj dobj_143__I*/ /*_.VALDATA___V150*/ meltfptr[149] = (void*)&cdat->dobj_143__I; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_143__I", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_143__I", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_143__I.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_143__I.obj_hash = 1061918198; cdat->dobj_143__I.obj_len = 5; /*inimult dtup_144__I*/ /*_.VALTUP___V158*/ meltfptr[157] = (void*)&cdat->dtup_144__I; cdat->dtup_144__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_144__I.nbval = 5; /*inimult dtup_145__I*/ /*_.VALTUP___V154*/ meltfptr[153] = (void*)&cdat->dtup_145__I; cdat->dtup_145__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_145__I.nbval = 2; /*^iniobj*/ /*iniobj dobj_146*/ /*_.VALDATA___V152*/ meltfptr[151] = (void*)&cdat->dobj_146; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_146", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_146", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_146.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_146.obj_num = 0; cdat->dobj_146.obj_hash = 988422436; cdat->dobj_146.obj_len = 2; /*^iniobj*/ /*iniobj dobj_147*/ /*_.VALDATA___V153*/ meltfptr[152] = (void*)&cdat->dobj_147; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_147", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_147", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_147.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_147.obj_num = 1; cdat->dobj_147.obj_hash = 111273930; cdat->dobj_147.obj_len = 2; /*inistring dstr_148__*/ /*_.VALSTR___V155*/ meltfptr[154] = (void*)&cdat->dstr_148__; cdat->dstr_148__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_148__.val, "((", sizeof (cdat->dstr_148__.val)-1); /*inistring dstr_149__*/ /*_.VALSTR___V156*/ meltfptr[155] = (void*)&cdat->dstr_149__; cdat->dstr_149__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_149__.val, ") != (", sizeof (cdat->dstr_149__.val)-1); /*inistring dstr_150__*/ /*_.VALSTR___V157*/ meltfptr[156] = (void*)&cdat->dstr_150__; cdat->dstr_150__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_150__.val, "))", sizeof (cdat->dstr_150__.val)-1); /*inistring dstr_151__I*/ /*_.VALSTR___V151*/ meltfptr[150] = (void*)&cdat->dstr_151__I; cdat->dstr_151__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_151__I.val, "!=I", sizeof (cdat->dstr_151__I.val)-1); /*iniobj dsym_152__I*/ /*uniqueobj*/ if (!/*_.VALDATA___V159*/ meltfptr[158]) /*_.VALDATA___V159*/ meltfptr[158] = (void*)&cdat->dsym_152__I; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_152__I", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_152__I", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_152__I.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_152__I.obj_hash = 200978817; cdat->dsym_152__I.obj_len = 3; /*inistring dstr_153__I*/ /*_.VALSTR___V160*/ meltfptr[159] = (void*)&cdat->dstr_153__I; cdat->dstr_153__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_153__I.val, "-I", sizeof (cdat->dstr_153__I.val)-1); MELT_LOCATION("warmelt-base.melt:121:/ iniobj"); /*iniobj dobj_154__I*/ /*_.VALDATA___V161*/ meltfptr[160] = (void*)&cdat->dobj_154__I; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_154__I", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_154__I", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_154__I.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_154__I.obj_hash = 558590245; cdat->dobj_154__I.obj_len = 5; /*inimult dtup_155__I*/ /*_.VALTUP___V169*/ meltfptr[168] = (void*)&cdat->dtup_155__I; cdat->dtup_155__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_155__I.nbval = 5; /*inimult dtup_156__I*/ /*_.VALTUP___V165*/ meltfptr[164] = (void*)&cdat->dtup_156__I; cdat->dtup_156__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_156__I.nbval = 2; /*^iniobj*/ /*iniobj dobj_157*/ /*_.VALDATA___V163*/ meltfptr[162] = (void*)&cdat->dobj_157; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_157", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_157", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_157.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_157.obj_num = 0; cdat->dobj_157.obj_hash = 864396538; cdat->dobj_157.obj_len = 2; /*^iniobj*/ /*iniobj dobj_158*/ /*_.VALDATA___V164*/ meltfptr[163] = (void*)&cdat->dobj_158; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_158", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_158", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_158.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_158.obj_num = 1; cdat->dobj_158.obj_hash = 521421221; cdat->dobj_158.obj_len = 2; /*inistring dstr_159__*/ /*_.VALSTR___V166*/ meltfptr[165] = (void*)&cdat->dstr_159__; cdat->dstr_159__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_159__.val, "((", sizeof (cdat->dstr_159__.val)-1); /*inistring dstr_160__*/ /*_.VALSTR___V167*/ meltfptr[166] = (void*)&cdat->dstr_160__; cdat->dstr_160__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_160__.val, ") - (", sizeof (cdat->dstr_160__.val)-1); /*inistring dstr_161__*/ /*_.VALSTR___V168*/ meltfptr[167] = (void*)&cdat->dstr_161__; cdat->dstr_161__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_161__.val, "))", sizeof (cdat->dstr_161__.val)-1); /*inistring dstr_162__I*/ /*_.VALSTR___V162*/ meltfptr[161] = (void*)&cdat->dstr_162__I; cdat->dstr_162__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_162__I.val, "-I", sizeof (cdat->dstr_162__I.val)-1); /*iniobj dsym_163__I*/ /*uniqueobj*/ if (!/*_.VALDATA___V170*/ meltfptr[169]) /*_.VALDATA___V170*/ meltfptr[169] = (void*)&cdat->dsym_163__I; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_163__I", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_163__I", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_163__I.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_163__I.obj_hash = 974283096; cdat->dsym_163__I.obj_len = 3; /*inistring dstr_164__I*/ /*_.VALSTR___V171*/ meltfptr[170] = (void*)&cdat->dstr_164__I; cdat->dstr_164__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_164__I.val, "*I", sizeof (cdat->dstr_164__I.val)-1); MELT_LOCATION("warmelt-base.melt:124:/ iniobj"); /*iniobj dobj_165__I*/ /*_.VALDATA___V172*/ meltfptr[171] = (void*)&cdat->dobj_165__I; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_165__I", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_165__I", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_165__I.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_165__I.obj_hash = 1063514908; cdat->dobj_165__I.obj_len = 5; /*inimult dtup_166__I*/ /*_.VALTUP___V180*/ meltfptr[179] = (void*)&cdat->dtup_166__I; cdat->dtup_166__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_166__I.nbval = 5; /*inimult dtup_167__I*/ /*_.VALTUP___V176*/ meltfptr[175] = (void*)&cdat->dtup_167__I; cdat->dtup_167__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_167__I.nbval = 2; /*^iniobj*/ /*iniobj dobj_168*/ /*_.VALDATA___V174*/ meltfptr[173] = (void*)&cdat->dobj_168; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_168", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_168", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_168.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_168.obj_num = 0; cdat->dobj_168.obj_hash = 297077580; cdat->dobj_168.obj_len = 2; /*^iniobj*/ /*iniobj dobj_169*/ /*_.VALDATA___V175*/ meltfptr[174] = (void*)&cdat->dobj_169; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_169", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_169", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_169.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_169.obj_num = 1; cdat->dobj_169.obj_hash = 408176445; cdat->dobj_169.obj_len = 2; /*inistring dstr_170__*/ /*_.VALSTR___V177*/ meltfptr[176] = (void*)&cdat->dstr_170__; cdat->dstr_170__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_170__.val, "((", sizeof (cdat->dstr_170__.val)-1); /*inistring dstr_171__*/ /*_.VALSTR___V178*/ meltfptr[177] = (void*)&cdat->dstr_171__; cdat->dstr_171__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_171__.val, ") * (", sizeof (cdat->dstr_171__.val)-1); /*inistring dstr_172__*/ /*_.VALSTR___V179*/ meltfptr[178] = (void*)&cdat->dstr_172__; cdat->dstr_172__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_172__.val, "))", sizeof (cdat->dstr_172__.val)-1); /*inistring dstr_173__I*/ /*_.VALSTR___V173*/ meltfptr[172] = (void*)&cdat->dstr_173__I; cdat->dstr_173__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_173__I.val, "*I", sizeof (cdat->dstr_173__I.val)-1); /*iniobj dsym_174__ANDI*/ /*uniqueobj*/ if (!/*_.VALDATA___V181*/ meltfptr[180]) /*_.VALDATA___V181*/ meltfptr[180] = (void*)&cdat->dsym_174__ANDI; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_174__ANDI", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_174__ANDI", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_174__ANDI.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_174__ANDI.obj_hash = 614879494; cdat->dsym_174__ANDI.obj_len = 3; /*inistring dstr_175__ANDI*/ /*_.VALSTR___V182*/ meltfptr[181] = (void*)&cdat->dstr_175__ANDI; cdat->dstr_175__ANDI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_175__ANDI.val, "ANDI", sizeof (cdat->dstr_175__ANDI.val)-1); MELT_LOCATION("warmelt-base.melt:126:/ iniobj"); /*iniobj dobj_176__ANDI*/ /*_.VALDATA___V183*/ meltfptr[182] = (void*)&cdat->dobj_176__ANDI; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_176__ANDI", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_176__ANDI", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_176__ANDI.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_176__ANDI.obj_hash = 708868081; cdat->dobj_176__ANDI.obj_len = 5; /*inimult dtup_177__ANDI*/ /*_.VALTUP___V191*/ meltfptr[190] = (void*)&cdat->dtup_177__ANDI; cdat->dtup_177__ANDI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_177__ANDI.nbval = 5; /*inimult dtup_178__ANDI*/ /*_.VALTUP___V187*/ meltfptr[186] = (void*)&cdat->dtup_178__ANDI; cdat->dtup_178__ANDI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_178__ANDI.nbval = 2; /*^iniobj*/ /*iniobj dobj_179*/ /*_.VALDATA___V185*/ meltfptr[184] = (void*)&cdat->dobj_179; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_179", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_179", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_179.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_179.obj_num = 0; cdat->dobj_179.obj_hash = 469753382; cdat->dobj_179.obj_len = 2; /*^iniobj*/ /*iniobj dobj_180*/ /*_.VALDATA___V186*/ meltfptr[185] = (void*)&cdat->dobj_180; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_180", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_180", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_180.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_180.obj_num = 1; cdat->dobj_180.obj_hash = 125826204; cdat->dobj_180.obj_len = 2; /*inistring dstr_181__*/ /*_.VALSTR___V188*/ meltfptr[187] = (void*)&cdat->dstr_181__; cdat->dstr_181__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_181__.val, "((", sizeof (cdat->dstr_181__.val)-1); /*inistring dstr_182__*/ /*_.VALSTR___V189*/ meltfptr[188] = (void*)&cdat->dstr_182__; cdat->dstr_182__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_182__.val, ") & (", sizeof (cdat->dstr_182__.val)-1); /*inistring dstr_183__*/ /*_.VALSTR___V190*/ meltfptr[189] = (void*)&cdat->dstr_183__; cdat->dstr_183__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_183__.val, "))", sizeof (cdat->dstr_183__.val)-1); /*inistring dstr_184__ANDI*/ /*_.VALSTR___V184*/ meltfptr[183] = (void*)&cdat->dstr_184__ANDI; cdat->dstr_184__ANDI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_184__ANDI.val, "ANDI", sizeof (cdat->dstr_184__ANDI.val)-1); /*iniobj dsym_185__ORI*/ /*uniqueobj*/ if (!/*_.VALDATA___V192*/ meltfptr[191]) /*_.VALDATA___V192*/ meltfptr[191] = (void*)&cdat->dsym_185__ORI; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_185__ORI", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_185__ORI", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_185__ORI.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_185__ORI.obj_hash = 993961739; cdat->dsym_185__ORI.obj_len = 3; /*inistring dstr_186__ORI*/ /*_.VALSTR___V193*/ meltfptr[192] = (void*)&cdat->dstr_186__ORI; cdat->dstr_186__ORI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_186__ORI.val, "ORI", sizeof (cdat->dstr_186__ORI.val)-1); MELT_LOCATION("warmelt-base.melt:128:/ iniobj"); /*iniobj dobj_187__ORI*/ /*_.VALDATA___V194*/ meltfptr[193] = (void*)&cdat->dobj_187__ORI; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_187__ORI", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_187__ORI", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_187__ORI.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_187__ORI.obj_hash = 1011962563; cdat->dobj_187__ORI.obj_len = 5; /*inimult dtup_188__ORI*/ /*_.VALTUP___V202*/ meltfptr[201] = (void*)&cdat->dtup_188__ORI; cdat->dtup_188__ORI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_188__ORI.nbval = 5; /*inimult dtup_189__ORI*/ /*_.VALTUP___V198*/ meltfptr[197] = (void*)&cdat->dtup_189__ORI; cdat->dtup_189__ORI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_189__ORI.nbval = 2; /*^iniobj*/ /*iniobj dobj_190*/ /*_.VALDATA___V196*/ meltfptr[195] = (void*)&cdat->dobj_190; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_190", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_190", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_190.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_190.obj_num = 0; cdat->dobj_190.obj_hash = 395169189; cdat->dobj_190.obj_len = 2; /*^iniobj*/ /*iniobj dobj_191*/ /*_.VALDATA___V197*/ meltfptr[196] = (void*)&cdat->dobj_191; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_191", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_191", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_191.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_191.obj_num = 1; cdat->dobj_191.obj_hash = 368780307; cdat->dobj_191.obj_len = 2; /*inistring dstr_192__*/ /*_.VALSTR___V199*/ meltfptr[198] = (void*)&cdat->dstr_192__; cdat->dstr_192__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_192__.val, "((", sizeof (cdat->dstr_192__.val)-1); /*inistring dstr_193__*/ /*_.VALSTR___V200*/ meltfptr[199] = (void*)&cdat->dstr_193__; cdat->dstr_193__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_193__.val, ") | (", sizeof (cdat->dstr_193__.val)-1); /*inistring dstr_194__*/ /*_.VALSTR___V201*/ meltfptr[200] = (void*)&cdat->dstr_194__; cdat->dstr_194__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_194__.val, "))", sizeof (cdat->dstr_194__.val)-1); /*inistring dstr_195__ORI*/ /*_.VALSTR___V195*/ meltfptr[194] = (void*)&cdat->dstr_195__ORI; cdat->dstr_195__ORI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_195__ORI.val, "ORI", sizeof (cdat->dstr_195__ORI.val)-1); /*iniobj dsym_196__XORI*/ /*uniqueobj*/ if (!/*_.VALDATA___V203*/ meltfptr[202]) /*_.VALDATA___V203*/ meltfptr[202] = (void*)&cdat->dsym_196__XORI; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_196__XORI", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_196__XORI", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_196__XORI.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_196__XORI.obj_hash = 492713902; cdat->dsym_196__XORI.obj_len = 3; /*inistring dstr_197__XORI*/ /*_.VALSTR___V204*/ meltfptr[203] = (void*)&cdat->dstr_197__XORI; cdat->dstr_197__XORI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_197__XORI.val, "XORI", sizeof (cdat->dstr_197__XORI.val)-1); MELT_LOCATION("warmelt-base.melt:130:/ iniobj"); /*iniobj dobj_198__XORI*/ /*_.VALDATA___V205*/ meltfptr[204] = (void*)&cdat->dobj_198__XORI; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_198__XORI", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_198__XORI", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_198__XORI.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_198__XORI.obj_hash = 638401826; cdat->dobj_198__XORI.obj_len = 5; /*inimult dtup_199__XORI*/ /*_.VALTUP___V213*/ meltfptr[212] = (void*)&cdat->dtup_199__XORI; cdat->dtup_199__XORI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_199__XORI.nbval = 5; /*inimult dtup_200__XORI*/ /*_.VALTUP___V209*/ meltfptr[208] = (void*)&cdat->dtup_200__XORI; cdat->dtup_200__XORI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_200__XORI.nbval = 2; /*^iniobj*/ /*iniobj dobj_201*/ /*_.VALDATA___V207*/ meltfptr[206] = (void*)&cdat->dobj_201; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_201", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_201", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_201.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_201.obj_num = 0; cdat->dobj_201.obj_hash = 378377979; cdat->dobj_201.obj_len = 2; /*^iniobj*/ /*iniobj dobj_202*/ /*_.VALDATA___V208*/ meltfptr[207] = (void*)&cdat->dobj_202; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_202", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_202", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_202.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_202.obj_num = 1; cdat->dobj_202.obj_hash = 732243735; cdat->dobj_202.obj_len = 2; /*inistring dstr_203__*/ /*_.VALSTR___V210*/ meltfptr[209] = (void*)&cdat->dstr_203__; cdat->dstr_203__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_203__.val, "((", sizeof (cdat->dstr_203__.val)-1); /*inistring dstr_204__*/ /*_.VALSTR___V211*/ meltfptr[210] = (void*)&cdat->dstr_204__; cdat->dstr_204__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_204__.val, ") ^ (", sizeof (cdat->dstr_204__.val)-1); /*inistring dstr_205__*/ /*_.VALSTR___V212*/ meltfptr[211] = (void*)&cdat->dstr_205__; cdat->dstr_205__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_205__.val, "))", sizeof (cdat->dstr_205__.val)-1); /*inistring dstr_206__XORI*/ /*_.VALSTR___V206*/ meltfptr[205] = (void*)&cdat->dstr_206__XORI; cdat->dstr_206__XORI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_206__XORI.val, "XORI", sizeof (cdat->dstr_206__XORI.val)-1); /*iniobj dsym_207__NEGI*/ /*uniqueobj*/ if (!/*_.VALDATA___V214*/ meltfptr[213]) /*_.VALDATA___V214*/ meltfptr[213] = (void*)&cdat->dsym_207__NEGI; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_207__NEGI", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_207__NEGI", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_207__NEGI.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_207__NEGI.obj_hash = 443849175; cdat->dsym_207__NEGI.obj_len = 3; /*inistring dstr_208__NEGI*/ /*_.VALSTR___V215*/ meltfptr[214] = (void*)&cdat->dstr_208__NEGI; cdat->dstr_208__NEGI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_208__NEGI.val, "NEGI", sizeof (cdat->dstr_208__NEGI.val)-1); MELT_LOCATION("warmelt-base.melt:133:/ iniobj"); /*iniobj dobj_209__NEGI*/ /*_.VALDATA___V216*/ meltfptr[215] = (void*)&cdat->dobj_209__NEGI; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_209__NEGI", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_209__NEGI", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_209__NEGI.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_209__NEGI.obj_hash = 452101908; cdat->dobj_209__NEGI.obj_len = 5; /*inimult dtup_210__NEGI*/ /*_.VALTUP___V224*/ meltfptr[223] = (void*)&cdat->dtup_210__NEGI; cdat->dtup_210__NEGI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_210__NEGI.nbval = 3; /*inimult dtup_211__NEGI*/ /*_.VALTUP___V221*/ meltfptr[220] = (void*)&cdat->dtup_211__NEGI; cdat->dtup_211__NEGI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_211__NEGI.nbval = 1; /*iniobj dsym_212__I*/ /*uniqueobj*/ if (!/*_.VALDATA___V219*/ meltfptr[218]) /*_.VALDATA___V219*/ meltfptr[218] = (void*)&cdat->dsym_212__I; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_212__I", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_212__I", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_212__I.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_212__I.obj_hash = 100956650; cdat->dsym_212__I.obj_len = 3; /*inistring dstr_213__I*/ /*_.VALSTR___V220*/ meltfptr[219] = (void*)&cdat->dstr_213__I; cdat->dstr_213__I.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_213__I.val, "I", sizeof (cdat->dstr_213__I.val)-1); /*^iniobj*/ /*iniobj dobj_214*/ /*_.VALDATA___V218*/ meltfptr[217] = (void*)&cdat->dobj_214; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_214", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_214", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_214.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_214.obj_num = 0; cdat->dobj_214.obj_hash = 168853133; cdat->dobj_214.obj_len = 2; /*inistring dstr_215__*/ /*_.VALSTR___V222*/ meltfptr[221] = (void*)&cdat->dstr_215__; cdat->dstr_215__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_215__.val, "(-(", sizeof (cdat->dstr_215__.val)-1); /*inistring dstr_216__*/ /*_.VALSTR___V223*/ meltfptr[222] = (void*)&cdat->dstr_216__; cdat->dstr_216__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_216__.val, "))", sizeof (cdat->dstr_216__.val)-1); /*inistring dstr_217__NEGI*/ /*_.VALSTR___V217*/ meltfptr[216] = (void*)&cdat->dstr_217__NEGI; cdat->dstr_217__NEGI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_217__NEGI.val, "NEGI", sizeof (cdat->dstr_217__NEGI.val)-1); /*iniobj dsym_218__NOTI*/ /*uniqueobj*/ if (!/*_.VALDATA___V225*/ meltfptr[224]) /*_.VALDATA___V225*/ meltfptr[224] = (void*)&cdat->dsym_218__NOTI; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_218__NOTI", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_218__NOTI", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_218__NOTI.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_218__NOTI.obj_hash = 972167097; cdat->dsym_218__NOTI.obj_len = 3; /*inistring dstr_219__NOTI*/ /*_.VALSTR___V226*/ meltfptr[225] = (void*)&cdat->dstr_219__NOTI; cdat->dstr_219__NOTI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_219__NOTI.val, "NOTI", sizeof (cdat->dstr_219__NOTI.val)-1); MELT_LOCATION("warmelt-base.melt:135:/ iniobj"); /*iniobj dobj_220__NOTI*/ /*_.VALDATA___V227*/ meltfptr[226] = (void*)&cdat->dobj_220__NOTI; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_220__NOTI", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_220__NOTI", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_220__NOTI.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_220__NOTI.obj_hash = 988833753; cdat->dobj_220__NOTI.obj_len = 5; /*inimult dtup_221__NOTI*/ /*_.VALTUP___V233*/ meltfptr[232] = (void*)&cdat->dtup_221__NOTI; cdat->dtup_221__NOTI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_221__NOTI.nbval = 3; /*inimult dtup_222__NOTI*/ /*_.VALTUP___V230*/ meltfptr[229] = (void*)&cdat->dtup_222__NOTI; cdat->dtup_222__NOTI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_222__NOTI.nbval = 1; /*^iniobj*/ /*iniobj dobj_223*/ /*_.VALDATA___V229*/ meltfptr[228] = (void*)&cdat->dobj_223; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_223", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_223", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_223.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_223.obj_num = 0; cdat->dobj_223.obj_hash = 294534390; cdat->dobj_223.obj_len = 2; /*inistring dstr_224__*/ /*_.VALSTR___V231*/ meltfptr[230] = (void*)&cdat->dstr_224__; cdat->dstr_224__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_224__.val, "(~(", sizeof (cdat->dstr_224__.val)-1); /*inistring dstr_225__*/ /*_.VALSTR___V232*/ meltfptr[231] = (void*)&cdat->dstr_225__; cdat->dstr_225__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_225__.val, "))", sizeof (cdat->dstr_225__.val)-1); /*inistring dstr_226__NOTI*/ /*_.VALSTR___V228*/ meltfptr[227] = (void*)&cdat->dstr_226__NOTI; cdat->dstr_226__NOTI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_226__NOTI.val, "NOTI", sizeof (cdat->dstr_226__NOTI.val)-1); /*iniobj dsym_227__NOTNULL*/ /*uniqueobj*/ if (!/*_.VALDATA___V234*/ meltfptr[233]) /*_.VALDATA___V234*/ meltfptr[233] = (void*)&cdat->dsym_227__NOTNULL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_227__NOTNULL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_227__NOTNULL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_227__NOTNULL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_227__NOTNULL.obj_hash = 844191313; cdat->dsym_227__NOTNULL.obj_len = 3; /*inistring dstr_228__NOTNULL*/ /*_.VALSTR___V235*/ meltfptr[234] = (void*)&cdat->dstr_228__NOTNULL; cdat->dstr_228__NOTNULL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_228__NOTNULL.val, "NOTNULL", sizeof (cdat->dstr_228__NOTNULL.val)-1); MELT_LOCATION("warmelt-base.melt:140:/ iniobj"); /*iniobj dobj_229__NOTNULL*/ /*_.VALDATA___V236*/ meltfptr[235] = (void*)&cdat->dobj_229__NOTNULL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_229__NOTNULL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_229__NOTNULL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_229__NOTNULL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_229__NOTNULL.obj_hash = 288892141; cdat->dobj_229__NOTNULL.obj_len = 5; /*inimult dtup_230__NOTNULL*/ /*_.VALTUP___V242*/ meltfptr[241] = (void*)&cdat->dtup_230__NOTNULL; cdat->dtup_230__NOTNULL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_230__NOTNULL.nbval = 3; /*inimult dtup_231__NOTNULL*/ /*_.VALTUP___V239*/ meltfptr[238] = (void*)&cdat->dtup_231__NOTNULL; cdat->dtup_231__NOTNULL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_231__NOTNULL.nbval = 1; /*^iniobj*/ /*iniobj dobj_232*/ /*_.VALDATA___V238*/ meltfptr[237] = (void*)&cdat->dobj_232; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_232", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_232", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_232.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_232.obj_num = 0; cdat->dobj_232.obj_hash = 1052224909; cdat->dobj_232.obj_len = 2; /*inistring dstr_233__*/ /*_.VALSTR___V240*/ meltfptr[239] = (void*)&cdat->dstr_233__; cdat->dstr_233__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_233__.val, "((", sizeof (cdat->dstr_233__.val)-1); /*inistring dstr_234__NULL_*/ /*_.VALSTR___V241*/ meltfptr[240] = (void*)&cdat->dstr_234__NULL_; cdat->dstr_234__NULL_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_234__NULL_.val, ") != NULL)", sizeof (cdat->dstr_234__NULL_.val)-1); /*inistring dstr_235__NOTNULL*/ /*_.VALSTR___V237*/ meltfptr[236] = (void*)&cdat->dstr_235__NOTNULL; cdat->dstr_235__NOTNULL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_235__NOTNULL.val, "NOTNULL", sizeof (cdat->dstr_235__NOTNULL.val)-1); /*iniobj dsym_236__ZEROP*/ /*uniqueobj*/ if (!/*_.VALDATA___V243*/ meltfptr[242]) /*_.VALDATA___V243*/ meltfptr[242] = (void*)&cdat->dsym_236__ZEROP; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_236__ZEROP", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_236__ZEROP", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_236__ZEROP.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_236__ZEROP.obj_hash = 158811856; cdat->dsym_236__ZEROP.obj_len = 3; /*inistring dstr_237__ZEROP*/ /*_.VALSTR___V244*/ meltfptr[243] = (void*)&cdat->dstr_237__ZEROP; cdat->dstr_237__ZEROP.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_237__ZEROP.val, "ZEROP", sizeof (cdat->dstr_237__ZEROP.val)-1); MELT_LOCATION("warmelt-base.melt:144:/ iniobj"); /*iniobj dobj_238__ZEROP*/ /*_.VALDATA___V245*/ meltfptr[244] = (void*)&cdat->dobj_238__ZEROP; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_238__ZEROP", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_238__ZEROP", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_238__ZEROP.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_238__ZEROP.obj_hash = 606064349; cdat->dobj_238__ZEROP.obj_len = 5; /*inimult dtup_239__ZEROP*/ /*_.VALTUP___V251*/ meltfptr[250] = (void*)&cdat->dtup_239__ZEROP; cdat->dtup_239__ZEROP.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_239__ZEROP.nbval = 3; /*inimult dtup_240__ZEROP*/ /*_.VALTUP___V248*/ meltfptr[247] = (void*)&cdat->dtup_240__ZEROP; cdat->dtup_240__ZEROP.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_240__ZEROP.nbval = 1; /*^iniobj*/ /*iniobj dobj_241*/ /*_.VALDATA___V247*/ meltfptr[246] = (void*)&cdat->dobj_241; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_241", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_241", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_241.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_241.obj_num = 0; cdat->dobj_241.obj_hash = 766795148; cdat->dobj_241.obj_len = 2; /*inistring dstr_242__*/ /*_.VALSTR___V249*/ meltfptr[248] = (void*)&cdat->dstr_242__; cdat->dstr_242__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_242__.val, "((", sizeof (cdat->dstr_242__.val)-1); /*inistring dstr_243__OL_*/ /*_.VALSTR___V250*/ meltfptr[249] = (void*)&cdat->dstr_243__OL_; cdat->dstr_243__OL_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_243__OL_.val, ") == OL)", sizeof (cdat->dstr_243__OL_.val)-1); /*inistring dstr_244__ZEROP*/ /*_.VALSTR___V246*/ meltfptr[245] = (void*)&cdat->dstr_244__ZEROP; cdat->dstr_244__ZEROP.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_244__ZEROP.val, "ZEROP", sizeof (cdat->dstr_244__ZEROP.val)-1); /*iniobj dsym_245__OUTCSTRING_DBG*/ /*uniqueobj*/ if (!/*_.VALDATA___V252*/ meltfptr[251]) /*_.VALDATA___V252*/ meltfptr[251] = (void*)&cdat->dsym_245__OUTCSTRING_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_245__OUTCSTRING_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_245__OUTCSTRING_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_245__OUTCSTRING_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_245__OUTCSTRING_DBG.obj_hash = 691363518; cdat->dsym_245__OUTCSTRING_DBG.obj_len = 3; /*inistring dstr_246__OUTCSTRING_DBG*/ /*_.VALSTR___V253*/ meltfptr[252] = (void*)&cdat->dstr_246__OUTCSTRING_DBG; cdat->dstr_246__OUTCSTRING_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_246__OUTCSTRING_DBG.val, "OUTCSTRING_DBG", sizeof (cdat->dstr_246__OUTCSTRING_DBG.val)-1); MELT_LOCATION("warmelt-base.melt:147:/ iniobj"); /*iniobj dobj_247__OUTCSTRING_DBG*/ /*_.VALDATA___V254*/ meltfptr[253] = (void*)&cdat->dobj_247__OUTCSTRING_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_247__OUTCSTRING_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_247__OUTCSTRING_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_247__OUTCSTRING_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_247__OUTCSTRING_DBG.obj_hash = 917585741; cdat->dobj_247__OUTCSTRING_DBG.obj_len = 5; /*inimult dtup_248__OUTCSTRING_DBG*/ /*_.VALTUP___V262*/ meltfptr[261] = (void*)&cdat->dtup_248__OUTCSTRING_DBG; cdat->dtup_248__OUTCSTRING_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_248__OUTCSTRING_DBG.nbval = 3; /*inimult dtup_249__OUTCSTRING_DBG*/ /*_.VALTUP___V259*/ meltfptr[258] = (void*)&cdat->dtup_249__OUTCSTRING_DBG; cdat->dtup_249__OUTCSTRING_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_249__OUTCSTRING_DBG.nbval = 1; /*iniobj dsym_250__S*/ /*uniqueobj*/ if (!/*_.VALDATA___V257*/ meltfptr[256]) /*_.VALDATA___V257*/ meltfptr[256] = (void*)&cdat->dsym_250__S; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_250__S", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_250__S", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_250__S.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_250__S.obj_hash = 71583210; cdat->dsym_250__S.obj_len = 3; /*inistring dstr_251__S*/ /*_.VALSTR___V258*/ meltfptr[257] = (void*)&cdat->dstr_251__S; cdat->dstr_251__S.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_251__S.val, "S", sizeof (cdat->dstr_251__S.val)-1); /*^iniobj*/ /*iniobj dobj_252*/ /*_.VALDATA___V256*/ meltfptr[255] = (void*)&cdat->dobj_252; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_252", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_252", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_252.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_252.obj_num = 0; cdat->dobj_252.obj_hash = 977868017; cdat->dobj_252.obj_len = 2; /*inistring dstr_253__melt_puts_dump_f*/ /*_.VALSTR___V260*/ meltfptr[259] = (void*)&cdat->dstr_253__melt_puts_dump_f; cdat->dstr_253__melt_puts_dump_f.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_253__melt_puts_dump_f.val, "melt_puts(dump_file,(", sizeof (cdat->dstr_253__melt_puts_dump_f.val)-1); /*inistring dstr_254__*/ /*_.VALSTR___V261*/ meltfptr[260] = (void*)&cdat->dstr_254__; cdat->dstr_254__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_254__.val, "))", sizeof (cdat->dstr_254__.val)-1); /*inistring dstr_255__OUTCSTRING_DBG*/ /*_.VALSTR___V255*/ meltfptr[254] = (void*)&cdat->dstr_255__OUTCSTRING_DBG; cdat->dstr_255__OUTCSTRING_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_255__OUTCSTRING_DBG.val, "OUTCSTRING_DBG", sizeof (cdat->dstr_255__OUTCSTRING_DBG.val)-1); /*iniobj dsym_256__OUTNUM_DBG*/ /*uniqueobj*/ if (!/*_.VALDATA___V263*/ meltfptr[262]) /*_.VALDATA___V263*/ meltfptr[262] = (void*)&cdat->dsym_256__OUTNUM_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_256__OUTNUM_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_256__OUTNUM_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_256__OUTNUM_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_256__OUTNUM_DBG.obj_hash = 41936540; cdat->dsym_256__OUTNUM_DBG.obj_len = 3; /*inistring dstr_257__OUTNUM_DBG*/ /*_.VALSTR___V264*/ meltfptr[263] = (void*)&cdat->dstr_257__OUTNUM_DBG; cdat->dstr_257__OUTNUM_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_257__OUTNUM_DBG.val, "OUTNUM_DBG", sizeof (cdat->dstr_257__OUTNUM_DBG.val)-1); MELT_LOCATION("warmelt-base.melt:149:/ iniobj"); /*iniobj dobj_258__OUTNUM_DBG*/ /*_.VALDATA___V265*/ meltfptr[264] = (void*)&cdat->dobj_258__OUTNUM_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_258__OUTNUM_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_258__OUTNUM_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_258__OUTNUM_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_258__OUTNUM_DBG.obj_hash = 637322451; cdat->dobj_258__OUTNUM_DBG.obj_len = 5; /*inimult dtup_259__OUTNUM_DBG*/ /*_.VALTUP___V281*/ meltfptr[280] = (void*)&cdat->dtup_259__OUTNUM_DBG; cdat->dtup_259__OUTNUM_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_259__OUTNUM_DBG.nbval = 7; /*inimult dtup_260__OUTNUM_DBG*/ /*_.VALTUP___V276*/ meltfptr[275] = (void*)&cdat->dtup_260__OUTNUM_DBG; cdat->dtup_260__OUTNUM_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_260__OUTNUM_DBG.nbval = 3; /*iniobj dsym_261__PREF*/ /*uniqueobj*/ if (!/*_.VALDATA___V268*/ meltfptr[267]) /*_.VALDATA___V268*/ meltfptr[267] = (void*)&cdat->dsym_261__PREF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_261__PREF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_261__PREF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_261__PREF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_261__PREF.obj_hash = 96883688; cdat->dsym_261__PREF.obj_len = 3; /*inistring dstr_262__PREF*/ /*_.VALSTR___V269*/ meltfptr[268] = (void*)&cdat->dstr_262__PREF; cdat->dstr_262__PREF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_262__PREF.val, "PREF", sizeof (cdat->dstr_262__PREF.val)-1); /*^iniobj*/ /*iniobj dobj_263*/ /*_.VALDATA___V267*/ meltfptr[266] = (void*)&cdat->dobj_263; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_263", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_263", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_263.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_263.obj_num = 0; cdat->dobj_263.obj_hash = 783116174; cdat->dobj_263.obj_len = 2; /*iniobj dsym_264__L*/ /*uniqueobj*/ if (!/*_.VALDATA___V271*/ meltfptr[270]) /*_.VALDATA___V271*/ meltfptr[270] = (void*)&cdat->dsym_264__L; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_264__L", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_264__L", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_264__L.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_264__L.obj_hash = 89697773; cdat->dsym_264__L.obj_len = 3; /*inistring dstr_265__L*/ /*_.VALSTR___V272*/ meltfptr[271] = (void*)&cdat->dstr_265__L; cdat->dstr_265__L.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_265__L.val, "L", sizeof (cdat->dstr_265__L.val)-1); /*^iniobj*/ /*iniobj dobj_266*/ /*_.VALDATA___V270*/ meltfptr[269] = (void*)&cdat->dobj_266; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_266", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_266", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_266.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_266.obj_num = 1; cdat->dobj_266.obj_hash = 503181971; cdat->dobj_266.obj_len = 2; /*iniobj dsym_267__SUF*/ /*uniqueobj*/ if (!/*_.VALDATA___V274*/ meltfptr[273]) /*_.VALDATA___V274*/ meltfptr[273] = (void*)&cdat->dsym_267__SUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_267__SUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_267__SUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_267__SUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_267__SUF.obj_hash = 121121391; cdat->dsym_267__SUF.obj_len = 3; /*inistring dstr_268__SUF*/ /*_.VALSTR___V275*/ meltfptr[274] = (void*)&cdat->dstr_268__SUF; cdat->dstr_268__SUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_268__SUF.val, "SUF", sizeof (cdat->dstr_268__SUF.val)-1); /*^iniobj*/ /*iniobj dobj_269*/ /*_.VALDATA___V273*/ meltfptr[272] = (void*)&cdat->dobj_269; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_269", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_269", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_269.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_269.obj_num = 2; cdat->dobj_269.obj_hash = 853748991; cdat->dobj_269.obj_len = 2; /*inistring dstr_270__melt_putnum_dump*/ /*_.VALSTR___V277*/ meltfptr[276] = (void*)&cdat->dstr_270__melt_putnum_dump; cdat->dstr_270__melt_putnum_dump.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_270__melt_putnum_dump.val, "melt_putnum(dump_file,(", sizeof (cdat->dstr_270__melt_putnum_dump.val)-1); /*inistring dstr_271__*/ /*_.VALSTR___V278*/ meltfptr[277] = (void*)&cdat->dstr_271__; cdat->dstr_271__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_271__.val, "), (", sizeof (cdat->dstr_271__.val)-1); /*inistring dstr_272__*/ /*_.VALSTR___V279*/ meltfptr[278] = (void*)&cdat->dstr_272__; cdat->dstr_272__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_272__.val, "), (", sizeof (cdat->dstr_272__.val)-1); /*inistring dstr_273__*/ /*_.VALSTR___V280*/ meltfptr[279] = (void*)&cdat->dstr_273__; cdat->dstr_273__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_273__.val, "))", sizeof (cdat->dstr_273__.val)-1); /*inistring dstr_274__OUTNUM_DBG*/ /*_.VALSTR___V266*/ meltfptr[265] = (void*)&cdat->dstr_274__OUTNUM_DBG; cdat->dstr_274__OUTNUM_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_274__OUTNUM_DBG.val, "OUTNUM_DBG", sizeof (cdat->dstr_274__OUTNUM_DBG.val)-1); /*iniobj dsym_275__OUTSTR_DBG*/ /*uniqueobj*/ if (!/*_.VALDATA___V282*/ meltfptr[281]) /*_.VALDATA___V282*/ meltfptr[281] = (void*)&cdat->dsym_275__OUTSTR_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_275__OUTSTR_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_275__OUTSTR_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_275__OUTSTR_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_275__OUTSTR_DBG.obj_hash = 501565237; cdat->dsym_275__OUTSTR_DBG.obj_len = 3; /*inistring dstr_276__OUTSTR_DBG*/ /*_.VALSTR___V283*/ meltfptr[282] = (void*)&cdat->dstr_276__OUTSTR_DBG; cdat->dstr_276__OUTSTR_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_276__OUTSTR_DBG.val, "OUTSTR_DBG", sizeof (cdat->dstr_276__OUTSTR_DBG.val)-1); MELT_LOCATION("warmelt-base.melt:152:/ iniobj"); /*iniobj dobj_277__OUTSTR_DBG*/ /*_.VALDATA___V284*/ meltfptr[283] = (void*)&cdat->dobj_277__OUTSTR_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_277__OUTSTR_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_277__OUTSTR_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_277__OUTSTR_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_277__OUTSTR_DBG.obj_hash = 200128275; cdat->dobj_277__OUTSTR_DBG.obj_len = 5; /*inimult dtup_278__OUTSTR_DBG*/ /*_.VALTUP___V292*/ meltfptr[291] = (void*)&cdat->dtup_278__OUTSTR_DBG; cdat->dtup_278__OUTSTR_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_278__OUTSTR_DBG.nbval = 3; /*inimult dtup_279__OUTSTR_DBG*/ /*_.VALTUP___V289*/ meltfptr[288] = (void*)&cdat->dtup_279__OUTSTR_DBG; cdat->dtup_279__OUTSTR_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_279__OUTSTR_DBG.nbval = 1; /*iniobj dsym_280__STR*/ /*uniqueobj*/ if (!/*_.VALDATA___V287*/ meltfptr[286]) /*_.VALDATA___V287*/ meltfptr[286] = (void*)&cdat->dsym_280__STR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_280__STR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_280__STR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_280__STR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_280__STR.obj_hash = 97600829; cdat->dsym_280__STR.obj_len = 3; /*inistring dstr_281__STR*/ /*_.VALSTR___V288*/ meltfptr[287] = (void*)&cdat->dstr_281__STR; cdat->dstr_281__STR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_281__STR.val, "STR", sizeof (cdat->dstr_281__STR.val)-1); /*^iniobj*/ /*iniobj dobj_282*/ /*_.VALDATA___V286*/ meltfptr[285] = (void*)&cdat->dobj_282; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_282", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_282", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_282.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_282.obj_num = 0; cdat->dobj_282.obj_hash = 105103342; cdat->dobj_282.obj_len = 2; /*inistring dstr_283__melt_putstr_dump*/ /*_.VALSTR___V290*/ meltfptr[289] = (void*)&cdat->dstr_283__melt_putstr_dump; cdat->dstr_283__melt_putstr_dump.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_283__melt_putstr_dump.val, "melt_putstr(dump_file,(melt_ptr_t)(", sizeof (cdat->dstr_283__melt_putstr_dump.val)-1); /*inistring dstr_284__*/ /*_.VALSTR___V291*/ meltfptr[290] = (void*)&cdat->dstr_284__; cdat->dstr_284__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_284__.val, "))", sizeof (cdat->dstr_284__.val)-1); /*inistring dstr_285__OUTSTR_DBG*/ /*_.VALSTR___V285*/ meltfptr[284] = (void*)&cdat->dstr_285__OUTSTR_DBG; cdat->dstr_285__OUTSTR_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_285__OUTSTR_DBG.val, "OUTSTR_DBG", sizeof (cdat->dstr_285__OUTSTR_DBG.val)-1); /*iniobj dsym_286__OUTSTRBUF_DBG*/ /*uniqueobj*/ if (!/*_.VALDATA___V293*/ meltfptr[292]) /*_.VALDATA___V293*/ meltfptr[292] = (void*)&cdat->dsym_286__OUTSTRBUF_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_286__OUTSTRBUF_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_286__OUTSTRBUF_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_286__OUTSTRBUF_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_286__OUTSTRBUF_DBG.obj_hash = 744841630; cdat->dsym_286__OUTSTRBUF_DBG.obj_len = 3; /*inistring dstr_287__OUTSTRBUF_DBG*/ /*_.VALSTR___V294*/ meltfptr[293] = (void*)&cdat->dstr_287__OUTSTRBUF_DBG; cdat->dstr_287__OUTSTRBUF_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_287__OUTSTRBUF_DBG.val, "OUTSTRBUF_DBG", sizeof (cdat->dstr_287__OUTSTRBUF_DBG.val)-1); MELT_LOCATION("warmelt-base.melt:155:/ iniobj"); /*iniobj dobj_288__OUTSTRBUF_DBG*/ /*_.VALDATA___V295*/ meltfptr[294] = (void*)&cdat->dobj_288__OUTSTRBUF_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_288__OUTSTRBUF_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_288__OUTSTRBUF_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_288__OUTSTRBUF_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_288__OUTSTRBUF_DBG.obj_hash = 467104955; cdat->dobj_288__OUTSTRBUF_DBG.obj_len = 5; /*inimult dtup_289__OUTSTRBUF_DBG*/ /*_.VALTUP___V303*/ meltfptr[302] = (void*)&cdat->dtup_289__OUTSTRBUF_DBG; cdat->dtup_289__OUTSTRBUF_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_289__OUTSTRBUF_DBG.nbval = 3; /*inimult dtup_290__OUTSTRBUF_DBG*/ /*_.VALTUP___V300*/ meltfptr[299] = (void*)&cdat->dtup_290__OUTSTRBUF_DBG; cdat->dtup_290__OUTSTRBUF_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_290__OUTSTRBUF_DBG.nbval = 1; /*iniobj dsym_291__SBUF*/ /*uniqueobj*/ if (!/*_.VALDATA___V298*/ meltfptr[297]) /*_.VALDATA___V298*/ meltfptr[297] = (void*)&cdat->dsym_291__SBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_291__SBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_291__SBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_291__SBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_291__SBUF.obj_hash = 120431958; cdat->dsym_291__SBUF.obj_len = 3; /*inistring dstr_292__SBUF*/ /*_.VALSTR___V299*/ meltfptr[298] = (void*)&cdat->dstr_292__SBUF; cdat->dstr_292__SBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_292__SBUF.val, "SBUF", sizeof (cdat->dstr_292__SBUF.val)-1); /*^iniobj*/ /*iniobj dobj_293*/ /*_.VALDATA___V297*/ meltfptr[296] = (void*)&cdat->dobj_293; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_293", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_293", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_293.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_293.obj_num = 0; cdat->dobj_293.obj_hash = 177643347; cdat->dobj_293.obj_len = 2; /*inistring dstr_294__melt_putstrbuf_d*/ /*_.VALSTR___V301*/ meltfptr[300] = (void*)&cdat->dstr_294__melt_putstrbuf_d; cdat->dstr_294__melt_putstrbuf_d.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_294__melt_putstrbuf_d.val, "melt_putstrbuf(dump_file,(melt_ptr_t)(", sizeof (cdat->dstr_294__melt_putstrbuf_d.val)-1); /*inistring dstr_295__*/ /*_.VALSTR___V302*/ meltfptr[301] = (void*)&cdat->dstr_295__; cdat->dstr_295__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_295__.val, "))", sizeof (cdat->dstr_295__.val)-1); /*inistring dstr_296__OUTSTRBUF_DBG*/ /*_.VALSTR___V296*/ meltfptr[295] = (void*)&cdat->dstr_296__OUTSTRBUF_DBG; cdat->dstr_296__OUTSTRBUF_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_296__OUTSTRBUF_DBG.val, "OUTSTRBUF_DBG", sizeof (cdat->dstr_296__OUTSTRBUF_DBG.val)-1); /*iniobj dsym_297__OUTNEWLINE_DBG*/ /*uniqueobj*/ if (!/*_.VALDATA___V304*/ meltfptr[303]) /*_.VALDATA___V304*/ meltfptr[303] = (void*)&cdat->dsym_297__OUTNEWLINE_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_297__OUTNEWLINE_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_297__OUTNEWLINE_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_297__OUTNEWLINE_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_297__OUTNEWLINE_DBG.obj_hash = 349746436; cdat->dsym_297__OUTNEWLINE_DBG.obj_len = 3; /*inistring dstr_298__OUTNEWLINE_DBG*/ /*_.VALSTR___V305*/ meltfptr[304] = (void*)&cdat->dstr_298__OUTNEWLINE_DBG; cdat->dstr_298__OUTNEWLINE_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_298__OUTNEWLINE_DBG.val, "OUTNEWLINE_DBG", sizeof (cdat->dstr_298__OUTNEWLINE_DBG.val)-1); MELT_LOCATION("warmelt-base.melt:157:/ iniobj"); /*iniobj dobj_299__OUTNEWLINE_DBG*/ /*_.VALDATA___V306*/ meltfptr[305] = (void*)&cdat->dobj_299__OUTNEWLINE_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_299__OUTNEWLINE_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_299__OUTNEWLINE_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_299__OUTNEWLINE_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_299__OUTNEWLINE_DBG.obj_hash = 421814589; cdat->dobj_299__OUTNEWLINE_DBG.obj_len = 5; /*inimult dtup_300__OUTNEWLINE_DBG*/ /*_.VALTUP___V310*/ meltfptr[309] = (void*)&cdat->dtup_300__OUTNEWLINE_DBG; cdat->dtup_300__OUTNEWLINE_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_300__OUTNEWLINE_DBG.nbval = 1; /*inimult dtup_301__OUTNEWLINE_DBG*/ /*_.VALTUP___V308*/ meltfptr[307] = (void*)&cdat->dtup_301__OUTNEWLINE_DBG; cdat->dtup_301__OUTNEWLINE_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_301__OUTNEWLINE_DBG.nbval = 0; /*inistring dstr_302__melt_newlineflus*/ /*_.VALSTR___V309*/ meltfptr[308] = (void*)&cdat->dstr_302__melt_newlineflus; cdat->dstr_302__melt_newlineflus.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_302__melt_newlineflus.val, "melt_newlineflush(dump_file)", sizeof (cdat->dstr_302__melt_newlineflus.val)-1); /*inistring dstr_303__OUTNEWLINE_DBG*/ /*_.VALSTR___V307*/ meltfptr[306] = (void*)&cdat->dstr_303__OUTNEWLINE_DBG; cdat->dstr_303__OUTNEWLINE_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_303__OUTNEWLINE_DBG.val, "OUTNEWLINE_DBG", sizeof (cdat->dstr_303__OUTNEWLINE_DBG.val)-1); /*iniobj dsym_304__OUTNUM_ERR*/ /*uniqueobj*/ if (!/*_.VALDATA___V311*/ meltfptr[310]) /*_.VALDATA___V311*/ meltfptr[310] = (void*)&cdat->dsym_304__OUTNUM_ERR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_304__OUTNUM_ERR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_304__OUTNUM_ERR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_304__OUTNUM_ERR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_304__OUTNUM_ERR.obj_hash = 210657088; cdat->dsym_304__OUTNUM_ERR.obj_len = 3; /*inistring dstr_305__OUTNUM_ERR*/ /*_.VALSTR___V312*/ meltfptr[311] = (void*)&cdat->dstr_305__OUTNUM_ERR; cdat->dstr_305__OUTNUM_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_305__OUTNUM_ERR.val, "OUTNUM_ERR", sizeof (cdat->dstr_305__OUTNUM_ERR.val)-1); MELT_LOCATION("warmelt-base.melt:160:/ iniobj"); /*iniobj dobj_306__OUTNUM_ERR*/ /*_.VALDATA___V313*/ meltfptr[312] = (void*)&cdat->dobj_306__OUTNUM_ERR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_306__OUTNUM_ERR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_306__OUTNUM_ERR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_306__OUTNUM_ERR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_306__OUTNUM_ERR.obj_hash = 151437483; cdat->dobj_306__OUTNUM_ERR.obj_len = 5; /*inimult dtup_307__OUTNUM_ERR*/ /*_.VALTUP___V323*/ meltfptr[322] = (void*)&cdat->dtup_307__OUTNUM_ERR; cdat->dtup_307__OUTNUM_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_307__OUTNUM_ERR.nbval = 7; /*inimult dtup_308__OUTNUM_ERR*/ /*_.VALTUP___V318*/ meltfptr[317] = (void*)&cdat->dtup_308__OUTNUM_ERR; cdat->dtup_308__OUTNUM_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_308__OUTNUM_ERR.nbval = 3; /*^iniobj*/ /*iniobj dobj_309*/ /*_.VALDATA___V315*/ meltfptr[314] = (void*)&cdat->dobj_309; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_309", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_309", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_309.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_309.obj_num = 0; cdat->dobj_309.obj_hash = 301128104; cdat->dobj_309.obj_len = 2; /*^iniobj*/ /*iniobj dobj_310*/ /*_.VALDATA___V316*/ meltfptr[315] = (void*)&cdat->dobj_310; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_310", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_310", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_310.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_310.obj_num = 1; cdat->dobj_310.obj_hash = 793041079; cdat->dobj_310.obj_len = 2; /*^iniobj*/ /*iniobj dobj_311*/ /*_.VALDATA___V317*/ meltfptr[316] = (void*)&cdat->dobj_311; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_311", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_311", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_311.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_311.obj_num = 2; cdat->dobj_311.obj_hash = 892901316; cdat->dobj_311.obj_len = 2; /*inistring dstr_312__melt_putnum_stde*/ /*_.VALSTR___V319*/ meltfptr[318] = (void*)&cdat->dstr_312__melt_putnum_stde; cdat->dstr_312__melt_putnum_stde.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_312__melt_putnum_stde.val, "melt_putnum(stderr,(", sizeof (cdat->dstr_312__melt_putnum_stde.val)-1); /*inistring dstr_313__*/ /*_.VALSTR___V320*/ meltfptr[319] = (void*)&cdat->dstr_313__; cdat->dstr_313__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_313__.val, "), (", sizeof (cdat->dstr_313__.val)-1); /*inistring dstr_314__*/ /*_.VALSTR___V321*/ meltfptr[320] = (void*)&cdat->dstr_314__; cdat->dstr_314__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_314__.val, "), (", sizeof (cdat->dstr_314__.val)-1); /*inistring dstr_315__*/ /*_.VALSTR___V322*/ meltfptr[321] = (void*)&cdat->dstr_315__; cdat->dstr_315__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_315__.val, "))", sizeof (cdat->dstr_315__.val)-1); /*inistring dstr_316__OUTNUM_ERR*/ /*_.VALSTR___V314*/ meltfptr[313] = (void*)&cdat->dstr_316__OUTNUM_ERR; cdat->dstr_316__OUTNUM_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_316__OUTNUM_ERR.val, "OUTNUM_ERR", sizeof (cdat->dstr_316__OUTNUM_ERR.val)-1); /*iniobj dsym_317__OUTCSTRING_ERR*/ /*uniqueobj*/ if (!/*_.VALDATA___V324*/ meltfptr[323]) /*_.VALDATA___V324*/ meltfptr[323] = (void*)&cdat->dsym_317__OUTCSTRING_ERR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_317__OUTCSTRING_ERR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_317__OUTCSTRING_ERR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_317__OUTCSTRING_ERR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_317__OUTCSTRING_ERR.obj_hash = 395394604; cdat->dsym_317__OUTCSTRING_ERR.obj_len = 3; /*inistring dstr_318__OUTCSTRING_ERR*/ /*_.VALSTR___V325*/ meltfptr[324] = (void*)&cdat->dstr_318__OUTCSTRING_ERR; cdat->dstr_318__OUTCSTRING_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_318__OUTCSTRING_ERR.val, "OUTCSTRING_ERR", sizeof (cdat->dstr_318__OUTCSTRING_ERR.val)-1); MELT_LOCATION("warmelt-base.melt:163:/ iniobj"); /*iniobj dobj_319__OUTCSTRING_ERR*/ /*_.VALDATA___V326*/ meltfptr[325] = (void*)&cdat->dobj_319__OUTCSTRING_ERR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_319__OUTCSTRING_ERR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_319__OUTCSTRING_ERR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_319__OUTCSTRING_ERR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_319__OUTCSTRING_ERR.obj_hash = 205571031; cdat->dobj_319__OUTCSTRING_ERR.obj_len = 5; /*inimult dtup_320__OUTCSTRING_ERR*/ /*_.VALTUP___V332*/ meltfptr[331] = (void*)&cdat->dtup_320__OUTCSTRING_ERR; cdat->dtup_320__OUTCSTRING_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_320__OUTCSTRING_ERR.nbval = 3; /*inimult dtup_321__OUTCSTRING_ERR*/ /*_.VALTUP___V329*/ meltfptr[328] = (void*)&cdat->dtup_321__OUTCSTRING_ERR; cdat->dtup_321__OUTCSTRING_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_321__OUTCSTRING_ERR.nbval = 1; /*^iniobj*/ /*iniobj dobj_322*/ /*_.VALDATA___V328*/ meltfptr[327] = (void*)&cdat->dobj_322; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_322", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_322", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_322.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_322.obj_num = 0; cdat->dobj_322.obj_hash = 350691611; cdat->dobj_322.obj_len = 2; /*inistring dstr_323__melt_puts_stderr*/ /*_.VALSTR___V330*/ meltfptr[329] = (void*)&cdat->dstr_323__melt_puts_stderr; cdat->dstr_323__melt_puts_stderr.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_323__melt_puts_stderr.val, "melt_puts(stderr,(", sizeof (cdat->dstr_323__melt_puts_stderr.val)-1); /*inistring dstr_324__*/ /*_.VALSTR___V331*/ meltfptr[330] = (void*)&cdat->dstr_324__; cdat->dstr_324__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_324__.val, "))", sizeof (cdat->dstr_324__.val)-1); /*inistring dstr_325__OUTCSTRING_ERR*/ /*_.VALSTR___V327*/ meltfptr[326] = (void*)&cdat->dstr_325__OUTCSTRING_ERR; cdat->dstr_325__OUTCSTRING_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_325__OUTCSTRING_ERR.val, "OUTCSTRING_ERR", sizeof (cdat->dstr_325__OUTCSTRING_ERR.val)-1); /*iniobj dsym_326__OUTSTRBUF_ERR*/ /*uniqueobj*/ if (!/*_.VALDATA___V333*/ meltfptr[332]) /*_.VALDATA___V333*/ meltfptr[332] = (void*)&cdat->dsym_326__OUTSTRBUF_ERR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_326__OUTSTRBUF_ERR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_326__OUTSTRBUF_ERR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_326__OUTSTRBUF_ERR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_326__OUTSTRBUF_ERR.obj_hash = 599482803; cdat->dsym_326__OUTSTRBUF_ERR.obj_len = 3; /*inistring dstr_327__OUTSTRBUF_ERR*/ /*_.VALSTR___V334*/ meltfptr[333] = (void*)&cdat->dstr_327__OUTSTRBUF_ERR; cdat->dstr_327__OUTSTRBUF_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_327__OUTSTRBUF_ERR.val, "OUTSTRBUF_ERR", sizeof (cdat->dstr_327__OUTSTRBUF_ERR.val)-1); MELT_LOCATION("warmelt-base.melt:166:/ iniobj"); /*iniobj dobj_328__OUTSTRBUF_ERR*/ /*_.VALDATA___V335*/ meltfptr[334] = (void*)&cdat->dobj_328__OUTSTRBUF_ERR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_328__OUTSTRBUF_ERR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_328__OUTSTRBUF_ERR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_328__OUTSTRBUF_ERR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_328__OUTSTRBUF_ERR.obj_hash = 601203635; cdat->dobj_328__OUTSTRBUF_ERR.obj_len = 5; /*inimult dtup_329__OUTSTRBUF_ERR*/ /*_.VALTUP___V341*/ meltfptr[340] = (void*)&cdat->dtup_329__OUTSTRBUF_ERR; cdat->dtup_329__OUTSTRBUF_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_329__OUTSTRBUF_ERR.nbval = 3; /*inimult dtup_330__OUTSTRBUF_ERR*/ /*_.VALTUP___V338*/ meltfptr[337] = (void*)&cdat->dtup_330__OUTSTRBUF_ERR; cdat->dtup_330__OUTSTRBUF_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_330__OUTSTRBUF_ERR.nbval = 1; /*^iniobj*/ /*iniobj dobj_331*/ /*_.VALDATA___V337*/ meltfptr[336] = (void*)&cdat->dobj_331; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_331", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_331", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_331.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_331.obj_num = 0; cdat->dobj_331.obj_hash = 272176307; cdat->dobj_331.obj_len = 2; /*inistring dstr_332__melt_putstrbuf_s*/ /*_.VALSTR___V339*/ meltfptr[338] = (void*)&cdat->dstr_332__melt_putstrbuf_s; cdat->dstr_332__melt_putstrbuf_s.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_332__melt_putstrbuf_s.val, "melt_putstrbuf(stderr,(melt_ptr_t)(", sizeof (cdat->dstr_332__melt_putstrbuf_s.val)-1); /*inistring dstr_333__*/ /*_.VALSTR___V340*/ meltfptr[339] = (void*)&cdat->dstr_333__; cdat->dstr_333__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_333__.val, "))", sizeof (cdat->dstr_333__.val)-1); /*inistring dstr_334__OUTSTRBUF_ERR*/ /*_.VALSTR___V336*/ meltfptr[335] = (void*)&cdat->dstr_334__OUTSTRBUF_ERR; cdat->dstr_334__OUTSTRBUF_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_334__OUTSTRBUF_ERR.val, "OUTSTRBUF_ERR", sizeof (cdat->dstr_334__OUTSTRBUF_ERR.val)-1); /*iniobj dsym_335__PAIR_SET_HEAD*/ /*uniqueobj*/ if (!/*_.VALDATA___V342*/ meltfptr[341]) /*_.VALDATA___V342*/ meltfptr[341] = (void*)&cdat->dsym_335__PAIR_SET_HEAD; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_335__PAIR_SET_HEAD", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_335__PAIR_SET_HEAD", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_335__PAIR_SET_HEAD.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_335__PAIR_SET_HEAD.obj_hash = 992263149; cdat->dsym_335__PAIR_SET_HEAD.obj_len = 3; /*inistring dstr_336__PAIR_SET_HEAD*/ /*_.VALSTR___V343*/ meltfptr[342] = (void*)&cdat->dstr_336__PAIR_SET_HEAD; cdat->dstr_336__PAIR_SET_HEAD.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_336__PAIR_SET_HEAD.val, "PAIR_SET_HEAD", sizeof (cdat->dstr_336__PAIR_SET_HEAD.val)-1); MELT_LOCATION("warmelt-base.melt:174:/ iniobj"); /*iniobj dobj_337__PAIR_SET_HEAD*/ /*_.VALDATA___V344*/ meltfptr[343] = (void*)&cdat->dobj_337__PAIR_SET_HEAD; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_337__PAIR_SET_HEAD", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_337__PAIR_SET_HEAD", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_337__PAIR_SET_HEAD.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_337__PAIR_SET_HEAD.obj_hash = 376145308; cdat->dobj_337__PAIR_SET_HEAD.obj_len = 5; /*inimult dtup_338__PAIR_SET_HEAD*/ /*_.VALTUP___V356*/ meltfptr[355] = (void*)&cdat->dtup_338__PAIR_SET_HEAD; cdat->dtup_338__PAIR_SET_HEAD.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_338__PAIR_SET_HEAD.nbval = 5; /*inimult dtup_339__PAIR_SET_HEAD*/ /*_.VALTUP___V352*/ meltfptr[351] = (void*)&cdat->dtup_339__PAIR_SET_HEAD; cdat->dtup_339__PAIR_SET_HEAD.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_339__PAIR_SET_HEAD.nbval = 2; /*iniobj dsym_340__PA*/ /*uniqueobj*/ if (!/*_.VALDATA___V347*/ meltfptr[346]) /*_.VALDATA___V347*/ meltfptr[346] = (void*)&cdat->dsym_340__PA; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_340__PA", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_340__PA", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_340__PA.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_340__PA.obj_hash = 94633376; cdat->dsym_340__PA.obj_len = 3; /*inistring dstr_341__PA*/ /*_.VALSTR___V348*/ meltfptr[347] = (void*)&cdat->dstr_341__PA; cdat->dstr_341__PA.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_341__PA.val, "PA", sizeof (cdat->dstr_341__PA.val)-1); /*^iniobj*/ /*iniobj dobj_342*/ /*_.VALDATA___V346*/ meltfptr[345] = (void*)&cdat->dobj_342; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_342", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_342", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_342.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_342.obj_num = 0; cdat->dobj_342.obj_hash = 687515862; cdat->dobj_342.obj_len = 2; /*iniobj dsym_343__HD*/ /*uniqueobj*/ if (!/*_.VALDATA___V350*/ meltfptr[349]) /*_.VALDATA___V350*/ meltfptr[349] = (void*)&cdat->dsym_343__HD; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_343__HD", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_343__HD", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_343__HD.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_343__HD.obj_hash = 82895791; cdat->dsym_343__HD.obj_len = 3; /*inistring dstr_344__HD*/ /*_.VALSTR___V351*/ meltfptr[350] = (void*)&cdat->dstr_344__HD; cdat->dstr_344__HD.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_344__HD.val, "HD", sizeof (cdat->dstr_344__HD.val)-1); /*^iniobj*/ /*iniobj dobj_345*/ /*_.VALDATA___V349*/ meltfptr[348] = (void*)&cdat->dobj_345; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_345", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_345", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_345.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_345.obj_num = 1; cdat->dobj_345.obj_hash = 352782043; cdat->dobj_345.obj_len = 2; /*inistring dstr_346__meltgc_pair_set_*/ /*_.VALSTR___V353*/ meltfptr[352] = (void*)&cdat->dstr_346__meltgc_pair_set_; cdat->dstr_346__meltgc_pair_set_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_346__meltgc_pair_set_.val, "meltgc_pair_set_head((melt_ptr_t)(", sizeof (cdat->dstr_346__meltgc_pair_set_.val)-1); /*inistring dstr_347__*/ /*_.VALSTR___V354*/ meltfptr[353] = (void*)&cdat->dstr_347__; cdat->dstr_347__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_347__.val, "), (", sizeof (cdat->dstr_347__.val)-1); /*inistring dstr_348__*/ /*_.VALSTR___V355*/ meltfptr[354] = (void*)&cdat->dstr_348__; cdat->dstr_348__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_348__.val, "))", sizeof (cdat->dstr_348__.val)-1); /*inistring dstr_349__PAIR_SET_HEAD*/ /*_.VALSTR___V345*/ meltfptr[344] = (void*)&cdat->dstr_349__PAIR_SET_HEAD; cdat->dstr_349__PAIR_SET_HEAD.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_349__PAIR_SET_HEAD.val, "PAIR_SET_HEAD", sizeof (cdat->dstr_349__PAIR_SET_HEAD.val)-1); /*iniobj dsym_350__PAIR_LISTLENGTH*/ /*uniqueobj*/ if (!/*_.VALDATA___V357*/ meltfptr[356]) /*_.VALDATA___V357*/ meltfptr[356] = (void*)&cdat->dsym_350__PAIR_LISTLENGTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_350__PAIR_LISTLENGTH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_350__PAIR_LISTLENGTH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_350__PAIR_LISTLENGTH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_350__PAIR_LISTLENGTH.obj_hash = 1062057201; cdat->dsym_350__PAIR_LISTLENGTH.obj_len = 3; /*inistring dstr_351__PAIR_LISTLENGTH*/ /*_.VALSTR___V358*/ meltfptr[357] = (void*)&cdat->dstr_351__PAIR_LISTLENGTH; cdat->dstr_351__PAIR_LISTLENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_351__PAIR_LISTLENGTH.val, "PAIR_LISTLENGTH", sizeof (cdat->dstr_351__PAIR_LISTLENGTH.val)-1); MELT_LOCATION("warmelt-base.melt:179:/ iniobj"); /*iniobj dobj_352__PAIR_LISTLENGTH*/ /*_.VALDATA___V359*/ meltfptr[358] = (void*)&cdat->dobj_352__PAIR_LISTLENGTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_352__PAIR_LISTLENGTH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_352__PAIR_LISTLENGTH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_352__PAIR_LISTLENGTH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_352__PAIR_LISTLENGTH.obj_hash = 823523080; cdat->dobj_352__PAIR_LISTLENGTH.obj_len = 5; /*inimult dtup_353__PAIR_LISTLENGTH*/ /*_.VALTUP___V365*/ meltfptr[364] = (void*)&cdat->dtup_353__PAIR_LISTLENGTH; cdat->dtup_353__PAIR_LISTLENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_353__PAIR_LISTLENGTH.nbval = 3; /*inimult dtup_354__PAIR_LISTLENGTH*/ /*_.VALTUP___V362*/ meltfptr[361] = (void*)&cdat->dtup_354__PAIR_LISTLENGTH; cdat->dtup_354__PAIR_LISTLENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_354__PAIR_LISTLENGTH.nbval = 1; /*^iniobj*/ /*iniobj dobj_355*/ /*_.VALDATA___V361*/ meltfptr[360] = (void*)&cdat->dobj_355; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_355", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_355", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_355.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_355.obj_num = 0; cdat->dobj_355.obj_hash = 1068828690; cdat->dobj_355.obj_len = 2; /*inistring dstr_356__melt_pair_listl*/ /*_.VALSTR___V363*/ meltfptr[362] = (void*)&cdat->dstr_356__melt_pair_listl; cdat->dstr_356__melt_pair_listl.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_356__melt_pair_listl.val, "(melt_pair_listlength((melt_ptr_t)(", sizeof (cdat->dstr_356__melt_pair_listl.val)-1); /*inistring dstr_357__*/ /*_.VALSTR___V364*/ meltfptr[363] = (void*)&cdat->dstr_357__; cdat->dstr_357__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_357__.val, ")))", sizeof (cdat->dstr_357__.val)-1); /*inistring dstr_358__PAIR_LISTLENGTH*/ /*_.VALSTR___V360*/ meltfptr[359] = (void*)&cdat->dstr_358__PAIR_LISTLENGTH; cdat->dstr_358__PAIR_LISTLENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_358__PAIR_LISTLENGTH.val, "PAIR_LISTLENGTH", sizeof (cdat->dstr_358__PAIR_LISTLENGTH.val)-1); /*iniobj dsym_359__MAKE_PAIR*/ /*uniqueobj*/ if (!/*_.VALDATA___V366*/ meltfptr[365]) /*_.VALDATA___V366*/ meltfptr[365] = (void*)&cdat->dsym_359__MAKE_PAIR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_359__MAKE_PAIR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_359__MAKE_PAIR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_359__MAKE_PAIR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_359__MAKE_PAIR.obj_hash = 310715668; cdat->dsym_359__MAKE_PAIR.obj_len = 3; /*inistring dstr_360__MAKE_PAIR*/ /*_.VALSTR___V367*/ meltfptr[366] = (void*)&cdat->dstr_360__MAKE_PAIR; cdat->dstr_360__MAKE_PAIR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_360__MAKE_PAIR.val, "MAKE_PAIR", sizeof (cdat->dstr_360__MAKE_PAIR.val)-1); MELT_LOCATION("warmelt-base.melt:184:/ iniobj"); /*iniobj dobj_361__MAKE_PAIR*/ /*_.VALDATA___V368*/ meltfptr[367] = (void*)&cdat->dobj_361__MAKE_PAIR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_361__MAKE_PAIR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_361__MAKE_PAIR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_361__MAKE_PAIR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_361__MAKE_PAIR.obj_hash = 768368616; cdat->dobj_361__MAKE_PAIR.obj_len = 5; /*inimult dtup_362__MAKE_PAIR*/ /*_.VALTUP___V382*/ meltfptr[381] = (void*)&cdat->dtup_362__MAKE_PAIR; cdat->dtup_362__MAKE_PAIR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_362__MAKE_PAIR.nbval = 7; /*inimult dtup_363__MAKE_PAIR*/ /*_.VALTUP___V377*/ meltfptr[376] = (void*)&cdat->dtup_363__MAKE_PAIR; cdat->dtup_363__MAKE_PAIR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_363__MAKE_PAIR.nbval = 3; /*iniobj dsym_364__DISCR*/ /*uniqueobj*/ if (!/*_.VALDATA___V371*/ meltfptr[370]) /*_.VALDATA___V371*/ meltfptr[370] = (void*)&cdat->dsym_364__DISCR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_364__DISCR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_364__DISCR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_364__DISCR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_364__DISCR.obj_hash = 95458406; cdat->dsym_364__DISCR.obj_len = 3; /*inistring dstr_365__DISCR*/ /*_.VALSTR___V372*/ meltfptr[371] = (void*)&cdat->dstr_365__DISCR; cdat->dstr_365__DISCR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_365__DISCR.val, "DISCR", sizeof (cdat->dstr_365__DISCR.val)-1); /*^iniobj*/ /*iniobj dobj_366*/ /*_.VALDATA___V370*/ meltfptr[369] = (void*)&cdat->dobj_366; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_366", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_366", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_366.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_366.obj_num = 0; cdat->dobj_366.obj_hash = 1056243517; cdat->dobj_366.obj_len = 2; /*^iniobj*/ /*iniobj dobj_367*/ /*_.VALDATA___V373*/ meltfptr[372] = (void*)&cdat->dobj_367; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_367", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_367", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_367.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_367.obj_num = 1; cdat->dobj_367.obj_hash = 472278900; cdat->dobj_367.obj_len = 2; /*iniobj dsym_368__TL*/ /*uniqueobj*/ if (!/*_.VALDATA___V375*/ meltfptr[374]) /*_.VALDATA___V375*/ meltfptr[374] = (void*)&cdat->dsym_368__TL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_368__TL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_368__TL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_368__TL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_368__TL.obj_hash = 6063274; cdat->dsym_368__TL.obj_len = 3; /*inistring dstr_369__TL*/ /*_.VALSTR___V376*/ meltfptr[375] = (void*)&cdat->dstr_369__TL; cdat->dstr_369__TL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_369__TL.val, "TL", sizeof (cdat->dstr_369__TL.val)-1); /*^iniobj*/ /*iniobj dobj_370*/ /*_.VALDATA___V374*/ meltfptr[373] = (void*)&cdat->dobj_370; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_370", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_370", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_370.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_370.obj_num = 2; cdat->dobj_370.obj_hash = 359640745; cdat->dobj_370.obj_len = 2; /*inistring dstr_371__meltgc_new_pair*/ /*_.VALSTR___V378*/ meltfptr[377] = (void*)&cdat->dstr_371__meltgc_new_pair; cdat->dstr_371__meltgc_new_pair.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_371__meltgc_new_pair.val, "(meltgc_new_pair((meltobject_ptr_t)(", sizeof (cdat->dstr_371__meltgc_new_pair.val)-1); /*inistring dstr_372__melt_ptr_t_*/ /*_.VALSTR___V379*/ meltfptr[378] = (void*)&cdat->dstr_372__melt_ptr_t_; cdat->dstr_372__melt_ptr_t_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_372__melt_ptr_t_.val, "), (melt_ptr_t)(", sizeof (cdat->dstr_372__melt_ptr_t_.val)-1); /*inistring dstr_373__melt_ptr_t_*/ /*_.VALSTR___V380*/ meltfptr[379] = (void*)&cdat->dstr_373__melt_ptr_t_; cdat->dstr_373__melt_ptr_t_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_373__melt_ptr_t_.val, "), (melt_ptr_t)(", sizeof (cdat->dstr_373__melt_ptr_t_.val)-1); /*inistring dstr_374__*/ /*_.VALSTR___V381*/ meltfptr[380] = (void*)&cdat->dstr_374__; cdat->dstr_374__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_374__.val, ")))", sizeof (cdat->dstr_374__.val)-1); /*inistring dstr_375__MAKE_PAIR*/ /*_.VALSTR___V369*/ meltfptr[368] = (void*)&cdat->dstr_375__MAKE_PAIR; cdat->dstr_375__MAKE_PAIR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_375__MAKE_PAIR.val, "MAKE_PAIR", sizeof (cdat->dstr_375__MAKE_PAIR.val)-1); /*iniobj dsym_376__IS_MIXINT*/ /*uniqueobj*/ if (!/*_.VALDATA___V383*/ meltfptr[382]) /*_.VALDATA___V383*/ meltfptr[382] = (void*)&cdat->dsym_376__IS_MIXINT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_376__IS_MIXINT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_376__IS_MIXINT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_376__IS_MIXINT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_376__IS_MIXINT.obj_hash = 842426558; cdat->dsym_376__IS_MIXINT.obj_len = 3; /*inistring dstr_377__IS_MIXINT*/ /*_.VALSTR___V384*/ meltfptr[383] = (void*)&cdat->dstr_377__IS_MIXINT; cdat->dstr_377__IS_MIXINT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_377__IS_MIXINT.val, "IS_MIXINT", sizeof (cdat->dstr_377__IS_MIXINT.val)-1); MELT_LOCATION("warmelt-base.melt:190:/ iniobj"); /*iniobj dobj_378__IS_MIXINT*/ /*_.VALDATA___V385*/ meltfptr[384] = (void*)&cdat->dobj_378__IS_MIXINT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_378__IS_MIXINT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_378__IS_MIXINT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_378__IS_MIXINT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_378__IS_MIXINT.obj_hash = 707866824; cdat->dobj_378__IS_MIXINT.obj_len = 5; /*inimult dtup_379__IS_MIXINT*/ /*_.VALTUP___V393*/ meltfptr[392] = (void*)&cdat->dtup_379__IS_MIXINT; cdat->dtup_379__IS_MIXINT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_379__IS_MIXINT.nbval = 3; /*inimult dtup_380__IS_MIXINT*/ /*_.VALTUP___V390*/ meltfptr[389] = (void*)&cdat->dtup_380__IS_MIXINT; cdat->dtup_380__IS_MIXINT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_380__IS_MIXINT.nbval = 1; /*iniobj dsym_381__MI*/ /*uniqueobj*/ if (!/*_.VALDATA___V388*/ meltfptr[387]) /*_.VALDATA___V388*/ meltfptr[387] = (void*)&cdat->dsym_381__MI; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_381__MI", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_381__MI", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_381__MI.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_381__MI.obj_hash = 60776491; cdat->dsym_381__MI.obj_len = 3; /*inistring dstr_382__MI*/ /*_.VALSTR___V389*/ meltfptr[388] = (void*)&cdat->dstr_382__MI; cdat->dstr_382__MI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_382__MI.val, "MI", sizeof (cdat->dstr_382__MI.val)-1); /*^iniobj*/ /*iniobj dobj_383*/ /*_.VALDATA___V387*/ meltfptr[386] = (void*)&cdat->dobj_383; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_383", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_383", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_383.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_383.obj_num = 0; cdat->dobj_383.obj_hash = 754448046; cdat->dobj_383.obj_len = 2; /*inistring dstr_384__melt_magic_disc*/ /*_.VALSTR___V391*/ meltfptr[390] = (void*)&cdat->dstr_384__melt_magic_disc; cdat->dstr_384__melt_magic_disc.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_384__melt_magic_disc.val, "(melt_magic_discr((melt_ptr_t)(", sizeof (cdat->dstr_384__melt_magic_disc.val)-1); /*inistring dstr_385__OBMAG_MIXI*/ /*_.VALSTR___V392*/ meltfptr[391] = (void*)&cdat->dstr_385__OBMAG_MIXI; cdat->dstr_385__OBMAG_MIXI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_385__OBMAG_MIXI.val, ")) == OBMAG_MIXINT)", sizeof (cdat->dstr_385__OBMAG_MIXI.val)-1); /*inistring dstr_386__IS_MIXINT*/ /*_.VALSTR___V386*/ meltfptr[385] = (void*)&cdat->dstr_386__IS_MIXINT; cdat->dstr_386__IS_MIXINT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_386__IS_MIXINT.val, "IS_MIXINT", sizeof (cdat->dstr_386__IS_MIXINT.val)-1); /*iniobj dsym_387__MIXINT_VAL*/ /*uniqueobj*/ if (!/*_.VALDATA___V394*/ meltfptr[393]) /*_.VALDATA___V394*/ meltfptr[393] = (void*)&cdat->dsym_387__MIXINT_VAL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_387__MIXINT_VAL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_387__MIXINT_VAL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_387__MIXINT_VAL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_387__MIXINT_VAL.obj_hash = 723698673; cdat->dsym_387__MIXINT_VAL.obj_len = 3; /*inistring dstr_388__MIXINT_VAL*/ /*_.VALSTR___V395*/ meltfptr[394] = (void*)&cdat->dstr_388__MIXINT_VAL; cdat->dstr_388__MIXINT_VAL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_388__MIXINT_VAL.val, "MIXINT_VAL", sizeof (cdat->dstr_388__MIXINT_VAL.val)-1); MELT_LOCATION("warmelt-base.melt:194:/ iniobj"); /*iniobj dobj_389__MIXINT_VAL*/ /*_.VALDATA___V396*/ meltfptr[395] = (void*)&cdat->dobj_389__MIXINT_VAL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_389__MIXINT_VAL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_389__MIXINT_VAL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_389__MIXINT_VAL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_389__MIXINT_VAL.obj_hash = 297626548; cdat->dobj_389__MIXINT_VAL.obj_len = 5; /*inimult dtup_390__MIXINT_VAL*/ /*_.VALTUP___V402*/ meltfptr[401] = (void*)&cdat->dtup_390__MIXINT_VAL; cdat->dtup_390__MIXINT_VAL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_390__MIXINT_VAL.nbval = 3; /*inimult dtup_391__MIXINT_VAL*/ /*_.VALTUP___V399*/ meltfptr[398] = (void*)&cdat->dtup_391__MIXINT_VAL; cdat->dtup_391__MIXINT_VAL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_391__MIXINT_VAL.nbval = 1; /*^iniobj*/ /*iniobj dobj_392*/ /*_.VALDATA___V398*/ meltfptr[397] = (void*)&cdat->dobj_392; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_392", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_392", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_392.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_392.obj_num = 0; cdat->dobj_392.obj_hash = 1036505042; cdat->dobj_392.obj_len = 2; /*inistring dstr_393__melt_val_mixint*/ /*_.VALSTR___V400*/ meltfptr[399] = (void*)&cdat->dstr_393__melt_val_mixint; cdat->dstr_393__melt_val_mixint.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_393__melt_val_mixint.val, "(melt_val_mixint((melt_ptr_t)(", sizeof (cdat->dstr_393__melt_val_mixint.val)-1); /*inistring dstr_394__*/ /*_.VALSTR___V401*/ meltfptr[400] = (void*)&cdat->dstr_394__; cdat->dstr_394__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_394__.val, ")))", sizeof (cdat->dstr_394__.val)-1); /*inistring dstr_395__MIXINT_VAL*/ /*_.VALSTR___V397*/ meltfptr[396] = (void*)&cdat->dstr_395__MIXINT_VAL; cdat->dstr_395__MIXINT_VAL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_395__MIXINT_VAL.val, "MIXINT_VAL", sizeof (cdat->dstr_395__MIXINT_VAL.val)-1); /*iniobj dsym_396__MAKE_MIXINT*/ /*uniqueobj*/ if (!/*_.VALDATA___V403*/ meltfptr[402]) /*_.VALDATA___V403*/ meltfptr[402] = (void*)&cdat->dsym_396__MAKE_MIXINT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_396__MAKE_MIXINT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_396__MAKE_MIXINT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_396__MAKE_MIXINT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_396__MAKE_MIXINT.obj_hash = 387715935; cdat->dsym_396__MAKE_MIXINT.obj_len = 3; /*inistring dstr_397__MAKE_MIXINT*/ /*_.VALSTR___V404*/ meltfptr[403] = (void*)&cdat->dstr_397__MAKE_MIXINT; cdat->dstr_397__MAKE_MIXINT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_397__MAKE_MIXINT.val, "MAKE_MIXINT", sizeof (cdat->dstr_397__MAKE_MIXINT.val)-1); MELT_LOCATION("warmelt-base.melt:198:/ iniobj"); /*iniobj dobj_398__MAKE_MIXINT*/ /*_.VALDATA___V405*/ meltfptr[404] = (void*)&cdat->dobj_398__MAKE_MIXINT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_398__MAKE_MIXINT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_398__MAKE_MIXINT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_398__MAKE_MIXINT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_398__MAKE_MIXINT.obj_hash = 164738131; cdat->dobj_398__MAKE_MIXINT.obj_len = 5; /*inimult dtup_399__MAKE_MIXINT*/ /*_.VALTUP___V421*/ meltfptr[420] = (void*)&cdat->dtup_399__MAKE_MIXINT; cdat->dtup_399__MAKE_MIXINT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_399__MAKE_MIXINT.nbval = 7; /*inimult dtup_400__MAKE_MIXINT*/ /*_.VALTUP___V416*/ meltfptr[415] = (void*)&cdat->dtup_400__MAKE_MIXINT; cdat->dtup_400__MAKE_MIXINT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_400__MAKE_MIXINT.nbval = 3; /*iniobj dsym_401__DIS*/ /*uniqueobj*/ if (!/*_.VALDATA___V408*/ meltfptr[407]) /*_.VALDATA___V408*/ meltfptr[407] = (void*)&cdat->dsym_401__DIS; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_401__DIS", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_401__DIS", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_401__DIS.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_401__DIS.obj_hash = 83284668; cdat->dsym_401__DIS.obj_len = 3; /*inistring dstr_402__DIS*/ /*_.VALSTR___V409*/ meltfptr[408] = (void*)&cdat->dstr_402__DIS; cdat->dstr_402__DIS.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_402__DIS.val, "DIS", sizeof (cdat->dstr_402__DIS.val)-1); /*^iniobj*/ /*iniobj dobj_403*/ /*_.VALDATA___V407*/ meltfptr[406] = (void*)&cdat->dobj_403; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_403", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_403", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_403.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_403.obj_num = 0; cdat->dobj_403.obj_hash = 1071977524; cdat->dobj_403.obj_len = 2; /*iniobj dsym_404__VAL*/ /*uniqueobj*/ if (!/*_.VALDATA___V411*/ meltfptr[410]) /*_.VALDATA___V411*/ meltfptr[410] = (void*)&cdat->dsym_404__VAL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_404__VAL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_404__VAL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_404__VAL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_404__VAL.obj_hash = 122845685; cdat->dsym_404__VAL.obj_len = 3; /*inistring dstr_405__VAL*/ /*_.VALSTR___V412*/ meltfptr[411] = (void*)&cdat->dstr_405__VAL; cdat->dstr_405__VAL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_405__VAL.val, "VAL", sizeof (cdat->dstr_405__VAL.val)-1); /*^iniobj*/ /*iniobj dobj_406*/ /*_.VALDATA___V410*/ meltfptr[409] = (void*)&cdat->dobj_406; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_406", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_406", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_406.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_406.obj_num = 1; cdat->dobj_406.obj_hash = 605940054; cdat->dobj_406.obj_len = 2; /*iniobj dsym_407__NUM*/ /*uniqueobj*/ if (!/*_.VALDATA___V414*/ meltfptr[413]) /*_.VALDATA___V414*/ meltfptr[413] = (void*)&cdat->dsym_407__NUM; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_407__NUM", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_407__NUM", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_407__NUM.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_407__NUM.obj_hash = 129664091; cdat->dsym_407__NUM.obj_len = 3; /*inistring dstr_408__NUM*/ /*_.VALSTR___V415*/ meltfptr[414] = (void*)&cdat->dstr_408__NUM; cdat->dstr_408__NUM.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_408__NUM.val, "NUM", sizeof (cdat->dstr_408__NUM.val)-1); /*^iniobj*/ /*iniobj dobj_409*/ /*_.VALDATA___V413*/ meltfptr[412] = (void*)&cdat->dobj_409; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_409", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_409", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_409.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_409.obj_num = 2; cdat->dobj_409.obj_hash = 174802683; cdat->dobj_409.obj_len = 2; /*inistring dstr_410__meltgc_new_mixi*/ /*_.VALSTR___V417*/ meltfptr[416] = (void*)&cdat->dstr_410__meltgc_new_mixi; cdat->dstr_410__meltgc_new_mixi.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_410__meltgc_new_mixi.val, "(meltgc_new_mixint((meltobject_ptr_t)(", sizeof (cdat->dstr_410__meltgc_new_mixi.val)-1); /*inistring dstr_411__melt_ptr_t_*/ /*_.VALSTR___V418*/ meltfptr[417] = (void*)&cdat->dstr_411__melt_ptr_t_; cdat->dstr_411__melt_ptr_t_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_411__melt_ptr_t_.val, "), (melt_ptr_t)(", sizeof (cdat->dstr_411__melt_ptr_t_.val)-1); /*inistring dstr_412__*/ /*_.VALSTR___V419*/ meltfptr[418] = (void*)&cdat->dstr_412__; cdat->dstr_412__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_412__.val, "), (", sizeof (cdat->dstr_412__.val)-1); /*inistring dstr_413__*/ /*_.VALSTR___V420*/ meltfptr[419] = (void*)&cdat->dstr_413__; cdat->dstr_413__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_413__.val, ")))", sizeof (cdat->dstr_413__.val)-1); /*inistring dstr_414__MAKE_MIXINT*/ /*_.VALSTR___V406*/ meltfptr[405] = (void*)&cdat->dstr_414__MAKE_MIXINT; cdat->dstr_414__MAKE_MIXINT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_414__MAKE_MIXINT.val, "MAKE_MIXINT", sizeof (cdat->dstr_414__MAKE_MIXINT.val)-1); /*iniobj dsym_415__IS_MIXLOC*/ /*uniqueobj*/ if (!/*_.VALDATA___V422*/ meltfptr[421]) /*_.VALDATA___V422*/ meltfptr[421] = (void*)&cdat->dsym_415__IS_MIXLOC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_415__IS_MIXLOC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_415__IS_MIXLOC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_415__IS_MIXLOC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_415__IS_MIXLOC.obj_hash = 690327831; cdat->dsym_415__IS_MIXLOC.obj_len = 3; /*inistring dstr_416__IS_MIXLOC*/ /*_.VALSTR___V423*/ meltfptr[422] = (void*)&cdat->dstr_416__IS_MIXLOC; cdat->dstr_416__IS_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_416__IS_MIXLOC.val, "IS_MIXLOC", sizeof (cdat->dstr_416__IS_MIXLOC.val)-1); MELT_LOCATION("warmelt-base.melt:205:/ iniobj"); /*iniobj dobj_417__IS_MIXLOC*/ /*_.VALDATA___V424*/ meltfptr[423] = (void*)&cdat->dobj_417__IS_MIXLOC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_417__IS_MIXLOC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_417__IS_MIXLOC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_417__IS_MIXLOC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_417__IS_MIXLOC.obj_hash = 160892861; cdat->dobj_417__IS_MIXLOC.obj_len = 5; /*inimult dtup_418__IS_MIXLOC*/ /*_.VALTUP___V430*/ meltfptr[429] = (void*)&cdat->dtup_418__IS_MIXLOC; cdat->dtup_418__IS_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_418__IS_MIXLOC.nbval = 3; /*inimult dtup_419__IS_MIXLOC*/ /*_.VALTUP___V427*/ meltfptr[426] = (void*)&cdat->dtup_419__IS_MIXLOC; cdat->dtup_419__IS_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_419__IS_MIXLOC.nbval = 1; /*^iniobj*/ /*iniobj dobj_420*/ /*_.VALDATA___V426*/ meltfptr[425] = (void*)&cdat->dobj_420; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_420", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_420", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_420.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_420.obj_num = 0; cdat->dobj_420.obj_hash = 223077112; cdat->dobj_420.obj_len = 2; /*inistring dstr_421__melt_magic_disc*/ /*_.VALSTR___V428*/ meltfptr[427] = (void*)&cdat->dstr_421__melt_magic_disc; cdat->dstr_421__melt_magic_disc.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_421__melt_magic_disc.val, "(melt_magic_discr((melt_ptr_t)(", sizeof (cdat->dstr_421__melt_magic_disc.val)-1); /*inistring dstr_422__OBMAG_MIXL*/ /*_.VALSTR___V429*/ meltfptr[428] = (void*)&cdat->dstr_422__OBMAG_MIXL; cdat->dstr_422__OBMAG_MIXL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_422__OBMAG_MIXL.val, ")) == OBMAG_MIXLOC)", sizeof (cdat->dstr_422__OBMAG_MIXL.val)-1); /*inistring dstr_423__IS_MIXLOC*/ /*_.VALSTR___V425*/ meltfptr[424] = (void*)&cdat->dstr_423__IS_MIXLOC; cdat->dstr_423__IS_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_423__IS_MIXLOC.val, "IS_MIXLOC", sizeof (cdat->dstr_423__IS_MIXLOC.val)-1); /*iniobj dsym_424__MIXLOC_VAL*/ /*uniqueobj*/ if (!/*_.VALDATA___V431*/ meltfptr[430]) /*_.VALDATA___V431*/ meltfptr[430] = (void*)&cdat->dsym_424__MIXLOC_VAL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_424__MIXLOC_VAL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_424__MIXLOC_VAL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_424__MIXLOC_VAL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_424__MIXLOC_VAL.obj_hash = 426681908; cdat->dsym_424__MIXLOC_VAL.obj_len = 3; /*inistring dstr_425__MIXLOC_VAL*/ /*_.VALSTR___V432*/ meltfptr[431] = (void*)&cdat->dstr_425__MIXLOC_VAL; cdat->dstr_425__MIXLOC_VAL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_425__MIXLOC_VAL.val, "MIXLOC_VAL", sizeof (cdat->dstr_425__MIXLOC_VAL.val)-1); MELT_LOCATION("warmelt-base.melt:209:/ iniobj"); /*iniobj dobj_426__MIXLOC_VAL*/ /*_.VALDATA___V433*/ meltfptr[432] = (void*)&cdat->dobj_426__MIXLOC_VAL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_426__MIXLOC_VAL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_426__MIXLOC_VAL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_426__MIXLOC_VAL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_426__MIXLOC_VAL.obj_hash = 186731760; cdat->dobj_426__MIXLOC_VAL.obj_len = 5; /*inimult dtup_427__MIXLOC_VAL*/ /*_.VALTUP___V439*/ meltfptr[438] = (void*)&cdat->dtup_427__MIXLOC_VAL; cdat->dtup_427__MIXLOC_VAL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_427__MIXLOC_VAL.nbval = 3; /*inimult dtup_428__MIXLOC_VAL*/ /*_.VALTUP___V436*/ meltfptr[435] = (void*)&cdat->dtup_428__MIXLOC_VAL; cdat->dtup_428__MIXLOC_VAL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_428__MIXLOC_VAL.nbval = 1; /*^iniobj*/ /*iniobj dobj_429*/ /*_.VALDATA___V435*/ meltfptr[434] = (void*)&cdat->dobj_429; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_429", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_429", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_429.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_429.obj_num = 0; cdat->dobj_429.obj_hash = 382470072; cdat->dobj_429.obj_len = 2; /*inistring dstr_430__melt_val_mixloc*/ /*_.VALSTR___V437*/ meltfptr[436] = (void*)&cdat->dstr_430__melt_val_mixloc; cdat->dstr_430__melt_val_mixloc.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_430__melt_val_mixloc.val, "(melt_val_mixloc((melt_ptr_t)(", sizeof (cdat->dstr_430__melt_val_mixloc.val)-1); /*inistring dstr_431__*/ /*_.VALSTR___V438*/ meltfptr[437] = (void*)&cdat->dstr_431__; cdat->dstr_431__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_431__.val, ")))", sizeof (cdat->dstr_431__.val)-1); /*inistring dstr_432__MIXLOC_VAL*/ /*_.VALSTR___V434*/ meltfptr[433] = (void*)&cdat->dstr_432__MIXLOC_VAL; cdat->dstr_432__MIXLOC_VAL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_432__MIXLOC_VAL.val, "MIXLOC_VAL", sizeof (cdat->dstr_432__MIXLOC_VAL.val)-1); /*iniobj dsym_433__MIXLOC_LOCATION*/ /*uniqueobj*/ if (!/*_.VALDATA___V440*/ meltfptr[439]) /*_.VALDATA___V440*/ meltfptr[439] = (void*)&cdat->dsym_433__MIXLOC_LOCATION; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_433__MIXLOC_LOCATION", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_433__MIXLOC_LOCATION", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_433__MIXLOC_LOCATION.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_433__MIXLOC_LOCATION.obj_hash = 124619428; cdat->dsym_433__MIXLOC_LOCATION.obj_len = 3; /*inistring dstr_434__MIXLOC_LOCATION*/ /*_.VALSTR___V441*/ meltfptr[440] = (void*)&cdat->dstr_434__MIXLOC_LOCATION; cdat->dstr_434__MIXLOC_LOCATION.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_434__MIXLOC_LOCATION.val, "MIXLOC_LOCATION", sizeof (cdat->dstr_434__MIXLOC_LOCATION.val)-1); MELT_LOCATION("warmelt-base.melt:212:/ iniobj"); /*iniobj dobj_435__MIXLOC_LOCATION*/ /*_.VALDATA___V442*/ meltfptr[441] = (void*)&cdat->dobj_435__MIXLOC_LOCATION; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_435__MIXLOC_LOCATION", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_435__MIXLOC_LOCATION", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_435__MIXLOC_LOCATION.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_435__MIXLOC_LOCATION.obj_hash = 126525449; cdat->dobj_435__MIXLOC_LOCATION.obj_len = 5; /*inimult dtup_436__MIXLOC_LOCATION*/ /*_.VALTUP___V448*/ meltfptr[447] = (void*)&cdat->dtup_436__MIXLOC_LOCATION; cdat->dtup_436__MIXLOC_LOCATION.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_436__MIXLOC_LOCATION.nbval = 3; /*inimult dtup_437__MIXLOC_LOCATION*/ /*_.VALTUP___V445*/ meltfptr[444] = (void*)&cdat->dtup_437__MIXLOC_LOCATION; cdat->dtup_437__MIXLOC_LOCATION.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_437__MIXLOC_LOCATION.nbval = 1; /*^iniobj*/ /*iniobj dobj_438*/ /*_.VALDATA___V444*/ meltfptr[443] = (void*)&cdat->dobj_438; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_438", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_438", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_438.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_438.obj_num = 0; cdat->dobj_438.obj_hash = 439547089; cdat->dobj_438.obj_len = 2; /*inistring dstr_439__long_melt_loc*/ /*_.VALSTR___V446*/ meltfptr[445] = (void*)&cdat->dstr_439__long_melt_loc; cdat->dstr_439__long_melt_loc.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_439__long_melt_loc.val, "((long) melt_location_mixloc((melt_ptr_t)(", sizeof (cdat->dstr_439__long_melt_loc.val)-1); /*inistring dstr_440__*/ /*_.VALSTR___V447*/ meltfptr[446] = (void*)&cdat->dstr_440__; cdat->dstr_440__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_440__.val, ")))", sizeof (cdat->dstr_440__.val)-1); /*inistring dstr_441__MIXLOC_LOCATION*/ /*_.VALSTR___V443*/ meltfptr[442] = (void*)&cdat->dstr_441__MIXLOC_LOCATION; cdat->dstr_441__MIXLOC_LOCATION.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_441__MIXLOC_LOCATION.val, "MIXLOC_LOCATION", sizeof (cdat->dstr_441__MIXLOC_LOCATION.val)-1); /*iniobj dsym_442__MIXLOC_LOCLINE*/ /*uniqueobj*/ if (!/*_.VALDATA___V449*/ meltfptr[448]) /*_.VALDATA___V449*/ meltfptr[448] = (void*)&cdat->dsym_442__MIXLOC_LOCLINE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_442__MIXLOC_LOCLINE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_442__MIXLOC_LOCLINE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_442__MIXLOC_LOCLINE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_442__MIXLOC_LOCLINE.obj_hash = 472255772; cdat->dsym_442__MIXLOC_LOCLINE.obj_len = 3; /*inistring dstr_443__MIXLOC_LOCLINE*/ /*_.VALSTR___V450*/ meltfptr[449] = (void*)&cdat->dstr_443__MIXLOC_LOCLINE; cdat->dstr_443__MIXLOC_LOCLINE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_443__MIXLOC_LOCLINE.val, "MIXLOC_LOCLINE", sizeof (cdat->dstr_443__MIXLOC_LOCLINE.val)-1); MELT_LOCATION("warmelt-base.melt:215:/ iniobj"); /*iniobj dobj_444__MIXLOC_LOCLINE*/ /*_.VALDATA___V451*/ meltfptr[450] = (void*)&cdat->dobj_444__MIXLOC_LOCLINE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_444__MIXLOC_LOCLINE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_444__MIXLOC_LOCLINE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_444__MIXLOC_LOCLINE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_444__MIXLOC_LOCLINE.obj_hash = 48071740; cdat->dobj_444__MIXLOC_LOCLINE.obj_len = 5; /*inimult dtup_445__MIXLOC_LOCLINE*/ /*_.VALTUP___V457*/ meltfptr[456] = (void*)&cdat->dtup_445__MIXLOC_LOCLINE; cdat->dtup_445__MIXLOC_LOCLINE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_445__MIXLOC_LOCLINE.nbval = 3; /*inimult dtup_446__MIXLOC_LOCLINE*/ /*_.VALTUP___V454*/ meltfptr[453] = (void*)&cdat->dtup_446__MIXLOC_LOCLINE; cdat->dtup_446__MIXLOC_LOCLINE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_446__MIXLOC_LOCLINE.nbval = 1; /*^iniobj*/ /*iniobj dobj_447*/ /*_.VALDATA___V453*/ meltfptr[452] = (void*)&cdat->dobj_447; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_447", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_447", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_447.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_447.obj_num = 0; cdat->dobj_447.obj_hash = 862270734; cdat->dobj_447.obj_len = 2; /*inistring dstr_448__LOCATION_LINE_m*/ /*_.VALSTR___V455*/ meltfptr[454] = (void*)&cdat->dstr_448__LOCATION_LINE_m; cdat->dstr_448__LOCATION_LINE_m.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_448__LOCATION_LINE_m.val, "(LOCATION_LINE(melt_location_mixloc((melt_ptr_t)", sizeof (cdat->dstr_448__LOCATION_LINE_m.val)-1); /*inistring dstr_449__*/ /*_.VALSTR___V456*/ meltfptr[455] = (void*)&cdat->dstr_449__; cdat->dstr_449__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_449__.val, ")))", sizeof (cdat->dstr_449__.val)-1); /*inistring dstr_450__MIXLOC_LOCLINE*/ /*_.VALSTR___V452*/ meltfptr[451] = (void*)&cdat->dstr_450__MIXLOC_LOCLINE; cdat->dstr_450__MIXLOC_LOCLINE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_450__MIXLOC_LOCLINE.val, "MIXLOC_LOCLINE", sizeof (cdat->dstr_450__MIXLOC_LOCLINE.val)-1); /*iniobj dsym_451__MIXLOC_LOCFILE*/ /*uniqueobj*/ if (!/*_.VALDATA___V458*/ meltfptr[457]) /*_.VALDATA___V458*/ meltfptr[457] = (void*)&cdat->dsym_451__MIXLOC_LOCFILE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_451__MIXLOC_LOCFILE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_451__MIXLOC_LOCFILE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_451__MIXLOC_LOCFILE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_451__MIXLOC_LOCFILE.obj_hash = 544320959; cdat->dsym_451__MIXLOC_LOCFILE.obj_len = 3; /*inistring dstr_452__MIXLOC_LOCFILE*/ /*_.VALSTR___V459*/ meltfptr[458] = (void*)&cdat->dstr_452__MIXLOC_LOCFILE; cdat->dstr_452__MIXLOC_LOCFILE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_452__MIXLOC_LOCFILE.val, "MIXLOC_LOCFILE", sizeof (cdat->dstr_452__MIXLOC_LOCFILE.val)-1); MELT_LOCATION("warmelt-base.melt:218:/ iniobj"); /*iniobj dobj_453__MIXLOC_LOCFILE*/ /*_.VALDATA___V460*/ meltfptr[459] = (void*)&cdat->dobj_453__MIXLOC_LOCFILE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_453__MIXLOC_LOCFILE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_453__MIXLOC_LOCFILE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_453__MIXLOC_LOCFILE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_453__MIXLOC_LOCFILE.obj_hash = 148836045; cdat->dobj_453__MIXLOC_LOCFILE.obj_len = 5; /*inimult dtup_454__MIXLOC_LOCFILE*/ /*_.VALTUP___V466*/ meltfptr[465] = (void*)&cdat->dtup_454__MIXLOC_LOCFILE; cdat->dtup_454__MIXLOC_LOCFILE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_454__MIXLOC_LOCFILE.nbval = 3; /*inimult dtup_455__MIXLOC_LOCFILE*/ /*_.VALTUP___V463*/ meltfptr[462] = (void*)&cdat->dtup_455__MIXLOC_LOCFILE; cdat->dtup_455__MIXLOC_LOCFILE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_455__MIXLOC_LOCFILE.nbval = 1; /*^iniobj*/ /*iniobj dobj_456*/ /*_.VALDATA___V462*/ meltfptr[461] = (void*)&cdat->dobj_456; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_456", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_456", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_456.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_456.obj_num = 0; cdat->dobj_456.obj_hash = 111447208; cdat->dobj_456.obj_len = 2; /*inistring dstr_457__LOCATION_FILE_m*/ /*_.VALSTR___V464*/ meltfptr[463] = (void*)&cdat->dstr_457__LOCATION_FILE_m; cdat->dstr_457__LOCATION_FILE_m.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_457__LOCATION_FILE_m.val, "(LOCATION_FILE(melt_location_mixloc((melt_ptr_t)", sizeof (cdat->dstr_457__LOCATION_FILE_m.val)-1); /*inistring dstr_458__*/ /*_.VALSTR___V465*/ meltfptr[464] = (void*)&cdat->dstr_458__; cdat->dstr_458__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_458__.val, ")))", sizeof (cdat->dstr_458__.val)-1); /*inistring dstr_459__MIXLOC_LOCFILE*/ /*_.VALSTR___V461*/ meltfptr[460] = (void*)&cdat->dstr_459__MIXLOC_LOCFILE; cdat->dstr_459__MIXLOC_LOCFILE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_459__MIXLOC_LOCFILE.val, "MIXLOC_LOCFILE", sizeof (cdat->dstr_459__MIXLOC_LOCFILE.val)-1); /*iniobj dsym_460__MAKE_MIXLOC*/ /*uniqueobj*/ if (!/*_.VALDATA___V467*/ meltfptr[466]) /*_.VALDATA___V467*/ meltfptr[466] = (void*)&cdat->dsym_460__MAKE_MIXLOC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_460__MAKE_MIXLOC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_460__MAKE_MIXLOC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_460__MAKE_MIXLOC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_460__MAKE_MIXLOC.obj_hash = 45656071; cdat->dsym_460__MAKE_MIXLOC.obj_len = 3; /*inistring dstr_461__MAKE_MIXLOC*/ /*_.VALSTR___V468*/ meltfptr[467] = (void*)&cdat->dstr_461__MAKE_MIXLOC; cdat->dstr_461__MAKE_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_461__MAKE_MIXLOC.val, "MAKE_MIXLOC", sizeof (cdat->dstr_461__MAKE_MIXLOC.val)-1); MELT_LOCATION("warmelt-base.melt:223:/ iniobj"); /*iniobj dobj_462__MAKE_MIXLOC*/ /*_.VALDATA___V469*/ meltfptr[468] = (void*)&cdat->dobj_462__MAKE_MIXLOC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_462__MAKE_MIXLOC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_462__MAKE_MIXLOC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_462__MAKE_MIXLOC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_462__MAKE_MIXLOC.obj_hash = 131278016; cdat->dobj_462__MAKE_MIXLOC.obj_len = 5; /*inimult dtup_463__MAKE_MIXLOC*/ /*_.VALTUP___V483*/ meltfptr[482] = (void*)&cdat->dtup_463__MAKE_MIXLOC; cdat->dtup_463__MAKE_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_463__MAKE_MIXLOC.nbval = 9; /*inimult dtup_464__MAKE_MIXLOC*/ /*_.VALTUP___V477*/ meltfptr[476] = (void*)&cdat->dtup_464__MAKE_MIXLOC; cdat->dtup_464__MAKE_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_464__MAKE_MIXLOC.nbval = 4; /*^iniobj*/ /*iniobj dobj_465*/ /*_.VALDATA___V471*/ meltfptr[470] = (void*)&cdat->dobj_465; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_465", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_465", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_465.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_465.obj_num = 0; cdat->dobj_465.obj_hash = 215961566; cdat->dobj_465.obj_len = 2; /*^iniobj*/ /*iniobj dobj_466*/ /*_.VALDATA___V472*/ meltfptr[471] = (void*)&cdat->dobj_466; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_466", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_466", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_466.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_466.obj_num = 1; cdat->dobj_466.obj_hash = 970139003; cdat->dobj_466.obj_len = 2; /*^iniobj*/ /*iniobj dobj_467*/ /*_.VALDATA___V473*/ meltfptr[472] = (void*)&cdat->dobj_467; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_467", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_467", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_467.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_467.obj_num = 2; cdat->dobj_467.obj_hash = 571168638; cdat->dobj_467.obj_len = 2; /*iniobj dsym_468__LOC*/ /*uniqueobj*/ if (!/*_.VALDATA___V475*/ meltfptr[474]) /*_.VALDATA___V475*/ meltfptr[474] = (void*)&cdat->dsym_468__LOC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_468__LOC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_468__LOC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_468__LOC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_468__LOC.obj_hash = 91372345; cdat->dsym_468__LOC.obj_len = 3; /*inistring dstr_469__LOC*/ /*_.VALSTR___V476*/ meltfptr[475] = (void*)&cdat->dstr_469__LOC; cdat->dstr_469__LOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_469__LOC.val, "LOC", sizeof (cdat->dstr_469__LOC.val)-1); /*^iniobj*/ /*iniobj dobj_470*/ /*_.VALDATA___V474*/ meltfptr[473] = (void*)&cdat->dobj_470; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_470", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_470", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_470.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_470.obj_num = 3; cdat->dobj_470.obj_hash = 661044646; cdat->dobj_470.obj_len = 2; /*inistring dstr_471__meltgc_new_mixl*/ /*_.VALSTR___V478*/ meltfptr[477] = (void*)&cdat->dstr_471__meltgc_new_mixl; cdat->dstr_471__meltgc_new_mixl.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_471__meltgc_new_mixl.val, "(meltgc_new_mixloc((meltobject_ptr_t)(", sizeof (cdat->dstr_471__meltgc_new_mixl.val)-1); /*inistring dstr_472__melt_ptr_t_*/ /*_.VALSTR___V479*/ meltfptr[478] = (void*)&cdat->dstr_472__melt_ptr_t_; cdat->dstr_472__melt_ptr_t_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_472__melt_ptr_t_.val, "), (melt_ptr_t)(", sizeof (cdat->dstr_472__melt_ptr_t_.val)-1); /*inistring dstr_473__*/ /*_.VALSTR___V480*/ meltfptr[479] = (void*)&cdat->dstr_473__; cdat->dstr_473__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_473__.val, "), \n\t\t (", sizeof (cdat->dstr_473__.val)-1); /*inistring dstr_474__location_t_*/ /*_.VALSTR___V481*/ meltfptr[480] = (void*)&cdat->dstr_474__location_t_; cdat->dstr_474__location_t_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_474__location_t_.val, "), (location_t)(", sizeof (cdat->dstr_474__location_t_.val)-1); /*inistring dstr_475__*/ /*_.VALSTR___V482*/ meltfptr[481] = (void*)&cdat->dstr_475__; cdat->dstr_475__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_475__.val, ")))", sizeof (cdat->dstr_475__.val)-1); /*inistring dstr_476__MAKE_MIXLOC*/ /*_.VALSTR___V470*/ meltfptr[469] = (void*)&cdat->dstr_476__MAKE_MIXLOC; cdat->dstr_476__MAKE_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_476__MAKE_MIXLOC.val, "MAKE_MIXLOC", sizeof (cdat->dstr_476__MAKE_MIXLOC.val)-1); /*iniobj dsym_477__IS_MIXBIGINT*/ /*uniqueobj*/ if (!/*_.VALDATA___V484*/ meltfptr[483]) /*_.VALDATA___V484*/ meltfptr[483] = (void*)&cdat->dsym_477__IS_MIXBIGINT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_477__IS_MIXBIGINT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_477__IS_MIXBIGINT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_477__IS_MIXBIGINT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_477__IS_MIXBIGINT.obj_hash = 757221653; cdat->dsym_477__IS_MIXBIGINT.obj_len = 3; /*inistring dstr_478__IS_MIXBIGINT*/ /*_.VALSTR___V485*/ meltfptr[484] = (void*)&cdat->dstr_478__IS_MIXBIGINT; cdat->dstr_478__IS_MIXBIGINT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_478__IS_MIXBIGINT.val, "IS_MIXBIGINT", sizeof (cdat->dstr_478__IS_MIXBIGINT.val)-1); MELT_LOCATION("warmelt-base.melt:232:/ iniobj"); /*iniobj dobj_479__IS_MIXBIGINT*/ /*_.VALDATA___V486*/ meltfptr[485] = (void*)&cdat->dobj_479__IS_MIXBIGINT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_479__IS_MIXBIGINT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_479__IS_MIXBIGINT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_479__IS_MIXBIGINT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_479__IS_MIXBIGINT.obj_hash = 810592357; cdat->dobj_479__IS_MIXBIGINT.obj_len = 5; /*inimult dtup_480__IS_MIXBIGINT*/ /*_.VALTUP___V494*/ meltfptr[493] = (void*)&cdat->dtup_480__IS_MIXBIGINT; cdat->dtup_480__IS_MIXBIGINT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_480__IS_MIXBIGINT.nbval = 3; /*inimult dtup_481__IS_MIXBIGINT*/ /*_.VALTUP___V491*/ meltfptr[490] = (void*)&cdat->dtup_481__IS_MIXBIGINT; cdat->dtup_481__IS_MIXBIGINT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_481__IS_MIXBIGINT.nbval = 1; /*iniobj dsym_482__MB*/ /*uniqueobj*/ if (!/*_.VALDATA___V489*/ meltfptr[488]) /*_.VALDATA___V489*/ meltfptr[488] = (void*)&cdat->dsym_482__MB; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_482__MB", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_482__MB", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_482__MB.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_482__MB.obj_hash = 166925846; cdat->dsym_482__MB.obj_len = 3; /*inistring dstr_483__MB*/ /*_.VALSTR___V490*/ meltfptr[489] = (void*)&cdat->dstr_483__MB; cdat->dstr_483__MB.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_483__MB.val, "MB", sizeof (cdat->dstr_483__MB.val)-1); /*^iniobj*/ /*iniobj dobj_484*/ /*_.VALDATA___V488*/ meltfptr[487] = (void*)&cdat->dobj_484; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_484", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_484", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_484.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_484.obj_num = 0; cdat->dobj_484.obj_hash = 909136083; cdat->dobj_484.obj_len = 2; /*inistring dstr_485__melt_magic_disc*/ /*_.VALSTR___V492*/ meltfptr[491] = (void*)&cdat->dstr_485__melt_magic_disc; cdat->dstr_485__melt_magic_disc.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_485__melt_magic_disc.val, "(melt_magic_discr((melt_ptr_t)(", sizeof (cdat->dstr_485__melt_magic_disc.val)-1); /*inistring dstr_486__OBMAG_MIXB*/ /*_.VALSTR___V493*/ meltfptr[492] = (void*)&cdat->dstr_486__OBMAG_MIXB; cdat->dstr_486__OBMAG_MIXB.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_486__OBMAG_MIXB.val, ")) == OBMAG_MIXBIGINT)", sizeof (cdat->dstr_486__OBMAG_MIXB.val)-1); /*inistring dstr_487__IS_MIXBIGINT*/ /*_.VALSTR___V487*/ meltfptr[486] = (void*)&cdat->dstr_487__IS_MIXBIGINT; cdat->dstr_487__IS_MIXBIGINT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_487__IS_MIXBIGINT.val, "IS_MIXBIGINT", sizeof (cdat->dstr_487__IS_MIXBIGINT.val)-1); /*iniobj dsym_488__MIXBIGINT_VAL*/ /*uniqueobj*/ if (!/*_.VALDATA___V495*/ meltfptr[494]) /*_.VALDATA___V495*/ meltfptr[494] = (void*)&cdat->dsym_488__MIXBIGINT_VAL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_488__MIXBIGINT_VAL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_488__MIXBIGINT_VAL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_488__MIXBIGINT_VAL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_488__MIXBIGINT_VAL.obj_hash = 228872411; cdat->dsym_488__MIXBIGINT_VAL.obj_len = 3; /*inistring dstr_489__MIXBIGINT_VAL*/ /*_.VALSTR___V496*/ meltfptr[495] = (void*)&cdat->dstr_489__MIXBIGINT_VAL; cdat->dstr_489__MIXBIGINT_VAL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_489__MIXBIGINT_VAL.val, "MIXBIGINT_VAL", sizeof (cdat->dstr_489__MIXBIGINT_VAL.val)-1); MELT_LOCATION("warmelt-base.melt:235:/ iniobj"); /*iniobj dobj_490__MIXBIGINT_VAL*/ /*_.VALDATA___V497*/ meltfptr[496] = (void*)&cdat->dobj_490__MIXBIGINT_VAL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_490__MIXBIGINT_VAL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_490__MIXBIGINT_VAL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_490__MIXBIGINT_VAL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_490__MIXBIGINT_VAL.obj_hash = 735720974; cdat->dobj_490__MIXBIGINT_VAL.obj_len = 5; /*inimult dtup_491__MIXBIGINT_VAL*/ /*_.VALTUP___V503*/ meltfptr[502] = (void*)&cdat->dtup_491__MIXBIGINT_VAL; cdat->dtup_491__MIXBIGINT_VAL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_491__MIXBIGINT_VAL.nbval = 3; /*inimult dtup_492__MIXBIGINT_VAL*/ /*_.VALTUP___V500*/ meltfptr[499] = (void*)&cdat->dtup_492__MIXBIGINT_VAL; cdat->dtup_492__MIXBIGINT_VAL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_492__MIXBIGINT_VAL.nbval = 1; /*^iniobj*/ /*iniobj dobj_493*/ /*_.VALDATA___V499*/ meltfptr[498] = (void*)&cdat->dobj_493; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_493", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_493", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_493.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_493.obj_num = 0; cdat->dobj_493.obj_hash = 685451699; cdat->dobj_493.obj_len = 2; /*inistring dstr_494__melt_val_mixbigi*/ /*_.VALSTR___V501*/ meltfptr[500] = (void*)&cdat->dstr_494__melt_val_mixbigi; cdat->dstr_494__melt_val_mixbigi.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_494__melt_val_mixbigi.val, "melt_val_mixbigint(", sizeof (cdat->dstr_494__melt_val_mixbigi.val)-1); /*inistring dstr_495__*/ /*_.VALSTR___V502*/ meltfptr[501] = (void*)&cdat->dstr_495__; cdat->dstr_495__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_495__.val, ")", sizeof (cdat->dstr_495__.val)-1); /*inistring dstr_496__MIXBIGINT_VAL*/ /*_.VALSTR___V498*/ meltfptr[497] = (void*)&cdat->dstr_496__MIXBIGINT_VAL; cdat->dstr_496__MIXBIGINT_VAL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_496__MIXBIGINT_VAL.val, "MIXBIGINT_VAL", sizeof (cdat->dstr_496__MIXBIGINT_VAL.val)-1); /*iniobj dsym_497__PPSTRBUF_MIXBIGINT*/ /*uniqueobj*/ if (!/*_.VALDATA___V504*/ meltfptr[503]) /*_.VALDATA___V504*/ meltfptr[503] = (void*)&cdat->dsym_497__PPSTRBUF_MIXBIGINT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_497__PPSTRBUF_MIXBIGINT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_497__PPSTRBUF_MIXBIGINT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_497__PPSTRBUF_MIXBIGINT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_497__PPSTRBUF_MIXBIGINT.obj_hash = 90990039; cdat->dsym_497__PPSTRBUF_MIXBIGINT.obj_len = 3; /*inistring dstr_498__PPSTRBUF_MIXBIGI*/ /*_.VALSTR___V505*/ meltfptr[504] = (void*)&cdat->dstr_498__PPSTRBUF_MIXBIGI; cdat->dstr_498__PPSTRBUF_MIXBIGI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_498__PPSTRBUF_MIXBIGI.val, "PPSTRBUF_MIXBIGINT", sizeof (cdat->dstr_498__PPSTRBUF_MIXBIGI.val)-1); MELT_LOCATION("warmelt-base.melt:239:/ iniobj"); /*iniobj dobj_499__PPSTRBUF_MIXBIGINT*/ /*_.VALDATA___V506*/ meltfptr[505] = (void*)&cdat->dobj_499__PPSTRBUF_MIXBIGINT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_499__PPSTRBUF_MIXBIGINT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_499__PPSTRBUF_MIXBIGINT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_499__PPSTRBUF_MIXBIGINT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_499__PPSTRBUF_MIXBIGINT.obj_hash = 922083149; cdat->dobj_499__PPSTRBUF_MIXBIGINT.obj_len = 5; /*inimult dtup_500__PPSTRBUF_MIXBIGINT*/ /*_.VALTUP___V518*/ meltfptr[517] = (void*)&cdat->dtup_500__PPSTRBUF_MIXBIGINT; cdat->dtup_500__PPSTRBUF_MIXBIGINT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_500__PPSTRBUF_MIXBIGINT.nbval = 7; /*inimult dtup_501__PPSTRBUF_MIXBIGINT*/ /*_.VALTUP___V513*/ meltfptr[512] = (void*)&cdat->dtup_501__PPSTRBUF_MIXBIGINT; cdat->dtup_501__PPSTRBUF_MIXBIGINT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_501__PPSTRBUF_MIXBIGINT.nbval = 3; /*^iniobj*/ /*iniobj dobj_502*/ /*_.VALDATA___V508*/ meltfptr[507] = (void*)&cdat->dobj_502; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_502", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_502", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_502.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_502.obj_num = 0; cdat->dobj_502.obj_hash = 167727357; cdat->dobj_502.obj_len = 2; /*iniobj dsym_503__INDENT*/ /*uniqueobj*/ if (!/*_.VALDATA___V510*/ meltfptr[509]) /*_.VALDATA___V510*/ meltfptr[509] = (void*)&cdat->dsym_503__INDENT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_503__INDENT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_503__INDENT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_503__INDENT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_503__INDENT.obj_hash = 595028209; cdat->dsym_503__INDENT.obj_len = 3; /*inistring dstr_504__INDENT*/ /*_.VALSTR___V511*/ meltfptr[510] = (void*)&cdat->dstr_504__INDENT; cdat->dstr_504__INDENT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_504__INDENT.val, "INDENT", sizeof (cdat->dstr_504__INDENT.val)-1); /*^iniobj*/ /*iniobj dobj_505*/ /*_.VALDATA___V509*/ meltfptr[508] = (void*)&cdat->dobj_505; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_505", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_505", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_505.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_505.obj_num = 1; cdat->dobj_505.obj_hash = 124892733; cdat->dobj_505.obj_len = 2; /*^iniobj*/ /*iniobj dobj_506*/ /*_.VALDATA___V512*/ meltfptr[511] = (void*)&cdat->dobj_506; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_506", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_506", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_506.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_506.obj_num = 2; cdat->dobj_506.obj_hash = 326333927; cdat->dobj_506.obj_len = 2; /*inistring dstr_507__meltgc_ppstrbuf_*/ /*_.VALSTR___V514*/ meltfptr[513] = (void*)&cdat->dstr_507__meltgc_ppstrbuf_; cdat->dstr_507__meltgc_ppstrbuf_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_507__meltgc_ppstrbuf_.val, "meltgc_ppstrbuf_mixbigint(", sizeof (cdat->dstr_507__meltgc_ppstrbuf_.val)-1); /*inistring dstr_508__*/ /*_.VALSTR___V515*/ meltfptr[514] = (void*)&cdat->dstr_508__; cdat->dstr_508__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_508__.val, ",", sizeof (cdat->dstr_508__.val)-1); /*inistring dstr_509__*/ /*_.VALSTR___V516*/ meltfptr[515] = (void*)&cdat->dstr_509__; cdat->dstr_509__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_509__.val, ",", sizeof (cdat->dstr_509__.val)-1); /*inistring dstr_510__*/ /*_.VALSTR___V517*/ meltfptr[516] = (void*)&cdat->dstr_510__; cdat->dstr_510__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_510__.val, ");", sizeof (cdat->dstr_510__.val)-1); /*inistring dstr_511__PPSTRBUF_MIXBIGI*/ /*_.VALSTR___V507*/ meltfptr[506] = (void*)&cdat->dstr_511__PPSTRBUF_MIXBIGI; cdat->dstr_511__PPSTRBUF_MIXBIGI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_511__PPSTRBUF_MIXBIGI.val, "PPSTRBUF_MIXBIGINT", sizeof (cdat->dstr_511__PPSTRBUF_MIXBIGI.val)-1); /*iniobj dsym_512__READ_FILE*/ /*uniqueobj*/ if (!/*_.VALDATA___V519*/ meltfptr[518]) /*_.VALDATA___V519*/ meltfptr[518] = (void*)&cdat->dsym_512__READ_FILE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_512__READ_FILE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_512__READ_FILE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_512__READ_FILE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_512__READ_FILE.obj_hash = 353044055; cdat->dsym_512__READ_FILE.obj_len = 3; /*inistring dstr_513__READ_FILE*/ /*_.VALSTR___V520*/ meltfptr[519] = (void*)&cdat->dstr_513__READ_FILE; cdat->dstr_513__READ_FILE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_513__READ_FILE.val, "READ_FILE", sizeof (cdat->dstr_513__READ_FILE.val)-1); MELT_LOCATION("warmelt-base.melt:246:/ iniobj"); /*iniobj dobj_514__READ_FILE*/ /*_.VALDATA___V521*/ meltfptr[520] = (void*)&cdat->dobj_514__READ_FILE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_514__READ_FILE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_514__READ_FILE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_514__READ_FILE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_514__READ_FILE.obj_hash = 5264742; cdat->dobj_514__READ_FILE.obj_len = 5; /*inimult dtup_515__READ_FILE*/ /*_.VALTUP___V529*/ meltfptr[528] = (void*)&cdat->dtup_515__READ_FILE; cdat->dtup_515__READ_FILE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_515__READ_FILE.nbval = 3; /*inimult dtup_516__READ_FILE*/ /*_.VALTUP___V526*/ meltfptr[525] = (void*)&cdat->dtup_516__READ_FILE; cdat->dtup_516__READ_FILE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_516__READ_FILE.nbval = 1; /*iniobj dsym_517__FILNAM*/ /*uniqueobj*/ if (!/*_.VALDATA___V524*/ meltfptr[523]) /*_.VALDATA___V524*/ meltfptr[523] = (void*)&cdat->dsym_517__FILNAM; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_517__FILNAM", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_517__FILNAM", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_517__FILNAM.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_517__FILNAM.obj_hash = 47682817; cdat->dsym_517__FILNAM.obj_len = 3; /*inistring dstr_518__FILNAM*/ /*_.VALSTR___V525*/ meltfptr[524] = (void*)&cdat->dstr_518__FILNAM; cdat->dstr_518__FILNAM.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_518__FILNAM.val, "FILNAM", sizeof (cdat->dstr_518__FILNAM.val)-1); /*^iniobj*/ /*iniobj dobj_519*/ /*_.VALDATA___V523*/ meltfptr[522] = (void*)&cdat->dobj_519; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_519", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_519", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_519.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_519.obj_num = 0; cdat->dobj_519.obj_hash = 289927775; cdat->dobj_519.obj_len = 2; /*inistring dstr_520__meltgc_read_fil*/ /*_.VALSTR___V527*/ meltfptr[526] = (void*)&cdat->dstr_520__meltgc_read_fil; cdat->dstr_520__meltgc_read_fil.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_520__meltgc_read_fil.val, "(meltgc_read_file (melt_string_str((melt_ptr_t)(", sizeof (cdat->dstr_520__meltgc_read_fil.val)-1); /*inistring dstr_521__char_0_*/ /*_.VALSTR___V528*/ meltfptr[527] = (void*)&cdat->dstr_521__char_0_; cdat->dstr_521__char_0_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_521__char_0_.val, ")), (char*)0))", sizeof (cdat->dstr_521__char_0_.val)-1); /*inistring dstr_522__READ_FILE*/ /*_.VALSTR___V522*/ meltfptr[521] = (void*)&cdat->dstr_522__READ_FILE; cdat->dstr_522__READ_FILE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_522__READ_FILE.val, "READ_FILE", sizeof (cdat->dstr_522__READ_FILE.val)-1); /*iniobj dsym_523__ERROR_STRV*/ /*uniqueobj*/ if (!/*_.VALDATA___V530*/ meltfptr[529]) /*_.VALDATA___V530*/ meltfptr[529] = (void*)&cdat->dsym_523__ERROR_STRV; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_523__ERROR_STRV", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_523__ERROR_STRV", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_523__ERROR_STRV.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_523__ERROR_STRV.obj_hash = 34568801; cdat->dsym_523__ERROR_STRV.obj_len = 3; /*inistring dstr_524__ERROR_STRV*/ /*_.VALSTR___V531*/ meltfptr[530] = (void*)&cdat->dstr_524__ERROR_STRV; cdat->dstr_524__ERROR_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_524__ERROR_STRV.val, "ERROR_STRV", sizeof (cdat->dstr_524__ERROR_STRV.val)-1); MELT_LOCATION("warmelt-base.melt:252:/ iniobj"); /*iniobj dobj_525__ERROR_STRV*/ /*_.VALDATA___V532*/ meltfptr[531] = (void*)&cdat->dobj_525__ERROR_STRV; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_525__ERROR_STRV", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_525__ERROR_STRV", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_525__ERROR_STRV.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_525__ERROR_STRV.obj_hash = 417754037; cdat->dobj_525__ERROR_STRV.obj_len = 5; /*inimult dtup_526__ERROR_STRV*/ /*_.VALTUP___V546*/ meltfptr[545] = (void*)&cdat->dtup_526__ERROR_STRV; cdat->dtup_526__ERROR_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_526__ERROR_STRV.nbval = 7; /*inimult dtup_527__ERROR_STRV*/ /*_.VALTUP___V541*/ meltfptr[540] = (void*)&cdat->dtup_527__ERROR_STRV; cdat->dtup_527__ERROR_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_527__ERROR_STRV.nbval = 3; /*^iniobj*/ /*iniobj dobj_528*/ /*_.VALDATA___V534*/ meltfptr[533] = (void*)&cdat->dobj_528; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_528", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_528", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_528.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_528.obj_num = 0; cdat->dobj_528.obj_hash = 234977515; cdat->dobj_528.obj_len = 2; /*iniobj dsym_529__CMSG*/ /*uniqueobj*/ if (!/*_.VALDATA___V536*/ meltfptr[535]) /*_.VALDATA___V536*/ meltfptr[535] = (void*)&cdat->dsym_529__CMSG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_529__CMSG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_529__CMSG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_529__CMSG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_529__CMSG.obj_hash = 336115093; cdat->dsym_529__CMSG.obj_len = 3; /*inistring dstr_530__CMSG*/ /*_.VALSTR___V537*/ meltfptr[536] = (void*)&cdat->dstr_530__CMSG; cdat->dstr_530__CMSG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_530__CMSG.val, "CMSG", sizeof (cdat->dstr_530__CMSG.val)-1); /*^iniobj*/ /*iniobj dobj_531*/ /*_.VALDATA___V535*/ meltfptr[534] = (void*)&cdat->dobj_531; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_531", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_531", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_531.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_531.obj_num = 1; cdat->dobj_531.obj_hash = 516664525; cdat->dobj_531.obj_len = 2; /*iniobj dsym_532__STRV*/ /*uniqueobj*/ if (!/*_.VALDATA___V539*/ meltfptr[538]) /*_.VALDATA___V539*/ meltfptr[538] = (void*)&cdat->dsym_532__STRV; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_532__STRV", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_532__STRV", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_532__STRV.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_532__STRV.obj_hash = 118443394; cdat->dsym_532__STRV.obj_len = 3; /*inistring dstr_533__STRV*/ /*_.VALSTR___V540*/ meltfptr[539] = (void*)&cdat->dstr_533__STRV; cdat->dstr_533__STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_533__STRV.val, "STRV", sizeof (cdat->dstr_533__STRV.val)-1); /*^iniobj*/ /*iniobj dobj_534*/ /*_.VALDATA___V538*/ meltfptr[537] = (void*)&cdat->dobj_534; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_534", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_534", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_534.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_534.obj_num = 2; cdat->dobj_534.obj_hash = 411682464; cdat->dobj_534.obj_len = 2; /*inistring dstr_535__melt_error_str_*/ /*_.VALSTR___V542*/ meltfptr[541] = (void*)&cdat->dstr_535__melt_error_str_; cdat->dstr_535__melt_error_str_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_535__melt_error_str_.val, "melt_error_str((melt_ptr_t)(", sizeof (cdat->dstr_535__melt_error_str_.val)-1); /*inistring dstr_536__*/ /*_.VALSTR___V543*/ meltfptr[542] = (void*)&cdat->dstr_536__; cdat->dstr_536__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_536__.val, "), (", sizeof (cdat->dstr_536__.val)-1); /*inistring dstr_537__melt_ptr_t_*/ /*_.VALSTR___V544*/ meltfptr[543] = (void*)&cdat->dstr_537__melt_ptr_t_; cdat->dstr_537__melt_ptr_t_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_537__melt_ptr_t_.val, "), (melt_ptr_t)(", sizeof (cdat->dstr_537__melt_ptr_t_.val)-1); /*inistring dstr_538__*/ /*_.VALSTR___V545*/ meltfptr[544] = (void*)&cdat->dstr_538__; cdat->dstr_538__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_538__.val, "))", sizeof (cdat->dstr_538__.val)-1); /*inistring dstr_539__ERROR_STRV*/ /*_.VALSTR___V533*/ meltfptr[532] = (void*)&cdat->dstr_539__ERROR_STRV; cdat->dstr_539__ERROR_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_539__ERROR_STRV.val, "ERROR_STRV", sizeof (cdat->dstr_539__ERROR_STRV.val)-1); /*iniobj dsym_540__ERROR_PLAIN*/ /*uniqueobj*/ if (!/*_.VALDATA___V547*/ meltfptr[546]) /*_.VALDATA___V547*/ meltfptr[546] = (void*)&cdat->dsym_540__ERROR_PLAIN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_540__ERROR_PLAIN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_540__ERROR_PLAIN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_540__ERROR_PLAIN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_540__ERROR_PLAIN.obj_hash = 808446364; cdat->dsym_540__ERROR_PLAIN.obj_len = 3; /*inistring dstr_541__ERROR_PLAIN*/ /*_.VALSTR___V548*/ meltfptr[547] = (void*)&cdat->dstr_541__ERROR_PLAIN; cdat->dstr_541__ERROR_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_541__ERROR_PLAIN.val, "ERROR_PLAIN", sizeof (cdat->dstr_541__ERROR_PLAIN.val)-1); MELT_LOCATION("warmelt-base.melt:258:/ iniobj"); /*iniobj dobj_542__ERROR_PLAIN*/ /*_.VALDATA___V549*/ meltfptr[548] = (void*)&cdat->dobj_542__ERROR_PLAIN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_542__ERROR_PLAIN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_542__ERROR_PLAIN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_542__ERROR_PLAIN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_542__ERROR_PLAIN.obj_hash = 233519815; cdat->dobj_542__ERROR_PLAIN.obj_len = 5; /*inimult dtup_543__ERROR_PLAIN*/ /*_.VALTUP___V557*/ meltfptr[556] = (void*)&cdat->dtup_543__ERROR_PLAIN; cdat->dtup_543__ERROR_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_543__ERROR_PLAIN.nbval = 5; /*inimult dtup_544__ERROR_PLAIN*/ /*_.VALTUP___V553*/ meltfptr[552] = (void*)&cdat->dtup_544__ERROR_PLAIN; cdat->dtup_544__ERROR_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_544__ERROR_PLAIN.nbval = 2; /*^iniobj*/ /*iniobj dobj_545*/ /*_.VALDATA___V551*/ meltfptr[550] = (void*)&cdat->dobj_545; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_545", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_545", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_545.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_545.obj_num = 0; cdat->dobj_545.obj_hash = 286141714; cdat->dobj_545.obj_len = 2; /*^iniobj*/ /*iniobj dobj_546*/ /*_.VALDATA___V552*/ meltfptr[551] = (void*)&cdat->dobj_546; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_546", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_546", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_546.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_546.obj_num = 1; cdat->dobj_546.obj_hash = 525063498; cdat->dobj_546.obj_len = 2; /*inistring dstr_547__melt_error_str_*/ /*_.VALSTR___V554*/ meltfptr[553] = (void*)&cdat->dstr_547__melt_error_str_; cdat->dstr_547__melt_error_str_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_547__melt_error_str_.val, "melt_error_str((melt_ptr_t)(", sizeof (cdat->dstr_547__melt_error_str_.val)-1); /*inistring dstr_548__*/ /*_.VALSTR___V555*/ meltfptr[554] = (void*)&cdat->dstr_548__; cdat->dstr_548__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_548__.val, "), (", sizeof (cdat->dstr_548__.val)-1); /*inistring dstr_549__melt_ptr_t_0*/ /*_.VALSTR___V556*/ meltfptr[555] = (void*)&cdat->dstr_549__melt_ptr_t_0; cdat->dstr_549__melt_ptr_t_0.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_549__melt_ptr_t_0.val, "), (melt_ptr_t)0)", sizeof (cdat->dstr_549__melt_ptr_t_0.val)-1); /*inistring dstr_550__ERROR_PLAIN*/ /*_.VALSTR___V550*/ meltfptr[549] = (void*)&cdat->dstr_550__ERROR_PLAIN; cdat->dstr_550__ERROR_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_550__ERROR_PLAIN.val, "ERROR_PLAIN", sizeof (cdat->dstr_550__ERROR_PLAIN.val)-1); /*iniobj dsym_551__WARNING_STRV*/ /*uniqueobj*/ if (!/*_.VALDATA___V558*/ meltfptr[557]) /*_.VALDATA___V558*/ meltfptr[557] = (void*)&cdat->dsym_551__WARNING_STRV; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_551__WARNING_STRV", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_551__WARNING_STRV", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_551__WARNING_STRV.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_551__WARNING_STRV.obj_hash = 483583707; cdat->dsym_551__WARNING_STRV.obj_len = 3; /*inistring dstr_552__WARNING_STRV*/ /*_.VALSTR___V559*/ meltfptr[558] = (void*)&cdat->dstr_552__WARNING_STRV; cdat->dstr_552__WARNING_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_552__WARNING_STRV.val, "WARNING_STRV", sizeof (cdat->dstr_552__WARNING_STRV.val)-1); MELT_LOCATION("warmelt-base.melt:265:/ iniobj"); /*iniobj dobj_553__WARNING_STRV*/ /*_.VALDATA___V560*/ meltfptr[559] = (void*)&cdat->dobj_553__WARNING_STRV; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_553__WARNING_STRV", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_553__WARNING_STRV", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_553__WARNING_STRV.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_553__WARNING_STRV.obj_hash = 868447110; cdat->dobj_553__WARNING_STRV.obj_len = 5; /*inimult dtup_554__WARNING_STRV*/ /*_.VALTUP___V570*/ meltfptr[569] = (void*)&cdat->dtup_554__WARNING_STRV; cdat->dtup_554__WARNING_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_554__WARNING_STRV.nbval = 7; /*inimult dtup_555__WARNING_STRV*/ /*_.VALTUP___V565*/ meltfptr[564] = (void*)&cdat->dtup_555__WARNING_STRV; cdat->dtup_555__WARNING_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_555__WARNING_STRV.nbval = 3; /*^iniobj*/ /*iniobj dobj_556*/ /*_.VALDATA___V562*/ meltfptr[561] = (void*)&cdat->dobj_556; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_556", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_556", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_556.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_556.obj_num = 0; cdat->dobj_556.obj_hash = 1060477164; cdat->dobj_556.obj_len = 2; /*^iniobj*/ /*iniobj dobj_557*/ /*_.VALDATA___V563*/ meltfptr[562] = (void*)&cdat->dobj_557; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_557", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_557", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_557.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_557.obj_num = 1; cdat->dobj_557.obj_hash = 4027900; cdat->dobj_557.obj_len = 2; /*^iniobj*/ /*iniobj dobj_558*/ /*_.VALDATA___V564*/ meltfptr[563] = (void*)&cdat->dobj_558; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_558", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_558", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_558.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_558.obj_num = 2; cdat->dobj_558.obj_hash = 788199810; cdat->dobj_558.obj_len = 2; /*inistring dstr_559__melt_warning_str*/ /*_.VALSTR___V566*/ meltfptr[565] = (void*)&cdat->dstr_559__melt_warning_str; cdat->dstr_559__melt_warning_str.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_559__melt_warning_str.val, "melt_warning_str(0, (melt_ptr_t)(", sizeof (cdat->dstr_559__melt_warning_str.val)-1); /*inistring dstr_560__*/ /*_.VALSTR___V567*/ meltfptr[566] = (void*)&cdat->dstr_560__; cdat->dstr_560__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_560__.val, "), (", sizeof (cdat->dstr_560__.val)-1); /*inistring dstr_561__melt_ptr_t_*/ /*_.VALSTR___V568*/ meltfptr[567] = (void*)&cdat->dstr_561__melt_ptr_t_; cdat->dstr_561__melt_ptr_t_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_561__melt_ptr_t_.val, "), (melt_ptr_t)(", sizeof (cdat->dstr_561__melt_ptr_t_.val)-1); /*inistring dstr_562__*/ /*_.VALSTR___V569*/ meltfptr[568] = (void*)&cdat->dstr_562__; cdat->dstr_562__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_562__.val, "))", sizeof (cdat->dstr_562__.val)-1); /*inistring dstr_563__WARNING_STRV*/ /*_.VALSTR___V561*/ meltfptr[560] = (void*)&cdat->dstr_563__WARNING_STRV; cdat->dstr_563__WARNING_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_563__WARNING_STRV.val, "WARNING_STRV", sizeof (cdat->dstr_563__WARNING_STRV.val)-1); /*iniobj dsym_564__WARNING_PLAIN*/ /*uniqueobj*/ if (!/*_.VALDATA___V571*/ meltfptr[570]) /*_.VALDATA___V571*/ meltfptr[570] = (void*)&cdat->dsym_564__WARNING_PLAIN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_564__WARNING_PLAIN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_564__WARNING_PLAIN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_564__WARNING_PLAIN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_564__WARNING_PLAIN.obj_hash = 750772004; cdat->dsym_564__WARNING_PLAIN.obj_len = 3; /*inistring dstr_565__WARNING_PLAIN*/ /*_.VALSTR___V572*/ meltfptr[571] = (void*)&cdat->dstr_565__WARNING_PLAIN; cdat->dstr_565__WARNING_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_565__WARNING_PLAIN.val, "WARNING_PLAIN", sizeof (cdat->dstr_565__WARNING_PLAIN.val)-1); MELT_LOCATION("warmelt-base.melt:270:/ iniobj"); /*iniobj dobj_566__WARNING_PLAIN*/ /*_.VALDATA___V573*/ meltfptr[572] = (void*)&cdat->dobj_566__WARNING_PLAIN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_566__WARNING_PLAIN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_566__WARNING_PLAIN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_566__WARNING_PLAIN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_566__WARNING_PLAIN.obj_hash = 641237605; cdat->dobj_566__WARNING_PLAIN.obj_len = 5; /*inimult dtup_567__WARNING_PLAIN*/ /*_.VALTUP___V581*/ meltfptr[580] = (void*)&cdat->dtup_567__WARNING_PLAIN; cdat->dtup_567__WARNING_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_567__WARNING_PLAIN.nbval = 5; /*inimult dtup_568__WARNING_PLAIN*/ /*_.VALTUP___V577*/ meltfptr[576] = (void*)&cdat->dtup_568__WARNING_PLAIN; cdat->dtup_568__WARNING_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_568__WARNING_PLAIN.nbval = 2; /*^iniobj*/ /*iniobj dobj_569*/ /*_.VALDATA___V575*/ meltfptr[574] = (void*)&cdat->dobj_569; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_569", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_569", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_569.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_569.obj_num = 0; cdat->dobj_569.obj_hash = 426583939; cdat->dobj_569.obj_len = 2; /*^iniobj*/ /*iniobj dobj_570*/ /*_.VALDATA___V576*/ meltfptr[575] = (void*)&cdat->dobj_570; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_570", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_570", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_570.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_570.obj_num = 1; cdat->dobj_570.obj_hash = 776883251; cdat->dobj_570.obj_len = 2; /*inistring dstr_571__melt_warning_str*/ /*_.VALSTR___V578*/ meltfptr[577] = (void*)&cdat->dstr_571__melt_warning_str; cdat->dstr_571__melt_warning_str.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_571__melt_warning_str.val, "melt_warning_str(0, (melt_ptr_t)(", sizeof (cdat->dstr_571__melt_warning_str.val)-1); /*inistring dstr_572__*/ /*_.VALSTR___V579*/ meltfptr[578] = (void*)&cdat->dstr_572__; cdat->dstr_572__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_572__.val, "), (", sizeof (cdat->dstr_572__.val)-1); /*inistring dstr_573__melt_ptr_t_0*/ /*_.VALSTR___V580*/ meltfptr[579] = (void*)&cdat->dstr_573__melt_ptr_t_0; cdat->dstr_573__melt_ptr_t_0.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_573__melt_ptr_t_0.val, "), (melt_ptr_t)0)", sizeof (cdat->dstr_573__melt_ptr_t_0.val)-1); /*inistring dstr_574__WARNING_PLAIN*/ /*_.VALSTR___V574*/ meltfptr[573] = (void*)&cdat->dstr_574__WARNING_PLAIN; cdat->dstr_574__WARNING_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_574__WARNING_PLAIN.val, "WARNING_PLAIN", sizeof (cdat->dstr_574__WARNING_PLAIN.val)-1); /*iniobj dsym_575__WARNINGMSG_PLAIN*/ /*uniqueobj*/ if (!/*_.VALDATA___V582*/ meltfptr[581]) /*_.VALDATA___V582*/ meltfptr[581] = (void*)&cdat->dsym_575__WARNINGMSG_PLAIN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_575__WARNINGMSG_PLAIN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_575__WARNINGMSG_PLAIN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_575__WARNINGMSG_PLAIN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_575__WARNINGMSG_PLAIN.obj_hash = 326445154; cdat->dsym_575__WARNINGMSG_PLAIN.obj_len = 3; /*inistring dstr_576__WARNINGMSG_PLAIN*/ /*_.VALSTR___V583*/ meltfptr[582] = (void*)&cdat->dstr_576__WARNINGMSG_PLAIN; cdat->dstr_576__WARNINGMSG_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_576__WARNINGMSG_PLAIN.val, "WARNINGMSG_PLAIN", sizeof (cdat->dstr_576__WARNINGMSG_PLAIN.val)-1); MELT_LOCATION("warmelt-base.melt:275:/ iniobj"); /*iniobj dobj_577__WARNINGMSG_PLAIN*/ /*_.VALDATA___V584*/ meltfptr[583] = (void*)&cdat->dobj_577__WARNINGMSG_PLAIN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_577__WARNINGMSG_PLAIN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_577__WARNINGMSG_PLAIN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_577__WARNINGMSG_PLAIN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_577__WARNINGMSG_PLAIN.obj_hash = 857394502; cdat->dobj_577__WARNINGMSG_PLAIN.obj_len = 5; /*inimult dtup_578__WARNINGMSG_PLAIN*/ /*_.VALTUP___V590*/ meltfptr[589] = (void*)&cdat->dtup_578__WARNINGMSG_PLAIN; cdat->dtup_578__WARNINGMSG_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_578__WARNINGMSG_PLAIN.nbval = 3; /*inimult dtup_579__WARNINGMSG_PLAIN*/ /*_.VALTUP___V587*/ meltfptr[586] = (void*)&cdat->dtup_579__WARNINGMSG_PLAIN; cdat->dtup_579__WARNINGMSG_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_579__WARNINGMSG_PLAIN.nbval = 1; /*^iniobj*/ /*iniobj dobj_580*/ /*_.VALDATA___V586*/ meltfptr[585] = (void*)&cdat->dobj_580; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_580", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_580", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_580.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_580.obj_num = 0; cdat->dobj_580.obj_hash = 343880384; cdat->dobj_580.obj_len = 2; /*inistring dstr_581__warning_0_MELT*/ /*_.VALSTR___V588*/ meltfptr[587] = (void*)&cdat->dstr_581__warning_0_MELT; cdat->dstr_581__warning_0_MELT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_581__warning_0_MELT.val, "warning(0, \"MELT WARNING MSG [#%ld]::: %s\", melt_dbgcounter, (", sizeof (cdat->dstr_581__warning_0_MELT.val)-1); /*inistring dstr_582__*/ /*_.VALSTR___V589*/ meltfptr[588] = (void*)&cdat->dstr_582__; cdat->dstr_582__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_582__.val, "))", sizeof (cdat->dstr_582__.val)-1); /*inistring dstr_583__WARNINGMSG_PLAIN*/ /*_.VALSTR___V585*/ meltfptr[584] = (void*)&cdat->dstr_583__WARNINGMSG_PLAIN; cdat->dstr_583__WARNINGMSG_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_583__WARNINGMSG_PLAIN.val, "WARNINGMSG_PLAIN", sizeof (cdat->dstr_583__WARNINGMSG_PLAIN.val)-1); /*iniobj dsym_584__ERRORMSG_PLAIN*/ /*uniqueobj*/ if (!/*_.VALDATA___V591*/ meltfptr[590]) /*_.VALDATA___V591*/ meltfptr[590] = (void*)&cdat->dsym_584__ERRORMSG_PLAIN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_584__ERRORMSG_PLAIN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_584__ERRORMSG_PLAIN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_584__ERRORMSG_PLAIN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_584__ERRORMSG_PLAIN.obj_hash = 641434332; cdat->dsym_584__ERRORMSG_PLAIN.obj_len = 3; /*inistring dstr_585__ERRORMSG_PLAIN*/ /*_.VALSTR___V592*/ meltfptr[591] = (void*)&cdat->dstr_585__ERRORMSG_PLAIN; cdat->dstr_585__ERRORMSG_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_585__ERRORMSG_PLAIN.val, "ERRORMSG_PLAIN", sizeof (cdat->dstr_585__ERRORMSG_PLAIN.val)-1); MELT_LOCATION("warmelt-base.melt:280:/ iniobj"); /*iniobj dobj_586__ERRORMSG_PLAIN*/ /*_.VALDATA___V593*/ meltfptr[592] = (void*)&cdat->dobj_586__ERRORMSG_PLAIN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_586__ERRORMSG_PLAIN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_586__ERRORMSG_PLAIN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_586__ERRORMSG_PLAIN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_586__ERRORMSG_PLAIN.obj_hash = 149141782; cdat->dobj_586__ERRORMSG_PLAIN.obj_len = 5; /*inimult dtup_587__ERRORMSG_PLAIN*/ /*_.VALTUP___V599*/ meltfptr[598] = (void*)&cdat->dtup_587__ERRORMSG_PLAIN; cdat->dtup_587__ERRORMSG_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_587__ERRORMSG_PLAIN.nbval = 3; /*inimult dtup_588__ERRORMSG_PLAIN*/ /*_.VALTUP___V596*/ meltfptr[595] = (void*)&cdat->dtup_588__ERRORMSG_PLAIN; cdat->dtup_588__ERRORMSG_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_588__ERRORMSG_PLAIN.nbval = 1; /*^iniobj*/ /*iniobj dobj_589*/ /*_.VALDATA___V595*/ meltfptr[594] = (void*)&cdat->dobj_589; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_589", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_589", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_589.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_589.obj_num = 0; cdat->dobj_589.obj_hash = 1047651604; cdat->dobj_589.obj_len = 2; /*inistring dstr_590__error_MELT_ERR*/ /*_.VALSTR___V597*/ meltfptr[596] = (void*)&cdat->dstr_590__error_MELT_ERR; cdat->dstr_590__error_MELT_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_590__error_MELT_ERR.val, "error (\"MELT ERROR MSG [#%ld]::: %s\", melt_dbgcounter, (", sizeof (cdat->dstr_590__error_MELT_ERR.val)-1); /*inistring dstr_591__*/ /*_.VALSTR___V598*/ meltfptr[597] = (void*)&cdat->dstr_591__; cdat->dstr_591__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_591__.val, "))", sizeof (cdat->dstr_591__.val)-1); /*inistring dstr_592__ERRORMSG_PLAIN*/ /*_.VALSTR___V594*/ meltfptr[593] = (void*)&cdat->dstr_592__ERRORMSG_PLAIN; cdat->dstr_592__ERRORMSG_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_592__ERRORMSG_PLAIN.val, "ERRORMSG_PLAIN", sizeof (cdat->dstr_592__ERRORMSG_PLAIN.val)-1); /*iniobj dsym_593__ERRORMSG_STRV*/ /*uniqueobj*/ if (!/*_.VALDATA___V600*/ meltfptr[599]) /*_.VALDATA___V600*/ meltfptr[599] = (void*)&cdat->dsym_593__ERRORMSG_STRV; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_593__ERRORMSG_STRV", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_593__ERRORMSG_STRV", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_593__ERRORMSG_STRV.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_593__ERRORMSG_STRV.obj_hash = 218301686; cdat->dsym_593__ERRORMSG_STRV.obj_len = 3; /*inistring dstr_594__ERRORMSG_STRV*/ /*_.VALSTR___V601*/ meltfptr[600] = (void*)&cdat->dstr_594__ERRORMSG_STRV; cdat->dstr_594__ERRORMSG_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_594__ERRORMSG_STRV.val, "ERRORMSG_STRV", sizeof (cdat->dstr_594__ERRORMSG_STRV.val)-1); MELT_LOCATION("warmelt-base.melt:287:/ iniobj"); /*iniobj dobj_595__ERRORMSG_STRV*/ /*_.VALDATA___V602*/ meltfptr[601] = (void*)&cdat->dobj_595__ERRORMSG_STRV; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_595__ERRORMSG_STRV", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_595__ERRORMSG_STRV", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_595__ERRORMSG_STRV.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_595__ERRORMSG_STRV.obj_hash = 1065292205; cdat->dobj_595__ERRORMSG_STRV.obj_len = 5; /*inimult dtup_596__ERRORMSG_STRV*/ /*_.VALTUP___V610*/ meltfptr[609] = (void*)&cdat->dtup_596__ERRORMSG_STRV; cdat->dtup_596__ERRORMSG_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_596__ERRORMSG_STRV.nbval = 5; /*inimult dtup_597__ERRORMSG_STRV*/ /*_.VALTUP___V606*/ meltfptr[605] = (void*)&cdat->dtup_597__ERRORMSG_STRV; cdat->dtup_597__ERRORMSG_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_597__ERRORMSG_STRV.nbval = 2; /*^iniobj*/ /*iniobj dobj_598*/ /*_.VALDATA___V604*/ meltfptr[603] = (void*)&cdat->dobj_598; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_598", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_598", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_598.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_598.obj_num = 0; cdat->dobj_598.obj_hash = 1056619969; cdat->dobj_598.obj_len = 2; /*^iniobj*/ /*iniobj dobj_599*/ /*_.VALDATA___V605*/ meltfptr[604] = (void*)&cdat->dobj_599; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_599", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_599", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_599.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_599.obj_num = 1; cdat->dobj_599.obj_hash = 988692183; cdat->dobj_599.obj_len = 2; /*inistring dstr_600__error_MELT_ERRO*/ /*_.VALSTR___V607*/ meltfptr[606] = (void*)&cdat->dstr_600__error_MELT_ERRO; cdat->dstr_600__error_MELT_ERRO.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_600__error_MELT_ERRO.val, "error(\"MELT ERROR MSG [#%ld]::: %s - %s\", melt_dbgcounter, (", sizeof (cdat->dstr_600__error_MELT_ERRO.val)-1); /*inistring dstr_601__melt_strin*/ /*_.VALSTR___V608*/ meltfptr[607] = (void*)&cdat->dstr_601__melt_strin; cdat->dstr_601__melt_strin.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_601__melt_strin.val, "),\n\t melt_string_str((melt_ptr_t)(", sizeof (cdat->dstr_601__melt_strin.val)-1); /*inistring dstr_602__*/ /*_.VALSTR___V609*/ meltfptr[608] = (void*)&cdat->dstr_602__; cdat->dstr_602__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_602__.val, ")))", sizeof (cdat->dstr_602__.val)-1); /*inistring dstr_603__ERRORMSG_STRV*/ /*_.VALSTR___V603*/ meltfptr[602] = (void*)&cdat->dstr_603__ERRORMSG_STRV; cdat->dstr_603__ERRORMSG_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_603__ERRORMSG_STRV.val, "ERRORMSG_STRV", sizeof (cdat->dstr_603__ERRORMSG_STRV.val)-1); /*iniobj dsym_604__INFORM_STRV*/ /*uniqueobj*/ if (!/*_.VALDATA___V611*/ meltfptr[610]) /*_.VALDATA___V611*/ meltfptr[610] = (void*)&cdat->dsym_604__INFORM_STRV; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_604__INFORM_STRV", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_604__INFORM_STRV", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_604__INFORM_STRV.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_604__INFORM_STRV.obj_hash = 868438324; cdat->dsym_604__INFORM_STRV.obj_len = 3; /*inistring dstr_605__INFORM_STRV*/ /*_.VALSTR___V612*/ meltfptr[611] = (void*)&cdat->dstr_605__INFORM_STRV; cdat->dstr_605__INFORM_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_605__INFORM_STRV.val, "INFORM_STRV", sizeof (cdat->dstr_605__INFORM_STRV.val)-1); MELT_LOCATION("warmelt-base.melt:294:/ iniobj"); /*iniobj dobj_606__INFORM_STRV*/ /*_.VALDATA___V613*/ meltfptr[612] = (void*)&cdat->dobj_606__INFORM_STRV; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_606__INFORM_STRV", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_606__INFORM_STRV", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_606__INFORM_STRV.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_606__INFORM_STRV.obj_hash = 897475814; cdat->dobj_606__INFORM_STRV.obj_len = 5; /*inimult dtup_607__INFORM_STRV*/ /*_.VALTUP___V623*/ meltfptr[622] = (void*)&cdat->dtup_607__INFORM_STRV; cdat->dtup_607__INFORM_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_607__INFORM_STRV.nbval = 7; /*inimult dtup_608__INFORM_STRV*/ /*_.VALTUP___V618*/ meltfptr[617] = (void*)&cdat->dtup_608__INFORM_STRV; cdat->dtup_608__INFORM_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_608__INFORM_STRV.nbval = 3; /*^iniobj*/ /*iniobj dobj_609*/ /*_.VALDATA___V615*/ meltfptr[614] = (void*)&cdat->dobj_609; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_609", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_609", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_609.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_609.obj_num = 0; cdat->dobj_609.obj_hash = 788799624; cdat->dobj_609.obj_len = 2; /*^iniobj*/ /*iniobj dobj_610*/ /*_.VALDATA___V616*/ meltfptr[615] = (void*)&cdat->dobj_610; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_610", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_610", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_610.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_610.obj_num = 1; cdat->dobj_610.obj_hash = 1053764672; cdat->dobj_610.obj_len = 2; /*^iniobj*/ /*iniobj dobj_611*/ /*_.VALDATA___V617*/ meltfptr[616] = (void*)&cdat->dobj_611; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_611", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_611", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_611.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_611.obj_num = 2; cdat->dobj_611.obj_hash = 893688187; cdat->dobj_611.obj_len = 2; /*inistring dstr_612__melt_inform_str_*/ /*_.VALSTR___V619*/ meltfptr[618] = (void*)&cdat->dstr_612__melt_inform_str_; cdat->dstr_612__melt_inform_str_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_612__melt_inform_str_.val, "melt_inform_str((melt_ptr_t)(", sizeof (cdat->dstr_612__melt_inform_str_.val)-1); /*inistring dstr_613__*/ /*_.VALSTR___V620*/ meltfptr[619] = (void*)&cdat->dstr_613__; cdat->dstr_613__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_613__.val, "), (", sizeof (cdat->dstr_613__.val)-1); /*inistring dstr_614__melt_ptr_t_*/ /*_.VALSTR___V621*/ meltfptr[620] = (void*)&cdat->dstr_614__melt_ptr_t_; cdat->dstr_614__melt_ptr_t_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_614__melt_ptr_t_.val, "), (melt_ptr_t)(", sizeof (cdat->dstr_614__melt_ptr_t_.val)-1); /*inistring dstr_615__*/ /*_.VALSTR___V622*/ meltfptr[621] = (void*)&cdat->dstr_615__; cdat->dstr_615__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_615__.val, "))", sizeof (cdat->dstr_615__.val)-1); /*inistring dstr_616__INFORM_STRV*/ /*_.VALSTR___V614*/ meltfptr[613] = (void*)&cdat->dstr_616__INFORM_STRV; cdat->dstr_616__INFORM_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_616__INFORM_STRV.val, "INFORM_STRV", sizeof (cdat->dstr_616__INFORM_STRV.val)-1); /*iniobj dsym_617__INFORM_PLAIN*/ /*uniqueobj*/ if (!/*_.VALDATA___V624*/ meltfptr[623]) /*_.VALDATA___V624*/ meltfptr[623] = (void*)&cdat->dsym_617__INFORM_PLAIN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_617__INFORM_PLAIN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_617__INFORM_PLAIN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_617__INFORM_PLAIN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_617__INFORM_PLAIN.obj_hash = 569354016; cdat->dsym_617__INFORM_PLAIN.obj_len = 3; /*inistring dstr_618__INFORM_PLAIN*/ /*_.VALSTR___V625*/ meltfptr[624] = (void*)&cdat->dstr_618__INFORM_PLAIN; cdat->dstr_618__INFORM_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_618__INFORM_PLAIN.val, "INFORM_PLAIN", sizeof (cdat->dstr_618__INFORM_PLAIN.val)-1); MELT_LOCATION("warmelt-base.melt:298:/ iniobj"); /*iniobj dobj_619__INFORM_PLAIN*/ /*_.VALDATA___V626*/ meltfptr[625] = (void*)&cdat->dobj_619__INFORM_PLAIN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_619__INFORM_PLAIN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_619__INFORM_PLAIN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_619__INFORM_PLAIN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_619__INFORM_PLAIN.obj_hash = 1035563578; cdat->dobj_619__INFORM_PLAIN.obj_len = 5; /*inimult dtup_620__INFORM_PLAIN*/ /*_.VALTUP___V634*/ meltfptr[633] = (void*)&cdat->dtup_620__INFORM_PLAIN; cdat->dtup_620__INFORM_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_620__INFORM_PLAIN.nbval = 5; /*inimult dtup_621__INFORM_PLAIN*/ /*_.VALTUP___V630*/ meltfptr[629] = (void*)&cdat->dtup_621__INFORM_PLAIN; cdat->dtup_621__INFORM_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_621__INFORM_PLAIN.nbval = 2; /*^iniobj*/ /*iniobj dobj_622*/ /*_.VALDATA___V628*/ meltfptr[627] = (void*)&cdat->dobj_622; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_622", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_622", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_622.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_622.obj_num = 0; cdat->dobj_622.obj_hash = 1041981954; cdat->dobj_622.obj_len = 2; /*^iniobj*/ /*iniobj dobj_623*/ /*_.VALDATA___V629*/ meltfptr[628] = (void*)&cdat->dobj_623; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_623", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_623", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_623.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_623.obj_num = 1; cdat->dobj_623.obj_hash = 491614478; cdat->dobj_623.obj_len = 2; /*inistring dstr_624__melt_inform_str_*/ /*_.VALSTR___V631*/ meltfptr[630] = (void*)&cdat->dstr_624__melt_inform_str_; cdat->dstr_624__melt_inform_str_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_624__melt_inform_str_.val, "melt_inform_str((melt_ptr_t)(", sizeof (cdat->dstr_624__melt_inform_str_.val)-1); /*inistring dstr_625__*/ /*_.VALSTR___V632*/ meltfptr[631] = (void*)&cdat->dstr_625__; cdat->dstr_625__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_625__.val, "), (", sizeof (cdat->dstr_625__.val)-1); /*inistring dstr_626__melt_ptr_t_0*/ /*_.VALSTR___V633*/ meltfptr[632] = (void*)&cdat->dstr_626__melt_ptr_t_0; cdat->dstr_626__melt_ptr_t_0.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_626__melt_ptr_t_0.val, "), (melt_ptr_t)0)", sizeof (cdat->dstr_626__melt_ptr_t_0.val)-1); /*inistring dstr_627__INFORM_PLAIN*/ /*_.VALSTR___V627*/ meltfptr[626] = (void*)&cdat->dstr_627__INFORM_PLAIN; cdat->dstr_627__INFORM_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_627__INFORM_PLAIN.val, "INFORM_PLAIN", sizeof (cdat->dstr_627__INFORM_PLAIN.val)-1); /*iniobj dsym_628__INFORMSG_PLAIN*/ /*uniqueobj*/ if (!/*_.VALDATA___V635*/ meltfptr[634]) /*_.VALDATA___V635*/ meltfptr[634] = (void*)&cdat->dsym_628__INFORMSG_PLAIN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_628__INFORMSG_PLAIN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_628__INFORMSG_PLAIN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_628__INFORMSG_PLAIN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_628__INFORMSG_PLAIN.obj_hash = 167596035; cdat->dsym_628__INFORMSG_PLAIN.obj_len = 3; /*inistring dstr_629__INFORMSG_PLAIN*/ /*_.VALSTR___V636*/ meltfptr[635] = (void*)&cdat->dstr_629__INFORMSG_PLAIN; cdat->dstr_629__INFORMSG_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_629__INFORMSG_PLAIN.val, "INFORMSG_PLAIN", sizeof (cdat->dstr_629__INFORMSG_PLAIN.val)-1); MELT_LOCATION("warmelt-base.melt:303:/ iniobj"); /*iniobj dobj_630__INFORMSG_PLAIN*/ /*_.VALDATA___V637*/ meltfptr[636] = (void*)&cdat->dobj_630__INFORMSG_PLAIN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_630__INFORMSG_PLAIN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_630__INFORMSG_PLAIN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_630__INFORMSG_PLAIN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_630__INFORMSG_PLAIN.obj_hash = 60750666; cdat->dobj_630__INFORMSG_PLAIN.obj_len = 5; /*inimult dtup_631__INFORMSG_PLAIN*/ /*_.VALTUP___V643*/ meltfptr[642] = (void*)&cdat->dtup_631__INFORMSG_PLAIN; cdat->dtup_631__INFORMSG_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_631__INFORMSG_PLAIN.nbval = 3; /*inimult dtup_632__INFORMSG_PLAIN*/ /*_.VALTUP___V640*/ meltfptr[639] = (void*)&cdat->dtup_632__INFORMSG_PLAIN; cdat->dtup_632__INFORMSG_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_632__INFORMSG_PLAIN.nbval = 1; /*^iniobj*/ /*iniobj dobj_633*/ /*_.VALDATA___V639*/ meltfptr[638] = (void*)&cdat->dobj_633; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_633", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_633", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_633.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_633.obj_num = 0; cdat->dobj_633.obj_hash = 311913949; cdat->dobj_633.obj_len = 2; /*inistring dstr_634__inform_UNKNOWN_L*/ /*_.VALSTR___V641*/ meltfptr[640] = (void*)&cdat->dstr_634__inform_UNKNOWN_L; cdat->dstr_634__inform_UNKNOWN_L.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_634__inform_UNKNOWN_L.val, "inform(UNKNOWN_LOCATION, \"MELT INFORM [#%ld]: %s\", melt_dbgcounter, (", sizeof (cdat->dstr_634__inform_UNKNOWN_L.val)-1); /*inistring dstr_635__*/ /*_.VALSTR___V642*/ meltfptr[641] = (void*)&cdat->dstr_635__; cdat->dstr_635__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_635__.val, "))", sizeof (cdat->dstr_635__.val)-1); /*inistring dstr_636__INFORMSG_PLAIN*/ /*_.VALSTR___V638*/ meltfptr[637] = (void*)&cdat->dstr_636__INFORMSG_PLAIN; cdat->dstr_636__INFORMSG_PLAIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_636__INFORMSG_PLAIN.val, "INFORMSG_PLAIN", sizeof (cdat->dstr_636__INFORMSG_PLAIN.val)-1); MELT_LOCATION("warmelt-base.melt:309:/ iniobj"); /*iniobj dobj_637__FOREACH_LONG_UPTO*/ /*_.VALDATA___V644*/ meltfptr[643] = (void*)&cdat->dobj_637__FOREACH_LONG_UPTO; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_637__FOREACH_LONG_UPTO", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_CITERATOR)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_637__FOREACH_LONG_UPTO", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_CITERATOR)))))->object_magic == OBMAG_OBJECT); cdat->dobj_637__FOREACH_LONG_UPTO.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_CITERATOR)))); cdat->dobj_637__FOREACH_LONG_UPTO.obj_hash = 903047280; cdat->dobj_637__FOREACH_LONG_UPTO.obj_len = 7; /*inistring dstr_638__FOREACH_LONG_UPT*/ /*_.VALSTR___V645*/ meltfptr[644] = (void*)&cdat->dstr_638__FOREACH_LONG_UPT; cdat->dstr_638__FOREACH_LONG_UPT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_638__FOREACH_LONG_UPT.val, "FOREACH_LONG_UPTO", sizeof (cdat->dstr_638__FOREACH_LONG_UPT.val)-1); /*iniobj dsym_639__IMIN*/ /*uniqueobj*/ if (!/*_.VALDATA___V647*/ meltfptr[646]) /*_.VALDATA___V647*/ meltfptr[646] = (void*)&cdat->dsym_639__IMIN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_639__IMIN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_639__IMIN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_639__IMIN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_639__IMIN.obj_hash = 235451612; cdat->dsym_639__IMIN.obj_len = 3; /*inistring dstr_640__IMIN*/ /*_.VALSTR___V648*/ meltfptr[647] = (void*)&cdat->dstr_640__IMIN; cdat->dstr_640__IMIN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_640__IMIN.val, "IMIN", sizeof (cdat->dstr_640__IMIN.val)-1); /*^iniobj*/ /*iniobj dobj_641*/ /*_.VALDATA___V646*/ meltfptr[645] = (void*)&cdat->dobj_641; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_641", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_641", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_641.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_641.obj_num = 0; cdat->dobj_641.obj_hash = 326069548; cdat->dobj_641.obj_len = 2; /*iniobj dsym_642__IMAX*/ /*uniqueobj*/ if (!/*_.VALDATA___V650*/ meltfptr[649]) /*_.VALDATA___V650*/ meltfptr[649] = (void*)&cdat->dsym_642__IMAX; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_642__IMAX", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_642__IMAX", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_642__IMAX.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_642__IMAX.obj_hash = 902474197; cdat->dsym_642__IMAX.obj_len = 3; /*inistring dstr_643__IMAX*/ /*_.VALSTR___V651*/ meltfptr[650] = (void*)&cdat->dstr_643__IMAX; cdat->dstr_643__IMAX.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_643__IMAX.val, "IMAX", sizeof (cdat->dstr_643__IMAX.val)-1); /*^iniobj*/ /*iniobj dobj_644*/ /*_.VALDATA___V649*/ meltfptr[648] = (void*)&cdat->dobj_644; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_644", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_644", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_644.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_644.obj_num = 1; cdat->dobj_644.obj_hash = 732126100; cdat->dobj_644.obj_len = 2; /*inimult dtup_645__FOREACH_LONG_UPTO*/ /*_.VALTUP___V652*/ meltfptr[651] = (void*)&cdat->dtup_645__FOREACH_LONG_UPTO; cdat->dtup_645__FOREACH_LONG_UPTO.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_645__FOREACH_LONG_UPTO.nbval = 2; /*iniobj dsym_646__EACHLONG*/ /*uniqueobj*/ if (!/*_.VALDATA___V653*/ meltfptr[652]) /*_.VALDATA___V653*/ meltfptr[652] = (void*)&cdat->dsym_646__EACHLONG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_646__EACHLONG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_646__EACHLONG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_646__EACHLONG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_646__EACHLONG.obj_hash = 865550969; cdat->dsym_646__EACHLONG.obj_len = 3; /*inistring dstr_647__EACHLONG*/ /*_.VALSTR___V654*/ meltfptr[653] = (void*)&cdat->dstr_647__EACHLONG; cdat->dstr_647__EACHLONG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_647__EACHLONG.val, "EACHLONG", sizeof (cdat->dstr_647__EACHLONG.val)-1); /*^iniobj*/ /*iniobj dobj_648*/ /*_.VALDATA___V655*/ meltfptr[654] = (void*)&cdat->dobj_648; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_648", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_648", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_648.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_648.obj_num = 0; cdat->dobj_648.obj_hash = 448060145; cdat->dobj_648.obj_len = 2; /*inimult dtup_649__FOREACH_LONG_UPTO*/ /*_.VALTUP___V656*/ meltfptr[655] = (void*)&cdat->dtup_649__FOREACH_LONG_UPTO; cdat->dtup_649__FOREACH_LONG_UPTO.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_649__FOREACH_LONG_UPTO.nbval = 1; /*inistring dstr_650__start_*/ /*_.VALSTR___V657*/ meltfptr[656] = (void*)&cdat->dstr_650__start_; cdat->dstr_650__start_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_650__start_.val, "/*start ", sizeof (cdat->dstr_650__start_.val)-1); /*inistring dstr_651__long_*/ /*_.VALSTR___V658*/ meltfptr[657] = (void*)&cdat->dstr_651__long_; cdat->dstr_651__long_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_651__long_.val, " */\n long ", sizeof (cdat->dstr_651__long_.val)-1); /*inistring dstr_652__min_*/ /*_.VALSTR___V659*/ meltfptr[658] = (void*)&cdat->dstr_652__min_; cdat->dstr_652__min_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_652__min_.val, "_min = ", sizeof (cdat->dstr_652__min_.val)-1); /*inistring dstr_653__long_*/ /*_.VALSTR___V660*/ meltfptr[659] = (void*)&cdat->dstr_653__long_; cdat->dstr_653__long_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_653__long_.val, ";\n long ", sizeof (cdat->dstr_653__long_.val)-1); /*inistring dstr_654__max_*/ /*_.VALSTR___V661*/ meltfptr[660] = (void*)&cdat->dstr_654__max_; cdat->dstr_654__max_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_654__max_.val, "_max = ", sizeof (cdat->dstr_654__max_.val)-1); /*inistring dstr_655__long_*/ /*_.VALSTR___V662*/ meltfptr[661] = (void*)&cdat->dstr_655__long_; cdat->dstr_655__long_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_655__long_.val, ";\n long ", sizeof (cdat->dstr_655__long_.val)-1); /*inistring dstr_656__cur_0_fo*/ /*_.VALSTR___V663*/ meltfptr[662] = (void*)&cdat->dstr_656__cur_0_fo; cdat->dstr_656__cur_0_fo.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_656__cur_0_fo.val, "_cur = 0;\n for (", sizeof (cdat->dstr_656__cur_0_fo.val)-1); /*inistring dstr_657__cur_*/ /*_.VALSTR___V664*/ meltfptr[663] = (void*)&cdat->dstr_657__cur_; cdat->dstr_657__cur_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_657__cur_.val, "_cur = ", sizeof (cdat->dstr_657__cur_.val)-1); /*inistring dstr_658__min_*/ /*_.VALSTR___V665*/ meltfptr[664] = (void*)&cdat->dstr_658__min_; cdat->dstr_658__min_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_658__min_.val, "_min;\n ", sizeof (cdat->dstr_658__min_.val)-1); /*inistring dstr_659__cur_*/ /*_.VALSTR___V666*/ meltfptr[665] = (void*)&cdat->dstr_659__cur_; cdat->dstr_659__cur_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_659__cur_.val, "_cur <= ", sizeof (cdat->dstr_659__cur_.val)-1); /*inistring dstr_660__max_*/ /*_.VALSTR___V667*/ meltfptr[666] = (void*)&cdat->dstr_660__max_; cdat->dstr_660__max_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_660__max_.val, "_max;\n\t ", sizeof (cdat->dstr_660__max_.val)-1); /*inistring dstr_661__cur_*/ /*_.VALSTR___V668*/ meltfptr[667] = (void*)&cdat->dstr_661__cur_; cdat->dstr_661__cur_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_661__cur_.val, "_cur ++) {\n\t ", sizeof (cdat->dstr_661__cur_.val)-1); /*inistring dstr_662__*/ /*_.VALSTR___V669*/ meltfptr[668] = (void*)&cdat->dstr_662__; cdat->dstr_662__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_662__.val, " = ", sizeof (cdat->dstr_662__.val)-1); /*inistring dstr_663__cur_*/ /*_.VALSTR___V670*/ meltfptr[669] = (void*)&cdat->dstr_663__cur_; cdat->dstr_663__cur_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_663__cur_.val, "_cur;\t \n", sizeof (cdat->dstr_663__cur_.val)-1); /*inimult dtup_664__FOREACH_LONG_UPTO*/ /*_.VALTUP___V671*/ meltfptr[670] = (void*)&cdat->dtup_664__FOREACH_LONG_UPTO; cdat->dtup_664__FOREACH_LONG_UPTO.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_664__FOREACH_LONG_UPTO.nbval = 27; /*inistring dstr_665__end_eachlon*/ /*_.VALSTR___V672*/ meltfptr[671] = (void*)&cdat->dstr_665__end_eachlon; cdat->dstr_665__end_eachlon.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_665__end_eachlon.val, " } /*end eachlong */", sizeof (cdat->dstr_665__end_eachlon.val)-1); /*inimult dtup_666__FOREACH_LONG_UPTO*/ /*_.VALTUP___V673*/ meltfptr[672] = (void*)&cdat->dtup_666__FOREACH_LONG_UPTO; cdat->dtup_666__FOREACH_LONG_UPTO.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_666__FOREACH_LONG_UPTO.nbval = 1; MELT_LOCATION("warmelt-base.melt:333:/ iniobj"); /*iniobj dobj_667__SOME_INTEGER_MULTIPLE*/ /*_.VALDATA___V674*/ meltfptr[673] = (void*)&cdat->dobj_667__SOME_INTEGER_MULTIPLE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_667__SOME_INTEGER_MULTIPLE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_CMATCHER)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_667__SOME_INTEGER_MULTIPLE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_CMATCHER)))))->object_magic == OBMAG_OBJECT); cdat->dobj_667__SOME_INTEGER_MULTIPLE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_CMATCHER)))); cdat->dobj_667__SOME_INTEGER_MULTIPLE.obj_hash = 1002770973; cdat->dobj_667__SOME_INTEGER_MULTIPLE.obj_len = 9; /*inistring dstr_668__SOME_INTEGER_MUL*/ /*_.VALSTR___V675*/ meltfptr[674] = (void*)&cdat->dstr_668__SOME_INTEGER_MUL; cdat->dstr_668__SOME_INTEGER_MUL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_668__SOME_INTEGER_MUL.val, "SOME_INTEGER_MULTIPLE", sizeof (cdat->dstr_668__SOME_INTEGER_MUL.val)-1); /*iniobj dsym_669__N*/ /*uniqueobj*/ if (!/*_.VALDATA___V677*/ meltfptr[676]) /*_.VALDATA___V677*/ meltfptr[676] = (void*)&cdat->dsym_669__N; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_669__N", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_669__N", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_669__N.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_669__N.obj_hash = 107499106; cdat->dsym_669__N.obj_len = 3; /*inistring dstr_670__N*/ /*_.VALSTR___V678*/ meltfptr[677] = (void*)&cdat->dstr_670__N; cdat->dstr_670__N.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_670__N.val, "N", sizeof (cdat->dstr_670__N.val)-1); /*^iniobj*/ /*iniobj dobj_671*/ /*_.VALDATA___V676*/ meltfptr[675] = (void*)&cdat->dobj_671; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_671", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_671", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_671.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_671.obj_num = 0; cdat->dobj_671.obj_hash = 300555084; cdat->dobj_671.obj_len = 2; /*inimult dtup_672__SOME_INTEGER_MULTIPLE*/ /*_.VALTUP___V679*/ meltfptr[678] = (void*)&cdat->dtup_672__SOME_INTEGER_MULTIPLE; cdat->dtup_672__SOME_INTEGER_MULTIPLE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_672__SOME_INTEGER_MULTIPLE.nbval = 1; /*^iniobj*/ /*iniobj dobj_673*/ /*_.VALDATA___V680*/ meltfptr[679] = (void*)&cdat->dobj_673; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_673", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_673", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_673.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_673.obj_hash = 619446668; cdat->dobj_673.obj_len = 2; /*iniobj dsym_674__Q*/ /*uniqueobj*/ if (!/*_.VALDATA___V682*/ meltfptr[681]) /*_.VALDATA___V682*/ meltfptr[681] = (void*)&cdat->dsym_674__Q; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_674__Q", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_674__Q", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_674__Q.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_674__Q.obj_hash = 66071194; cdat->dsym_674__Q.obj_len = 3; /*inistring dstr_675__Q*/ /*_.VALSTR___V683*/ meltfptr[682] = (void*)&cdat->dstr_675__Q; cdat->dstr_675__Q.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_675__Q.val, "Q", sizeof (cdat->dstr_675__Q.val)-1); /*^iniobj*/ /*iniobj dobj_676*/ /*_.VALDATA___V681*/ meltfptr[680] = (void*)&cdat->dobj_676; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_676", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_676", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_676.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_676.obj_num = 0; cdat->dobj_676.obj_hash = 576915498; cdat->dobj_676.obj_len = 2; /*inimult dtup_677__SOME_INTEGER_MULTIPLE*/ /*_.VALTUP___V684*/ meltfptr[683] = (void*)&cdat->dtup_677__SOME_INTEGER_MULTIPLE; cdat->dtup_677__SOME_INTEGER_MULTIPLE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_677__SOME_INTEGER_MULTIPLE.nbval = 1; /*iniobj dsym_678__INTMULT*/ /*uniqueobj*/ if (!/*_.VALDATA___V685*/ meltfptr[684]) /*_.VALDATA___V685*/ meltfptr[684] = (void*)&cdat->dsym_678__INTMULT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_678__INTMULT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_678__INTMULT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_678__INTMULT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_678__INTMULT.obj_hash = 613551938; cdat->dsym_678__INTMULT.obj_len = 3; /*inistring dstr_679__INTMULT*/ /*_.VALSTR___V686*/ meltfptr[685] = (void*)&cdat->dstr_679__INTMULT; cdat->dstr_679__INTMULT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_679__INTMULT.val, "INTMULT", sizeof (cdat->dstr_679__INTMULT.val)-1); /*inistring dstr_680__*/ /*_.VALSTR___V687*/ meltfptr[686] = (void*)&cdat->dstr_680__; cdat->dstr_680__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_680__.val, " /*", sizeof (cdat->dstr_680__.val)-1); /*inistring dstr_681__*/ /*_.VALSTR___V688*/ meltfptr[687] = (void*)&cdat->dstr_681__; cdat->dstr_681__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_681__.val, " ?*/ (", sizeof (cdat->dstr_681__.val)-1); /*inistring dstr_682__0_*/ /*_.VALSTR___V689*/ meltfptr[688] = (void*)&cdat->dstr_682__0_; cdat->dstr_682__0_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_682__0_.val, ">0 && ((", sizeof (cdat->dstr_682__0_.val)-1); /*inistring dstr_683__*/ /*_.VALSTR___V690*/ meltfptr[689] = (void*)&cdat->dstr_683__; cdat->dstr_683__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_683__.val, ") % (", sizeof (cdat->dstr_683__.val)-1); /*inistring dstr_684__0_*/ /*_.VALSTR___V691*/ meltfptr[690] = (void*)&cdat->dstr_684__0_; cdat->dstr_684__0_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_684__0_.val, "))==0) ", sizeof (cdat->dstr_684__0_.val)-1); /*inimult dtup_685__SOME_INTEGER_MULTIPLE*/ /*_.VALTUP___V692*/ meltfptr[691] = (void*)&cdat->dtup_685__SOME_INTEGER_MULTIPLE; cdat->dtup_685__SOME_INTEGER_MULTIPLE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_685__SOME_INTEGER_MULTIPLE.nbval = 9; /*inistring dstr_686__*/ /*_.VALSTR___V693*/ meltfptr[692] = (void*)&cdat->dstr_686__; cdat->dstr_686__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_686__.val, " /*", sizeof (cdat->dstr_686__.val)-1); /*inistring dstr_687__*/ /*_.VALSTR___V694*/ meltfptr[693] = (void*)&cdat->dstr_687__; cdat->dstr_687__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_687__.val, " !*/ ", sizeof (cdat->dstr_687__.val)-1); /*inistring dstr_688__*/ /*_.VALSTR___V695*/ meltfptr[694] = (void*)&cdat->dstr_688__; cdat->dstr_688__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_688__.val, " = (", sizeof (cdat->dstr_688__.val)-1); /*inistring dstr_689__*/ /*_.VALSTR___V696*/ meltfptr[695] = (void*)&cdat->dstr_689__; cdat->dstr_689__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_689__.val, ") / (", sizeof (cdat->dstr_689__.val)-1); /*inistring dstr_690__*/ /*_.VALSTR___V697*/ meltfptr[696] = (void*)&cdat->dstr_690__; cdat->dstr_690__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_690__.val, "); ", sizeof (cdat->dstr_690__.val)-1); /*inimult dtup_691__SOME_INTEGER_MULTIPLE*/ /*_.VALTUP___V698*/ meltfptr[697] = (void*)&cdat->dtup_691__SOME_INTEGER_MULTIPLE; cdat->dtup_691__SOME_INTEGER_MULTIPLE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_691__SOME_INTEGER_MULTIPLE.nbval = 9; MELT_LOCATION("warmelt-base.melt:347:/ iniobj"); /*iniobj dobj_692__SOME_INTEGER_GREATER_THAN*/ /*_.VALDATA___V699*/ meltfptr[698] = (void*)&cdat->dobj_692__SOME_INTEGER_GREATER_THAN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_692__SOME_INTEGER_GREATER_THAN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_CMATCHER)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_692__SOME_INTEGER_GREATER_THAN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_CMATCHER)))))->object_magic == OBMAG_OBJECT); cdat->dobj_692__SOME_INTEGER_GREATER_THAN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_CMATCHER)))); cdat->dobj_692__SOME_INTEGER_GREATER_THAN.obj_hash = 716733188; cdat->dobj_692__SOME_INTEGER_GREATER_THAN.obj_len = 9; /*inistring dstr_693__SOME_INTEGER_GRE*/ /*_.VALSTR___V700*/ meltfptr[699] = (void*)&cdat->dstr_693__SOME_INTEGER_GRE; cdat->dstr_693__SOME_INTEGER_GRE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_693__SOME_INTEGER_GRE.val, "SOME_INTEGER_GREATER_THAN", sizeof (cdat->dstr_693__SOME_INTEGER_GRE.val)-1); /*^iniobj*/ /*iniobj dobj_694*/ /*_.VALDATA___V701*/ meltfptr[700] = (void*)&cdat->dobj_694; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_694", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_694", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_694.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_694.obj_num = 0; cdat->dobj_694.obj_hash = 452783627; cdat->dobj_694.obj_len = 2; /*inimult dtup_695__SOME_INTEGER_GREATER_THAN*/ /*_.VALTUP___V702*/ meltfptr[701] = (void*)&cdat->dtup_695__SOME_INTEGER_GREATER_THAN; cdat->dtup_695__SOME_INTEGER_GREATER_THAN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_695__SOME_INTEGER_GREATER_THAN.nbval = 1; /*^iniobj*/ /*iniobj dobj_696*/ /*_.VALDATA___V703*/ meltfptr[702] = (void*)&cdat->dobj_696; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_696", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_696", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_696.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_696.obj_hash = 795685944; cdat->dobj_696.obj_len = 2; /*inimult dtup_697__SOME_INTEGER_GREATER_THAN*/ /*_.VALTUP___V704*/ meltfptr[703] = (void*)&cdat->dtup_697__SOME_INTEGER_GREATER_THAN; cdat->dtup_697__SOME_INTEGER_GREATER_THAN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_697__SOME_INTEGER_GREATER_THAN.nbval = 0; /*iniobj dsym_698__INTGREATHAN*/ /*uniqueobj*/ if (!/*_.VALDATA___V705*/ meltfptr[704]) /*_.VALDATA___V705*/ meltfptr[704] = (void*)&cdat->dsym_698__INTGREATHAN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_698__INTGREATHAN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_698__INTGREATHAN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_698__INTGREATHAN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_698__INTGREATHAN.obj_hash = 144741481; cdat->dsym_698__INTGREATHAN.obj_len = 3; /*inistring dstr_699__INTGREATHAN*/ /*_.VALSTR___V706*/ meltfptr[705] = (void*)&cdat->dstr_699__INTGREATHAN; cdat->dstr_699__INTGREATHAN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_699__INTGREATHAN.val, "INTGREATHAN", sizeof (cdat->dstr_699__INTGREATHAN.val)-1); /*inistring dstr_700__*/ /*_.VALSTR___V707*/ meltfptr[706] = (void*)&cdat->dstr_700__; cdat->dstr_700__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_700__.val, " /*", sizeof (cdat->dstr_700__.val)-1); /*inistring dstr_701__*/ /*_.VALSTR___V708*/ meltfptr[707] = (void*)&cdat->dstr_701__; cdat->dstr_701__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_701__.val, " ?*/ (", sizeof (cdat->dstr_701__.val)-1); /*inistring dstr_702__*/ /*_.VALSTR___V709*/ meltfptr[708] = (void*)&cdat->dstr_702__; cdat->dstr_702__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_702__.val, " > ", sizeof (cdat->dstr_702__.val)-1); /*inistring dstr_703__*/ /*_.VALSTR___V710*/ meltfptr[709] = (void*)&cdat->dstr_703__; cdat->dstr_703__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_703__.val, ") ", sizeof (cdat->dstr_703__.val)-1); /*inimult dtup_704__SOME_INTEGER_GREATER_THAN*/ /*_.VALTUP___V711*/ meltfptr[710] = (void*)&cdat->dtup_704__SOME_INTEGER_GREATER_THAN; cdat->dtup_704__SOME_INTEGER_GREATER_THAN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_704__SOME_INTEGER_GREATER_THAN.nbval = 7; /*iniobj dsym_705__OUTNEWLINE_ERR*/ /*uniqueobj*/ if (!/*_.VALDATA___V712*/ meltfptr[711]) /*_.VALDATA___V712*/ meltfptr[711] = (void*)&cdat->dsym_705__OUTNEWLINE_ERR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_705__OUTNEWLINE_ERR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_705__OUTNEWLINE_ERR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_705__OUTNEWLINE_ERR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_705__OUTNEWLINE_ERR.obj_hash = 111424262; cdat->dsym_705__OUTNEWLINE_ERR.obj_len = 3; /*inistring dstr_706__OUTNEWLINE_ERR*/ /*_.VALSTR___V713*/ meltfptr[712] = (void*)&cdat->dstr_706__OUTNEWLINE_ERR; cdat->dstr_706__OUTNEWLINE_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_706__OUTNEWLINE_ERR.val, "OUTNEWLINE_ERR", sizeof (cdat->dstr_706__OUTNEWLINE_ERR.val)-1); MELT_LOCATION("warmelt-base.melt:360:/ iniobj"); /*iniobj dobj_707__OUTNEWLINE_ERR*/ /*_.VALDATA___V714*/ meltfptr[713] = (void*)&cdat->dobj_707__OUTNEWLINE_ERR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_707__OUTNEWLINE_ERR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_707__OUTNEWLINE_ERR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_707__OUTNEWLINE_ERR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_707__OUTNEWLINE_ERR.obj_hash = 351461254; cdat->dobj_707__OUTNEWLINE_ERR.obj_len = 5; /*inimult dtup_708__OUTNEWLINE_ERR*/ /*_.VALTUP___V718*/ meltfptr[717] = (void*)&cdat->dtup_708__OUTNEWLINE_ERR; cdat->dtup_708__OUTNEWLINE_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_708__OUTNEWLINE_ERR.nbval = 1; /*inimult dtup_709__OUTNEWLINE_ERR*/ /*_.VALTUP___V716*/ meltfptr[715] = (void*)&cdat->dtup_709__OUTNEWLINE_ERR; cdat->dtup_709__OUTNEWLINE_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_709__OUTNEWLINE_ERR.nbval = 0; /*inistring dstr_710__melt_newlineflus*/ /*_.VALSTR___V717*/ meltfptr[716] = (void*)&cdat->dstr_710__melt_newlineflus; cdat->dstr_710__melt_newlineflus.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_710__melt_newlineflus.val, "melt_newlineflush(stderr)", sizeof (cdat->dstr_710__melt_newlineflus.val)-1); /*inistring dstr_711__OUTNEWLINE_ERR*/ /*_.VALSTR___V715*/ meltfptr[714] = (void*)&cdat->dstr_711__OUTNEWLINE_ERR; cdat->dstr_711__OUTNEWLINE_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_711__OUTNEWLINE_ERR.val, "OUTNEWLINE_ERR", sizeof (cdat->dstr_711__OUTNEWLINE_ERR.val)-1); /*iniobj dsym_712__OUTSTR_ERR*/ /*uniqueobj*/ if (!/*_.VALDATA___V719*/ meltfptr[718]) /*_.VALDATA___V719*/ meltfptr[718] = (void*)&cdat->dsym_712__OUTSTR_ERR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_712__OUTSTR_ERR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_712__OUTSTR_ERR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_712__OUTSTR_ERR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_712__OUTSTR_ERR.obj_hash = 948349339; cdat->dsym_712__OUTSTR_ERR.obj_len = 3; /*inistring dstr_713__OUTSTR_ERR*/ /*_.VALSTR___V720*/ meltfptr[719] = (void*)&cdat->dstr_713__OUTSTR_ERR; cdat->dstr_713__OUTSTR_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_713__OUTSTR_ERR.val, "OUTSTR_ERR", sizeof (cdat->dstr_713__OUTSTR_ERR.val)-1); MELT_LOCATION("warmelt-base.melt:364:/ iniobj"); /*iniobj dobj_714__OUTSTR_ERR*/ /*_.VALDATA___V721*/ meltfptr[720] = (void*)&cdat->dobj_714__OUTSTR_ERR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_714__OUTSTR_ERR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_714__OUTSTR_ERR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_714__OUTSTR_ERR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_714__OUTSTR_ERR.obj_hash = 335887398; cdat->dobj_714__OUTSTR_ERR.obj_len = 5; /*inimult dtup_715__OUTSTR_ERR*/ /*_.VALTUP___V727*/ meltfptr[726] = (void*)&cdat->dtup_715__OUTSTR_ERR; cdat->dtup_715__OUTSTR_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_715__OUTSTR_ERR.nbval = 3; /*inimult dtup_716__OUTSTR_ERR*/ /*_.VALTUP___V724*/ meltfptr[723] = (void*)&cdat->dtup_716__OUTSTR_ERR; cdat->dtup_716__OUTSTR_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_716__OUTSTR_ERR.nbval = 1; /*^iniobj*/ /*iniobj dobj_717*/ /*_.VALDATA___V723*/ meltfptr[722] = (void*)&cdat->dobj_717; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_717", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_717", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_717.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_717.obj_num = 0; cdat->dobj_717.obj_hash = 755122559; cdat->dobj_717.obj_len = 2; /*inistring dstr_718__melt_putstr_stde*/ /*_.VALSTR___V725*/ meltfptr[724] = (void*)&cdat->dstr_718__melt_putstr_stde; cdat->dstr_718__melt_putstr_stde.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_718__melt_putstr_stde.val, "melt_putstr(stderr, (melt_ptr_t)(", sizeof (cdat->dstr_718__melt_putstr_stde.val)-1); /*inistring dstr_719__*/ /*_.VALSTR___V726*/ meltfptr[725] = (void*)&cdat->dstr_719__; cdat->dstr_719__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_719__.val, "))", sizeof (cdat->dstr_719__.val)-1); /*inistring dstr_720__OUTSTR_ERR*/ /*_.VALSTR___V722*/ meltfptr[721] = (void*)&cdat->dstr_720__OUTSTR_ERR; cdat->dstr_720__OUTSTR_ERR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_720__OUTSTR_ERR.val, "OUTSTR_ERR", sizeof (cdat->dstr_720__OUTSTR_ERR.val)-1); /*iniobj dsym_721__MESSAGE_DBG*/ /*uniqueobj*/ if (!/*_.VALDATA___V728*/ meltfptr[727]) /*_.VALDATA___V728*/ meltfptr[727] = (void*)&cdat->dsym_721__MESSAGE_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_721__MESSAGE_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_721__MESSAGE_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_721__MESSAGE_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_721__MESSAGE_DBG.obj_hash = 5092635; cdat->dsym_721__MESSAGE_DBG.obj_len = 3; /*inistring dstr_722__MESSAGE_DBG*/ /*_.VALSTR___V729*/ meltfptr[728] = (void*)&cdat->dstr_722__MESSAGE_DBG; cdat->dstr_722__MESSAGE_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_722__MESSAGE_DBG.val, "MESSAGE_DBG", sizeof (cdat->dstr_722__MESSAGE_DBG.val)-1); MELT_LOCATION("warmelt-base.melt:369:/ iniobj"); /*iniobj dobj_723__MESSAGE_DBG*/ /*_.VALDATA___V730*/ meltfptr[729] = (void*)&cdat->dobj_723__MESSAGE_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_723__MESSAGE_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_723__MESSAGE_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_723__MESSAGE_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_723__MESSAGE_DBG.obj_hash = 127391675; cdat->dobj_723__MESSAGE_DBG.obj_len = 5; /*inimult dtup_724__MESSAGE_DBG*/ /*_.VALTUP___V736*/ meltfptr[735] = (void*)&cdat->dtup_724__MESSAGE_DBG; cdat->dtup_724__MESSAGE_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_724__MESSAGE_DBG.nbval = 3; /*inimult dtup_725__MESSAGE_DBG*/ /*_.VALTUP___V733*/ meltfptr[732] = (void*)&cdat->dtup_725__MESSAGE_DBG; cdat->dtup_725__MESSAGE_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_725__MESSAGE_DBG.nbval = 1; /*^iniobj*/ /*iniobj dobj_726*/ /*_.VALDATA___V732*/ meltfptr[731] = (void*)&cdat->dobj_726; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_726", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_726", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_726.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_726.obj_num = 0; cdat->dobj_726.obj_hash = 1026680393; cdat->dobj_726.obj_len = 2; /*inistring dstr_727__debugeputs_*/ /*_.VALSTR___V734*/ meltfptr[733] = (void*)&cdat->dstr_727__debugeputs_; cdat->dstr_727__debugeputs_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_727__debugeputs_.val, "debugeputs((", sizeof (cdat->dstr_727__debugeputs_.val)-1); /*inistring dstr_728__*/ /*_.VALSTR___V735*/ meltfptr[734] = (void*)&cdat->dstr_728__; cdat->dstr_728__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_728__.val, "))", sizeof (cdat->dstr_728__.val)-1); /*inistring dstr_729__MESSAGE_DBG*/ /*_.VALSTR___V731*/ meltfptr[730] = (void*)&cdat->dstr_729__MESSAGE_DBG; cdat->dstr_729__MESSAGE_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_729__MESSAGE_DBG.val, "MESSAGE_DBG", sizeof (cdat->dstr_729__MESSAGE_DBG.val)-1); /*iniobj dsym_730__MESSAGENUM_DBG*/ /*uniqueobj*/ if (!/*_.VALDATA___V737*/ meltfptr[736]) /*_.VALDATA___V737*/ meltfptr[736] = (void*)&cdat->dsym_730__MESSAGENUM_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_730__MESSAGENUM_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_730__MESSAGENUM_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_730__MESSAGENUM_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_730__MESSAGENUM_DBG.obj_hash = 484943247; cdat->dsym_730__MESSAGENUM_DBG.obj_len = 3; /*inistring dstr_731__MESSAGENUM_DBG*/ /*_.VALSTR___V738*/ meltfptr[737] = (void*)&cdat->dstr_731__MESSAGENUM_DBG; cdat->dstr_731__MESSAGENUM_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_731__MESSAGENUM_DBG.val, "MESSAGENUM_DBG", sizeof (cdat->dstr_731__MESSAGENUM_DBG.val)-1); MELT_LOCATION("warmelt-base.melt:371:/ iniobj"); /*iniobj dobj_732__MESSAGENUM_DBG*/ /*_.VALDATA___V739*/ meltfptr[738] = (void*)&cdat->dobj_732__MESSAGENUM_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_732__MESSAGENUM_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_732__MESSAGENUM_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_732__MESSAGENUM_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_732__MESSAGENUM_DBG.obj_hash = 83404197; cdat->dobj_732__MESSAGENUM_DBG.obj_len = 5; /*inimult dtup_733__MESSAGENUM_DBG*/ /*_.VALTUP___V747*/ meltfptr[746] = (void*)&cdat->dtup_733__MESSAGENUM_DBG; cdat->dtup_733__MESSAGENUM_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_733__MESSAGENUM_DBG.nbval = 5; /*inimult dtup_734__MESSAGENUM_DBG*/ /*_.VALTUP___V743*/ meltfptr[742] = (void*)&cdat->dtup_734__MESSAGENUM_DBG; cdat->dtup_734__MESSAGENUM_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_734__MESSAGENUM_DBG.nbval = 2; /*^iniobj*/ /*iniobj dobj_735*/ /*_.VALDATA___V741*/ meltfptr[740] = (void*)&cdat->dobj_735; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_735", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_735", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_735.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_735.obj_num = 0; cdat->dobj_735.obj_hash = 1009100265; cdat->dobj_735.obj_len = 2; /*^iniobj*/ /*iniobj dobj_736*/ /*_.VALDATA___V742*/ meltfptr[741] = (void*)&cdat->dobj_736; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_736", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_736", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_736.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_736.obj_num = 1; cdat->dobj_736.obj_hash = 590050777; cdat->dobj_736.obj_len = 2; /*inistring dstr_737__debugnum_*/ /*_.VALSTR___V744*/ meltfptr[743] = (void*)&cdat->dstr_737__debugnum_; cdat->dstr_737__debugnum_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_737__debugnum_.val, "debugnum((", sizeof (cdat->dstr_737__debugnum_.val)-1); /*inistring dstr_738__*/ /*_.VALSTR___V745*/ meltfptr[744] = (void*)&cdat->dstr_738__; cdat->dstr_738__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_738__.val, "), (", sizeof (cdat->dstr_738__.val)-1); /*inistring dstr_739__*/ /*_.VALSTR___V746*/ meltfptr[745] = (void*)&cdat->dstr_739__; cdat->dstr_739__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_739__.val, "))", sizeof (cdat->dstr_739__.val)-1); /*inistring dstr_740__MESSAGENUM_DBG*/ /*_.VALSTR___V740*/ meltfptr[739] = (void*)&cdat->dstr_740__MESSAGENUM_DBG; cdat->dstr_740__MESSAGENUM_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_740__MESSAGENUM_DBG.val, "MESSAGENUM_DBG", sizeof (cdat->dstr_740__MESSAGENUM_DBG.val)-1); /*iniobj dsym_741__MESSAGEVAL_DBG*/ /*uniqueobj*/ if (!/*_.VALDATA___V748*/ meltfptr[747]) /*_.VALDATA___V748*/ meltfptr[747] = (void*)&cdat->dsym_741__MESSAGEVAL_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_741__MESSAGEVAL_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_741__MESSAGEVAL_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_741__MESSAGEVAL_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_741__MESSAGEVAL_DBG.obj_hash = 749741803; cdat->dsym_741__MESSAGEVAL_DBG.obj_len = 3; /*inistring dstr_742__MESSAGEVAL_DBG*/ /*_.VALSTR___V749*/ meltfptr[748] = (void*)&cdat->dstr_742__MESSAGEVAL_DBG; cdat->dstr_742__MESSAGEVAL_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_742__MESSAGEVAL_DBG.val, "MESSAGEVAL_DBG", sizeof (cdat->dstr_742__MESSAGEVAL_DBG.val)-1); MELT_LOCATION("warmelt-base.melt:375:/ iniobj"); /*iniobj dobj_743__MESSAGEVAL_DBG*/ /*_.VALDATA___V750*/ meltfptr[749] = (void*)&cdat->dobj_743__MESSAGEVAL_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_743__MESSAGEVAL_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_743__MESSAGEVAL_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_743__MESSAGEVAL_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_743__MESSAGEVAL_DBG.obj_hash = 116921648; cdat->dobj_743__MESSAGEVAL_DBG.obj_len = 5; /*inimult dtup_744__MESSAGEVAL_DBG*/ /*_.VALTUP___V758*/ meltfptr[757] = (void*)&cdat->dtup_744__MESSAGEVAL_DBG; cdat->dtup_744__MESSAGEVAL_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_744__MESSAGEVAL_DBG.nbval = 5; /*inimult dtup_745__MESSAGEVAL_DBG*/ /*_.VALTUP___V754*/ meltfptr[753] = (void*)&cdat->dtup_745__MESSAGEVAL_DBG; cdat->dtup_745__MESSAGEVAL_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_745__MESSAGEVAL_DBG.nbval = 2; /*^iniobj*/ /*iniobj dobj_746*/ /*_.VALDATA___V752*/ meltfptr[751] = (void*)&cdat->dobj_746; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_746", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_746", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_746.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_746.obj_num = 0; cdat->dobj_746.obj_hash = 148644281; cdat->dobj_746.obj_len = 2; /*^iniobj*/ /*iniobj dobj_747*/ /*_.VALDATA___V753*/ meltfptr[752] = (void*)&cdat->dobj_747; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_747", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_747", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_747.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_747.obj_num = 1; cdat->dobj_747.obj_hash = 665774957; cdat->dobj_747.obj_len = 2; /*inistring dstr_748__debugvalue_*/ /*_.VALSTR___V755*/ meltfptr[754] = (void*)&cdat->dstr_748__debugvalue_; cdat->dstr_748__debugvalue_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_748__debugvalue_.val, "debugvalue((", sizeof (cdat->dstr_748__debugvalue_.val)-1); /*inistring dstr_749__void_*/ /*_.VALSTR___V756*/ meltfptr[755] = (void*)&cdat->dstr_749__void_; cdat->dstr_749__void_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_749__void_.val, "), ((void*)(", sizeof (cdat->dstr_749__void_.val)-1); /*inistring dstr_750__*/ /*_.VALSTR___V757*/ meltfptr[756] = (void*)&cdat->dstr_750__; cdat->dstr_750__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_750__.val, ")))", sizeof (cdat->dstr_750__.val)-1); /*inistring dstr_751__MESSAGEVAL_DBG*/ /*_.VALSTR___V751*/ meltfptr[750] = (void*)&cdat->dstr_751__MESSAGEVAL_DBG; cdat->dstr_751__MESSAGEVAL_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_751__MESSAGEVAL_DBG.val, "MESSAGEVAL_DBG", sizeof (cdat->dstr_751__MESSAGEVAL_DBG.val)-1); /*iniobj dsym_752__LONGBACKTRACE_DBG*/ /*uniqueobj*/ if (!/*_.VALDATA___V759*/ meltfptr[758]) /*_.VALDATA___V759*/ meltfptr[758] = (void*)&cdat->dsym_752__LONGBACKTRACE_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_752__LONGBACKTRACE_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_752__LONGBACKTRACE_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_752__LONGBACKTRACE_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_752__LONGBACKTRACE_DBG.obj_hash = 295179358; cdat->dsym_752__LONGBACKTRACE_DBG.obj_len = 3; /*inistring dstr_753__LONGBACKTRACE_DB*/ /*_.VALSTR___V760*/ meltfptr[759] = (void*)&cdat->dstr_753__LONGBACKTRACE_DB; cdat->dstr_753__LONGBACKTRACE_DB.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_753__LONGBACKTRACE_DB.val, "LONGBACKTRACE_DBG", sizeof (cdat->dstr_753__LONGBACKTRACE_DB.val)-1); MELT_LOCATION("warmelt-base.melt:379:/ iniobj"); /*iniobj dobj_754__LONGBACKTRACE_DBG*/ /*_.VALDATA___V761*/ meltfptr[760] = (void*)&cdat->dobj_754__LONGBACKTRACE_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_754__LONGBACKTRACE_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_754__LONGBACKTRACE_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_754__LONGBACKTRACE_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_754__LONGBACKTRACE_DBG.obj_hash = 568438612; cdat->dobj_754__LONGBACKTRACE_DBG.obj_len = 5; /*inimult dtup_755__LONGBACKTRACE_DBG*/ /*_.VALTUP___V770*/ meltfptr[769] = (void*)&cdat->dtup_755__LONGBACKTRACE_DBG; cdat->dtup_755__LONGBACKTRACE_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_755__LONGBACKTRACE_DBG.nbval = 3; /*inimult dtup_756__LONGBACKTRACE_DBG*/ /*_.VALTUP___V767*/ meltfptr[766] = (void*)&cdat->dtup_756__LONGBACKTRACE_DBG; cdat->dtup_756__LONGBACKTRACE_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_756__LONGBACKTRACE_DBG.nbval = 2; /*^iniobj*/ /*iniobj dobj_757*/ /*_.VALDATA___V763*/ meltfptr[762] = (void*)&cdat->dobj_757; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_757", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_757", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_757.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_757.obj_num = 0; cdat->dobj_757.obj_hash = 392649276; cdat->dobj_757.obj_len = 2; /*iniobj dsym_758__MAXDEPTH*/ /*uniqueobj*/ if (!/*_.VALDATA___V765*/ meltfptr[764]) /*_.VALDATA___V765*/ meltfptr[764] = (void*)&cdat->dsym_758__MAXDEPTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_758__MAXDEPTH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_758__MAXDEPTH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_758__MAXDEPTH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_758__MAXDEPTH.obj_hash = 129778328; cdat->dsym_758__MAXDEPTH.obj_len = 3; /*inistring dstr_759__MAXDEPTH*/ /*_.VALSTR___V766*/ meltfptr[765] = (void*)&cdat->dstr_759__MAXDEPTH; cdat->dstr_759__MAXDEPTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_759__MAXDEPTH.val, "MAXDEPTH", sizeof (cdat->dstr_759__MAXDEPTH.val)-1); /*^iniobj*/ /*iniobj dobj_760*/ /*_.VALDATA___V764*/ meltfptr[763] = (void*)&cdat->dobj_760; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_760", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_760", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_760.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_760.obj_num = 1; cdat->dobj_760.obj_hash = 1013344378; cdat->dobj_760.obj_len = 2; /*inistring dstr_761__debugbacktrace_*/ /*_.VALSTR___V768*/ meltfptr[767] = (void*)&cdat->dstr_761__debugbacktrace_; cdat->dstr_761__debugbacktrace_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_761__debugbacktrace_.val, "debugbacktrace((", sizeof (cdat->dstr_761__debugbacktrace_.val)-1); /*inistring dstr_762__int_maxdept*/ /*_.VALSTR___V769*/ meltfptr[768] = (void*)&cdat->dstr_762__int_maxdept; cdat->dstr_762__int_maxdept.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_762__int_maxdept.val, "), (int)(maxdepth))", sizeof (cdat->dstr_762__int_maxdept.val)-1); /*inistring dstr_763__LONGBACKTRACE_DB*/ /*_.VALSTR___V762*/ meltfptr[761] = (void*)&cdat->dstr_763__LONGBACKTRACE_DB; cdat->dstr_763__LONGBACKTRACE_DB.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_763__LONGBACKTRACE_DB.val, "LONGBACKTRACE_DBG", sizeof (cdat->dstr_763__LONGBACKTRACE_DB.val)-1); /*iniobj dsym_764__CHECKVAL_DBG*/ /*uniqueobj*/ if (!/*_.VALDATA___V771*/ meltfptr[770]) /*_.VALDATA___V771*/ meltfptr[770] = (void*)&cdat->dsym_764__CHECKVAL_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_764__CHECKVAL_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_764__CHECKVAL_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_764__CHECKVAL_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_764__CHECKVAL_DBG.obj_hash = 220121357; cdat->dsym_764__CHECKVAL_DBG.obj_len = 3; /*inistring dstr_765__CHECKVAL_DBG*/ /*_.VALSTR___V772*/ meltfptr[771] = (void*)&cdat->dstr_765__CHECKVAL_DBG; cdat->dstr_765__CHECKVAL_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_765__CHECKVAL_DBG.val, "CHECKVAL_DBG", sizeof (cdat->dstr_765__CHECKVAL_DBG.val)-1); MELT_LOCATION("warmelt-base.melt:384:/ iniobj"); /*iniobj dobj_766__CHECKVAL_DBG*/ /*_.VALDATA___V773*/ meltfptr[772] = (void*)&cdat->dobj_766__CHECKVAL_DBG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_766__CHECKVAL_DBG", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_766__CHECKVAL_DBG", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_766__CHECKVAL_DBG.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_766__CHECKVAL_DBG.obj_hash = 708506707; cdat->dobj_766__CHECKVAL_DBG.obj_len = 5; /*inimult dtup_767__CHECKVAL_DBG*/ /*_.VALTUP___V781*/ meltfptr[780] = (void*)&cdat->dtup_767__CHECKVAL_DBG; cdat->dtup_767__CHECKVAL_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_767__CHECKVAL_DBG.nbval = 5; /*inimult dtup_768__CHECKVAL_DBG*/ /*_.VALTUP___V777*/ meltfptr[776] = (void*)&cdat->dtup_768__CHECKVAL_DBG; cdat->dtup_768__CHECKVAL_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_768__CHECKVAL_DBG.nbval = 2; /*^iniobj*/ /*iniobj dobj_769*/ /*_.VALDATA___V775*/ meltfptr[774] = (void*)&cdat->dobj_769; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_769", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_769", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_769.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_769.obj_num = 0; cdat->dobj_769.obj_hash = 213983526; cdat->dobj_769.obj_len = 2; /*^iniobj*/ /*iniobj dobj_770*/ /*_.VALDATA___V776*/ meltfptr[775] = (void*)&cdat->dobj_770; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_770", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_770", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_770.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_770.obj_num = 1; cdat->dobj_770.obj_hash = 739301978; cdat->dobj_770.obj_len = 2; /*inistring dstr_771__melt_checked_ass*/ /*_.VALSTR___V778*/ meltfptr[777] = (void*)&cdat->dstr_771__melt_checked_ass; cdat->dstr_771__melt_checked_ass.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_771__melt_checked_ass.val, "melt_checked_assignmsg ((", sizeof (cdat->dstr_771__melt_checked_ass.val)-1); /*inistring dstr_772__*/ /*_.VALSTR___V779*/ meltfptr[778] = (void*)&cdat->dstr_772__; cdat->dstr_772__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_772__.val, "),(", sizeof (cdat->dstr_772__.val)-1); /*inistring dstr_773__*/ /*_.VALSTR___V780*/ meltfptr[779] = (void*)&cdat->dstr_773__; cdat->dstr_773__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_773__.val, "))", sizeof (cdat->dstr_773__.val)-1); /*inistring dstr_774__CHECKVAL_DBG*/ /*_.VALSTR___V774*/ meltfptr[773] = (void*)&cdat->dstr_774__CHECKVAL_DBG; cdat->dstr_774__CHECKVAL_DBG.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_774__CHECKVAL_DBG.val, "CHECKVAL_DBG", sizeof (cdat->dstr_774__CHECKVAL_DBG.val)-1); /*iniobj dsym_775__DEBUGCSTRING*/ /*uniqueobj*/ if (!/*_.VALDATA___V782*/ meltfptr[781]) /*_.VALDATA___V782*/ meltfptr[781] = (void*)&cdat->dsym_775__DEBUGCSTRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_775__DEBUGCSTRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_775__DEBUGCSTRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_775__DEBUGCSTRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_775__DEBUGCSTRING.obj_hash = 897641084; cdat->dsym_775__DEBUGCSTRING.obj_len = 3; /*inistring dstr_776__DEBUGCSTRING*/ /*_.VALSTR___V783*/ meltfptr[782] = (void*)&cdat->dstr_776__DEBUGCSTRING; cdat->dstr_776__DEBUGCSTRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_776__DEBUGCSTRING.val, "DEBUGCSTRING", sizeof (cdat->dstr_776__DEBUGCSTRING.val)-1); MELT_LOCATION("warmelt-base.melt:388:/ iniobj"); /*iniobj dobj_777__DEBUGCSTRING*/ /*_.VALDATA___V784*/ meltfptr[783] = (void*)&cdat->dobj_777__DEBUGCSTRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_777__DEBUGCSTRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_777__DEBUGCSTRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_777__DEBUGCSTRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_777__DEBUGCSTRING.obj_hash = 229261193; cdat->dobj_777__DEBUGCSTRING.obj_len = 5; /*inimult dtup_778__DEBUGCSTRING*/ /*_.VALTUP___V792*/ meltfptr[791] = (void*)&cdat->dtup_778__DEBUGCSTRING; cdat->dtup_778__DEBUGCSTRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_778__DEBUGCSTRING.nbval = 5; /*inimult dtup_779__DEBUGCSTRING*/ /*_.VALTUP___V788*/ meltfptr[787] = (void*)&cdat->dtup_779__DEBUGCSTRING; cdat->dtup_779__DEBUGCSTRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_779__DEBUGCSTRING.nbval = 2; /*^iniobj*/ /*iniobj dobj_780*/ /*_.VALDATA___V786*/ meltfptr[785] = (void*)&cdat->dobj_780; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_780", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_780", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_780.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_780.obj_num = 0; cdat->dobj_780.obj_hash = 9710000; cdat->dobj_780.obj_len = 2; /*^iniobj*/ /*iniobj dobj_781*/ /*_.VALDATA___V787*/ meltfptr[786] = (void*)&cdat->dobj_781; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_781", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_781", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_781.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_781.obj_num = 1; cdat->dobj_781.obj_hash = 124945943; cdat->dobj_781.obj_len = 2; /*inistring dstr_782__debugeprintf_de*/ /*_.VALSTR___V789*/ meltfptr[788] = (void*)&cdat->dstr_782__debugeprintf_de; cdat->dstr_782__debugeprintf_de.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_782__debugeprintf_de.val, "debugeprintf(\"debugcstring %s \'%s\'\", ", sizeof (cdat->dstr_782__debugeprintf_de.val)-1); /*inistring dstr_783__*/ /*_.VALSTR___V790*/ meltfptr[789] = (void*)&cdat->dstr_783__; cdat->dstr_783__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_783__.val, ", ", sizeof (cdat->dstr_783__.val)-1); /*inistring dstr_784__*/ /*_.VALSTR___V791*/ meltfptr[790] = (void*)&cdat->dstr_784__; cdat->dstr_784__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_784__.val, ")", sizeof (cdat->dstr_784__.val)-1); /*inistring dstr_785__DEBUGCSTRING*/ /*_.VALSTR___V785*/ meltfptr[784] = (void*)&cdat->dstr_785__DEBUGCSTRING; cdat->dstr_785__DEBUGCSTRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_785__DEBUGCSTRING.val, "DEBUGCSTRING", sizeof (cdat->dstr_785__DEBUGCSTRING.val)-1); /*iniobj dsym_786__MAKE_STRBUF*/ /*uniqueobj*/ if (!/*_.VALDATA___V793*/ meltfptr[792]) /*_.VALDATA___V793*/ meltfptr[792] = (void*)&cdat->dsym_786__MAKE_STRBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_786__MAKE_STRBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_786__MAKE_STRBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_786__MAKE_STRBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_786__MAKE_STRBUF.obj_hash = 257024388; cdat->dsym_786__MAKE_STRBUF.obj_len = 3; /*inistring dstr_787__MAKE_STRBUF*/ /*_.VALSTR___V794*/ meltfptr[793] = (void*)&cdat->dstr_787__MAKE_STRBUF; cdat->dstr_787__MAKE_STRBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_787__MAKE_STRBUF.val, "MAKE_STRBUF", sizeof (cdat->dstr_787__MAKE_STRBUF.val)-1); MELT_LOCATION("warmelt-base.melt:394:/ iniobj"); /*iniobj dobj_788__MAKE_STRBUF*/ /*_.VALDATA___V795*/ meltfptr[794] = (void*)&cdat->dobj_788__MAKE_STRBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_788__MAKE_STRBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_788__MAKE_STRBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_788__MAKE_STRBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_788__MAKE_STRBUF.obj_hash = 840042097; cdat->dobj_788__MAKE_STRBUF.obj_len = 5; /*inimult dtup_789__MAKE_STRBUF*/ /*_.VALTUP___V801*/ meltfptr[800] = (void*)&cdat->dtup_789__MAKE_STRBUF; cdat->dtup_789__MAKE_STRBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_789__MAKE_STRBUF.nbval = 3; /*inimult dtup_790__MAKE_STRBUF*/ /*_.VALTUP___V798*/ meltfptr[797] = (void*)&cdat->dtup_790__MAKE_STRBUF; cdat->dtup_790__MAKE_STRBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_790__MAKE_STRBUF.nbval = 1; /*^iniobj*/ /*iniobj dobj_791*/ /*_.VALDATA___V797*/ meltfptr[796] = (void*)&cdat->dobj_791; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_791", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_791", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_791.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_791.obj_num = 0; cdat->dobj_791.obj_hash = 191891997; cdat->dobj_791.obj_len = 2; /*inistring dstr_792__meltgc_new_strbu*/ /*_.VALSTR___V799*/ meltfptr[798] = (void*)&cdat->dstr_792__meltgc_new_strbu; cdat->dstr_792__meltgc_new_strbu.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_792__meltgc_new_strbu.val, "meltgc_new_strbuf((meltobject_ptr_t)(", sizeof (cdat->dstr_792__meltgc_new_strbu.val)-1); /*inistring dstr_793__char_0_*/ /*_.VALSTR___V800*/ meltfptr[799] = (void*)&cdat->dstr_793__char_0_; cdat->dstr_793__char_0_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_793__char_0_.val, "), (char*)0)", sizeof (cdat->dstr_793__char_0_.val)-1); /*inistring dstr_794__MAKE_STRBUF*/ /*_.VALSTR___V796*/ meltfptr[795] = (void*)&cdat->dstr_794__MAKE_STRBUF; cdat->dstr_794__MAKE_STRBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_794__MAKE_STRBUF.val, "MAKE_STRBUF", sizeof (cdat->dstr_794__MAKE_STRBUF.val)-1); /*iniobj dsym_795__STRBUF_USEDLENGTH*/ /*uniqueobj*/ if (!/*_.VALDATA___V802*/ meltfptr[801]) /*_.VALDATA___V802*/ meltfptr[801] = (void*)&cdat->dsym_795__STRBUF_USEDLENGTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_795__STRBUF_USEDLENGTH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_795__STRBUF_USEDLENGTH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_795__STRBUF_USEDLENGTH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_795__STRBUF_USEDLENGTH.obj_hash = 851116200; cdat->dsym_795__STRBUF_USEDLENGTH.obj_len = 3; /*inistring dstr_796__STRBUF_USEDLENGT*/ /*_.VALSTR___V803*/ meltfptr[802] = (void*)&cdat->dstr_796__STRBUF_USEDLENGT; cdat->dstr_796__STRBUF_USEDLENGT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_796__STRBUF_USEDLENGT.val, "STRBUF_USEDLENGTH", sizeof (cdat->dstr_796__STRBUF_USEDLENGT.val)-1); MELT_LOCATION("warmelt-base.melt:398:/ iniobj"); /*iniobj dobj_797__STRBUF_USEDLENGTH*/ /*_.VALDATA___V804*/ meltfptr[803] = (void*)&cdat->dobj_797__STRBUF_USEDLENGTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_797__STRBUF_USEDLENGTH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_797__STRBUF_USEDLENGTH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_797__STRBUF_USEDLENGTH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_797__STRBUF_USEDLENGTH.obj_hash = 844283618; cdat->dobj_797__STRBUF_USEDLENGTH.obj_len = 5; /*inimult dtup_798__STRBUF_USEDLENGTH*/ /*_.VALTUP___V810*/ meltfptr[809] = (void*)&cdat->dtup_798__STRBUF_USEDLENGTH; cdat->dtup_798__STRBUF_USEDLENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_798__STRBUF_USEDLENGTH.nbval = 3; /*inimult dtup_799__STRBUF_USEDLENGTH*/ /*_.VALTUP___V807*/ meltfptr[806] = (void*)&cdat->dtup_799__STRBUF_USEDLENGTH; cdat->dtup_799__STRBUF_USEDLENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_799__STRBUF_USEDLENGTH.nbval = 1; /*^iniobj*/ /*iniobj dobj_800*/ /*_.VALDATA___V806*/ meltfptr[805] = (void*)&cdat->dobj_800; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_800", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_800", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_800.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_800.obj_num = 0; cdat->dobj_800.obj_hash = 19810802; cdat->dobj_800.obj_len = 2; /*inistring dstr_801__melt_strbuf_used*/ /*_.VALSTR___V808*/ meltfptr[807] = (void*)&cdat->dstr_801__melt_strbuf_used; cdat->dstr_801__melt_strbuf_used.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_801__melt_strbuf_used.val, "melt_strbuf_usedlength((melt_ptr_t)(", sizeof (cdat->dstr_801__melt_strbuf_used.val)-1); /*inistring dstr_802__*/ /*_.VALSTR___V809*/ meltfptr[808] = (void*)&cdat->dstr_802__; cdat->dstr_802__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_802__.val, "))", sizeof (cdat->dstr_802__.val)-1); /*inistring dstr_803__STRBUF_USEDLENGT*/ /*_.VALSTR___V805*/ meltfptr[804] = (void*)&cdat->dstr_803__STRBUF_USEDLENGT; cdat->dstr_803__STRBUF_USEDLENGT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_803__STRBUF_USEDLENGT.val, "STRBUF_USEDLENGTH", sizeof (cdat->dstr_803__STRBUF_USEDLENGT.val)-1); /*iniobj dsym_804__IS_STRBUF*/ /*uniqueobj*/ if (!/*_.VALDATA___V811*/ meltfptr[810]) /*_.VALDATA___V811*/ meltfptr[810] = (void*)&cdat->dsym_804__IS_STRBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_804__IS_STRBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_804__IS_STRBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_804__IS_STRBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_804__IS_STRBUF.obj_hash = 417428892; cdat->dsym_804__IS_STRBUF.obj_len = 3; /*inistring dstr_805__IS_STRBUF*/ /*_.VALSTR___V812*/ meltfptr[811] = (void*)&cdat->dstr_805__IS_STRBUF; cdat->dstr_805__IS_STRBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_805__IS_STRBUF.val, "IS_STRBUF", sizeof (cdat->dstr_805__IS_STRBUF.val)-1); MELT_LOCATION("warmelt-base.melt:402:/ iniobj"); /*iniobj dobj_806__IS_STRBUF*/ /*_.VALDATA___V813*/ meltfptr[812] = (void*)&cdat->dobj_806__IS_STRBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_806__IS_STRBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_806__IS_STRBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_806__IS_STRBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_806__IS_STRBUF.obj_hash = 645589930; cdat->dobj_806__IS_STRBUF.obj_len = 5; /*inimult dtup_807__IS_STRBUF*/ /*_.VALTUP___V819*/ meltfptr[818] = (void*)&cdat->dtup_807__IS_STRBUF; cdat->dtup_807__IS_STRBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_807__IS_STRBUF.nbval = 3; /*inimult dtup_808__IS_STRBUF*/ /*_.VALTUP___V816*/ meltfptr[815] = (void*)&cdat->dtup_808__IS_STRBUF; cdat->dtup_808__IS_STRBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_808__IS_STRBUF.nbval = 1; /*^iniobj*/ /*iniobj dobj_809*/ /*_.VALDATA___V815*/ meltfptr[814] = (void*)&cdat->dobj_809; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_809", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_809", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_809.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_809.obj_num = 0; cdat->dobj_809.obj_hash = 998601543; cdat->dobj_809.obj_len = 2; /*inistring dstr_810__melt_magic_disc*/ /*_.VALSTR___V817*/ meltfptr[816] = (void*)&cdat->dstr_810__melt_magic_disc; cdat->dstr_810__melt_magic_disc.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_810__melt_magic_disc.val, "(melt_magic_discr((melt_ptr_t)(", sizeof (cdat->dstr_810__melt_magic_disc.val)-1); /*inistring dstr_811__OBMAG_STRB*/ /*_.VALSTR___V818*/ meltfptr[817] = (void*)&cdat->dstr_811__OBMAG_STRB; cdat->dstr_811__OBMAG_STRB.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_811__OBMAG_STRB.val, ")) == OBMAG_STRBUF)", sizeof (cdat->dstr_811__OBMAG_STRB.val)-1); /*inistring dstr_812__IS_STRBUF*/ /*_.VALSTR___V814*/ meltfptr[813] = (void*)&cdat->dstr_812__IS_STRBUF; cdat->dstr_812__IS_STRBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_812__IS_STRBUF.val, "IS_STRBUF", sizeof (cdat->dstr_812__IS_STRBUF.val)-1); /*iniobj dsym_813__MAKE_STRING*/ /*uniqueobj*/ if (!/*_.VALDATA___V820*/ meltfptr[819]) /*_.VALDATA___V820*/ meltfptr[819] = (void*)&cdat->dsym_813__MAKE_STRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_813__MAKE_STRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_813__MAKE_STRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_813__MAKE_STRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_813__MAKE_STRING.obj_hash = 687493068; cdat->dsym_813__MAKE_STRING.obj_len = 3; /*inistring dstr_814__MAKE_STRING*/ /*_.VALSTR___V821*/ meltfptr[820] = (void*)&cdat->dstr_814__MAKE_STRING; cdat->dstr_814__MAKE_STRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_814__MAKE_STRING.val, "MAKE_STRING", sizeof (cdat->dstr_814__MAKE_STRING.val)-1); MELT_LOCATION("warmelt-base.melt:407:/ iniobj"); /*iniobj dobj_815__MAKE_STRING*/ /*_.VALDATA___V822*/ meltfptr[821] = (void*)&cdat->dobj_815__MAKE_STRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_815__MAKE_STRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_815__MAKE_STRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_815__MAKE_STRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_815__MAKE_STRING.obj_hash = 540473622; cdat->dobj_815__MAKE_STRING.obj_len = 5; /*inimult dtup_816__MAKE_STRING*/ /*_.VALTUP___V830*/ meltfptr[829] = (void*)&cdat->dtup_816__MAKE_STRING; cdat->dtup_816__MAKE_STRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_816__MAKE_STRING.nbval = 5; /*inimult dtup_817__MAKE_STRING*/ /*_.VALTUP___V826*/ meltfptr[825] = (void*)&cdat->dtup_817__MAKE_STRING; cdat->dtup_817__MAKE_STRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_817__MAKE_STRING.nbval = 2; /*^iniobj*/ /*iniobj dobj_818*/ /*_.VALDATA___V824*/ meltfptr[823] = (void*)&cdat->dobj_818; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_818", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_818", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_818.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_818.obj_num = 0; cdat->dobj_818.obj_hash = 300385309; cdat->dobj_818.obj_len = 2; /*^iniobj*/ /*iniobj dobj_819*/ /*_.VALDATA___V825*/ meltfptr[824] = (void*)&cdat->dobj_819; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_819", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_819", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_819.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_819.obj_num = 1; cdat->dobj_819.obj_hash = 969545475; cdat->dobj_819.obj_len = 2; /*inistring dstr_820__meltgc_new_stri*/ /*_.VALSTR___V827*/ meltfptr[826] = (void*)&cdat->dstr_820__meltgc_new_stri; cdat->dstr_820__meltgc_new_stri.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_820__meltgc_new_stri.val, "(meltgc_new_stringdup((meltobject_ptr_t)(", sizeof (cdat->dstr_820__meltgc_new_stri.val)-1); /*inistring dstr_821__melt_st*/ /*_.VALSTR___V828*/ meltfptr[827] = (void*)&cdat->dstr_821__melt_st; cdat->dstr_821__melt_st.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_821__melt_st.val, "), \n\t\t\t melt_string_str((melt_ptr_t)(", sizeof (cdat->dstr_821__melt_st.val)-1); /*inistring dstr_822__*/ /*_.VALSTR___V829*/ meltfptr[828] = (void*)&cdat->dstr_822__; cdat->dstr_822__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_822__.val, "))))", sizeof (cdat->dstr_822__.val)-1); /*inistring dstr_823__MAKE_STRING*/ /*_.VALSTR___V823*/ meltfptr[822] = (void*)&cdat->dstr_823__MAKE_STRING; cdat->dstr_823__MAKE_STRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_823__MAKE_STRING.val, "MAKE_STRING", sizeof (cdat->dstr_823__MAKE_STRING.val)-1); /*iniobj dsym_824__IS_STRINGCONST*/ /*uniqueobj*/ if (!/*_.VALDATA___V831*/ meltfptr[830]) /*_.VALDATA___V831*/ meltfptr[830] = (void*)&cdat->dsym_824__IS_STRINGCONST; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_824__IS_STRINGCONST", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_824__IS_STRINGCONST", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_824__IS_STRINGCONST.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_824__IS_STRINGCONST.obj_hash = 154220708; cdat->dsym_824__IS_STRINGCONST.obj_len = 3; /*inistring dstr_825__IS_STRINGCONST*/ /*_.VALSTR___V832*/ meltfptr[831] = (void*)&cdat->dstr_825__IS_STRINGCONST; cdat->dstr_825__IS_STRINGCONST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_825__IS_STRINGCONST.val, "IS_STRINGCONST", sizeof (cdat->dstr_825__IS_STRINGCONST.val)-1); MELT_LOCATION("warmelt-base.melt:412:/ iniobj"); /*iniobj dobj_826__IS_STRINGCONST*/ /*_.VALDATA___V833*/ meltfptr[832] = (void*)&cdat->dobj_826__IS_STRINGCONST; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_826__IS_STRINGCONST", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_826__IS_STRINGCONST", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_826__IS_STRINGCONST.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_826__IS_STRINGCONST.obj_hash = 426452180; cdat->dobj_826__IS_STRINGCONST.obj_len = 5; /*inimult dtup_827__IS_STRINGCONST*/ /*_.VALTUP___V843*/ meltfptr[842] = (void*)&cdat->dtup_827__IS_STRINGCONST; cdat->dtup_827__IS_STRINGCONST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_827__IS_STRINGCONST.nbval = 5; /*inimult dtup_828__IS_STRINGCONST*/ /*_.VALTUP___V839*/ meltfptr[838] = (void*)&cdat->dtup_828__IS_STRINGCONST; cdat->dtup_828__IS_STRINGCONST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_828__IS_STRINGCONST.nbval = 2; /*^iniobj*/ /*iniobj dobj_829*/ /*_.VALDATA___V835*/ meltfptr[834] = (void*)&cdat->dobj_829; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_829", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_829", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_829.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_829.obj_num = 0; cdat->dobj_829.obj_hash = 580186673; cdat->dobj_829.obj_len = 2; /*iniobj dsym_830__CS*/ /*uniqueobj*/ if (!/*_.VALDATA___V837*/ meltfptr[836]) /*_.VALDATA___V837*/ meltfptr[836] = (void*)&cdat->dsym_830__CS; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_830__CS", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_830__CS", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_830__CS.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_830__CS.obj_hash = 7052924; cdat->dsym_830__CS.obj_len = 3; /*inistring dstr_831__CS*/ /*_.VALSTR___V838*/ meltfptr[837] = (void*)&cdat->dstr_831__CS; cdat->dstr_831__CS.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_831__CS.val, "CS", sizeof (cdat->dstr_831__CS.val)-1); /*^iniobj*/ /*iniobj dobj_832*/ /*_.VALDATA___V836*/ meltfptr[835] = (void*)&cdat->dobj_832; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_832", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_832", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_832.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_832.obj_num = 1; cdat->dobj_832.obj_hash = 889320393; cdat->dobj_832.obj_len = 2; /*inistring dstr_833__melt_is_string_*/ /*_.VALSTR___V840*/ meltfptr[839] = (void*)&cdat->dstr_833__melt_is_string_; cdat->dstr_833__melt_is_string_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_833__melt_is_string_.val, "(melt_is_string_const((melt_ptr_t)(", sizeof (cdat->dstr_833__melt_is_string_.val)-1); /*inistring dstr_834__*/ /*_.VALSTR___V841*/ meltfptr[840] = (void*)&cdat->dstr_834__; cdat->dstr_834__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_834__.val, "), (", sizeof (cdat->dstr_834__.val)-1); /*inistring dstr_835__*/ /*_.VALSTR___V842*/ meltfptr[841] = (void*)&cdat->dstr_835__; cdat->dstr_835__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_835__.val, ")))", sizeof (cdat->dstr_835__.val)-1); /*inistring dstr_836__IS_STRINGCONST*/ /*_.VALSTR___V834*/ meltfptr[833] = (void*)&cdat->dstr_836__IS_STRINGCONST; cdat->dstr_836__IS_STRINGCONST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_836__IS_STRINGCONST.val, "IS_STRINGCONST", sizeof (cdat->dstr_836__IS_STRINGCONST.val)-1); /*iniobj dsym_837__STRING_LENGTH*/ /*uniqueobj*/ if (!/*_.VALDATA___V844*/ meltfptr[843]) /*_.VALDATA___V844*/ meltfptr[843] = (void*)&cdat->dsym_837__STRING_LENGTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_837__STRING_LENGTH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_837__STRING_LENGTH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_837__STRING_LENGTH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_837__STRING_LENGTH.obj_hash = 75463736; cdat->dsym_837__STRING_LENGTH.obj_len = 3; /*inistring dstr_838__STRING_LENGTH*/ /*_.VALSTR___V845*/ meltfptr[844] = (void*)&cdat->dstr_838__STRING_LENGTH; cdat->dstr_838__STRING_LENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_838__STRING_LENGTH.val, "STRING_LENGTH", sizeof (cdat->dstr_838__STRING_LENGTH.val)-1); MELT_LOCATION("warmelt-base.melt:416:/ iniobj"); /*iniobj dobj_839__STRING_LENGTH*/ /*_.VALDATA___V846*/ meltfptr[845] = (void*)&cdat->dobj_839__STRING_LENGTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_839__STRING_LENGTH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_839__STRING_LENGTH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_839__STRING_LENGTH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_839__STRING_LENGTH.obj_hash = 620583872; cdat->dobj_839__STRING_LENGTH.obj_len = 5; /*inimult dtup_840__STRING_LENGTH*/ /*_.VALTUP___V852*/ meltfptr[851] = (void*)&cdat->dtup_840__STRING_LENGTH; cdat->dtup_840__STRING_LENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_840__STRING_LENGTH.nbval = 3; /*inimult dtup_841__STRING_LENGTH*/ /*_.VALTUP___V849*/ meltfptr[848] = (void*)&cdat->dtup_841__STRING_LENGTH; cdat->dtup_841__STRING_LENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_841__STRING_LENGTH.nbval = 1; /*^iniobj*/ /*iniobj dobj_842*/ /*_.VALDATA___V848*/ meltfptr[847] = (void*)&cdat->dobj_842; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_842", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_842", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_842.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_842.obj_num = 0; cdat->dobj_842.obj_hash = 979419789; cdat->dobj_842.obj_len = 2; /*inistring dstr_843__melt_string_leng*/ /*_.VALSTR___V850*/ meltfptr[849] = (void*)&cdat->dstr_843__melt_string_leng; cdat->dstr_843__melt_string_leng.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_843__melt_string_leng.val, "melt_string_length((melt_ptr_t)(", sizeof (cdat->dstr_843__melt_string_leng.val)-1); /*inistring dstr_844__*/ /*_.VALSTR___V851*/ meltfptr[850] = (void*)&cdat->dstr_844__; cdat->dstr_844__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_844__.val, "))", sizeof (cdat->dstr_844__.val)-1); /*inistring dstr_845__STRING_LENGTH*/ /*_.VALSTR___V847*/ meltfptr[846] = (void*)&cdat->dstr_845__STRING_LENGTH; cdat->dstr_845__STRING_LENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_845__STRING_LENGTH.val, "STRING_LENGTH", sizeof (cdat->dstr_845__STRING_LENGTH.val)-1); /*iniobj dsym_846__STRING_*/ /*uniqueobj*/ if (!/*_.VALDATA___V853*/ meltfptr[852]) /*_.VALDATA___V853*/ meltfptr[852] = (void*)&cdat->dsym_846__STRING_; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_846__STRING_", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_846__STRING_", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_846__STRING_.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_846__STRING_.obj_hash = 1039023232; cdat->dsym_846__STRING_.obj_len = 3; /*inistring dstr_847__STRING_*/ /*_.VALSTR___V854*/ meltfptr[853] = (void*)&cdat->dstr_847__STRING_; cdat->dstr_847__STRING_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_847__STRING_.val, "STRING=", sizeof (cdat->dstr_847__STRING_.val)-1); MELT_LOCATION("warmelt-base.melt:420:/ iniobj"); /*iniobj dobj_848__STRING_*/ /*_.VALDATA___V855*/ meltfptr[854] = (void*)&cdat->dobj_848__STRING_; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_848__STRING_", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_848__STRING_", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_848__STRING_.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_848__STRING_.obj_hash = 414790024; cdat->dobj_848__STRING_.obj_len = 5; /*inimult dtup_849__STRING_*/ /*_.VALTUP___V867*/ meltfptr[866] = (void*)&cdat->dtup_849__STRING_; cdat->dtup_849__STRING_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_849__STRING_.nbval = 5; /*inimult dtup_850__STRING_*/ /*_.VALTUP___V863*/ meltfptr[862] = (void*)&cdat->dtup_850__STRING_; cdat->dtup_850__STRING_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_850__STRING_.nbval = 2; /*iniobj dsym_851__S1*/ /*uniqueobj*/ if (!/*_.VALDATA___V858*/ meltfptr[857]) /*_.VALDATA___V858*/ meltfptr[857] = (void*)&cdat->dsym_851__S1; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_851__S1", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_851__S1", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_851__S1.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_851__S1.obj_hash = 99925572; cdat->dsym_851__S1.obj_len = 3; /*inistring dstr_852__S1*/ /*_.VALSTR___V859*/ meltfptr[858] = (void*)&cdat->dstr_852__S1; cdat->dstr_852__S1.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_852__S1.val, "S1", sizeof (cdat->dstr_852__S1.val)-1); /*^iniobj*/ /*iniobj dobj_853*/ /*_.VALDATA___V857*/ meltfptr[856] = (void*)&cdat->dobj_853; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_853", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_853", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_853.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_853.obj_num = 0; cdat->dobj_853.obj_hash = 373577526; cdat->dobj_853.obj_len = 2; /*iniobj dsym_854__S2*/ /*uniqueobj*/ if (!/*_.VALDATA___V861*/ meltfptr[860]) /*_.VALDATA___V861*/ meltfptr[860] = (void*)&cdat->dsym_854__S2; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_854__S2", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_854__S2", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_854__S2.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_854__S2.obj_hash = 5362580; cdat->dsym_854__S2.obj_len = 3; /*inistring dstr_855__S2*/ /*_.VALSTR___V862*/ meltfptr[861] = (void*)&cdat->dstr_855__S2; cdat->dstr_855__S2.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_855__S2.val, "S2", sizeof (cdat->dstr_855__S2.val)-1); /*^iniobj*/ /*iniobj dobj_856*/ /*_.VALDATA___V860*/ meltfptr[859] = (void*)&cdat->dobj_856; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_856", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_856", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_856.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_856.obj_num = 1; cdat->dobj_856.obj_hash = 977292436; cdat->dobj_856.obj_len = 2; /*inistring dstr_857__melt_string_same*/ /*_.VALSTR___V864*/ meltfptr[863] = (void*)&cdat->dstr_857__melt_string_same; cdat->dstr_857__melt_string_same.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_857__melt_string_same.val, "melt_string_same((", sizeof (cdat->dstr_857__melt_string_same.val)-1); /*inistring dstr_858__*/ /*_.VALSTR___V865*/ meltfptr[864] = (void*)&cdat->dstr_858__; cdat->dstr_858__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_858__.val, "), (", sizeof (cdat->dstr_858__.val)-1); /*inistring dstr_859__*/ /*_.VALSTR___V866*/ meltfptr[865] = (void*)&cdat->dstr_859__; cdat->dstr_859__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_859__.val, "))", sizeof (cdat->dstr_859__.val)-1); /*inistring dstr_860__STRING_*/ /*_.VALSTR___V856*/ meltfptr[855] = (void*)&cdat->dstr_860__STRING_; cdat->dstr_860__STRING_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_860__STRING_.val, "STRING=", sizeof (cdat->dstr_860__STRING_.val)-1); /*iniobj dsym_861__SPLIT_STRING_SPACE*/ /*uniqueobj*/ if (!/*_.VALDATA___V868*/ meltfptr[867]) /*_.VALDATA___V868*/ meltfptr[867] = (void*)&cdat->dsym_861__SPLIT_STRING_SPACE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_861__SPLIT_STRING_SPACE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_861__SPLIT_STRING_SPACE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_861__SPLIT_STRING_SPACE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_861__SPLIT_STRING_SPACE.obj_hash = 726019437; cdat->dsym_861__SPLIT_STRING_SPACE.obj_len = 3; /*inistring dstr_862__SPLIT_STRING_SPA*/ /*_.VALSTR___V869*/ meltfptr[868] = (void*)&cdat->dstr_862__SPLIT_STRING_SPA; cdat->dstr_862__SPLIT_STRING_SPA.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_862__SPLIT_STRING_SPA.val, "SPLIT_STRING_SPACE", sizeof (cdat->dstr_862__SPLIT_STRING_SPA.val)-1); MELT_LOCATION("warmelt-base.melt:425:/ iniobj"); /*iniobj dobj_863__SPLIT_STRING_SPACE*/ /*_.VALDATA___V870*/ meltfptr[869] = (void*)&cdat->dobj_863__SPLIT_STRING_SPACE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_863__SPLIT_STRING_SPACE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_863__SPLIT_STRING_SPACE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_863__SPLIT_STRING_SPACE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_863__SPLIT_STRING_SPACE.obj_hash = 256754204; cdat->dobj_863__SPLIT_STRING_SPACE.obj_len = 5; /*inimult dtup_864__SPLIT_STRING_SPACE*/ /*_.VALTUP___V878*/ meltfptr[877] = (void*)&cdat->dtup_864__SPLIT_STRING_SPACE; cdat->dtup_864__SPLIT_STRING_SPACE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_864__SPLIT_STRING_SPACE.nbval = 5; /*inimult dtup_865__SPLIT_STRING_SPACE*/ /*_.VALTUP___V874*/ meltfptr[873] = (void*)&cdat->dtup_865__SPLIT_STRING_SPACE; cdat->dtup_865__SPLIT_STRING_SPACE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_865__SPLIT_STRING_SPACE.nbval = 2; /*^iniobj*/ /*iniobj dobj_866*/ /*_.VALDATA___V872*/ meltfptr[871] = (void*)&cdat->dobj_866; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_866", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_866", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_866.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_866.obj_num = 0; cdat->dobj_866.obj_hash = 870469408; cdat->dobj_866.obj_len = 2; /*^iniobj*/ /*iniobj dobj_867*/ /*_.VALDATA___V873*/ meltfptr[872] = (void*)&cdat->dobj_867; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_867", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_867", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_867.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_867.obj_num = 1; cdat->dobj_867.obj_hash = 578444229; cdat->dobj_867.obj_len = 2; /*inistring dstr_868__meltgc_new_split*/ /*_.VALSTR___V875*/ meltfptr[874] = (void*)&cdat->dstr_868__meltgc_new_split; cdat->dstr_868__meltgc_new_split.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_868__meltgc_new_split.val, "meltgc_new_split_string(", sizeof (cdat->dstr_868__meltgc_new_split.val)-1); /*inistring dstr_869__melt_ptr*/ /*_.VALSTR___V876*/ meltfptr[875] = (void*)&cdat->dstr_869__melt_ptr; cdat->dstr_869__melt_ptr.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_869__melt_ptr.val, ", \' \', (melt_ptr_t) ", sizeof (cdat->dstr_869__melt_ptr.val)-1); /*inistring dstr_870__*/ /*_.VALSTR___V877*/ meltfptr[876] = (void*)&cdat->dstr_870__; cdat->dstr_870__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_870__.val, ")", sizeof (cdat->dstr_870__.val)-1); /*inistring dstr_871__SPLIT_STRING_SPA*/ /*_.VALSTR___V871*/ meltfptr[870] = (void*)&cdat->dstr_871__SPLIT_STRING_SPA; cdat->dstr_871__SPLIT_STRING_SPA.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_871__SPLIT_STRING_SPA.val, "SPLIT_STRING_SPACE", sizeof (cdat->dstr_871__SPLIT_STRING_SPA.val)-1); /*iniobj dsym_872__SPLIT_STRING_COMMA*/ /*uniqueobj*/ if (!/*_.VALDATA___V879*/ meltfptr[878]) /*_.VALDATA___V879*/ meltfptr[878] = (void*)&cdat->dsym_872__SPLIT_STRING_COMMA; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_872__SPLIT_STRING_COMMA", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_872__SPLIT_STRING_COMMA", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_872__SPLIT_STRING_COMMA.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_872__SPLIT_STRING_COMMA.obj_hash = 939131565; cdat->dsym_872__SPLIT_STRING_COMMA.obj_len = 3; /*inistring dstr_873__SPLIT_STRING_COM*/ /*_.VALSTR___V880*/ meltfptr[879] = (void*)&cdat->dstr_873__SPLIT_STRING_COM; cdat->dstr_873__SPLIT_STRING_COM.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_873__SPLIT_STRING_COM.val, "SPLIT_STRING_COMMA", sizeof (cdat->dstr_873__SPLIT_STRING_COM.val)-1); MELT_LOCATION("warmelt-base.melt:430:/ iniobj"); /*iniobj dobj_874__SPLIT_STRING_COMMA*/ /*_.VALDATA___V881*/ meltfptr[880] = (void*)&cdat->dobj_874__SPLIT_STRING_COMMA; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_874__SPLIT_STRING_COMMA", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_874__SPLIT_STRING_COMMA", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_874__SPLIT_STRING_COMMA.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_874__SPLIT_STRING_COMMA.obj_hash = 890006889; cdat->dobj_874__SPLIT_STRING_COMMA.obj_len = 5; /*inimult dtup_875__SPLIT_STRING_COMMA*/ /*_.VALTUP___V889*/ meltfptr[888] = (void*)&cdat->dtup_875__SPLIT_STRING_COMMA; cdat->dtup_875__SPLIT_STRING_COMMA.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_875__SPLIT_STRING_COMMA.nbval = 5; /*inimult dtup_876__SPLIT_STRING_COMMA*/ /*_.VALTUP___V885*/ meltfptr[884] = (void*)&cdat->dtup_876__SPLIT_STRING_COMMA; cdat->dtup_876__SPLIT_STRING_COMMA.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_876__SPLIT_STRING_COMMA.nbval = 2; /*^iniobj*/ /*iniobj dobj_877*/ /*_.VALDATA___V883*/ meltfptr[882] = (void*)&cdat->dobj_877; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_877", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_877", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_877.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_877.obj_num = 0; cdat->dobj_877.obj_hash = 239794047; cdat->dobj_877.obj_len = 2; /*^iniobj*/ /*iniobj dobj_878*/ /*_.VALDATA___V884*/ meltfptr[883] = (void*)&cdat->dobj_878; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_878", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_878", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_878.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_878.obj_num = 1; cdat->dobj_878.obj_hash = 510874464; cdat->dobj_878.obj_len = 2; /*inistring dstr_879__meltgc_new_split*/ /*_.VALSTR___V886*/ meltfptr[885] = (void*)&cdat->dstr_879__meltgc_new_split; cdat->dstr_879__meltgc_new_split.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_879__meltgc_new_split.val, "meltgc_new_split_string(", sizeof (cdat->dstr_879__meltgc_new_split.val)-1); /*inistring dstr_880__melt_ptr*/ /*_.VALSTR___V887*/ meltfptr[886] = (void*)&cdat->dstr_880__melt_ptr; cdat->dstr_880__melt_ptr.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_880__melt_ptr.val, ", \',\', (melt_ptr_t) ", sizeof (cdat->dstr_880__melt_ptr.val)-1); /*inistring dstr_881__*/ /*_.VALSTR___V888*/ meltfptr[887] = (void*)&cdat->dstr_881__; cdat->dstr_881__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_881__.val, ")", sizeof (cdat->dstr_881__.val)-1); /*inistring dstr_882__SPLIT_STRING_COM*/ /*_.VALSTR___V882*/ meltfptr[881] = (void*)&cdat->dstr_882__SPLIT_STRING_COM; cdat->dstr_882__SPLIT_STRING_COM.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_882__SPLIT_STRING_COM.val, "SPLIT_STRING_COMMA", sizeof (cdat->dstr_882__SPLIT_STRING_COM.val)-1); /*iniobj dsym_883__SPLIT_STRING_COLON*/ /*uniqueobj*/ if (!/*_.VALDATA___V890*/ meltfptr[889]) /*_.VALDATA___V890*/ meltfptr[889] = (void*)&cdat->dsym_883__SPLIT_STRING_COLON; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_883__SPLIT_STRING_COLON", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_883__SPLIT_STRING_COLON", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_883__SPLIT_STRING_COLON.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_883__SPLIT_STRING_COLON.obj_hash = 836749522; cdat->dsym_883__SPLIT_STRING_COLON.obj_len = 3; /*inistring dstr_884__SPLIT_STRING_COL*/ /*_.VALSTR___V891*/ meltfptr[890] = (void*)&cdat->dstr_884__SPLIT_STRING_COL; cdat->dstr_884__SPLIT_STRING_COL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_884__SPLIT_STRING_COL.val, "SPLIT_STRING_COLON", sizeof (cdat->dstr_884__SPLIT_STRING_COL.val)-1); MELT_LOCATION("warmelt-base.melt:435:/ iniobj"); /*iniobj dobj_885__SPLIT_STRING_COLON*/ /*_.VALDATA___V892*/ meltfptr[891] = (void*)&cdat->dobj_885__SPLIT_STRING_COLON; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_885__SPLIT_STRING_COLON", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_885__SPLIT_STRING_COLON", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_885__SPLIT_STRING_COLON.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_885__SPLIT_STRING_COLON.obj_hash = 368476189; cdat->dobj_885__SPLIT_STRING_COLON.obj_len = 5; /*inimult dtup_886__SPLIT_STRING_COLON*/ /*_.VALTUP___V900*/ meltfptr[899] = (void*)&cdat->dtup_886__SPLIT_STRING_COLON; cdat->dtup_886__SPLIT_STRING_COLON.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_886__SPLIT_STRING_COLON.nbval = 5; /*inimult dtup_887__SPLIT_STRING_COLON*/ /*_.VALTUP___V896*/ meltfptr[895] = (void*)&cdat->dtup_887__SPLIT_STRING_COLON; cdat->dtup_887__SPLIT_STRING_COLON.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_887__SPLIT_STRING_COLON.nbval = 2; /*^iniobj*/ /*iniobj dobj_888*/ /*_.VALDATA___V894*/ meltfptr[893] = (void*)&cdat->dobj_888; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_888", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_888", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_888.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_888.obj_num = 0; cdat->dobj_888.obj_hash = 179233718; cdat->dobj_888.obj_len = 2; /*^iniobj*/ /*iniobj dobj_889*/ /*_.VALDATA___V895*/ meltfptr[894] = (void*)&cdat->dobj_889; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_889", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_889", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_889.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_889.obj_num = 1; cdat->dobj_889.obj_hash = 865290097; cdat->dobj_889.obj_len = 2; /*inistring dstr_890__meltgc_new_split*/ /*_.VALSTR___V897*/ meltfptr[896] = (void*)&cdat->dstr_890__meltgc_new_split; cdat->dstr_890__meltgc_new_split.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_890__meltgc_new_split.val, "meltgc_new_split_string(", sizeof (cdat->dstr_890__meltgc_new_split.val)-1); /*inistring dstr_891__melt_ptr*/ /*_.VALSTR___V898*/ meltfptr[897] = (void*)&cdat->dstr_891__melt_ptr; cdat->dstr_891__melt_ptr.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_891__melt_ptr.val, ", \':\', (melt_ptr_t)", sizeof (cdat->dstr_891__melt_ptr.val)-1); /*inistring dstr_892__*/ /*_.VALSTR___V899*/ meltfptr[898] = (void*)&cdat->dstr_892__; cdat->dstr_892__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_892__.val, ")", sizeof (cdat->dstr_892__.val)-1); /*inistring dstr_893__SPLIT_STRING_COL*/ /*_.VALSTR___V893*/ meltfptr[892] = (void*)&cdat->dstr_893__SPLIT_STRING_COL; cdat->dstr_893__SPLIT_STRING_COL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_893__SPLIT_STRING_COL.val, "SPLIT_STRING_COLON", sizeof (cdat->dstr_893__SPLIT_STRING_COL.val)-1); /*iniobj dsym_894__STRBUF2STRING*/ /*uniqueobj*/ if (!/*_.VALDATA___V901*/ meltfptr[900]) /*_.VALDATA___V901*/ meltfptr[900] = (void*)&cdat->dsym_894__STRBUF2STRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_894__STRBUF2STRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_894__STRBUF2STRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_894__STRBUF2STRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_894__STRBUF2STRING.obj_hash = 424237394; cdat->dsym_894__STRBUF2STRING.obj_len = 3; /*inistring dstr_895__STRBUF2STRING*/ /*_.VALSTR___V902*/ meltfptr[901] = (void*)&cdat->dstr_895__STRBUF2STRING; cdat->dstr_895__STRBUF2STRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_895__STRBUF2STRING.val, "STRBUF2STRING", sizeof (cdat->dstr_895__STRBUF2STRING.val)-1); MELT_LOCATION("warmelt-base.melt:441:/ iniobj"); /*iniobj dobj_896__STRBUF2STRING*/ /*_.VALDATA___V903*/ meltfptr[902] = (void*)&cdat->dobj_896__STRBUF2STRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_896__STRBUF2STRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_896__STRBUF2STRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_896__STRBUF2STRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_896__STRBUF2STRING.obj_hash = 665267780; cdat->dobj_896__STRBUF2STRING.obj_len = 5; /*inimult dtup_897__STRBUF2STRING*/ /*_.VALTUP___V911*/ meltfptr[910] = (void*)&cdat->dtup_897__STRBUF2STRING; cdat->dtup_897__STRBUF2STRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_897__STRBUF2STRING.nbval = 5; /*inimult dtup_898__STRBUF2STRING*/ /*_.VALTUP___V907*/ meltfptr[906] = (void*)&cdat->dtup_898__STRBUF2STRING; cdat->dtup_898__STRBUF2STRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_898__STRBUF2STRING.nbval = 2; /*^iniobj*/ /*iniobj dobj_899*/ /*_.VALDATA___V905*/ meltfptr[904] = (void*)&cdat->dobj_899; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_899", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_899", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_899.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_899.obj_num = 0; cdat->dobj_899.obj_hash = 850829979; cdat->dobj_899.obj_len = 2; /*^iniobj*/ /*iniobj dobj_900*/ /*_.VALDATA___V906*/ meltfptr[905] = (void*)&cdat->dobj_900; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_900", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_900", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_900.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_900.obj_num = 1; cdat->dobj_900.obj_hash = 652671895; cdat->dobj_900.obj_len = 2; /*inistring dstr_901__meltgc_new_stri*/ /*_.VALSTR___V908*/ meltfptr[907] = (void*)&cdat->dstr_901__meltgc_new_stri; cdat->dstr_901__meltgc_new_stri.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_901__meltgc_new_stri.val, "(meltgc_new_stringdup((meltobject_ptr_t)(", sizeof (cdat->dstr_901__meltgc_new_stri.val)-1); /*inistring dstr_902__melt_strbuf_s*/ /*_.VALSTR___V909*/ meltfptr[908] = (void*)&cdat->dstr_902__melt_strbuf_s; cdat->dstr_902__melt_strbuf_s.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_902__melt_strbuf_s.val, "), melt_strbuf_str((melt_ptr_t)(", sizeof (cdat->dstr_902__melt_strbuf_s.val)-1); /*inistring dstr_903__*/ /*_.VALSTR___V910*/ meltfptr[909] = (void*)&cdat->dstr_903__; cdat->dstr_903__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_903__.val, "))))", sizeof (cdat->dstr_903__.val)-1); /*inistring dstr_904__STRBUF2STRING*/ /*_.VALSTR___V904*/ meltfptr[903] = (void*)&cdat->dstr_904__STRBUF2STRING; cdat->dstr_904__STRBUF2STRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_904__STRBUF2STRING.val, "STRBUF2STRING", sizeof (cdat->dstr_904__STRBUF2STRING.val)-1); /*iniobj dsym_905__MAKE_STRING_NAKEDBASENAME*/ /*uniqueobj*/ if (!/*_.VALDATA___V912*/ meltfptr[911]) /*_.VALDATA___V912*/ meltfptr[911] = (void*)&cdat->dsym_905__MAKE_STRING_NAKEDBASENAME; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_905__MAKE_STRING_NAKEDBASENAME", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_905__MAKE_STRING_NAKEDBASENAME", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_905__MAKE_STRING_NAKEDBASENAME.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_905__MAKE_STRING_NAKEDBASENAME.obj_hash = 1067554920; cdat->dsym_905__MAKE_STRING_NAKEDBASENAME.obj_len = 3; /*inistring dstr_906__MAKE_STRING_NAKE*/ /*_.VALSTR___V913*/ meltfptr[912] = (void*)&cdat->dstr_906__MAKE_STRING_NAKE; cdat->dstr_906__MAKE_STRING_NAKE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_906__MAKE_STRING_NAKE.val, "MAKE_STRING_NAKEDBASENAME", sizeof (cdat->dstr_906__MAKE_STRING_NAKE.val)-1); MELT_LOCATION("warmelt-base.melt:446:/ iniobj"); /*iniobj dobj_907__MAKE_STRING_NAKEDBASENAME*/ /*_.VALDATA___V914*/ meltfptr[913] = (void*)&cdat->dobj_907__MAKE_STRING_NAKEDBASENAME; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_907__MAKE_STRING_NAKEDBASENAME", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_907__MAKE_STRING_NAKEDBASENAME", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_907__MAKE_STRING_NAKEDBASENAME.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_907__MAKE_STRING_NAKEDBASENAME.obj_hash = 857150050; cdat->dobj_907__MAKE_STRING_NAKEDBASENAME.obj_len = 5; /*inimult dtup_908__MAKE_STRING_NAKEDBASENAME*/ /*_.VALTUP___V922*/ meltfptr[921] = (void*)&cdat->dtup_908__MAKE_STRING_NAKEDBASENAME; cdat->dtup_908__MAKE_STRING_NAKEDBASENAME.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_908__MAKE_STRING_NAKEDBASENAME.nbval = 5; /*inimult dtup_909__MAKE_STRING_NAKEDBASENAME*/ /*_.VALTUP___V918*/ meltfptr[917] = (void*)&cdat->dtup_909__MAKE_STRING_NAKEDBASENAME; cdat->dtup_909__MAKE_STRING_NAKEDBASENAME.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_909__MAKE_STRING_NAKEDBASENAME.nbval = 2; /*^iniobj*/ /*iniobj dobj_910*/ /*_.VALDATA___V916*/ meltfptr[915] = (void*)&cdat->dobj_910; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_910", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_910", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_910.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_910.obj_num = 0; cdat->dobj_910.obj_hash = 633713342; cdat->dobj_910.obj_len = 2; /*^iniobj*/ /*iniobj dobj_911*/ /*_.VALDATA___V917*/ meltfptr[916] = (void*)&cdat->dobj_911; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_911", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_911", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_911.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_911.obj_num = 1; cdat->dobj_911.obj_hash = 871768596; cdat->dobj_911.obj_len = 2; /*inistring dstr_912__meltgc_new_stri*/ /*_.VALSTR___V919*/ meltfptr[918] = (void*)&cdat->dstr_912__meltgc_new_stri; cdat->dstr_912__meltgc_new_stri.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_912__meltgc_new_stri.val, "(meltgc_new_string_nakedbasename((meltobject_ptr_t)(", sizeof (cdat->dstr_912__meltgc_new_stri.val)-1); /*inistring dstr_913__melt_string_s*/ /*_.VALSTR___V920*/ meltfptr[919] = (void*)&cdat->dstr_913__melt_string_s; cdat->dstr_913__melt_string_s.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_913__melt_string_s.val, "), melt_string_str((melt_ptr_t)(", sizeof (cdat->dstr_913__melt_string_s.val)-1); /*inistring dstr_914__*/ /*_.VALSTR___V921*/ meltfptr[920] = (void*)&cdat->dstr_914__; cdat->dstr_914__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_914__.val, "))))", sizeof (cdat->dstr_914__.val)-1); /*inistring dstr_915__MAKE_STRING_NAKE*/ /*_.VALSTR___V915*/ meltfptr[914] = (void*)&cdat->dstr_915__MAKE_STRING_NAKE; cdat->dstr_915__MAKE_STRING_NAKE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_915__MAKE_STRING_NAKE.val, "MAKE_STRING_NAKEDBASENAME", sizeof (cdat->dstr_915__MAKE_STRING_NAKE.val)-1); /*iniobj dsym_916__MAKE_STRING_TEMPNAME_SUFFIXED*/ /*uniqueobj*/ if (!/*_.VALDATA___V923*/ meltfptr[922]) /*_.VALDATA___V923*/ meltfptr[922] = (void*)&cdat->dsym_916__MAKE_STRING_TEMPNAME_SUFFIXED; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_916__MAKE_STRING_TEMPNAME_SUFFIXED", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_916__MAKE_STRING_TEMPNAME_SUFFIXED", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_916__MAKE_STRING_TEMPNAME_SUFFIXED.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_916__MAKE_STRING_TEMPNAME_SUFFIXED.obj_hash = 11796860; cdat->dsym_916__MAKE_STRING_TEMPNAME_SUFFIXED.obj_len = 3; /*inistring dstr_917__MAKE_STRING_TEMP*/ /*_.VALSTR___V924*/ meltfptr[923] = (void*)&cdat->dstr_917__MAKE_STRING_TEMP; cdat->dstr_917__MAKE_STRING_TEMP.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_917__MAKE_STRING_TEMP.val, "MAKE_STRING_TEMPNAME_SUFFIXED", sizeof (cdat->dstr_917__MAKE_STRING_TEMP.val)-1); MELT_LOCATION("warmelt-base.melt:451:/ iniobj"); /*iniobj dobj_918__MAKE_STRING_TEMPNAME_SUFFIXED*/ /*_.VALDATA___V925*/ meltfptr[924] = (void*)&cdat->dobj_918__MAKE_STRING_TEMPNAME_SUFFIXED; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_918__MAKE_STRING_TEMPNAME_SUFFIXED", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_918__MAKE_STRING_TEMPNAME_SUFFIXED", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_918__MAKE_STRING_TEMPNAME_SUFFIXED.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_918__MAKE_STRING_TEMPNAME_SUFFIXED.obj_hash = 780810690; cdat->dobj_918__MAKE_STRING_TEMPNAME_SUFFIXED.obj_len = 5; /*inimult dtup_919__MAKE_STRING_TEMPNAME_SUFFIXED*/ /*_.VALTUP___V937*/ meltfptr[936] = (void*)&cdat->dtup_919__MAKE_STRING_TEMPNAME_SUFFIXED; cdat->dtup_919__MAKE_STRING_TEMPNAME_SUFFIXED.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_919__MAKE_STRING_TEMPNAME_SUFFIXED.nbval = 7; /*inimult dtup_920__MAKE_STRING_TEMPNAME_SUFFIXED*/ /*_.VALTUP___V932*/ meltfptr[931] = (void*)&cdat->dtup_920__MAKE_STRING_TEMPNAME_SUFFIXED; cdat->dtup_920__MAKE_STRING_TEMPNAME_SUFFIXED.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_920__MAKE_STRING_TEMPNAME_SUFFIXED.nbval = 3; /*^iniobj*/ /*iniobj dobj_921*/ /*_.VALDATA___V927*/ meltfptr[926] = (void*)&cdat->dobj_921; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_921", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_921", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_921.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_921.obj_num = 0; cdat->dobj_921.obj_hash = 863156716; cdat->dobj_921.obj_len = 2; /*^iniobj*/ /*iniobj dobj_922*/ /*_.VALDATA___V928*/ meltfptr[927] = (void*)&cdat->dobj_922; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_922", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_922", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_922.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_922.obj_num = 1; cdat->dobj_922.obj_hash = 6407603; cdat->dobj_922.obj_len = 2; /*iniobj dsym_923__SUFF*/ /*uniqueobj*/ if (!/*_.VALDATA___V930*/ meltfptr[929]) /*_.VALDATA___V930*/ meltfptr[929] = (void*)&cdat->dsym_923__SUFF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_923__SUFF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_923__SUFF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_923__SUFF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_923__SUFF.obj_hash = 936809468; cdat->dsym_923__SUFF.obj_len = 3; /*inistring dstr_924__SUFF*/ /*_.VALSTR___V931*/ meltfptr[930] = (void*)&cdat->dstr_924__SUFF; cdat->dstr_924__SUFF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_924__SUFF.val, "SUFF", sizeof (cdat->dstr_924__SUFF.val)-1); /*^iniobj*/ /*iniobj dobj_925*/ /*_.VALDATA___V929*/ meltfptr[928] = (void*)&cdat->dobj_925; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_925", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_925", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_925.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_925.obj_num = 2; cdat->dobj_925.obj_hash = 926096507; cdat->dobj_925.obj_len = 2; /*inistring dstr_926__meltgc_new_stri*/ /*_.VALSTR___V933*/ meltfptr[932] = (void*)&cdat->dstr_926__meltgc_new_stri; cdat->dstr_926__meltgc_new_stri.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_926__meltgc_new_stri.val, "(meltgc_new_string_tempname_suffixed((meltobject_ptr_t)(", sizeof (cdat->dstr_926__meltgc_new_stri.val)-1); /*inistring dstr_927__melt_s*/ /*_.VALSTR___V934*/ meltfptr[933] = (void*)&cdat->dstr_927__melt_s; cdat->dstr_927__melt_s.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_927__melt_s.val, "), \n\t\t\t\t\t melt_string_str((melt_ptr_t)(", sizeof (cdat->dstr_927__melt_s.val)-1); /*inistring dstr_928__*/ /*_.VALSTR___V935*/ meltfptr[934] = (void*)&cdat->dstr_928__; cdat->dstr_928__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_928__.val, ")), \n\t\t\t\t\t (", sizeof (cdat->dstr_928__.val)-1); /*inistring dstr_929__*/ /*_.VALSTR___V936*/ meltfptr[935] = (void*)&cdat->dstr_929__; cdat->dstr_929__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_929__.val, ")))", sizeof (cdat->dstr_929__.val)-1); /*inistring dstr_930__MAKE_STRING_TEMP*/ /*_.VALSTR___V926*/ meltfptr[925] = (void*)&cdat->dstr_930__MAKE_STRING_TEMP; cdat->dstr_930__MAKE_STRING_TEMP.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_930__MAKE_STRING_TEMP.val, "MAKE_STRING_TEMPNAME_SUFFIXED", sizeof (cdat->dstr_930__MAKE_STRING_TEMP.val)-1); /*iniobj dsym_931__LOAD_MELT_MODULE*/ /*uniqueobj*/ if (!/*_.VALDATA___V938*/ meltfptr[937]) /*_.VALDATA___V938*/ meltfptr[937] = (void*)&cdat->dsym_931__LOAD_MELT_MODULE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_931__LOAD_MELT_MODULE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_931__LOAD_MELT_MODULE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_931__LOAD_MELT_MODULE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_931__LOAD_MELT_MODULE.obj_hash = 892739854; cdat->dsym_931__LOAD_MELT_MODULE.obj_len = 3; /*inistring dstr_932__LOAD_MELT_MODULE*/ /*_.VALSTR___V939*/ meltfptr[938] = (void*)&cdat->dstr_932__LOAD_MELT_MODULE; cdat->dstr_932__LOAD_MELT_MODULE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_932__LOAD_MELT_MODULE.val, "LOAD_MELT_MODULE", sizeof (cdat->dstr_932__LOAD_MELT_MODULE.val)-1); MELT_LOCATION("warmelt-base.melt:461:/ iniobj"); /*iniobj dobj_933__LOAD_MELT_MODULE*/ /*_.VALDATA___V940*/ meltfptr[939] = (void*)&cdat->dobj_933__LOAD_MELT_MODULE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_933__LOAD_MELT_MODULE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_933__LOAD_MELT_MODULE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_933__LOAD_MELT_MODULE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_933__LOAD_MELT_MODULE.obj_hash = 196203045; cdat->dobj_933__LOAD_MELT_MODULE.obj_len = 5; /*inimult dtup_934__LOAD_MELT_MODULE*/ /*_.VALTUP___V950*/ meltfptr[949] = (void*)&cdat->dtup_934__LOAD_MELT_MODULE; cdat->dtup_934__LOAD_MELT_MODULE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_934__LOAD_MELT_MODULE.nbval = 5; /*inimult dtup_935__LOAD_MELT_MODULE*/ /*_.VALTUP___V946*/ meltfptr[945] = (void*)&cdat->dtup_935__LOAD_MELT_MODULE; cdat->dtup_935__LOAD_MELT_MODULE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_935__LOAD_MELT_MODULE.nbval = 2; /*iniobj dsym_936__ENV*/ /*uniqueobj*/ if (!/*_.VALDATA___V943*/ meltfptr[942]) /*_.VALDATA___V943*/ meltfptr[942] = (void*)&cdat->dsym_936__ENV; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_936__ENV", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_936__ENV", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_936__ENV.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_936__ENV.obj_hash = 127517568; cdat->dsym_936__ENV.obj_len = 3; /*inistring dstr_937__ENV*/ /*_.VALSTR___V944*/ meltfptr[943] = (void*)&cdat->dstr_937__ENV; cdat->dstr_937__ENV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_937__ENV.val, "ENV", sizeof (cdat->dstr_937__ENV.val)-1); /*^iniobj*/ /*iniobj dobj_938*/ /*_.VALDATA___V942*/ meltfptr[941] = (void*)&cdat->dobj_938; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_938", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_938", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_938.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_938.obj_num = 0; cdat->dobj_938.obj_hash = 127585444; cdat->dobj_938.obj_len = 2; /*^iniobj*/ /*iniobj dobj_939*/ /*_.VALDATA___V945*/ meltfptr[944] = (void*)&cdat->dobj_939; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_939", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_939", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_939.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_939.obj_num = 1; cdat->dobj_939.obj_hash = 156447905; cdat->dobj_939.obj_len = 2; /*inistring dstr_940__meltgc_load_mel*/ /*_.VALSTR___V947*/ meltfptr[946] = (void*)&cdat->dstr_940__meltgc_load_mel; cdat->dstr_940__meltgc_load_mel.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_940__meltgc_load_mel.val, "(meltgc_load_melt_module((melt_ptr_t)(", sizeof (cdat->dstr_940__meltgc_load_mel.val)-1); /*inistring dstr_941__melt_string*/ /*_.VALSTR___V948*/ meltfptr[947] = (void*)&cdat->dstr_941__melt_string; cdat->dstr_941__melt_string.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_941__melt_string.val, "),\n melt_string_str((melt_ptr_t)(", sizeof (cdat->dstr_941__melt_string.val)-1); /*inistring dstr_942__*/ /*_.VALSTR___V949*/ meltfptr[948] = (void*)&cdat->dstr_942__; cdat->dstr_942__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_942__.val, "))))", sizeof (cdat->dstr_942__.val)-1); /*inistring dstr_943__LOAD_MELT_MODULE*/ /*_.VALSTR___V941*/ meltfptr[940] = (void*)&cdat->dstr_943__LOAD_MELT_MODULE; cdat->dstr_943__LOAD_MELT_MODULE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_943__LOAD_MELT_MODULE.val, "LOAD_MELT_MODULE", sizeof (cdat->dstr_943__LOAD_MELT_MODULE.val)-1); /*iniobj dsym_944__GENERATE_MELT_MODULE*/ /*uniqueobj*/ if (!/*_.VALDATA___V951*/ meltfptr[950]) /*_.VALDATA___V951*/ meltfptr[950] = (void*)&cdat->dsym_944__GENERATE_MELT_MODULE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_944__GENERATE_MELT_MODULE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_944__GENERATE_MELT_MODULE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_944__GENERATE_MELT_MODULE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_944__GENERATE_MELT_MODULE.obj_hash = 308574899; cdat->dsym_944__GENERATE_MELT_MODULE.obj_len = 3; /*inistring dstr_945__GENERATE_MELT_MO*/ /*_.VALSTR___V952*/ meltfptr[951] = (void*)&cdat->dstr_945__GENERATE_MELT_MO; cdat->dstr_945__GENERATE_MELT_MO.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_945__GENERATE_MELT_MO.val, "GENERATE_MELT_MODULE", sizeof (cdat->dstr_945__GENERATE_MELT_MO.val)-1); MELT_LOCATION("warmelt-base.melt:469:/ iniobj"); /*iniobj dobj_946__GENERATE_MELT_MODULE*/ /*_.VALDATA___V953*/ meltfptr[952] = (void*)&cdat->dobj_946__GENERATE_MELT_MODULE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_946__GENERATE_MELT_MODULE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_946__GENERATE_MELT_MODULE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_946__GENERATE_MELT_MODULE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_946__GENERATE_MELT_MODULE.obj_hash = 736612825; cdat->dobj_946__GENERATE_MELT_MODULE.obj_len = 5; /*inimult dtup_947__GENERATE_MELT_MODULE*/ /*_.VALTUP___V965*/ meltfptr[964] = (void*)&cdat->dtup_947__GENERATE_MELT_MODULE; cdat->dtup_947__GENERATE_MELT_MODULE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_947__GENERATE_MELT_MODULE.nbval = 5; /*inimult dtup_948__GENERATE_MELT_MODULE*/ /*_.VALTUP___V961*/ meltfptr[960] = (void*)&cdat->dtup_948__GENERATE_MELT_MODULE; cdat->dtup_948__GENERATE_MELT_MODULE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_948__GENERATE_MELT_MODULE.nbval = 2; /*iniobj dsym_949__SRC*/ /*uniqueobj*/ if (!/*_.VALDATA___V956*/ meltfptr[955]) /*_.VALDATA___V956*/ meltfptr[955] = (void*)&cdat->dsym_949__SRC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_949__SRC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_949__SRC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_949__SRC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_949__SRC.obj_hash = 349785178; cdat->dsym_949__SRC.obj_len = 3; /*inistring dstr_950__SRC*/ /*_.VALSTR___V957*/ meltfptr[956] = (void*)&cdat->dstr_950__SRC; cdat->dstr_950__SRC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_950__SRC.val, "SRC", sizeof (cdat->dstr_950__SRC.val)-1); /*^iniobj*/ /*iniobj dobj_951*/ /*_.VALDATA___V955*/ meltfptr[954] = (void*)&cdat->dobj_951; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_951", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_951", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_951.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_951.obj_num = 0; cdat->dobj_951.obj_hash = 546954388; cdat->dobj_951.obj_len = 2; /*iniobj dsym_952__OUTNAM*/ /*uniqueobj*/ if (!/*_.VALDATA___V959*/ meltfptr[958]) /*_.VALDATA___V959*/ meltfptr[958] = (void*)&cdat->dsym_952__OUTNAM; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_952__OUTNAM", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_952__OUTNAM", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_952__OUTNAM.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_952__OUTNAM.obj_hash = 352608537; cdat->dsym_952__OUTNAM.obj_len = 3; /*inistring dstr_953__OUTNAM*/ /*_.VALSTR___V960*/ meltfptr[959] = (void*)&cdat->dstr_953__OUTNAM; cdat->dstr_953__OUTNAM.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_953__OUTNAM.val, "OUTNAM", sizeof (cdat->dstr_953__OUTNAM.val)-1); /*^iniobj*/ /*iniobj dobj_954*/ /*_.VALDATA___V958*/ meltfptr[957] = (void*)&cdat->dobj_954; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_954", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_954", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_954.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_954.obj_num = 1; cdat->dobj_954.obj_hash = 524170004; cdat->dobj_954.obj_len = 2; /*inistring dstr_955__meltgc_generate_*/ /*_.VALSTR___V962*/ meltfptr[961] = (void*)&cdat->dstr_955__meltgc_generate_; cdat->dstr_955__meltgc_generate_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_955__meltgc_generate_.val, "meltgc_generate_melt_module(", sizeof (cdat->dstr_955__meltgc_generate_.val)-1); /*inistring dstr_956__*/ /*_.VALSTR___V963*/ meltfptr[962] = (void*)&cdat->dstr_956__; cdat->dstr_956__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_956__.val, ",", sizeof (cdat->dstr_956__.val)-1); /*inistring dstr_957__*/ /*_.VALSTR___V964*/ meltfptr[963] = (void*)&cdat->dstr_957__; cdat->dstr_957__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_957__.val, ");", sizeof (cdat->dstr_957__.val)-1); /*inistring dstr_958__GENERATE_MELT_MO*/ /*_.VALSTR___V954*/ meltfptr[953] = (void*)&cdat->dstr_958__GENERATE_MELT_MO; cdat->dstr_958__GENERATE_MELT_MO.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_958__GENERATE_MELT_MO.val, "GENERATE_MELT_MODULE", sizeof (cdat->dstr_958__GENERATE_MELT_MO.val)-1); /*iniobj dsym_959__OBJECT_LENGTH*/ /*uniqueobj*/ if (!/*_.VALDATA___V966*/ meltfptr[965]) /*_.VALDATA___V966*/ meltfptr[965] = (void*)&cdat->dsym_959__OBJECT_LENGTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_959__OBJECT_LENGTH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_959__OBJECT_LENGTH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_959__OBJECT_LENGTH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_959__OBJECT_LENGTH.obj_hash = 913040829; cdat->dsym_959__OBJECT_LENGTH.obj_len = 3; /*inistring dstr_960__OBJECT_LENGTH*/ /*_.VALSTR___V967*/ meltfptr[966] = (void*)&cdat->dstr_960__OBJECT_LENGTH; cdat->dstr_960__OBJECT_LENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_960__OBJECT_LENGTH.val, "OBJECT_LENGTH", sizeof (cdat->dstr_960__OBJECT_LENGTH.val)-1); MELT_LOCATION("warmelt-base.melt:477:/ iniobj"); /*iniobj dobj_961__OBJECT_LENGTH*/ /*_.VALDATA___V968*/ meltfptr[967] = (void*)&cdat->dobj_961__OBJECT_LENGTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_961__OBJECT_LENGTH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_961__OBJECT_LENGTH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_961__OBJECT_LENGTH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_961__OBJECT_LENGTH.obj_hash = 770067183; cdat->dobj_961__OBJECT_LENGTH.obj_len = 5; /*inimult dtup_962__OBJECT_LENGTH*/ /*_.VALTUP___V976*/ meltfptr[975] = (void*)&cdat->dtup_962__OBJECT_LENGTH; cdat->dtup_962__OBJECT_LENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_962__OBJECT_LENGTH.nbval = 3; /*inimult dtup_963__OBJECT_LENGTH*/ /*_.VALTUP___V973*/ meltfptr[972] = (void*)&cdat->dtup_963__OBJECT_LENGTH; cdat->dtup_963__OBJECT_LENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_963__OBJECT_LENGTH.nbval = 1; /*iniobj dsym_964__OB*/ /*uniqueobj*/ if (!/*_.VALDATA___V971*/ meltfptr[970]) /*_.VALDATA___V971*/ meltfptr[970] = (void*)&cdat->dsym_964__OB; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_964__OB", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_964__OB", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_964__OB.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_964__OB.obj_hash = 19822711; cdat->dsym_964__OB.obj_len = 3; /*inistring dstr_965__OB*/ /*_.VALSTR___V972*/ meltfptr[971] = (void*)&cdat->dstr_965__OB; cdat->dstr_965__OB.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_965__OB.val, "OB", sizeof (cdat->dstr_965__OB.val)-1); /*^iniobj*/ /*iniobj dobj_966*/ /*_.VALDATA___V970*/ meltfptr[969] = (void*)&cdat->dobj_966; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_966", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_966", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_966.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_966.obj_num = 0; cdat->dobj_966.obj_hash = 57791825; cdat->dobj_966.obj_len = 2; /*inistring dstr_967__long_melt_obje*/ /*_.VALSTR___V974*/ meltfptr[973] = (void*)&cdat->dstr_967__long_melt_obje; cdat->dstr_967__long_melt_obje.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_967__long_melt_obje.val, "((long)melt_object_length((melt_ptr_t)(", sizeof (cdat->dstr_967__long_melt_obje.val)-1); /*inistring dstr_968__*/ /*_.VALSTR___V975*/ meltfptr[974] = (void*)&cdat->dstr_968__; cdat->dstr_968__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_968__.val, ")))", sizeof (cdat->dstr_968__.val)-1); /*inistring dstr_969__OBJECT_LENGTH*/ /*_.VALSTR___V969*/ meltfptr[968] = (void*)&cdat->dstr_969__OBJECT_LENGTH; cdat->dstr_969__OBJECT_LENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_969__OBJECT_LENGTH.val, "OBJECT_LENGTH", sizeof (cdat->dstr_969__OBJECT_LENGTH.val)-1); /*iniobj dsym_970__OBJECT_NTH_FIELD*/ /*uniqueobj*/ if (!/*_.VALDATA___V977*/ meltfptr[976]) /*_.VALDATA___V977*/ meltfptr[976] = (void*)&cdat->dsym_970__OBJECT_NTH_FIELD; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_970__OBJECT_NTH_FIELD", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_970__OBJECT_NTH_FIELD", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_970__OBJECT_NTH_FIELD.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_970__OBJECT_NTH_FIELD.obj_hash = 343274150; cdat->dsym_970__OBJECT_NTH_FIELD.obj_len = 3; /*inistring dstr_971__OBJECT_NTH_FIELD*/ /*_.VALSTR___V978*/ meltfptr[977] = (void*)&cdat->dstr_971__OBJECT_NTH_FIELD; cdat->dstr_971__OBJECT_NTH_FIELD.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_971__OBJECT_NTH_FIELD.val, "OBJECT_NTH_FIELD", sizeof (cdat->dstr_971__OBJECT_NTH_FIELD.val)-1); MELT_LOCATION("warmelt-base.melt:481:/ iniobj"); /*iniobj dobj_972__OBJECT_NTH_FIELD*/ /*_.VALDATA___V979*/ meltfptr[978] = (void*)&cdat->dobj_972__OBJECT_NTH_FIELD; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_972__OBJECT_NTH_FIELD", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_972__OBJECT_NTH_FIELD", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_972__OBJECT_NTH_FIELD.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_972__OBJECT_NTH_FIELD.obj_hash = 371651818; cdat->dobj_972__OBJECT_NTH_FIELD.obj_len = 5; /*inimult dtup_973__OBJECT_NTH_FIELD*/ /*_.VALTUP___V987*/ meltfptr[986] = (void*)&cdat->dtup_973__OBJECT_NTH_FIELD; cdat->dtup_973__OBJECT_NTH_FIELD.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_973__OBJECT_NTH_FIELD.nbval = 5; /*inimult dtup_974__OBJECT_NTH_FIELD*/ /*_.VALTUP___V983*/ meltfptr[982] = (void*)&cdat->dtup_974__OBJECT_NTH_FIELD; cdat->dtup_974__OBJECT_NTH_FIELD.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_974__OBJECT_NTH_FIELD.nbval = 2; /*^iniobj*/ /*iniobj dobj_975*/ /*_.VALDATA___V981*/ meltfptr[980] = (void*)&cdat->dobj_975; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_975", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_975", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_975.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_975.obj_num = 0; cdat->dobj_975.obj_hash = 986928428; cdat->dobj_975.obj_len = 2; /*^iniobj*/ /*iniobj dobj_976*/ /*_.VALDATA___V982*/ meltfptr[981] = (void*)&cdat->dobj_976; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_976", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_976", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_976.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_976.obj_num = 1; cdat->dobj_976.obj_hash = 462378358; cdat->dobj_976.obj_len = 2; /*inistring dstr_977__melt_field_obje*/ /*_.VALSTR___V984*/ meltfptr[983] = (void*)&cdat->dstr_977__melt_field_obje; cdat->dstr_977__melt_field_obje.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_977__melt_field_obje.val, "(melt_field_object((melt_ptr_t)(", sizeof (cdat->dstr_977__melt_field_obje.val)-1); /*inistring dstr_978__*/ /*_.VALSTR___V985*/ meltfptr[984] = (void*)&cdat->dstr_978__; cdat->dstr_978__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_978__.val, "), (", sizeof (cdat->dstr_978__.val)-1); /*inistring dstr_979__*/ /*_.VALSTR___V986*/ meltfptr[985] = (void*)&cdat->dstr_979__; cdat->dstr_979__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_979__.val, ")))", sizeof (cdat->dstr_979__.val)-1); /*inistring dstr_980__OBJECT_NTH_FIELD*/ /*_.VALSTR___V980*/ meltfptr[979] = (void*)&cdat->dstr_980__OBJECT_NTH_FIELD; cdat->dstr_980__OBJECT_NTH_FIELD.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_980__OBJECT_NTH_FIELD.val, "OBJECT_NTH_FIELD", sizeof (cdat->dstr_980__OBJECT_NTH_FIELD.val)-1); /*iniobj dsym_981__SUBCLASS_OF*/ /*uniqueobj*/ if (!/*_.VALDATA___V988*/ meltfptr[987]) /*_.VALDATA___V988*/ meltfptr[987] = (void*)&cdat->dsym_981__SUBCLASS_OF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_981__SUBCLASS_OF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_981__SUBCLASS_OF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_981__SUBCLASS_OF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_981__SUBCLASS_OF.obj_hash = 234775031; cdat->dsym_981__SUBCLASS_OF.obj_len = 3; /*inistring dstr_982__SUBCLASS_OF*/ /*_.VALSTR___V989*/ meltfptr[988] = (void*)&cdat->dstr_982__SUBCLASS_OF; cdat->dstr_982__SUBCLASS_OF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_982__SUBCLASS_OF.val, "SUBCLASS_OF", sizeof (cdat->dstr_982__SUBCLASS_OF.val)-1); MELT_LOCATION("warmelt-base.melt:485:/ iniobj"); /*iniobj dobj_983__SUBCLASS_OF*/ /*_.VALDATA___V990*/ meltfptr[989] = (void*)&cdat->dobj_983__SUBCLASS_OF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_983__SUBCLASS_OF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_983__SUBCLASS_OF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_983__SUBCLASS_OF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_983__SUBCLASS_OF.obj_hash = 439508834; cdat->dobj_983__SUBCLASS_OF.obj_len = 5; /*inimult dtup_984__SUBCLASS_OF*/ /*_.VALTUP___V1002*/ meltfptr[1001] = (void*)&cdat->dtup_984__SUBCLASS_OF; cdat->dtup_984__SUBCLASS_OF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_984__SUBCLASS_OF.nbval = 5; /*inimult dtup_985__SUBCLASS_OF*/ /*_.VALTUP___V998*/ meltfptr[997] = (void*)&cdat->dtup_985__SUBCLASS_OF; cdat->dtup_985__SUBCLASS_OF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_985__SUBCLASS_OF.nbval = 2; /*iniobj dsym_986__CL1*/ /*uniqueobj*/ if (!/*_.VALDATA___V993*/ meltfptr[992]) /*_.VALDATA___V993*/ meltfptr[992] = (void*)&cdat->dsym_986__CL1; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_986__CL1", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_986__CL1", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_986__CL1.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_986__CL1.obj_hash = 52836587; cdat->dsym_986__CL1.obj_len = 3; /*inistring dstr_987__CL1*/ /*_.VALSTR___V994*/ meltfptr[993] = (void*)&cdat->dstr_987__CL1; cdat->dstr_987__CL1.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_987__CL1.val, "CL1", sizeof (cdat->dstr_987__CL1.val)-1); /*^iniobj*/ /*iniobj dobj_988*/ /*_.VALDATA___V992*/ meltfptr[991] = (void*)&cdat->dobj_988; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_988", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_988", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_988.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_988.obj_num = 0; cdat->dobj_988.obj_hash = 622726224; cdat->dobj_988.obj_len = 2; /*iniobj dsym_989__CL2*/ /*uniqueobj*/ if (!/*_.VALDATA___V996*/ meltfptr[995]) /*_.VALDATA___V996*/ meltfptr[995] = (void*)&cdat->dsym_989__CL2; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_989__CL2", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_989__CL2", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_989__CL2.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_989__CL2.obj_hash = 4513998; cdat->dsym_989__CL2.obj_len = 3; /*inistring dstr_990__CL2*/ /*_.VALSTR___V997*/ meltfptr[996] = (void*)&cdat->dstr_990__CL2; cdat->dstr_990__CL2.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_990__CL2.val, "CL2", sizeof (cdat->dstr_990__CL2.val)-1); /*^iniobj*/ /*iniobj dobj_991*/ /*_.VALDATA___V995*/ meltfptr[994] = (void*)&cdat->dobj_991; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_991", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_991", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_991.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_991.obj_num = 1; cdat->dobj_991.obj_hash = 4753296; cdat->dobj_991.obj_len = 2; /*inistring dstr_992__melt_is_subclass*/ /*_.VALSTR___V999*/ meltfptr[998] = (void*)&cdat->dstr_992__melt_is_subclass; cdat->dstr_992__melt_is_subclass.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_992__melt_is_subclass.val, "melt_is_subclass_of((meltobject_ptr_t)(", sizeof (cdat->dstr_992__melt_is_subclass.val)-1); /*inistring dstr_993__meltobject_p*/ /*_.VALSTR___V1000*/ meltfptr[999] = (void*)&cdat->dstr_993__meltobject_p; cdat->dstr_993__meltobject_p.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_993__meltobject_p.val, "), (meltobject_ptr_t)(", sizeof (cdat->dstr_993__meltobject_p.val)-1); /*inistring dstr_994__*/ /*_.VALSTR___V1001*/ meltfptr[1000] = (void*)&cdat->dstr_994__; cdat->dstr_994__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_994__.val, "))", sizeof (cdat->dstr_994__.val)-1); /*inistring dstr_995__SUBCLASS_OF*/ /*_.VALSTR___V991*/ meltfptr[990] = (void*)&cdat->dstr_995__SUBCLASS_OF; cdat->dstr_995__SUBCLASS_OF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_995__SUBCLASS_OF.val, "SUBCLASS_OF", sizeof (cdat->dstr_995__SUBCLASS_OF.val)-1); /*iniobj dsym_996__SUBCLASS_OR_EQ*/ /*uniqueobj*/ if (!/*_.VALDATA___V1003*/ meltfptr[1002]) /*_.VALDATA___V1003*/ meltfptr[1002] = (void*)&cdat->dsym_996__SUBCLASS_OR_EQ; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_996__SUBCLASS_OR_EQ", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_996__SUBCLASS_OR_EQ", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_996__SUBCLASS_OR_EQ.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_996__SUBCLASS_OR_EQ.obj_hash = 491951222; cdat->dsym_996__SUBCLASS_OR_EQ.obj_len = 3; /*inistring dstr_997__SUBCLASS_OR_EQ*/ /*_.VALSTR___V1004*/ meltfptr[1003] = (void*)&cdat->dstr_997__SUBCLASS_OR_EQ; cdat->dstr_997__SUBCLASS_OR_EQ.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_997__SUBCLASS_OR_EQ.val, "SUBCLASS_OR_EQ", sizeof (cdat->dstr_997__SUBCLASS_OR_EQ.val)-1); MELT_LOCATION("warmelt-base.melt:488:/ iniobj"); /*iniobj dobj_998__SUBCLASS_OR_EQ*/ /*_.VALDATA___V1005*/ meltfptr[1004] = (void*)&cdat->dobj_998__SUBCLASS_OR_EQ; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_998__SUBCLASS_OR_EQ", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_998__SUBCLASS_OR_EQ", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_998__SUBCLASS_OR_EQ.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_998__SUBCLASS_OR_EQ.obj_hash = 330935240; cdat->dobj_998__SUBCLASS_OR_EQ.obj_len = 5; /*inimult dtup_999__SUBCLASS_OR_EQ*/ /*_.VALTUP___V1015*/ meltfptr[1014] = (void*)&cdat->dtup_999__SUBCLASS_OR_EQ; cdat->dtup_999__SUBCLASS_OR_EQ.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_999__SUBCLASS_OR_EQ.nbval = 9; /*inimult dtup_1000__SUBCLASS_OR_EQ*/ /*_.VALTUP___V1009*/ meltfptr[1008] = (void*)&cdat->dtup_1000__SUBCLASS_OR_EQ; cdat->dtup_1000__SUBCLASS_OR_EQ.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1000__SUBCLASS_OR_EQ.nbval = 2; /*^iniobj*/ /*iniobj dobj_1001*/ /*_.VALDATA___V1007*/ meltfptr[1006] = (void*)&cdat->dobj_1001; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1001", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1001", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1001.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1001.obj_num = 0; cdat->dobj_1001.obj_hash = 813479895; cdat->dobj_1001.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1002*/ /*_.VALDATA___V1008*/ meltfptr[1007] = (void*)&cdat->dobj_1002; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1002", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1002", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1002.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1002.obj_num = 1; cdat->dobj_1002.obj_hash = 573261776; cdat->dobj_1002.obj_len = 2; /*inistring dstr_1003__*/ /*_.VALSTR___V1010*/ meltfptr[1009] = (void*)&cdat->dstr_1003__; cdat->dstr_1003__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1003__.val, "((", sizeof (cdat->dstr_1003__.val)-1); /*inistring dstr_1004__*/ /*_.VALSTR___V1011*/ meltfptr[1010] = (void*)&cdat->dstr_1004__; cdat->dstr_1004__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1004__.val, " == ", sizeof (cdat->dstr_1004__.val)-1); /*inistring dstr_1005__melt_is_sub*/ /*_.VALSTR___V1012*/ meltfptr[1011] = (void*)&cdat->dstr_1005__melt_is_sub; cdat->dstr_1005__melt_is_sub.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1005__melt_is_sub.val, ") || melt_is_subclass_of((meltobject_ptr_t)(", sizeof (cdat->dstr_1005__melt_is_sub.val)-1); /*inistring dstr_1006__meltobject_p*/ /*_.VALSTR___V1013*/ meltfptr[1012] = (void*)&cdat->dstr_1006__meltobject_p; cdat->dstr_1006__meltobject_p.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1006__meltobject_p.val, "), (meltobject_ptr_t)(", sizeof (cdat->dstr_1006__meltobject_p.val)-1); /*inistring dstr_1007__*/ /*_.VALSTR___V1014*/ meltfptr[1013] = (void*)&cdat->dstr_1007__; cdat->dstr_1007__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1007__.val, ")))", sizeof (cdat->dstr_1007__.val)-1); /*inistring dstr_1008__SUBCLASS_OR_EQ*/ /*_.VALSTR___V1006*/ meltfptr[1005] = (void*)&cdat->dstr_1008__SUBCLASS_OR_EQ; cdat->dstr_1008__SUBCLASS_OR_EQ.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1008__SUBCLASS_OR_EQ.val, "SUBCLASS_OR_EQ", sizeof (cdat->dstr_1008__SUBCLASS_OR_EQ.val)-1); /*iniobj dsym_1009__IS_MULTIPLE_OR_NULL*/ /*uniqueobj*/ if (!/*_.VALDATA___V1016*/ meltfptr[1015]) /*_.VALDATA___V1016*/ meltfptr[1015] = (void*)&cdat->dsym_1009__IS_MULTIPLE_OR_NULL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1009__IS_MULTIPLE_OR_NULL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1009__IS_MULTIPLE_OR_NULL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1009__IS_MULTIPLE_OR_NULL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1009__IS_MULTIPLE_OR_NULL.obj_hash = 798581263; cdat->dsym_1009__IS_MULTIPLE_OR_NULL.obj_len = 3; /*inistring dstr_1010__IS_MULTIPLE_OR_N*/ /*_.VALSTR___V1017*/ meltfptr[1016] = (void*)&cdat->dstr_1010__IS_MULTIPLE_OR_N; cdat->dstr_1010__IS_MULTIPLE_OR_N.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1010__IS_MULTIPLE_OR_N.val, "IS_MULTIPLE_OR_NULL", sizeof (cdat->dstr_1010__IS_MULTIPLE_OR_N.val)-1); MELT_LOCATION("warmelt-base.melt:492:/ iniobj"); /*iniobj dobj_1011__IS_MULTIPLE_OR_NULL*/ /*_.VALDATA___V1018*/ meltfptr[1017] = (void*)&cdat->dobj_1011__IS_MULTIPLE_OR_NULL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1011__IS_MULTIPLE_OR_NULL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1011__IS_MULTIPLE_OR_NULL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1011__IS_MULTIPLE_OR_NULL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1011__IS_MULTIPLE_OR_NULL.obj_hash = 999631252; cdat->dobj_1011__IS_MULTIPLE_OR_NULL.obj_len = 5; /*inimult dtup_1012__IS_MULTIPLE_OR_NULL*/ /*_.VALTUP___V1027*/ meltfptr[1026] = (void*)&cdat->dtup_1012__IS_MULTIPLE_OR_NULL; cdat->dtup_1012__IS_MULTIPLE_OR_NULL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1012__IS_MULTIPLE_OR_NULL.nbval = 5; /*inimult dtup_1013__IS_MULTIPLE_OR_NULL*/ /*_.VALTUP___V1023*/ meltfptr[1022] = (void*)&cdat->dtup_1013__IS_MULTIPLE_OR_NULL; cdat->dtup_1013__IS_MULTIPLE_OR_NULL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1013__IS_MULTIPLE_OR_NULL.nbval = 1; /*iniobj dsym_1014__MUL*/ /*uniqueobj*/ if (!/*_.VALDATA___V1021*/ meltfptr[1020]) /*_.VALDATA___V1021*/ meltfptr[1020] = (void*)&cdat->dsym_1014__MUL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1014__MUL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1014__MUL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1014__MUL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1014__MUL.obj_hash = 90169799; cdat->dsym_1014__MUL.obj_len = 3; /*inistring dstr_1015__MUL*/ /*_.VALSTR___V1022*/ meltfptr[1021] = (void*)&cdat->dstr_1015__MUL; cdat->dstr_1015__MUL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1015__MUL.val, "MUL", sizeof (cdat->dstr_1015__MUL.val)-1); /*^iniobj*/ /*iniobj dobj_1016*/ /*_.VALDATA___V1020*/ meltfptr[1019] = (void*)&cdat->dobj_1016; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1016", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1016", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1016.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1016.obj_num = 0; cdat->dobj_1016.obj_hash = 867545725; cdat->dobj_1016.obj_len = 2; /*inistring dstr_1017__*/ /*_.VALSTR___V1024*/ meltfptr[1023] = (void*)&cdat->dstr_1017__; cdat->dstr_1017__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1017__.val, "((", sizeof (cdat->dstr_1017__.val)-1); /*inistring dstr_1018__NULL_me*/ /*_.VALSTR___V1025*/ meltfptr[1024] = (void*)&cdat->dstr_1018__NULL_me; cdat->dstr_1018__NULL_me.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1018__NULL_me.val, ") == NULL || (melt_unsafe_magic_discr((melt_ptr_t)(", sizeof (cdat->dstr_1018__NULL_me.val)-1); /*inistring dstr_1019__OBMAG_MULT*/ /*_.VALSTR___V1026*/ meltfptr[1025] = (void*)&cdat->dstr_1019__OBMAG_MULT; cdat->dstr_1019__OBMAG_MULT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1019__OBMAG_MULT.val, ")) == OBMAG_MULTIPLE))", sizeof (cdat->dstr_1019__OBMAG_MULT.val)-1); /*inistring dstr_1020__IS_MULTIPLE_OR_N*/ /*_.VALSTR___V1019*/ meltfptr[1018] = (void*)&cdat->dstr_1020__IS_MULTIPLE_OR_N; cdat->dstr_1020__IS_MULTIPLE_OR_N.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1020__IS_MULTIPLE_OR_N.val, "IS_MULTIPLE_OR_NULL", sizeof (cdat->dstr_1020__IS_MULTIPLE_OR_N.val)-1); /*iniobj dsym_1021__SUBSEQ_MULTIPLE*/ /*uniqueobj*/ if (!/*_.VALDATA___V1028*/ meltfptr[1027]) /*_.VALDATA___V1028*/ meltfptr[1027] = (void*)&cdat->dsym_1021__SUBSEQ_MULTIPLE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1021__SUBSEQ_MULTIPLE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1021__SUBSEQ_MULTIPLE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1021__SUBSEQ_MULTIPLE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1021__SUBSEQ_MULTIPLE.obj_hash = 32217835; cdat->dsym_1021__SUBSEQ_MULTIPLE.obj_len = 3; /*inistring dstr_1022__SUBSEQ_MULTIPLE*/ /*_.VALSTR___V1029*/ meltfptr[1028] = (void*)&cdat->dstr_1022__SUBSEQ_MULTIPLE; cdat->dstr_1022__SUBSEQ_MULTIPLE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1022__SUBSEQ_MULTIPLE.val, "SUBSEQ_MULTIPLE", sizeof (cdat->dstr_1022__SUBSEQ_MULTIPLE.val)-1); MELT_LOCATION("warmelt-base.melt:496:/ iniobj"); /*iniobj dobj_1023__SUBSEQ_MULTIPLE*/ /*_.VALDATA___V1030*/ meltfptr[1029] = (void*)&cdat->dobj_1023__SUBSEQ_MULTIPLE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1023__SUBSEQ_MULTIPLE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1023__SUBSEQ_MULTIPLE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1023__SUBSEQ_MULTIPLE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1023__SUBSEQ_MULTIPLE.obj_hash = 21088664; cdat->dobj_1023__SUBSEQ_MULTIPLE.obj_len = 5; /*inimult dtup_1024__SUBSEQ_MULTIPLE*/ /*_.VALTUP___V1044*/ meltfptr[1043] = (void*)&cdat->dtup_1024__SUBSEQ_MULTIPLE; cdat->dtup_1024__SUBSEQ_MULTIPLE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1024__SUBSEQ_MULTIPLE.nbval = 7; /*inimult dtup_1025__SUBSEQ_MULTIPLE*/ /*_.VALTUP___V1039*/ meltfptr[1038] = (void*)&cdat->dtup_1025__SUBSEQ_MULTIPLE; cdat->dtup_1025__SUBSEQ_MULTIPLE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1025__SUBSEQ_MULTIPLE.nbval = 3; /*^iniobj*/ /*iniobj dobj_1026*/ /*_.VALDATA___V1032*/ meltfptr[1031] = (void*)&cdat->dobj_1026; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1026", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1026", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1026.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1026.obj_num = 0; cdat->dobj_1026.obj_hash = 1018399245; cdat->dobj_1026.obj_len = 2; /*iniobj dsym_1027__STARTIX*/ /*uniqueobj*/ if (!/*_.VALDATA___V1034*/ meltfptr[1033]) /*_.VALDATA___V1034*/ meltfptr[1033] = (void*)&cdat->dsym_1027__STARTIX; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1027__STARTIX", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1027__STARTIX", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1027__STARTIX.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1027__STARTIX.obj_hash = 292412544; cdat->dsym_1027__STARTIX.obj_len = 3; /*inistring dstr_1028__STARTIX*/ /*_.VALSTR___V1035*/ meltfptr[1034] = (void*)&cdat->dstr_1028__STARTIX; cdat->dstr_1028__STARTIX.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1028__STARTIX.val, "STARTIX", sizeof (cdat->dstr_1028__STARTIX.val)-1); /*^iniobj*/ /*iniobj dobj_1029*/ /*_.VALDATA___V1033*/ meltfptr[1032] = (void*)&cdat->dobj_1029; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1029", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1029", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1029.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1029.obj_num = 1; cdat->dobj_1029.obj_hash = 287782560; cdat->dobj_1029.obj_len = 2; /*iniobj dsym_1030__ENDIX*/ /*uniqueobj*/ if (!/*_.VALDATA___V1037*/ meltfptr[1036]) /*_.VALDATA___V1037*/ meltfptr[1036] = (void*)&cdat->dsym_1030__ENDIX; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1030__ENDIX", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1030__ENDIX", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1030__ENDIX.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1030__ENDIX.obj_hash = 546183488; cdat->dsym_1030__ENDIX.obj_len = 3; /*inistring dstr_1031__ENDIX*/ /*_.VALSTR___V1038*/ meltfptr[1037] = (void*)&cdat->dstr_1031__ENDIX; cdat->dstr_1031__ENDIX.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1031__ENDIX.val, "ENDIX", sizeof (cdat->dstr_1031__ENDIX.val)-1); /*^iniobj*/ /*iniobj dobj_1032*/ /*_.VALDATA___V1036*/ meltfptr[1035] = (void*)&cdat->dobj_1032; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1032", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1032", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1032.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1032.obj_num = 2; cdat->dobj_1032.obj_hash = 345013364; cdat->dobj_1032.obj_len = 2; /*inistring dstr_1033__meltgc_new_subs*/ /*_.VALSTR___V1040*/ meltfptr[1039] = (void*)&cdat->dstr_1033__meltgc_new_subs; cdat->dstr_1033__meltgc_new_subs.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1033__meltgc_new_subs.val, " meltgc_new_subseq_multiple((melt_ptr_t)(", sizeof (cdat->dstr_1033__meltgc_new_subs.val)-1); /*inistring dstr_1034__int_*/ /*_.VALSTR___V1041*/ meltfptr[1040] = (void*)&cdat->dstr_1034__int_; cdat->dstr_1034__int_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1034__int_.val, "),\n\t\t\t\t (int)(", sizeof (cdat->dstr_1034__int_.val)-1); /*inistring dstr_1035__int_*/ /*_.VALSTR___V1042*/ meltfptr[1041] = (void*)&cdat->dstr_1035__int_; cdat->dstr_1035__int_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1035__int_.val, "), (int)(", sizeof (cdat->dstr_1035__int_.val)-1); /*inistring dstr_1036__*/ /*_.VALSTR___V1043*/ meltfptr[1042] = (void*)&cdat->dstr_1036__; cdat->dstr_1036__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1036__.val, ")) ", sizeof (cdat->dstr_1036__.val)-1); /*inistring dstr_1037__SUBSEQ_MULTIPLE*/ /*_.VALSTR___V1031*/ meltfptr[1030] = (void*)&cdat->dstr_1037__SUBSEQ_MULTIPLE; cdat->dstr_1037__SUBSEQ_MULTIPLE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1037__SUBSEQ_MULTIPLE.val, "SUBSEQ_MULTIPLE", sizeof (cdat->dstr_1037__SUBSEQ_MULTIPLE.val)-1); MELT_LOCATION("warmelt-base.melt:505:/ iniobj"); /*iniobj dobj_1038__TUPLE_NTH*/ /*_.VALDATA___V1045*/ meltfptr[1044] = (void*)&cdat->dobj_1038__TUPLE_NTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1038__TUPLE_NTH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_CMATCHER)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1038__TUPLE_NTH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_CMATCHER)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1038__TUPLE_NTH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_CMATCHER)))); cdat->dobj_1038__TUPLE_NTH.obj_hash = 128683855; cdat->dobj_1038__TUPLE_NTH.obj_len = 9; /*inistring dstr_1039__TUPLE_NTH*/ /*_.VALSTR___V1046*/ meltfptr[1045] = (void*)&cdat->dstr_1039__TUPLE_NTH; cdat->dstr_1039__TUPLE_NTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1039__TUPLE_NTH.val, "TUPLE_NTH", sizeof (cdat->dstr_1039__TUPLE_NTH.val)-1); /*iniobj dsym_1040__MATCHEDRK*/ /*uniqueobj*/ if (!/*_.VALDATA___V1048*/ meltfptr[1047]) /*_.VALDATA___V1048*/ meltfptr[1047] = (void*)&cdat->dsym_1040__MATCHEDRK; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1040__MATCHEDRK", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1040__MATCHEDRK", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1040__MATCHEDRK.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1040__MATCHEDRK.obj_hash = 1058504666; cdat->dsym_1040__MATCHEDRK.obj_len = 3; /*inistring dstr_1041__MATCHEDRK*/ /*_.VALSTR___V1049*/ meltfptr[1048] = (void*)&cdat->dstr_1041__MATCHEDRK; cdat->dstr_1041__MATCHEDRK.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1041__MATCHEDRK.val, "MATCHEDRK", sizeof (cdat->dstr_1041__MATCHEDRK.val)-1); /*^iniobj*/ /*iniobj dobj_1042*/ /*_.VALDATA___V1047*/ meltfptr[1046] = (void*)&cdat->dobj_1042; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1042", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1042", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1042.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1042.obj_num = 0; cdat->dobj_1042.obj_hash = 217846026; cdat->dobj_1042.obj_len = 2; /*inimult dtup_1043__TUPLE_NTH*/ /*_.VALTUP___V1050*/ meltfptr[1049] = (void*)&cdat->dtup_1043__TUPLE_NTH; cdat->dtup_1043__TUPLE_NTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1043__TUPLE_NTH.nbval = 1; /*iniobj dsym_1044__MATCHEDTUP*/ /*uniqueobj*/ if (!/*_.VALDATA___V1052*/ meltfptr[1051]) /*_.VALDATA___V1052*/ meltfptr[1051] = (void*)&cdat->dsym_1044__MATCHEDTUP; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1044__MATCHEDTUP", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1044__MATCHEDTUP", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1044__MATCHEDTUP.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1044__MATCHEDTUP.obj_hash = 192748516; cdat->dsym_1044__MATCHEDTUP.obj_len = 3; /*inistring dstr_1045__MATCHEDTUP*/ /*_.VALSTR___V1053*/ meltfptr[1052] = (void*)&cdat->dstr_1045__MATCHEDTUP; cdat->dstr_1045__MATCHEDTUP.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1045__MATCHEDTUP.val, "MATCHEDTUP", sizeof (cdat->dstr_1045__MATCHEDTUP.val)-1); /*^iniobj*/ /*iniobj dobj_1046*/ /*_.VALDATA___V1051*/ meltfptr[1050] = (void*)&cdat->dobj_1046; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1046", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1046", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1046.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1046.obj_hash = 310326182; cdat->dobj_1046.obj_len = 2; /*iniobj dsym_1047__OUTCOMP*/ /*uniqueobj*/ if (!/*_.VALDATA___V1055*/ meltfptr[1054]) /*_.VALDATA___V1055*/ meltfptr[1054] = (void*)&cdat->dsym_1047__OUTCOMP; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1047__OUTCOMP", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1047__OUTCOMP", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1047__OUTCOMP.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1047__OUTCOMP.obj_hash = 326576265; cdat->dsym_1047__OUTCOMP.obj_len = 3; /*inistring dstr_1048__OUTCOMP*/ /*_.VALSTR___V1056*/ meltfptr[1055] = (void*)&cdat->dstr_1048__OUTCOMP; cdat->dstr_1048__OUTCOMP.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1048__OUTCOMP.val, "OUTCOMP", sizeof (cdat->dstr_1048__OUTCOMP.val)-1); /*^iniobj*/ /*iniobj dobj_1049*/ /*_.VALDATA___V1054*/ meltfptr[1053] = (void*)&cdat->dobj_1049; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1049", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1049", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1049.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1049.obj_num = 0; cdat->dobj_1049.obj_hash = 905650464; cdat->dobj_1049.obj_len = 2; /*inimult dtup_1050__TUPLE_NTH*/ /*_.VALTUP___V1057*/ meltfptr[1056] = (void*)&cdat->dtup_1050__TUPLE_NTH; cdat->dtup_1050__TUPLE_NTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1050__TUPLE_NTH.nbval = 1; /*iniobj dsym_1051__TUPNTH*/ /*uniqueobj*/ if (!/*_.VALDATA___V1058*/ meltfptr[1057]) /*_.VALDATA___V1058*/ meltfptr[1057] = (void*)&cdat->dsym_1051__TUPNTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1051__TUPNTH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1051__TUPNTH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1051__TUPNTH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1051__TUPNTH.obj_hash = 701388142; cdat->dsym_1051__TUPNTH.obj_len = 3; /*inistring dstr_1052__TUPNTH*/ /*_.VALSTR___V1059*/ meltfptr[1058] = (void*)&cdat->dstr_1052__TUPNTH; cdat->dstr_1052__TUPNTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1052__TUPNTH.val, "TUPNTH", sizeof (cdat->dstr_1052__TUPNTH.val)-1); /*inistring dstr_1053__*/ /*_.VALSTR___V1060*/ meltfptr[1059] = (void*)&cdat->dstr_1053__; cdat->dstr_1053__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1053__.val, "/*", sizeof (cdat->dstr_1053__.val)-1); /*inistring dstr_1054__melt_is_mu*/ /*_.VALSTR___V1061*/ meltfptr[1060] = (void*)&cdat->dstr_1054__melt_is_mu; cdat->dstr_1054__melt_is_mu.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1054__melt_is_mu.val, " ?*/ (melt_is_multiple_at_least(((melt_ptr_t)", sizeof (cdat->dstr_1054__melt_is_mu.val)-1); /*inistring dstr_1055__1_int_*/ /*_.VALSTR___V1062*/ meltfptr[1061] = (void*)&cdat->dstr_1055__1_int_; cdat->dstr_1055__1_int_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1055__1_int_.val, "), 1+ (int)(", sizeof (cdat->dstr_1055__1_int_.val)-1); /*inistring dstr_1056__*/ /*_.VALSTR___V1063*/ meltfptr[1062] = (void*)&cdat->dstr_1056__; cdat->dstr_1056__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1056__.val, ")))", sizeof (cdat->dstr_1056__.val)-1); /*inimult dtup_1057__TUPLE_NTH*/ /*_.VALTUP___V1064*/ meltfptr[1063] = (void*)&cdat->dtup_1057__TUPLE_NTH; cdat->dtup_1057__TUPLE_NTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1057__TUPLE_NTH.nbval = 7; /*inistring dstr_1058__*/ /*_.VALSTR___V1065*/ meltfptr[1064] = (void*)&cdat->dstr_1058__; cdat->dstr_1058__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1058__.val, "/*", sizeof (cdat->dstr_1058__.val)-1); /*inistring dstr_1059__*/ /*_.VALSTR___V1066*/ meltfptr[1065] = (void*)&cdat->dstr_1059__; cdat->dstr_1059__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1059__.val, " !*/ ", sizeof (cdat->dstr_1059__.val)-1); /*inistring dstr_1060__melt_multiple*/ /*_.VALSTR___V1067*/ meltfptr[1066] = (void*)&cdat->dstr_1060__melt_multiple; cdat->dstr_1060__melt_multiple.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1060__melt_multiple.val, " = melt_multiple_nth((melt_ptr_t)(", sizeof (cdat->dstr_1060__melt_multiple.val)-1); /*inistring dstr_1061__int_*/ /*_.VALSTR___V1068*/ meltfptr[1067] = (void*)&cdat->dstr_1061__int_; cdat->dstr_1061__int_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1061__int_.val, "),(int)(", sizeof (cdat->dstr_1061__int_.val)-1); /*inistring dstr_1062__*/ /*_.VALSTR___V1069*/ meltfptr[1068] = (void*)&cdat->dstr_1062__; cdat->dstr_1062__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1062__.val, "));\n ", sizeof (cdat->dstr_1062__.val)-1); /*inimult dtup_1063__TUPLE_NTH*/ /*_.VALTUP___V1070*/ meltfptr[1069] = (void*)&cdat->dtup_1063__TUPLE_NTH; cdat->dtup_1063__TUPLE_NTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1063__TUPLE_NTH.nbval = 9; MELT_LOCATION("warmelt-base.melt:522:/ iniobj"); /*iniobj dobj_1064__TUPLE_SIZED*/ /*_.VALDATA___V1071*/ meltfptr[1070] = (void*)&cdat->dobj_1064__TUPLE_SIZED; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1064__TUPLE_SIZED", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_CMATCHER)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1064__TUPLE_SIZED", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_CMATCHER)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1064__TUPLE_SIZED.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_CMATCHER)))); cdat->dobj_1064__TUPLE_SIZED.obj_hash = 253083307; cdat->dobj_1064__TUPLE_SIZED.obj_len = 9; /*inistring dstr_1065__TUPLE_SIZED*/ /*_.VALSTR___V1072*/ meltfptr[1071] = (void*)&cdat->dstr_1065__TUPLE_SIZED; cdat->dstr_1065__TUPLE_SIZED.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1065__TUPLE_SIZED.val, "TUPLE_SIZED", sizeof (cdat->dstr_1065__TUPLE_SIZED.val)-1); /*iniobj dsym_1066__LN*/ /*uniqueobj*/ if (!/*_.VALDATA___V1074*/ meltfptr[1073]) /*_.VALDATA___V1074*/ meltfptr[1073] = (void*)&cdat->dsym_1066__LN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1066__LN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1066__LN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1066__LN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1066__LN.obj_hash = 26632748; cdat->dsym_1066__LN.obj_len = 3; /*inistring dstr_1067__LN*/ /*_.VALSTR___V1075*/ meltfptr[1074] = (void*)&cdat->dstr_1067__LN; cdat->dstr_1067__LN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1067__LN.val, "LN", sizeof (cdat->dstr_1067__LN.val)-1); /*^iniobj*/ /*iniobj dobj_1068*/ /*_.VALDATA___V1073*/ meltfptr[1072] = (void*)&cdat->dobj_1068; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1068", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1068", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1068.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1068.obj_num = 0; cdat->dobj_1068.obj_hash = 775415537; cdat->dobj_1068.obj_len = 2; /*inimult dtup_1069__TUPLE_SIZED*/ /*_.VALTUP___V1076*/ meltfptr[1075] = (void*)&cdat->dtup_1069__TUPLE_SIZED; cdat->dtup_1069__TUPLE_SIZED.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1069__TUPLE_SIZED.nbval = 1; /*iniobj dsym_1070__TUP*/ /*uniqueobj*/ if (!/*_.VALDATA___V1078*/ meltfptr[1077]) /*_.VALDATA___V1078*/ meltfptr[1077] = (void*)&cdat->dsym_1070__TUP; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1070__TUP", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1070__TUP", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1070__TUP.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1070__TUP.obj_hash = 224489460; cdat->dsym_1070__TUP.obj_len = 3; /*inistring dstr_1071__TUP*/ /*_.VALSTR___V1079*/ meltfptr[1078] = (void*)&cdat->dstr_1071__TUP; cdat->dstr_1071__TUP.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1071__TUP.val, "TUP", sizeof (cdat->dstr_1071__TUP.val)-1); /*^iniobj*/ /*iniobj dobj_1072*/ /*_.VALDATA___V1077*/ meltfptr[1076] = (void*)&cdat->dobj_1072; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1072", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1072", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1072.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1072.obj_hash = 154673603; cdat->dobj_1072.obj_len = 2; /*inimult dtup_1073__TUPLE_SIZED*/ /*_.VALTUP___V1080*/ meltfptr[1079] = (void*)&cdat->dtup_1073__TUPLE_SIZED; cdat->dtup_1073__TUPLE_SIZED.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1073__TUPLE_SIZED.nbval = 0; /*iniobj dsym_1074__TUPSIZ*/ /*uniqueobj*/ if (!/*_.VALDATA___V1081*/ meltfptr[1080]) /*_.VALDATA___V1081*/ meltfptr[1080] = (void*)&cdat->dsym_1074__TUPSIZ; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1074__TUPSIZ", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1074__TUPSIZ", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1074__TUPSIZ.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1074__TUPSIZ.obj_hash = 554385648; cdat->dsym_1074__TUPSIZ.obj_len = 3; /*inistring dstr_1075__TUPSIZ*/ /*_.VALSTR___V1082*/ meltfptr[1081] = (void*)&cdat->dstr_1075__TUPSIZ; cdat->dstr_1075__TUPSIZ.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1075__TUPSIZ.val, "TUPSIZ", sizeof (cdat->dstr_1075__TUPSIZ.val)-1); /*inistring dstr_1076__melt_is_multipl*/ /*_.VALSTR___V1083*/ meltfptr[1082] = (void*)&cdat->dstr_1076__melt_is_multipl; cdat->dstr_1076__melt_is_multipl.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1076__melt_is_multipl.val, "(melt_is_multiple_of_length((melt_ptr_t)(", sizeof (cdat->dstr_1076__melt_is_multipl.val)-1); /*inistring dstr_1077__int_*/ /*_.VALSTR___V1084*/ meltfptr[1083] = (void*)&cdat->dstr_1077__int_; cdat->dstr_1077__int_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1077__int_.val, "), (int) (", sizeof (cdat->dstr_1077__int_.val)-1); /*inistring dstr_1078__*/ /*_.VALSTR___V1085*/ meltfptr[1084] = (void*)&cdat->dstr_1078__; cdat->dstr_1078__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1078__.val, ")))", sizeof (cdat->dstr_1078__.val)-1); /*inimult dtup_1079__TUPLE_SIZED*/ /*_.VALTUP___V1086*/ meltfptr[1085] = (void*)&cdat->dtup_1079__TUPLE_SIZED; cdat->dtup_1079__TUPLE_SIZED.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1079__TUPLE_SIZED.nbval = 5; /*inirout drout_1080__COMPARE_NAMED_ALPHA*/ /*_.VALROUT___V1087*/ meltfptr[1086] = (void*)&cdat->drout_1080__COMPARE_NAMED_ALPHA; cdat->drout_1080__COMPARE_NAMED_ALPHA.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy(cdat->drout_1080__COMPARE_NAMED_ALPHA.routdescr, "COMPARE_NAMED_ALPHA @warmelt-base.melt:535", MELT_ROUTDESCR_LEN - 1); cdat->drout_1080__COMPARE_NAMED_ALPHA.nbval = 7; MELT_ROUTINE_SET_ROUTCODE(&cdat->drout_1080__COMPARE_NAMED_ALPHA, meltrout_1_warmelt_base_COMPARE_NAMED_ALPHA); /*iniclos dclo_1081__COMPARE_NAMED_ALPHA*/ /*_.VALCLO___V1094*/ meltfptr[1093] = (void*)&cdat->dclo_1081__COMPARE_NAMED_ALPHA; cdat->dclo_1081__COMPARE_NAMED_ALPHA.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_CLOSURE)))); cdat->dclo_1081__COMPARE_NAMED_ALPHA.nbval = 0; /*iniboxint dint_1082__*/ /*_.VALBXINT___V1088*/ meltfptr[1087] = (void*)&cdat->dint_1082__; cdat->dint_1082__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_CONSTANT_INTEGER)))); cdat->dint_1082__.val = 0; /*iniobj dsym_1083__CLASS_NAMED*/ /*uniqueobj*/ if (!/*_.VALDATA___V1095*/ meltfptr[1094]) /*_.VALDATA___V1095*/ meltfptr[1094] = (void*)&cdat->dsym_1083__CLASS_NAMED; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1083__CLASS_NAMED", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1083__CLASS_NAMED", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1083__CLASS_NAMED.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1083__CLASS_NAMED.obj_hash = 60407004; cdat->dsym_1083__CLASS_NAMED.obj_len = 3; /*inistring dstr_1084__CLASS_NAMED*/ /*_.VALSTR___V1096*/ meltfptr[1095] = (void*)&cdat->dstr_1084__CLASS_NAMED; cdat->dstr_1084__CLASS_NAMED.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1084__CLASS_NAMED.val, "CLASS_NAMED", sizeof (cdat->dstr_1084__CLASS_NAMED.val)-1); /*iniboxint dint_1085__*/ /*_.VALBXINT___V1089*/ meltfptr[1088] = (void*)&cdat->dint_1085__; cdat->dint_1085__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_CONSTANT_INTEGER)))); cdat->dint_1085__.val = 1; /*iniboxint dint_1086__*/ /*_.VALBXINT___V1090*/ meltfptr[1089] = (void*)&cdat->dint_1086__; cdat->dint_1086__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_CONSTANT_INTEGER)))); cdat->dint_1086__.val = -1; /*iniboxint dint_1087__*/ /*_.VALBXINT___V1091*/ meltfptr[1090] = (void*)&cdat->dint_1087__; cdat->dint_1087__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_CONSTANT_INTEGER)))); cdat->dint_1087__.val = -1; /*iniboxint dint_1088__*/ /*_.VALBXINT___V1092*/ meltfptr[1091] = (void*)&cdat->dint_1088__; cdat->dint_1088__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_CONSTANT_INTEGER)))); cdat->dint_1088__.val = 1; /*iniboxint dint_1089__*/ /*_.VALBXINT___V1093*/ meltfptr[1092] = (void*)&cdat->dint_1089__; cdat->dint_1089__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_CONSTANT_INTEGER)))); cdat->dint_1089__.val = 0; /*iniobj dsym_1090__IS_OUT*/ /*uniqueobj*/ if (!/*_.VALDATA___V1097*/ meltfptr[1096]) /*_.VALDATA___V1097*/ meltfptr[1096] = (void*)&cdat->dsym_1090__IS_OUT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1090__IS_OUT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1090__IS_OUT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1090__IS_OUT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1090__IS_OUT.obj_hash = 775193553; cdat->dsym_1090__IS_OUT.obj_len = 3; /*inistring dstr_1091__IS_OUT*/ /*_.VALSTR___V1098*/ meltfptr[1097] = (void*)&cdat->dstr_1091__IS_OUT; cdat->dstr_1091__IS_OUT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1091__IS_OUT.val, "IS_OUT", sizeof (cdat->dstr_1091__IS_OUT.val)-1); MELT_LOCATION("warmelt-base.melt:557:/ iniobj"); /*iniobj dobj_1092__IS_OUT*/ /*_.VALDATA___V1099*/ meltfptr[1098] = (void*)&cdat->dobj_1092__IS_OUT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1092__IS_OUT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1092__IS_OUT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1092__IS_OUT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1092__IS_OUT.obj_hash = 437754236; cdat->dobj_1092__IS_OUT.obj_len = 5; /*inimult dtup_1093__IS_OUT*/ /*_.VALTUP___V1105*/ meltfptr[1104] = (void*)&cdat->dtup_1093__IS_OUT; cdat->dtup_1093__IS_OUT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1093__IS_OUT.nbval = 3; /*inimult dtup_1094__IS_OUT*/ /*_.VALTUP___V1102*/ meltfptr[1101] = (void*)&cdat->dtup_1094__IS_OUT; cdat->dtup_1094__IS_OUT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1094__IS_OUT.nbval = 1; /*^iniobj*/ /*iniobj dobj_1095*/ /*_.VALDATA___V1101*/ meltfptr[1100] = (void*)&cdat->dobj_1095; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1095", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1095", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1095.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1095.obj_num = 0; cdat->dobj_1095.obj_hash = 262825194; cdat->dobj_1095.obj_len = 2; /*inistring dstr_1096__melt_is_out_*/ /*_.VALSTR___V1103*/ meltfptr[1102] = (void*)&cdat->dstr_1096__melt_is_out_; cdat->dstr_1096__melt_is_out_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1096__melt_is_out_.val, " (melt_is_out ((melt_ptr_t) ", sizeof (cdat->dstr_1096__melt_is_out_.val)-1); /*inistring dstr_1097__*/ /*_.VALSTR___V1104*/ meltfptr[1103] = (void*)&cdat->dstr_1097__; cdat->dstr_1097__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1097__.val, ")) ", sizeof (cdat->dstr_1097__.val)-1); /*inistring dstr_1098__IS_OUT*/ /*_.VALSTR___V1100*/ meltfptr[1099] = (void*)&cdat->dstr_1098__IS_OUT; cdat->dstr_1098__IS_OUT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1098__IS_OUT.val, "IS_OUT", sizeof (cdat->dstr_1098__IS_OUT.val)-1); /*iniobj dsym_1099__ADD2SBUF_STRCONST*/ /*uniqueobj*/ if (!/*_.VALDATA___V1106*/ meltfptr[1105]) /*_.VALDATA___V1106*/ meltfptr[1105] = (void*)&cdat->dsym_1099__ADD2SBUF_STRCONST; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1099__ADD2SBUF_STRCONST", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1099__ADD2SBUF_STRCONST", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1099__ADD2SBUF_STRCONST.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1099__ADD2SBUF_STRCONST.obj_hash = 379205960; cdat->dsym_1099__ADD2SBUF_STRCONST.obj_len = 3; /*inistring dstr_1100__ADD2SBUF_STRCONS*/ /*_.VALSTR___V1107*/ meltfptr[1106] = (void*)&cdat->dstr_1100__ADD2SBUF_STRCONS; cdat->dstr_1100__ADD2SBUF_STRCONS.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1100__ADD2SBUF_STRCONS.val, "ADD2SBUF_STRCONST", sizeof (cdat->dstr_1100__ADD2SBUF_STRCONS.val)-1); MELT_LOCATION("warmelt-base.melt:561:/ iniobj"); /*iniobj dobj_1101__ADD2SBUF_STRCONST*/ /*_.VALDATA___V1108*/ meltfptr[1107] = (void*)&cdat->dobj_1101__ADD2SBUF_STRCONST; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1101__ADD2SBUF_STRCONST", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1101__ADD2SBUF_STRCONST", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1101__ADD2SBUF_STRCONST.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1101__ADD2SBUF_STRCONST.obj_hash = 35988942; cdat->dobj_1101__ADD2SBUF_STRCONST.obj_len = 5; /*inimult dtup_1102__ADD2SBUF_STRCONST*/ /*_.VALTUP___V1116*/ meltfptr[1115] = (void*)&cdat->dtup_1102__ADD2SBUF_STRCONST; cdat->dtup_1102__ADD2SBUF_STRCONST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1102__ADD2SBUF_STRCONST.nbval = 5; /*inimult dtup_1103__ADD2SBUF_STRCONST*/ /*_.VALTUP___V1112*/ meltfptr[1111] = (void*)&cdat->dtup_1103__ADD2SBUF_STRCONST; cdat->dtup_1103__ADD2SBUF_STRCONST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1103__ADD2SBUF_STRCONST.nbval = 2; /*^iniobj*/ /*iniobj dobj_1104*/ /*_.VALDATA___V1110*/ meltfptr[1109] = (void*)&cdat->dobj_1104; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1104", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1104", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1104.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1104.obj_num = 0; cdat->dobj_1104.obj_hash = 563188741; cdat->dobj_1104.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1105*/ /*_.VALDATA___V1111*/ meltfptr[1110] = (void*)&cdat->dobj_1105; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1105", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1105", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1105.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1105.obj_num = 1; cdat->dobj_1105.obj_hash = 946192209; cdat->dobj_1105.obj_len = 2; /*inistring dstr_1106__meltgc_add_strbu*/ /*_.VALSTR___V1113*/ meltfptr[1112] = (void*)&cdat->dstr_1106__meltgc_add_strbu; cdat->dstr_1106__meltgc_add_strbu.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1106__meltgc_add_strbu.val, "meltgc_add_strbuf((melt_ptr_t)(", sizeof (cdat->dstr_1106__meltgc_add_strbu.val)-1); /*inistring dstr_1107__*/ /*_.VALSTR___V1114*/ meltfptr[1113] = (void*)&cdat->dstr_1107__; cdat->dstr_1107__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1107__.val, "), (", sizeof (cdat->dstr_1107__.val)-1); /*inistring dstr_1108__*/ /*_.VALSTR___V1115*/ meltfptr[1114] = (void*)&cdat->dstr_1108__; cdat->dstr_1108__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1108__.val, "))", sizeof (cdat->dstr_1108__.val)-1); /*inistring dstr_1109__ADD2SBUF_STRCONS*/ /*_.VALSTR___V1109*/ meltfptr[1108] = (void*)&cdat->dstr_1109__ADD2SBUF_STRCONS; cdat->dstr_1109__ADD2SBUF_STRCONS.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1109__ADD2SBUF_STRCONS.val, "ADD2SBUF_STRCONST", sizeof (cdat->dstr_1109__ADD2SBUF_STRCONS.val)-1); /*iniobj dsym_1110__ADD2SBUF_STRING*/ /*uniqueobj*/ if (!/*_.VALDATA___V1117*/ meltfptr[1116]) /*_.VALDATA___V1117*/ meltfptr[1116] = (void*)&cdat->dsym_1110__ADD2SBUF_STRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1110__ADD2SBUF_STRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1110__ADD2SBUF_STRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1110__ADD2SBUF_STRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1110__ADD2SBUF_STRING.obj_hash = 150650717; cdat->dsym_1110__ADD2SBUF_STRING.obj_len = 3; /*inistring dstr_1111__ADD2SBUF_STRING*/ /*_.VALSTR___V1118*/ meltfptr[1117] = (void*)&cdat->dstr_1111__ADD2SBUF_STRING; cdat->dstr_1111__ADD2SBUF_STRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1111__ADD2SBUF_STRING.val, "ADD2SBUF_STRING", sizeof (cdat->dstr_1111__ADD2SBUF_STRING.val)-1); MELT_LOCATION("warmelt-base.melt:566:/ iniobj"); /*iniobj dobj_1112__ADD2SBUF_STRING*/ /*_.VALDATA___V1119*/ meltfptr[1118] = (void*)&cdat->dobj_1112__ADD2SBUF_STRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1112__ADD2SBUF_STRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1112__ADD2SBUF_STRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1112__ADD2SBUF_STRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1112__ADD2SBUF_STRING.obj_hash = 559209349; cdat->dobj_1112__ADD2SBUF_STRING.obj_len = 5; /*inimult dtup_1113__ADD2SBUF_STRING*/ /*_.VALTUP___V1127*/ meltfptr[1126] = (void*)&cdat->dtup_1113__ADD2SBUF_STRING; cdat->dtup_1113__ADD2SBUF_STRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1113__ADD2SBUF_STRING.nbval = 5; /*inimult dtup_1114__ADD2SBUF_STRING*/ /*_.VALTUP___V1123*/ meltfptr[1122] = (void*)&cdat->dtup_1114__ADD2SBUF_STRING; cdat->dtup_1114__ADD2SBUF_STRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1114__ADD2SBUF_STRING.nbval = 2; /*^iniobj*/ /*iniobj dobj_1115*/ /*_.VALDATA___V1121*/ meltfptr[1120] = (void*)&cdat->dobj_1115; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1115", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1115", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1115.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1115.obj_num = 0; cdat->dobj_1115.obj_hash = 985425133; cdat->dobj_1115.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1116*/ /*_.VALDATA___V1122*/ meltfptr[1121] = (void*)&cdat->dobj_1116; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1116", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1116", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1116.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1116.obj_num = 1; cdat->dobj_1116.obj_hash = 970490957; cdat->dobj_1116.obj_len = 2; /*inistring dstr_1117__meltgc_add_strbu*/ /*_.VALSTR___V1124*/ meltfptr[1123] = (void*)&cdat->dstr_1117__meltgc_add_strbu; cdat->dstr_1117__meltgc_add_strbu.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1117__meltgc_add_strbu.val, "meltgc_add_strbuf((melt_ptr_t)(", sizeof (cdat->dstr_1117__meltgc_add_strbu.val)-1); /*inistring dstr_1118__melt_string_s*/ /*_.VALSTR___V1125*/ meltfptr[1124] = (void*)&cdat->dstr_1118__melt_string_s; cdat->dstr_1118__melt_string_s.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1118__melt_string_s.val, "), melt_string_str((melt_ptr_t)(", sizeof (cdat->dstr_1118__melt_string_s.val)-1); /*inistring dstr_1119__*/ /*_.VALSTR___V1126*/ meltfptr[1125] = (void*)&cdat->dstr_1119__; cdat->dstr_1119__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1119__.val, ")))", sizeof (cdat->dstr_1119__.val)-1); /*inistring dstr_1120__ADD2SBUF_STRING*/ /*_.VALSTR___V1120*/ meltfptr[1119] = (void*)&cdat->dstr_1120__ADD2SBUF_STRING; cdat->dstr_1120__ADD2SBUF_STRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1120__ADD2SBUF_STRING.val, "ADD2SBUF_STRING", sizeof (cdat->dstr_1120__ADD2SBUF_STRING.val)-1); /*iniobj dsym_1121__ADD2SBUF_MIXLOC*/ /*uniqueobj*/ if (!/*_.VALDATA___V1128*/ meltfptr[1127]) /*_.VALDATA___V1128*/ meltfptr[1127] = (void*)&cdat->dsym_1121__ADD2SBUF_MIXLOC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1121__ADD2SBUF_MIXLOC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1121__ADD2SBUF_MIXLOC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1121__ADD2SBUF_MIXLOC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1121__ADD2SBUF_MIXLOC.obj_hash = 514120877; cdat->dsym_1121__ADD2SBUF_MIXLOC.obj_len = 3; /*inistring dstr_1122__ADD2SBUF_MIXLOC*/ /*_.VALSTR___V1129*/ meltfptr[1128] = (void*)&cdat->dstr_1122__ADD2SBUF_MIXLOC; cdat->dstr_1122__ADD2SBUF_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1122__ADD2SBUF_MIXLOC.val, "ADD2SBUF_MIXLOC", sizeof (cdat->dstr_1122__ADD2SBUF_MIXLOC.val)-1); MELT_LOCATION("warmelt-base.melt:572:/ iniobj"); /*iniobj dobj_1123__ADD2SBUF_MIXLOC*/ /*_.VALDATA___V1130*/ meltfptr[1129] = (void*)&cdat->dobj_1123__ADD2SBUF_MIXLOC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1123__ADD2SBUF_MIXLOC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1123__ADD2SBUF_MIXLOC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1123__ADD2SBUF_MIXLOC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1123__ADD2SBUF_MIXLOC.obj_hash = 315805570; cdat->dobj_1123__ADD2SBUF_MIXLOC.obj_len = 5; /*inimult dtup_1124__ADD2SBUF_MIXLOC*/ /*_.VALTUP___V1141*/ meltfptr[1140] = (void*)&cdat->dtup_1124__ADD2SBUF_MIXLOC; cdat->dtup_1124__ADD2SBUF_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1124__ADD2SBUF_MIXLOC.nbval = 7; /*inimult dtup_1125__ADD2SBUF_MIXLOC*/ /*_.VALTUP___V1136*/ meltfptr[1135] = (void*)&cdat->dtup_1125__ADD2SBUF_MIXLOC; cdat->dtup_1125__ADD2SBUF_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1125__ADD2SBUF_MIXLOC.nbval = 2; /*^iniobj*/ /*iniobj dobj_1126*/ /*_.VALDATA___V1132*/ meltfptr[1131] = (void*)&cdat->dobj_1126; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1126", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1126", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1126.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1126.obj_num = 0; cdat->dobj_1126.obj_hash = 880961123; cdat->dobj_1126.obj_len = 2; /*iniobj dsym_1127__MIXL*/ /*uniqueobj*/ if (!/*_.VALDATA___V1134*/ meltfptr[1133]) /*_.VALDATA___V1134*/ meltfptr[1133] = (void*)&cdat->dsym_1127__MIXL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1127__MIXL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1127__MIXL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1127__MIXL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1127__MIXL.obj_hash = 555220199; cdat->dsym_1127__MIXL.obj_len = 3; /*inistring dstr_1128__MIXL*/ /*_.VALSTR___V1135*/ meltfptr[1134] = (void*)&cdat->dstr_1128__MIXL; cdat->dstr_1128__MIXL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1128__MIXL.val, "MIXL", sizeof (cdat->dstr_1128__MIXL.val)-1); /*^iniobj*/ /*iniobj dobj_1129*/ /*_.VALDATA___V1133*/ meltfptr[1132] = (void*)&cdat->dobj_1129; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1129", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1129", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1129.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1129.obj_num = 1; cdat->dobj_1129.obj_hash = 168656131; cdat->dobj_1129.obj_len = 2; /*inistring dstr_1130__add2sbufmixloc*/ /*_.VALSTR___V1137*/ meltfptr[1136] = (void*)&cdat->dstr_1130__add2sbufmixloc; cdat->dstr_1130__add2sbufmixloc.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1130__add2sbufmixloc.val, "/*add2sbufmixloc*/ if (melt_magic_discr((melt_ptr_t)(", sizeof (cdat->dstr_1130__add2sbufmixloc.val)-1); /*inistring dstr_1131__OBMAG_MIXL*/ /*_.VALSTR___V1138*/ meltfptr[1137] = (void*)&cdat->dstr_1131__OBMAG_MIXL; cdat->dstr_1131__OBMAG_MIXL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1131__OBMAG_MIXL.val, ")) == OBMAG_MIXLOC) {\n char smallbuf[128];\n location_t loc = melt_location_mixloc ((melt_ptr_t)", sizeof (cdat->dstr_1131__OBMAG_MIXL.val)-1); /*inistring dstr_1132__memset_s*/ /*_.VALSTR___V1139*/ meltfptr[1138] = (void*)&cdat->dstr_1132__memset_s; cdat->dstr_1132__memset_s.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1132__memset_s.val, ");\n memset (smallbuf, 0, sizeof(smallbuf));\n snprintf (smallbuf, sizeof (smallbuf)-1, \n\t\t\t\"{%.120s:%d:%d}\",\n\t\t\tLOCATION_FILE (loc), LOCATION_LINE (loc), LOCATION_COLUMN (loc));\n meltgc_add_strbuf_raw((melt_ptr_t)(", sizeof (cdat->dstr_1132__memset_s.val)-1); /*inistring dstr_1133__smallbuf_*/ /*_.VALSTR___V1140*/ meltfptr[1139] = (void*)&cdat->dstr_1133__smallbuf_; cdat->dstr_1133__smallbuf_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1133__smallbuf_.val, "), smallbuf);\n } /*end add2sbufmixloc*/ ", sizeof (cdat->dstr_1133__smallbuf_.val)-1); /*inistring dstr_1134__ADD2SBUF_MIXLOC*/ /*_.VALSTR___V1131*/ meltfptr[1130] = (void*)&cdat->dstr_1134__ADD2SBUF_MIXLOC; cdat->dstr_1134__ADD2SBUF_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1134__ADD2SBUF_MIXLOC.val, "ADD2SBUF_MIXLOC", sizeof (cdat->dstr_1134__ADD2SBUF_MIXLOC.val)-1); /*iniobj dsym_1135__ADD2SBUF_SHORT_MIXLOC*/ /*uniqueobj*/ if (!/*_.VALDATA___V1142*/ meltfptr[1141]) /*_.VALDATA___V1142*/ meltfptr[1141] = (void*)&cdat->dsym_1135__ADD2SBUF_SHORT_MIXLOC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1135__ADD2SBUF_SHORT_MIXLOC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1135__ADD2SBUF_SHORT_MIXLOC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1135__ADD2SBUF_SHORT_MIXLOC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1135__ADD2SBUF_SHORT_MIXLOC.obj_hash = 439836106; cdat->dsym_1135__ADD2SBUF_SHORT_MIXLOC.obj_len = 3; /*inistring dstr_1136__ADD2SBUF_SHORT_M*/ /*_.VALSTR___V1143*/ meltfptr[1142] = (void*)&cdat->dstr_1136__ADD2SBUF_SHORT_M; cdat->dstr_1136__ADD2SBUF_SHORT_M.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1136__ADD2SBUF_SHORT_M.val, "ADD2SBUF_SHORT_MIXLOC", sizeof (cdat->dstr_1136__ADD2SBUF_SHORT_M.val)-1); MELT_LOCATION("warmelt-base.melt:584:/ iniobj"); /*iniobj dobj_1137__ADD2SBUF_SHORT_MIXLOC*/ /*_.VALDATA___V1144*/ meltfptr[1143] = (void*)&cdat->dobj_1137__ADD2SBUF_SHORT_MIXLOC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1137__ADD2SBUF_SHORT_MIXLOC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1137__ADD2SBUF_SHORT_MIXLOC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1137__ADD2SBUF_SHORT_MIXLOC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1137__ADD2SBUF_SHORT_MIXLOC.obj_hash = 162481097; cdat->dobj_1137__ADD2SBUF_SHORT_MIXLOC.obj_len = 5; /*inimult dtup_1138__ADD2SBUF_SHORT_MIXLOC*/ /*_.VALTUP___V1153*/ meltfptr[1152] = (void*)&cdat->dtup_1138__ADD2SBUF_SHORT_MIXLOC; cdat->dtup_1138__ADD2SBUF_SHORT_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1138__ADD2SBUF_SHORT_MIXLOC.nbval = 7; /*inimult dtup_1139__ADD2SBUF_SHORT_MIXLOC*/ /*_.VALTUP___V1148*/ meltfptr[1147] = (void*)&cdat->dtup_1139__ADD2SBUF_SHORT_MIXLOC; cdat->dtup_1139__ADD2SBUF_SHORT_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1139__ADD2SBUF_SHORT_MIXLOC.nbval = 2; /*^iniobj*/ /*iniobj dobj_1140*/ /*_.VALDATA___V1146*/ meltfptr[1145] = (void*)&cdat->dobj_1140; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1140", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1140", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1140.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1140.obj_num = 0; cdat->dobj_1140.obj_hash = 717246607; cdat->dobj_1140.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1141*/ /*_.VALDATA___V1147*/ meltfptr[1146] = (void*)&cdat->dobj_1141; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1141", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1141", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1141.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1141.obj_num = 1; cdat->dobj_1141.obj_hash = 87258558; cdat->dobj_1141.obj_len = 2; /*inistring dstr_1142__add2sbufshortm*/ /*_.VALSTR___V1149*/ meltfptr[1148] = (void*)&cdat->dstr_1142__add2sbufshortm; cdat->dstr_1142__add2sbufshortm.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1142__add2sbufshortm.val, "/*add2sbufshortmixloc*/ if (melt_magic_discr((melt_ptr_t)(", sizeof (cdat->dstr_1142__add2sbufshortm.val)-1); /*inistring dstr_1143__OBMAG_MIXL*/ /*_.VALSTR___V1150*/ meltfptr[1149] = (void*)&cdat->dstr_1143__OBMAG_MIXL; cdat->dstr_1143__OBMAG_MIXL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1143__OBMAG_MIXL.val, ")) == OBMAG_MIXLOC) {\n location_t loc = melt_location_mixloc((melt_ptr_t)", sizeof (cdat->dstr_1143__OBMAG_MIXL.val)-1); /*inistring dstr_1144__meltgc_strb*/ /*_.VALSTR___V1151*/ meltfptr[1150] = (void*)&cdat->dstr_1144__meltgc_strb; cdat->dstr_1144__meltgc_strb.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1144__meltgc_strb.val, ");\n meltgc_strbuf_printf((melt_ptr_t)(", sizeof (cdat->dstr_1144__meltgc_strb.val)-1); /*inistring dstr_1145__s_d_d_*/ /*_.VALSTR___V1152*/ meltfptr[1151] = (void*)&cdat->dstr_1145__s_d_d_; cdat->dstr_1145__s_d_d_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1145__s_d_d_.val, "), \"{%s:%d:%d}\", \n\t\t lbasename(LOCATION_FILE (loc)), \n\t\t LOCATION_LINE (loc), LOCATION_COLUMN (loc));\n } /*end add2sbufshortmixloc*/", sizeof (cdat->dstr_1145__s_d_d_.val)-1); /*inistring dstr_1146__ADD2SBUF_SHORT_M*/ /*_.VALSTR___V1145*/ meltfptr[1144] = (void*)&cdat->dstr_1146__ADD2SBUF_SHORT_M; cdat->dstr_1146__ADD2SBUF_SHORT_M.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1146__ADD2SBUF_SHORT_M.val, "ADD2SBUF_SHORT_MIXLOC", sizeof (cdat->dstr_1146__ADD2SBUF_SHORT_M.val)-1); /*iniobj dsym_1147__ADD2SBUF_TEXI_MIXLOC*/ /*uniqueobj*/ if (!/*_.VALDATA___V1154*/ meltfptr[1153]) /*_.VALDATA___V1154*/ meltfptr[1153] = (void*)&cdat->dsym_1147__ADD2SBUF_TEXI_MIXLOC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1147__ADD2SBUF_TEXI_MIXLOC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1147__ADD2SBUF_TEXI_MIXLOC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1147__ADD2SBUF_TEXI_MIXLOC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1147__ADD2SBUF_TEXI_MIXLOC.obj_hash = 702061137; cdat->dsym_1147__ADD2SBUF_TEXI_MIXLOC.obj_len = 3; /*inistring dstr_1148__ADD2SBUF_TEXI_MI*/ /*_.VALSTR___V1155*/ meltfptr[1154] = (void*)&cdat->dstr_1148__ADD2SBUF_TEXI_MI; cdat->dstr_1148__ADD2SBUF_TEXI_MI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1148__ADD2SBUF_TEXI_MI.val, "ADD2SBUF_TEXI_MIXLOC", sizeof (cdat->dstr_1148__ADD2SBUF_TEXI_MI.val)-1); MELT_LOCATION("warmelt-base.melt:593:/ iniobj"); /*iniobj dobj_1149__ADD2SBUF_TEXI_MIXLOC*/ /*_.VALDATA___V1156*/ meltfptr[1155] = (void*)&cdat->dobj_1149__ADD2SBUF_TEXI_MIXLOC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1149__ADD2SBUF_TEXI_MIXLOC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1149__ADD2SBUF_TEXI_MIXLOC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1149__ADD2SBUF_TEXI_MIXLOC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1149__ADD2SBUF_TEXI_MIXLOC.obj_hash = 671723067; cdat->dobj_1149__ADD2SBUF_TEXI_MIXLOC.obj_len = 5; /*inimult dtup_1150__ADD2SBUF_TEXI_MIXLOC*/ /*_.VALTUP___V1165*/ meltfptr[1164] = (void*)&cdat->dtup_1150__ADD2SBUF_TEXI_MIXLOC; cdat->dtup_1150__ADD2SBUF_TEXI_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1150__ADD2SBUF_TEXI_MIXLOC.nbval = 7; /*inimult dtup_1151__ADD2SBUF_TEXI_MIXLOC*/ /*_.VALTUP___V1160*/ meltfptr[1159] = (void*)&cdat->dtup_1151__ADD2SBUF_TEXI_MIXLOC; cdat->dtup_1151__ADD2SBUF_TEXI_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1151__ADD2SBUF_TEXI_MIXLOC.nbval = 2; /*^iniobj*/ /*iniobj dobj_1152*/ /*_.VALDATA___V1158*/ meltfptr[1157] = (void*)&cdat->dobj_1152; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1152", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1152", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1152.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1152.obj_num = 0; cdat->dobj_1152.obj_hash = 309084858; cdat->dobj_1152.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1153*/ /*_.VALDATA___V1159*/ meltfptr[1158] = (void*)&cdat->dobj_1153; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1153", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1153", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1153.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1153.obj_num = 1; cdat->dobj_1153.obj_hash = 834853233; cdat->dobj_1153.obj_len = 2; /*inistring dstr_1154__add2sbufteximi*/ /*_.VALSTR___V1161*/ meltfptr[1160] = (void*)&cdat->dstr_1154__add2sbufteximi; cdat->dstr_1154__add2sbufteximi.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1154__add2sbufteximi.val, "/*add2sbufteximixloc*/ if (melt_magic_discr((melt_ptr_t)(", sizeof (cdat->dstr_1154__add2sbufteximi.val)-1); /*inistring dstr_1155__OBMAG_MIXL*/ /*_.VALSTR___V1162*/ meltfptr[1161] = (void*)&cdat->dstr_1155__OBMAG_MIXL; cdat->dstr_1155__OBMAG_MIXL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1155__OBMAG_MIXL.val, ")) == OBMAG_MIXLOC) {\n location_t loc = melt_location_mixloc((melt_ptr_t)", sizeof (cdat->dstr_1155__OBMAG_MIXL.val)-1); /*inistring dstr_1156__meltgc_strb*/ /*_.VALSTR___V1163*/ meltfptr[1162] = (void*)&cdat->dstr_1156__meltgc_strb; cdat->dstr_1156__meltgc_strb.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1156__meltgc_strb.val, ");\n meltgc_strbuf_printf((melt_ptr_t)(", sizeof (cdat->dstr_1156__meltgc_strb.val)-1); /*inistring dstr_1157__file_file_*/ /*_.VALSTR___V1164*/ meltfptr[1163] = (void*)&cdat->dstr_1157__file_file_; cdat->dstr_1157__file_file_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1157__file_file_.val, "), \"file @file{%s}, line %d\", \n\t\t lbasename (LOCATION_FILE (loc)), \n\t\t LOCATION_LINE (loc)); \n } /*end add2sbufteximixloc*/", sizeof (cdat->dstr_1157__file_file_.val)-1); /*inistring dstr_1158__ADD2SBUF_TEXI_MI*/ /*_.VALSTR___V1157*/ meltfptr[1156] = (void*)&cdat->dstr_1158__ADD2SBUF_TEXI_MI; cdat->dstr_1158__ADD2SBUF_TEXI_MI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1158__ADD2SBUF_TEXI_MI.val, "ADD2SBUF_TEXI_MIXLOC", sizeof (cdat->dstr_1158__ADD2SBUF_TEXI_MI.val)-1); /*iniobj dsym_1159__ADD2SBUF_INDENT*/ /*uniqueobj*/ if (!/*_.VALDATA___V1166*/ meltfptr[1165]) /*_.VALDATA___V1166*/ meltfptr[1165] = (void*)&cdat->dsym_1159__ADD2SBUF_INDENT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1159__ADD2SBUF_INDENT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1159__ADD2SBUF_INDENT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1159__ADD2SBUF_INDENT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1159__ADD2SBUF_INDENT.obj_hash = 941133477; cdat->dsym_1159__ADD2SBUF_INDENT.obj_len = 3; /*inistring dstr_1160__ADD2SBUF_INDENT*/ /*_.VALSTR___V1167*/ meltfptr[1166] = (void*)&cdat->dstr_1160__ADD2SBUF_INDENT; cdat->dstr_1160__ADD2SBUF_INDENT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1160__ADD2SBUF_INDENT.val, "ADD2SBUF_INDENT", sizeof (cdat->dstr_1160__ADD2SBUF_INDENT.val)-1); MELT_LOCATION("warmelt-base.melt:603:/ iniobj"); /*iniobj dobj_1161__ADD2SBUF_INDENT*/ /*_.VALDATA___V1168*/ meltfptr[1167] = (void*)&cdat->dobj_1161__ADD2SBUF_INDENT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1161__ADD2SBUF_INDENT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1161__ADD2SBUF_INDENT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1161__ADD2SBUF_INDENT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1161__ADD2SBUF_INDENT.obj_hash = 241300536; cdat->dobj_1161__ADD2SBUF_INDENT.obj_len = 5; /*inimult dtup_1162__ADD2SBUF_INDENT*/ /*_.VALTUP___V1178*/ meltfptr[1177] = (void*)&cdat->dtup_1162__ADD2SBUF_INDENT; cdat->dtup_1162__ADD2SBUF_INDENT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1162__ADD2SBUF_INDENT.nbval = 5; /*inimult dtup_1163__ADD2SBUF_INDENT*/ /*_.VALTUP___V1174*/ meltfptr[1173] = (void*)&cdat->dtup_1163__ADD2SBUF_INDENT; cdat->dtup_1163__ADD2SBUF_INDENT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1163__ADD2SBUF_INDENT.nbval = 2; /*^iniobj*/ /*iniobj dobj_1164*/ /*_.VALDATA___V1170*/ meltfptr[1169] = (void*)&cdat->dobj_1164; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1164", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1164", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1164.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1164.obj_num = 0; cdat->dobj_1164.obj_hash = 352414109; cdat->dobj_1164.obj_len = 2; /*iniobj dsym_1165__DEPTH*/ /*uniqueobj*/ if (!/*_.VALDATA___V1172*/ meltfptr[1171]) /*_.VALDATA___V1172*/ meltfptr[1171] = (void*)&cdat->dsym_1165__DEPTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1165__DEPTH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1165__DEPTH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1165__DEPTH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1165__DEPTH.obj_hash = 52029444; cdat->dsym_1165__DEPTH.obj_len = 3; /*inistring dstr_1166__DEPTH*/ /*_.VALSTR___V1173*/ meltfptr[1172] = (void*)&cdat->dstr_1166__DEPTH; cdat->dstr_1166__DEPTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1166__DEPTH.val, "DEPTH", sizeof (cdat->dstr_1166__DEPTH.val)-1); /*^iniobj*/ /*iniobj dobj_1167*/ /*_.VALDATA___V1171*/ meltfptr[1170] = (void*)&cdat->dobj_1167; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1167", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1167", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1167.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1167.obj_num = 1; cdat->dobj_1167.obj_hash = 346582506; cdat->dobj_1167.obj_len = 2; /*inistring dstr_1168__meltgc_strbuf_ad*/ /*_.VALSTR___V1175*/ meltfptr[1174] = (void*)&cdat->dstr_1168__meltgc_strbuf_ad; cdat->dstr_1168__meltgc_strbuf_ad.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1168__meltgc_strbuf_ad.val, "meltgc_strbuf_add_indent((melt_ptr_t)(", sizeof (cdat->dstr_1168__meltgc_strbuf_ad.val)-1); /*inistring dstr_1169__*/ /*_.VALSTR___V1176*/ meltfptr[1175] = (void*)&cdat->dstr_1169__; cdat->dstr_1169__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1169__.val, "), (", sizeof (cdat->dstr_1169__.val)-1); /*inistring dstr_1170__64_*/ /*_.VALSTR___V1177*/ meltfptr[1176] = (void*)&cdat->dstr_1170__64_; cdat->dstr_1170__64_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1170__64_.val, "), 64)", sizeof (cdat->dstr_1170__64_.val)-1); /*inistring dstr_1171__ADD2SBUF_INDENT*/ /*_.VALSTR___V1169*/ meltfptr[1168] = (void*)&cdat->dstr_1171__ADD2SBUF_INDENT; cdat->dstr_1171__ADD2SBUF_INDENT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1171__ADD2SBUF_INDENT.val, "ADD2SBUF_INDENT", sizeof (cdat->dstr_1171__ADD2SBUF_INDENT.val)-1); /*iniobj dsym_1172__ADD2SBUF_INDENTNL*/ /*uniqueobj*/ if (!/*_.VALDATA___V1179*/ meltfptr[1178]) /*_.VALDATA___V1179*/ meltfptr[1178] = (void*)&cdat->dsym_1172__ADD2SBUF_INDENTNL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1172__ADD2SBUF_INDENTNL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1172__ADD2SBUF_INDENTNL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1172__ADD2SBUF_INDENTNL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1172__ADD2SBUF_INDENTNL.obj_hash = 65511433; cdat->dsym_1172__ADD2SBUF_INDENTNL.obj_len = 3; /*inistring dstr_1173__ADD2SBUF_INDENTN*/ /*_.VALSTR___V1180*/ meltfptr[1179] = (void*)&cdat->dstr_1173__ADD2SBUF_INDENTN; cdat->dstr_1173__ADD2SBUF_INDENTN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1173__ADD2SBUF_INDENTN.val, "ADD2SBUF_INDENTNL", sizeof (cdat->dstr_1173__ADD2SBUF_INDENTN.val)-1); MELT_LOCATION("warmelt-base.melt:609:/ iniobj"); /*iniobj dobj_1174__ADD2SBUF_INDENTNL*/ /*_.VALDATA___V1181*/ meltfptr[1180] = (void*)&cdat->dobj_1174__ADD2SBUF_INDENTNL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1174__ADD2SBUF_INDENTNL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1174__ADD2SBUF_INDENTNL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1174__ADD2SBUF_INDENTNL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1174__ADD2SBUF_INDENTNL.obj_hash = 403283474; cdat->dobj_1174__ADD2SBUF_INDENTNL.obj_len = 5; /*inimult dtup_1175__ADD2SBUF_INDENTNL*/ /*_.VALTUP___V1189*/ meltfptr[1188] = (void*)&cdat->dtup_1175__ADD2SBUF_INDENTNL; cdat->dtup_1175__ADD2SBUF_INDENTNL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1175__ADD2SBUF_INDENTNL.nbval = 5; /*inimult dtup_1176__ADD2SBUF_INDENTNL*/ /*_.VALTUP___V1185*/ meltfptr[1184] = (void*)&cdat->dtup_1176__ADD2SBUF_INDENTNL; cdat->dtup_1176__ADD2SBUF_INDENTNL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1176__ADD2SBUF_INDENTNL.nbval = 2; /*^iniobj*/ /*iniobj dobj_1177*/ /*_.VALDATA___V1183*/ meltfptr[1182] = (void*)&cdat->dobj_1177; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1177", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1177", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1177.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1177.obj_num = 0; cdat->dobj_1177.obj_hash = 78720563; cdat->dobj_1177.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1178*/ /*_.VALDATA___V1184*/ meltfptr[1183] = (void*)&cdat->dobj_1178; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1178", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1178", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1178.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1178.obj_num = 1; cdat->dobj_1178.obj_hash = 114688159; cdat->dobj_1178.obj_len = 2; /*inistring dstr_1179__meltgc_strbuf_ad*/ /*_.VALSTR___V1186*/ meltfptr[1185] = (void*)&cdat->dstr_1179__meltgc_strbuf_ad; cdat->dstr_1179__meltgc_strbuf_ad.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1179__meltgc_strbuf_ad.val, "meltgc_strbuf_add_indent((melt_ptr_t)(", sizeof (cdat->dstr_1179__meltgc_strbuf_ad.val)-1); /*inistring dstr_1180__*/ /*_.VALSTR___V1187*/ meltfptr[1186] = (void*)&cdat->dstr_1180__; cdat->dstr_1180__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1180__.val, "), (", sizeof (cdat->dstr_1180__.val)-1); /*inistring dstr_1181__0_*/ /*_.VALSTR___V1188*/ meltfptr[1187] = (void*)&cdat->dstr_1181__0_; cdat->dstr_1181__0_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1181__0_.val, "), 0)", sizeof (cdat->dstr_1181__0_.val)-1); /*inistring dstr_1182__ADD2SBUF_INDENTN*/ /*_.VALSTR___V1182*/ meltfptr[1181] = (void*)&cdat->dstr_1182__ADD2SBUF_INDENTN; cdat->dstr_1182__ADD2SBUF_INDENTN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1182__ADD2SBUF_INDENTN.val, "ADD2SBUF_INDENTNL", sizeof (cdat->dstr_1182__ADD2SBUF_INDENTN.val)-1); /*iniobj dsym_1183__ADD2SBUF_SBUF*/ /*uniqueobj*/ if (!/*_.VALDATA___V1190*/ meltfptr[1189]) /*_.VALDATA___V1190*/ meltfptr[1189] = (void*)&cdat->dsym_1183__ADD2SBUF_SBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1183__ADD2SBUF_SBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1183__ADD2SBUF_SBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1183__ADD2SBUF_SBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1183__ADD2SBUF_SBUF.obj_hash = 810387895; cdat->dsym_1183__ADD2SBUF_SBUF.obj_len = 3; /*inistring dstr_1184__ADD2SBUF_SBUF*/ /*_.VALSTR___V1191*/ meltfptr[1190] = (void*)&cdat->dstr_1184__ADD2SBUF_SBUF; cdat->dstr_1184__ADD2SBUF_SBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1184__ADD2SBUF_SBUF.val, "ADD2SBUF_SBUF", sizeof (cdat->dstr_1184__ADD2SBUF_SBUF.val)-1); MELT_LOCATION("warmelt-base.melt:615:/ iniobj"); /*iniobj dobj_1185__ADD2SBUF_SBUF*/ /*_.VALDATA___V1192*/ meltfptr[1191] = (void*)&cdat->dobj_1185__ADD2SBUF_SBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1185__ADD2SBUF_SBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1185__ADD2SBUF_SBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1185__ADD2SBUF_SBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1185__ADD2SBUF_SBUF.obj_hash = 403492512; cdat->dobj_1185__ADD2SBUF_SBUF.obj_len = 5; /*inimult dtup_1186__ADD2SBUF_SBUF*/ /*_.VALTUP___V1202*/ meltfptr[1201] = (void*)&cdat->dtup_1186__ADD2SBUF_SBUF; cdat->dtup_1186__ADD2SBUF_SBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1186__ADD2SBUF_SBUF.nbval = 5; /*inimult dtup_1187__ADD2SBUF_SBUF*/ /*_.VALTUP___V1198*/ meltfptr[1197] = (void*)&cdat->dtup_1187__ADD2SBUF_SBUF; cdat->dtup_1187__ADD2SBUF_SBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1187__ADD2SBUF_SBUF.nbval = 2; /*^iniobj*/ /*iniobj dobj_1188*/ /*_.VALDATA___V1194*/ meltfptr[1193] = (void*)&cdat->dobj_1188; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1188", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1188", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1188.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1188.obj_num = 0; cdat->dobj_1188.obj_hash = 877966927; cdat->dobj_1188.obj_len = 2; /*iniobj dsym_1189__ASBUF*/ /*uniqueobj*/ if (!/*_.VALDATA___V1196*/ meltfptr[1195]) /*_.VALDATA___V1196*/ meltfptr[1195] = (void*)&cdat->dsym_1189__ASBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1189__ASBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1189__ASBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1189__ASBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1189__ASBUF.obj_hash = 54079247; cdat->dsym_1189__ASBUF.obj_len = 3; /*inistring dstr_1190__ASBUF*/ /*_.VALSTR___V1197*/ meltfptr[1196] = (void*)&cdat->dstr_1190__ASBUF; cdat->dstr_1190__ASBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1190__ASBUF.val, "ASBUF", sizeof (cdat->dstr_1190__ASBUF.val)-1); /*^iniobj*/ /*iniobj dobj_1191*/ /*_.VALDATA___V1195*/ meltfptr[1194] = (void*)&cdat->dobj_1191; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1191", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1191", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1191.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1191.obj_num = 1; cdat->dobj_1191.obj_hash = 129526845; cdat->dobj_1191.obj_len = 2; /*inistring dstr_1192__meltgc_add_strbu*/ /*_.VALSTR___V1199*/ meltfptr[1198] = (void*)&cdat->dstr_1192__meltgc_add_strbu; cdat->dstr_1192__meltgc_add_strbu.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1192__meltgc_add_strbu.val, "meltgc_add_strbuf((melt_ptr_t)(", sizeof (cdat->dstr_1192__meltgc_add_strbu.val)-1); /*inistring dstr_1193__melt_strbuf_s*/ /*_.VALSTR___V1200*/ meltfptr[1199] = (void*)&cdat->dstr_1193__melt_strbuf_s; cdat->dstr_1193__melt_strbuf_s.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1193__melt_strbuf_s.val, "), melt_strbuf_str(", sizeof (cdat->dstr_1193__melt_strbuf_s.val)-1); /*inistring dstr_1194__*/ /*_.VALSTR___V1201*/ meltfptr[1200] = (void*)&cdat->dstr_1194__; cdat->dstr_1194__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1194__.val, "))", sizeof (cdat->dstr_1194__.val)-1); /*inistring dstr_1195__ADD2SBUF_SBUF*/ /*_.VALSTR___V1193*/ meltfptr[1192] = (void*)&cdat->dstr_1195__ADD2SBUF_SBUF; cdat->dstr_1195__ADD2SBUF_SBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1195__ADD2SBUF_SBUF.val, "ADD2SBUF_SBUF", sizeof (cdat->dstr_1195__ADD2SBUF_SBUF.val)-1); /*iniobj dsym_1196__ADD2SBUF_CENCSTRING*/ /*uniqueobj*/ if (!/*_.VALDATA___V1203*/ meltfptr[1202]) /*_.VALDATA___V1203*/ meltfptr[1202] = (void*)&cdat->dsym_1196__ADD2SBUF_CENCSTRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1196__ADD2SBUF_CENCSTRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1196__ADD2SBUF_CENCSTRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1196__ADD2SBUF_CENCSTRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1196__ADD2SBUF_CENCSTRING.obj_hash = 997878889; cdat->dsym_1196__ADD2SBUF_CENCSTRING.obj_len = 3; /*inistring dstr_1197__ADD2SBUF_CENCSTR*/ /*_.VALSTR___V1204*/ meltfptr[1203] = (void*)&cdat->dstr_1197__ADD2SBUF_CENCSTR; cdat->dstr_1197__ADD2SBUF_CENCSTR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1197__ADD2SBUF_CENCSTR.val, "ADD2SBUF_CENCSTRING", sizeof (cdat->dstr_1197__ADD2SBUF_CENCSTR.val)-1); MELT_LOCATION("warmelt-base.melt:620:/ iniobj"); /*iniobj dobj_1198__ADD2SBUF_CENCSTRING*/ /*_.VALDATA___V1205*/ meltfptr[1204] = (void*)&cdat->dobj_1198__ADD2SBUF_CENCSTRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1198__ADD2SBUF_CENCSTRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1198__ADD2SBUF_CENCSTRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1198__ADD2SBUF_CENCSTRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1198__ADD2SBUF_CENCSTRING.obj_hash = 48637521; cdat->dobj_1198__ADD2SBUF_CENCSTRING.obj_len = 5; /*inimult dtup_1199__ADD2SBUF_CENCSTRING*/ /*_.VALTUP___V1213*/ meltfptr[1212] = (void*)&cdat->dtup_1199__ADD2SBUF_CENCSTRING; cdat->dtup_1199__ADD2SBUF_CENCSTRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1199__ADD2SBUF_CENCSTRING.nbval = 5; /*inimult dtup_1200__ADD2SBUF_CENCSTRING*/ /*_.VALTUP___V1209*/ meltfptr[1208] = (void*)&cdat->dtup_1200__ADD2SBUF_CENCSTRING; cdat->dtup_1200__ADD2SBUF_CENCSTRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1200__ADD2SBUF_CENCSTRING.nbval = 2; /*^iniobj*/ /*iniobj dobj_1201*/ /*_.VALDATA___V1207*/ meltfptr[1206] = (void*)&cdat->dobj_1201; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1201", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1201", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1201.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1201.obj_num = 0; cdat->dobj_1201.obj_hash = 231665306; cdat->dobj_1201.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1202*/ /*_.VALDATA___V1208*/ meltfptr[1207] = (void*)&cdat->dobj_1202; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1202", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1202", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1202.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1202.obj_num = 1; cdat->dobj_1202.obj_hash = 883864527; cdat->dobj_1202.obj_len = 2; /*inistring dstr_1203__meltgc_add_strbu*/ /*_.VALSTR___V1210*/ meltfptr[1209] = (void*)&cdat->dstr_1203__meltgc_add_strbu; cdat->dstr_1203__meltgc_add_strbu.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1203__meltgc_add_strbu.val, "meltgc_add_strbuf_cstr((melt_ptr_t)(", sizeof (cdat->dstr_1203__meltgc_add_strbu.val)-1); /*inistring dstr_1204__melt_string_s*/ /*_.VALSTR___V1211*/ meltfptr[1210] = (void*)&cdat->dstr_1204__melt_string_s; cdat->dstr_1204__melt_string_s.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1204__melt_string_s.val, "), melt_string_str((melt_ptr_t)(", sizeof (cdat->dstr_1204__melt_string_s.val)-1); /*inistring dstr_1205__*/ /*_.VALSTR___V1212*/ meltfptr[1211] = (void*)&cdat->dstr_1205__; cdat->dstr_1205__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1205__.val, ")))", sizeof (cdat->dstr_1205__.val)-1); /*inistring dstr_1206__ADD2SBUF_CENCSTR*/ /*_.VALSTR___V1206*/ meltfptr[1205] = (void*)&cdat->dstr_1206__ADD2SBUF_CENCSTR; cdat->dstr_1206__ADD2SBUF_CENCSTR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1206__ADD2SBUF_CENCSTR.val, "ADD2SBUF_CENCSTRING", sizeof (cdat->dstr_1206__ADD2SBUF_CENCSTR.val)-1); /*iniobj dsym_1207__ADD2SBUF_CENCSTRBUF*/ /*uniqueobj*/ if (!/*_.VALDATA___V1214*/ meltfptr[1213]) /*_.VALDATA___V1214*/ meltfptr[1213] = (void*)&cdat->dsym_1207__ADD2SBUF_CENCSTRBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1207__ADD2SBUF_CENCSTRBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1207__ADD2SBUF_CENCSTRBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1207__ADD2SBUF_CENCSTRBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1207__ADD2SBUF_CENCSTRBUF.obj_hash = 83037887; cdat->dsym_1207__ADD2SBUF_CENCSTRBUF.obj_len = 3; /*inistring dstr_1208__ADD2SBUF_CENCSTR*/ /*_.VALSTR___V1215*/ meltfptr[1214] = (void*)&cdat->dstr_1208__ADD2SBUF_CENCSTR; cdat->dstr_1208__ADD2SBUF_CENCSTR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1208__ADD2SBUF_CENCSTR.val, "ADD2SBUF_CENCSTRBUF", sizeof (cdat->dstr_1208__ADD2SBUF_CENCSTR.val)-1); MELT_LOCATION("warmelt-base.melt:625:/ iniobj"); /*iniobj dobj_1209__ADD2SBUF_CENCSTRBUF*/ /*_.VALDATA___V1216*/ meltfptr[1215] = (void*)&cdat->dobj_1209__ADD2SBUF_CENCSTRBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1209__ADD2SBUF_CENCSTRBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1209__ADD2SBUF_CENCSTRBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1209__ADD2SBUF_CENCSTRBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1209__ADD2SBUF_CENCSTRBUF.obj_hash = 821605661; cdat->dobj_1209__ADD2SBUF_CENCSTRBUF.obj_len = 5; /*inimult dtup_1210__ADD2SBUF_CENCSTRBUF*/ /*_.VALTUP___V1224*/ meltfptr[1223] = (void*)&cdat->dtup_1210__ADD2SBUF_CENCSTRBUF; cdat->dtup_1210__ADD2SBUF_CENCSTRBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1210__ADD2SBUF_CENCSTRBUF.nbval = 5; /*inimult dtup_1211__ADD2SBUF_CENCSTRBUF*/ /*_.VALTUP___V1220*/ meltfptr[1219] = (void*)&cdat->dtup_1211__ADD2SBUF_CENCSTRBUF; cdat->dtup_1211__ADD2SBUF_CENCSTRBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1211__ADD2SBUF_CENCSTRBUF.nbval = 2; /*^iniobj*/ /*iniobj dobj_1212*/ /*_.VALDATA___V1218*/ meltfptr[1217] = (void*)&cdat->dobj_1212; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1212", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1212", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1212.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1212.obj_num = 0; cdat->dobj_1212.obj_hash = 173034764; cdat->dobj_1212.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1213*/ /*_.VALDATA___V1219*/ meltfptr[1218] = (void*)&cdat->dobj_1213; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1213", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1213", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1213.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1213.obj_num = 1; cdat->dobj_1213.obj_hash = 659369489; cdat->dobj_1213.obj_len = 2; /*inistring dstr_1214__meltgc_add_strbu*/ /*_.VALSTR___V1221*/ meltfptr[1220] = (void*)&cdat->dstr_1214__meltgc_add_strbu; cdat->dstr_1214__meltgc_add_strbu.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1214__meltgc_add_strbu.val, "meltgc_add_strbuf_cstr((melt_ptr_t)(", sizeof (cdat->dstr_1214__meltgc_add_strbu.val)-1); /*inistring dstr_1215__melt_strbuf_s*/ /*_.VALSTR___V1222*/ meltfptr[1221] = (void*)&cdat->dstr_1215__melt_strbuf_s; cdat->dstr_1215__melt_strbuf_s.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1215__melt_strbuf_s.val, "), melt_strbuf_str((melt_ptr_t)(", sizeof (cdat->dstr_1215__melt_strbuf_s.val)-1); /*inistring dstr_1216__*/ /*_.VALSTR___V1223*/ meltfptr[1222] = (void*)&cdat->dstr_1216__; cdat->dstr_1216__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1216__.val, ")))", sizeof (cdat->dstr_1216__.val)-1); /*inistring dstr_1217__ADD2SBUF_CENCSTR*/ /*_.VALSTR___V1217*/ meltfptr[1216] = (void*)&cdat->dstr_1217__ADD2SBUF_CENCSTR; cdat->dstr_1217__ADD2SBUF_CENCSTR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1217__ADD2SBUF_CENCSTR.val, "ADD2SBUF_CENCSTRBUF", sizeof (cdat->dstr_1217__ADD2SBUF_CENCSTR.val)-1); /*iniobj dsym_1218__ADD2SBUF_CCOMSTRING*/ /*uniqueobj*/ if (!/*_.VALDATA___V1225*/ meltfptr[1224]) /*_.VALDATA___V1225*/ meltfptr[1224] = (void*)&cdat->dsym_1218__ADD2SBUF_CCOMSTRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1218__ADD2SBUF_CCOMSTRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1218__ADD2SBUF_CCOMSTRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1218__ADD2SBUF_CCOMSTRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1218__ADD2SBUF_CCOMSTRING.obj_hash = 943641578; cdat->dsym_1218__ADD2SBUF_CCOMSTRING.obj_len = 3; /*inistring dstr_1219__ADD2SBUF_CCOMSTR*/ /*_.VALSTR___V1226*/ meltfptr[1225] = (void*)&cdat->dstr_1219__ADD2SBUF_CCOMSTR; cdat->dstr_1219__ADD2SBUF_CCOMSTR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1219__ADD2SBUF_CCOMSTR.val, "ADD2SBUF_CCOMSTRING", sizeof (cdat->dstr_1219__ADD2SBUF_CCOMSTR.val)-1); MELT_LOCATION("warmelt-base.melt:630:/ iniobj"); /*iniobj dobj_1220__ADD2SBUF_CCOMSTRING*/ /*_.VALDATA___V1227*/ meltfptr[1226] = (void*)&cdat->dobj_1220__ADD2SBUF_CCOMSTRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1220__ADD2SBUF_CCOMSTRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1220__ADD2SBUF_CCOMSTRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1220__ADD2SBUF_CCOMSTRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1220__ADD2SBUF_CCOMSTRING.obj_hash = 848379847; cdat->dobj_1220__ADD2SBUF_CCOMSTRING.obj_len = 5; /*inimult dtup_1221__ADD2SBUF_CCOMSTRING*/ /*_.VALTUP___V1235*/ meltfptr[1234] = (void*)&cdat->dtup_1221__ADD2SBUF_CCOMSTRING; cdat->dtup_1221__ADD2SBUF_CCOMSTRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1221__ADD2SBUF_CCOMSTRING.nbval = 5; /*inimult dtup_1222__ADD2SBUF_CCOMSTRING*/ /*_.VALTUP___V1231*/ meltfptr[1230] = (void*)&cdat->dtup_1222__ADD2SBUF_CCOMSTRING; cdat->dtup_1222__ADD2SBUF_CCOMSTRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1222__ADD2SBUF_CCOMSTRING.nbval = 2; /*^iniobj*/ /*iniobj dobj_1223*/ /*_.VALDATA___V1229*/ meltfptr[1228] = (void*)&cdat->dobj_1223; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1223", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1223", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1223.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1223.obj_num = 0; cdat->dobj_1223.obj_hash = 210597926; cdat->dobj_1223.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1224*/ /*_.VALDATA___V1230*/ meltfptr[1229] = (void*)&cdat->dobj_1224; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1224", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1224", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1224.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1224.obj_num = 1; cdat->dobj_1224.obj_hash = 585184528; cdat->dobj_1224.obj_len = 2; /*inistring dstr_1225__meltgc_add_strbu*/ /*_.VALSTR___V1232*/ meltfptr[1231] = (void*)&cdat->dstr_1225__meltgc_add_strbu; cdat->dstr_1225__meltgc_add_strbu.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1225__meltgc_add_strbu.val, "meltgc_add_strbuf_ccomment((melt_ptr_t)(", sizeof (cdat->dstr_1225__meltgc_add_strbu.val)-1); /*inistring dstr_1226__melt_string_s*/ /*_.VALSTR___V1233*/ meltfptr[1232] = (void*)&cdat->dstr_1226__melt_string_s; cdat->dstr_1226__melt_string_s.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1226__melt_string_s.val, "), melt_string_str((melt_ptr_t)(", sizeof (cdat->dstr_1226__melt_string_s.val)-1); /*inistring dstr_1227__*/ /*_.VALSTR___V1234*/ meltfptr[1233] = (void*)&cdat->dstr_1227__; cdat->dstr_1227__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1227__.val, ")))", sizeof (cdat->dstr_1227__.val)-1); /*inistring dstr_1228__ADD2SBUF_CCOMSTR*/ /*_.VALSTR___V1228*/ meltfptr[1227] = (void*)&cdat->dstr_1228__ADD2SBUF_CCOMSTR; cdat->dstr_1228__ADD2SBUF_CCOMSTR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1228__ADD2SBUF_CCOMSTR.val, "ADD2SBUF_CCOMSTRING", sizeof (cdat->dstr_1228__ADD2SBUF_CCOMSTR.val)-1); /*iniobj dsym_1229__ADD2SBUF_CCOMSTRBUF*/ /*uniqueobj*/ if (!/*_.VALDATA___V1236*/ meltfptr[1235]) /*_.VALDATA___V1236*/ meltfptr[1235] = (void*)&cdat->dsym_1229__ADD2SBUF_CCOMSTRBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1229__ADD2SBUF_CCOMSTRBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1229__ADD2SBUF_CCOMSTRBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1229__ADD2SBUF_CCOMSTRBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1229__ADD2SBUF_CCOMSTRBUF.obj_hash = 878484121; cdat->dsym_1229__ADD2SBUF_CCOMSTRBUF.obj_len = 3; /*inistring dstr_1230__ADD2SBUF_CCOMSTR*/ /*_.VALSTR___V1237*/ meltfptr[1236] = (void*)&cdat->dstr_1230__ADD2SBUF_CCOMSTR; cdat->dstr_1230__ADD2SBUF_CCOMSTR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1230__ADD2SBUF_CCOMSTR.val, "ADD2SBUF_CCOMSTRBUF", sizeof (cdat->dstr_1230__ADD2SBUF_CCOMSTR.val)-1); MELT_LOCATION("warmelt-base.melt:635:/ iniobj"); /*iniobj dobj_1231__ADD2SBUF_CCOMSTRBUF*/ /*_.VALDATA___V1238*/ meltfptr[1237] = (void*)&cdat->dobj_1231__ADD2SBUF_CCOMSTRBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1231__ADD2SBUF_CCOMSTRBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1231__ADD2SBUF_CCOMSTRBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1231__ADD2SBUF_CCOMSTRBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1231__ADD2SBUF_CCOMSTRBUF.obj_hash = 56480007; cdat->dobj_1231__ADD2SBUF_CCOMSTRBUF.obj_len = 5; /*inimult dtup_1232__ADD2SBUF_CCOMSTRBUF*/ /*_.VALTUP___V1246*/ meltfptr[1245] = (void*)&cdat->dtup_1232__ADD2SBUF_CCOMSTRBUF; cdat->dtup_1232__ADD2SBUF_CCOMSTRBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1232__ADD2SBUF_CCOMSTRBUF.nbval = 5; /*inimult dtup_1233__ADD2SBUF_CCOMSTRBUF*/ /*_.VALTUP___V1242*/ meltfptr[1241] = (void*)&cdat->dtup_1233__ADD2SBUF_CCOMSTRBUF; cdat->dtup_1233__ADD2SBUF_CCOMSTRBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1233__ADD2SBUF_CCOMSTRBUF.nbval = 2; /*^iniobj*/ /*iniobj dobj_1234*/ /*_.VALDATA___V1240*/ meltfptr[1239] = (void*)&cdat->dobj_1234; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1234", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1234", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1234.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1234.obj_num = 0; cdat->dobj_1234.obj_hash = 1019250318; cdat->dobj_1234.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1235*/ /*_.VALDATA___V1241*/ meltfptr[1240] = (void*)&cdat->dobj_1235; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1235", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1235", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1235.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1235.obj_num = 1; cdat->dobj_1235.obj_hash = 181115264; cdat->dobj_1235.obj_len = 2; /*inistring dstr_1236__meltgc_add_strbu*/ /*_.VALSTR___V1243*/ meltfptr[1242] = (void*)&cdat->dstr_1236__meltgc_add_strbu; cdat->dstr_1236__meltgc_add_strbu.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1236__meltgc_add_strbu.val, "meltgc_add_strbuf_ccomment((melt_ptr_t)(", sizeof (cdat->dstr_1236__meltgc_add_strbu.val)-1); /*inistring dstr_1237__me*/ /*_.VALSTR___V1244*/ meltfptr[1243] = (void*)&cdat->dstr_1237__me; cdat->dstr_1237__me.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1237__me.val, "), \n\t\t\t melt_strbuf_str((melt_ptr_t)(", sizeof (cdat->dstr_1237__me.val)-1); /*inistring dstr_1238__*/ /*_.VALSTR___V1245*/ meltfptr[1244] = (void*)&cdat->dstr_1238__; cdat->dstr_1238__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1238__.val, ")))", sizeof (cdat->dstr_1238__.val)-1); /*inistring dstr_1239__ADD2SBUF_CCOMSTR*/ /*_.VALSTR___V1239*/ meltfptr[1238] = (void*)&cdat->dstr_1239__ADD2SBUF_CCOMSTR; cdat->dstr_1239__ADD2SBUF_CCOMSTR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1239__ADD2SBUF_CCOMSTR.val, "ADD2SBUF_CCOMSTRBUF", sizeof (cdat->dstr_1239__ADD2SBUF_CCOMSTR.val)-1); /*iniobj dsym_1240__ADD2SBUF_CCOMCONST*/ /*uniqueobj*/ if (!/*_.VALDATA___V1247*/ meltfptr[1246]) /*_.VALDATA___V1247*/ meltfptr[1246] = (void*)&cdat->dsym_1240__ADD2SBUF_CCOMCONST; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1240__ADD2SBUF_CCOMCONST", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1240__ADD2SBUF_CCOMCONST", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1240__ADD2SBUF_CCOMCONST.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1240__ADD2SBUF_CCOMCONST.obj_hash = 405837423; cdat->dsym_1240__ADD2SBUF_CCOMCONST.obj_len = 3; /*inistring dstr_1241__ADD2SBUF_CCOMCON*/ /*_.VALSTR___V1248*/ meltfptr[1247] = (void*)&cdat->dstr_1241__ADD2SBUF_CCOMCON; cdat->dstr_1241__ADD2SBUF_CCOMCON.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1241__ADD2SBUF_CCOMCON.val, "ADD2SBUF_CCOMCONST", sizeof (cdat->dstr_1241__ADD2SBUF_CCOMCON.val)-1); MELT_LOCATION("warmelt-base.melt:641:/ iniobj"); /*iniobj dobj_1242__ADD2SBUF_CCOMCONST*/ /*_.VALDATA___V1249*/ meltfptr[1248] = (void*)&cdat->dobj_1242__ADD2SBUF_CCOMCONST; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1242__ADD2SBUF_CCOMCONST", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1242__ADD2SBUF_CCOMCONST", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1242__ADD2SBUF_CCOMCONST.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1242__ADD2SBUF_CCOMCONST.obj_hash = 113627344; cdat->dobj_1242__ADD2SBUF_CCOMCONST.obj_len = 5; /*inimult dtup_1243__ADD2SBUF_CCOMCONST*/ /*_.VALTUP___V1259*/ meltfptr[1258] = (void*)&cdat->dtup_1243__ADD2SBUF_CCOMCONST; cdat->dtup_1243__ADD2SBUF_CCOMCONST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1243__ADD2SBUF_CCOMCONST.nbval = 5; /*inimult dtup_1244__ADD2SBUF_CCOMCONST*/ /*_.VALTUP___V1255*/ meltfptr[1254] = (void*)&cdat->dtup_1244__ADD2SBUF_CCOMCONST; cdat->dtup_1244__ADD2SBUF_CCOMCONST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1244__ADD2SBUF_CCOMCONST.nbval = 2; /*^iniobj*/ /*iniobj dobj_1245*/ /*_.VALDATA___V1251*/ meltfptr[1250] = (void*)&cdat->dobj_1245; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1245", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1245", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1245.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1245.obj_num = 0; cdat->dobj_1245.obj_hash = 377438575; cdat->dobj_1245.obj_len = 2; /*iniobj dsym_1246__CSTR*/ /*uniqueobj*/ if (!/*_.VALDATA___V1253*/ meltfptr[1252]) /*_.VALDATA___V1253*/ meltfptr[1252] = (void*)&cdat->dsym_1246__CSTR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1246__CSTR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1246__CSTR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1246__CSTR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1246__CSTR.obj_hash = 67278127; cdat->dsym_1246__CSTR.obj_len = 3; /*inistring dstr_1247__CSTR*/ /*_.VALSTR___V1254*/ meltfptr[1253] = (void*)&cdat->dstr_1247__CSTR; cdat->dstr_1247__CSTR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1247__CSTR.val, "CSTR", sizeof (cdat->dstr_1247__CSTR.val)-1); /*^iniobj*/ /*iniobj dobj_1248*/ /*_.VALDATA___V1252*/ meltfptr[1251] = (void*)&cdat->dobj_1248; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1248", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1248", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1248.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1248.obj_num = 1; cdat->dobj_1248.obj_hash = 762567545; cdat->dobj_1248.obj_len = 2; /*inistring dstr_1249__meltgc_add_strbu*/ /*_.VALSTR___V1256*/ meltfptr[1255] = (void*)&cdat->dstr_1249__meltgc_add_strbu; cdat->dstr_1249__meltgc_add_strbu.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1249__meltgc_add_strbu.val, "meltgc_add_strbuf_ccomment((", sizeof (cdat->dstr_1249__meltgc_add_strbu.val)-1); /*inistring dstr_1250__*/ /*_.VALSTR___V1257*/ meltfptr[1256] = (void*)&cdat->dstr_1250__; cdat->dstr_1250__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1250__.val, "), ", sizeof (cdat->dstr_1250__.val)-1); /*inistring dstr_1251__*/ /*_.VALSTR___V1258*/ meltfptr[1257] = (void*)&cdat->dstr_1251__; cdat->dstr_1251__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1251__.val, ")", sizeof (cdat->dstr_1251__.val)-1); /*inistring dstr_1252__ADD2SBUF_CCOMCON*/ /*_.VALSTR___V1250*/ meltfptr[1249] = (void*)&cdat->dstr_1252__ADD2SBUF_CCOMCON; cdat->dstr_1252__ADD2SBUF_CCOMCON.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1252__ADD2SBUF_CCOMCON.val, "ADD2SBUF_CCOMCONST", sizeof (cdat->dstr_1252__ADD2SBUF_CCOMCON.val)-1); /*iniobj dsym_1253__ADD2SBUF_CIDENT*/ /*uniqueobj*/ if (!/*_.VALDATA___V1260*/ meltfptr[1259]) /*_.VALDATA___V1260*/ meltfptr[1259] = (void*)&cdat->dsym_1253__ADD2SBUF_CIDENT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1253__ADD2SBUF_CIDENT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1253__ADD2SBUF_CIDENT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1253__ADD2SBUF_CIDENT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1253__ADD2SBUF_CIDENT.obj_hash = 92009537; cdat->dsym_1253__ADD2SBUF_CIDENT.obj_len = 3; /*inistring dstr_1254__ADD2SBUF_CIDENT*/ /*_.VALSTR___V1261*/ meltfptr[1260] = (void*)&cdat->dstr_1254__ADD2SBUF_CIDENT; cdat->dstr_1254__ADD2SBUF_CIDENT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1254__ADD2SBUF_CIDENT.val, "ADD2SBUF_CIDENT", sizeof (cdat->dstr_1254__ADD2SBUF_CIDENT.val)-1); MELT_LOCATION("warmelt-base.melt:648:/ iniobj"); /*iniobj dobj_1255__ADD2SBUF_CIDENT*/ /*_.VALDATA___V1262*/ meltfptr[1261] = (void*)&cdat->dobj_1255__ADD2SBUF_CIDENT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1255__ADD2SBUF_CIDENT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1255__ADD2SBUF_CIDENT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1255__ADD2SBUF_CIDENT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1255__ADD2SBUF_CIDENT.obj_hash = 659397404; cdat->dobj_1255__ADD2SBUF_CIDENT.obj_len = 5; /*inimult dtup_1256__ADD2SBUF_CIDENT*/ /*_.VALTUP___V1270*/ meltfptr[1269] = (void*)&cdat->dtup_1256__ADD2SBUF_CIDENT; cdat->dtup_1256__ADD2SBUF_CIDENT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1256__ADD2SBUF_CIDENT.nbval = 5; /*inimult dtup_1257__ADD2SBUF_CIDENT*/ /*_.VALTUP___V1266*/ meltfptr[1265] = (void*)&cdat->dtup_1257__ADD2SBUF_CIDENT; cdat->dtup_1257__ADD2SBUF_CIDENT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1257__ADD2SBUF_CIDENT.nbval = 2; /*^iniobj*/ /*iniobj dobj_1258*/ /*_.VALDATA___V1264*/ meltfptr[1263] = (void*)&cdat->dobj_1258; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1258", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1258", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1258.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1258.obj_num = 0; cdat->dobj_1258.obj_hash = 272116203; cdat->dobj_1258.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1259*/ /*_.VALDATA___V1265*/ meltfptr[1264] = (void*)&cdat->dobj_1259; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1259", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1259", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1259.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1259.obj_num = 1; cdat->dobj_1259.obj_hash = 269665287; cdat->dobj_1259.obj_len = 2; /*inistring dstr_1260__meltgc_add_strbu*/ /*_.VALSTR___V1267*/ meltfptr[1266] = (void*)&cdat->dstr_1260__meltgc_add_strbu; cdat->dstr_1260__meltgc_add_strbu.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1260__meltgc_add_strbu.val, "meltgc_add_strbuf_cident((melt_ptr_t)(", sizeof (cdat->dstr_1260__meltgc_add_strbu.val)-1); /*inistring dstr_1261__melt_string*/ /*_.VALSTR___V1268*/ meltfptr[1267] = (void*)&cdat->dstr_1261__melt_string; cdat->dstr_1261__melt_string.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1261__melt_string.val, "),\n melt_string_str((melt_ptr_t)(", sizeof (cdat->dstr_1261__melt_string.val)-1); /*inistring dstr_1262__*/ /*_.VALSTR___V1269*/ meltfptr[1268] = (void*)&cdat->dstr_1262__; cdat->dstr_1262__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1262__.val, ")))", sizeof (cdat->dstr_1262__.val)-1); /*inistring dstr_1263__ADD2SBUF_CIDENT*/ /*_.VALSTR___V1263*/ meltfptr[1262] = (void*)&cdat->dstr_1263__ADD2SBUF_CIDENT; cdat->dstr_1263__ADD2SBUF_CIDENT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1263__ADD2SBUF_CIDENT.val, "ADD2SBUF_CIDENT", sizeof (cdat->dstr_1263__ADD2SBUF_CIDENT.val)-1); /*iniobj dsym_1264__ADD2SBUF_CIDENTPREFIX*/ /*uniqueobj*/ if (!/*_.VALDATA___V1271*/ meltfptr[1270]) /*_.VALDATA___V1271*/ meltfptr[1270] = (void*)&cdat->dsym_1264__ADD2SBUF_CIDENTPREFIX; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1264__ADD2SBUF_CIDENTPREFIX", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1264__ADD2SBUF_CIDENTPREFIX", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1264__ADD2SBUF_CIDENTPREFIX.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1264__ADD2SBUF_CIDENTPREFIX.obj_hash = 552229100; cdat->dsym_1264__ADD2SBUF_CIDENTPREFIX.obj_len = 3; /*inistring dstr_1265__ADD2SBUF_CIDENTP*/ /*_.VALSTR___V1272*/ meltfptr[1271] = (void*)&cdat->dstr_1265__ADD2SBUF_CIDENTP; cdat->dstr_1265__ADD2SBUF_CIDENTP.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1265__ADD2SBUF_CIDENTP.val, "ADD2SBUF_CIDENTPREFIX", sizeof (cdat->dstr_1265__ADD2SBUF_CIDENTP.val)-1); MELT_LOCATION("warmelt-base.melt:656:/ iniobj"); /*iniobj dobj_1266__ADD2SBUF_CIDENTPREFIX*/ /*_.VALDATA___V1273*/ meltfptr[1272] = (void*)&cdat->dobj_1266__ADD2SBUF_CIDENTPREFIX; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1266__ADD2SBUF_CIDENTPREFIX", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1266__ADD2SBUF_CIDENTPREFIX", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1266__ADD2SBUF_CIDENTPREFIX.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1266__ADD2SBUF_CIDENTPREFIX.obj_hash = 172359804; cdat->dobj_1266__ADD2SBUF_CIDENTPREFIX.obj_len = 5; /*inimult dtup_1267__ADD2SBUF_CIDENTPREFIX*/ /*_.VALTUP___V1285*/ meltfptr[1284] = (void*)&cdat->dtup_1267__ADD2SBUF_CIDENTPREFIX; cdat->dtup_1267__ADD2SBUF_CIDENTPREFIX.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1267__ADD2SBUF_CIDENTPREFIX.nbval = 7; /*inimult dtup_1268__ADD2SBUF_CIDENTPREFIX*/ /*_.VALTUP___V1280*/ meltfptr[1279] = (void*)&cdat->dtup_1268__ADD2SBUF_CIDENTPREFIX; cdat->dtup_1268__ADD2SBUF_CIDENTPREFIX.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1268__ADD2SBUF_CIDENTPREFIX.nbval = 3; /*^iniobj*/ /*iniobj dobj_1269*/ /*_.VALDATA___V1275*/ meltfptr[1274] = (void*)&cdat->dobj_1269; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1269", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1269", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1269.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1269.obj_num = 0; cdat->dobj_1269.obj_hash = 624015795; cdat->dobj_1269.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1270*/ /*_.VALDATA___V1276*/ meltfptr[1275] = (void*)&cdat->dobj_1270; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1270", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1270", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1270.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1270.obj_num = 1; cdat->dobj_1270.obj_hash = 913988367; cdat->dobj_1270.obj_len = 2; /*iniobj dsym_1271__PREFLEN*/ /*uniqueobj*/ if (!/*_.VALDATA___V1278*/ meltfptr[1277]) /*_.VALDATA___V1278*/ meltfptr[1277] = (void*)&cdat->dsym_1271__PREFLEN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1271__PREFLEN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1271__PREFLEN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1271__PREFLEN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1271__PREFLEN.obj_hash = 9027400; cdat->dsym_1271__PREFLEN.obj_len = 3; /*inistring dstr_1272__PREFLEN*/ /*_.VALSTR___V1279*/ meltfptr[1278] = (void*)&cdat->dstr_1272__PREFLEN; cdat->dstr_1272__PREFLEN.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1272__PREFLEN.val, "PREFLEN", sizeof (cdat->dstr_1272__PREFLEN.val)-1); /*^iniobj*/ /*iniobj dobj_1273*/ /*_.VALDATA___V1277*/ meltfptr[1276] = (void*)&cdat->dobj_1273; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1273", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1273", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1273.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1273.obj_num = 2; cdat->dobj_1273.obj_hash = 535002954; cdat->dobj_1273.obj_len = 2; /*inistring dstr_1274__meltgc_add_strbu*/ /*_.VALSTR___V1281*/ meltfptr[1280] = (void*)&cdat->dstr_1274__meltgc_add_strbu; cdat->dstr_1274__meltgc_add_strbu.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1274__meltgc_add_strbu.val, "meltgc_add_strbuf_cidentprefix((melt_ptr_t)(", sizeof (cdat->dstr_1274__meltgc_add_strbu.val)-1); /*inistring dstr_1275__melt_string_s*/ /*_.VALSTR___V1282*/ meltfptr[1281] = (void*)&cdat->dstr_1275__melt_string_s; cdat->dstr_1275__melt_string_s.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1275__melt_string_s.val, "), melt_string_str((melt_ptr_t)(", sizeof (cdat->dstr_1275__melt_string_s.val)-1); /*inistring dstr_1276__*/ /*_.VALSTR___V1283*/ meltfptr[1282] = (void*)&cdat->dstr_1276__; cdat->dstr_1276__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1276__.val, ")), (", sizeof (cdat->dstr_1276__.val)-1); /*inistring dstr_1277__*/ /*_.VALSTR___V1284*/ meltfptr[1283] = (void*)&cdat->dstr_1277__; cdat->dstr_1277__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1277__.val, "))", sizeof (cdat->dstr_1277__.val)-1); /*inistring dstr_1278__ADD2SBUF_CIDENTP*/ /*_.VALSTR___V1274*/ meltfptr[1273] = (void*)&cdat->dstr_1278__ADD2SBUF_CIDENTP; cdat->dstr_1278__ADD2SBUF_CIDENTP.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1278__ADD2SBUF_CIDENTP.val, "ADD2SBUF_CIDENTPREFIX", sizeof (cdat->dstr_1278__ADD2SBUF_CIDENTP.val)-1); /*iniobj dsym_1279__ADD2SBUF_LONGDEC*/ /*uniqueobj*/ if (!/*_.VALDATA___V1286*/ meltfptr[1285]) /*_.VALDATA___V1286*/ meltfptr[1285] = (void*)&cdat->dsym_1279__ADD2SBUF_LONGDEC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1279__ADD2SBUF_LONGDEC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1279__ADD2SBUF_LONGDEC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1279__ADD2SBUF_LONGDEC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1279__ADD2SBUF_LONGDEC.obj_hash = 987171205; cdat->dsym_1279__ADD2SBUF_LONGDEC.obj_len = 3; /*inistring dstr_1280__ADD2SBUF_LONGDEC*/ /*_.VALSTR___V1287*/ meltfptr[1286] = (void*)&cdat->dstr_1280__ADD2SBUF_LONGDEC; cdat->dstr_1280__ADD2SBUF_LONGDEC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1280__ADD2SBUF_LONGDEC.val, "ADD2SBUF_LONGDEC", sizeof (cdat->dstr_1280__ADD2SBUF_LONGDEC.val)-1); MELT_LOCATION("warmelt-base.melt:662:/ iniobj"); /*iniobj dobj_1281__ADD2SBUF_LONGDEC*/ /*_.VALDATA___V1288*/ meltfptr[1287] = (void*)&cdat->dobj_1281__ADD2SBUF_LONGDEC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1281__ADD2SBUF_LONGDEC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1281__ADD2SBUF_LONGDEC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1281__ADD2SBUF_LONGDEC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1281__ADD2SBUF_LONGDEC.obj_hash = 368563564; cdat->dobj_1281__ADD2SBUF_LONGDEC.obj_len = 5; /*inimult dtup_1282__ADD2SBUF_LONGDEC*/ /*_.VALTUP___V1296*/ meltfptr[1295] = (void*)&cdat->dtup_1282__ADD2SBUF_LONGDEC; cdat->dtup_1282__ADD2SBUF_LONGDEC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1282__ADD2SBUF_LONGDEC.nbval = 5; /*inimult dtup_1283__ADD2SBUF_LONGDEC*/ /*_.VALTUP___V1292*/ meltfptr[1291] = (void*)&cdat->dtup_1283__ADD2SBUF_LONGDEC; cdat->dtup_1283__ADD2SBUF_LONGDEC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1283__ADD2SBUF_LONGDEC.nbval = 2; /*^iniobj*/ /*iniobj dobj_1284*/ /*_.VALDATA___V1290*/ meltfptr[1289] = (void*)&cdat->dobj_1284; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1284", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1284", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1284.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1284.obj_num = 0; cdat->dobj_1284.obj_hash = 577058065; cdat->dobj_1284.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1285*/ /*_.VALDATA___V1291*/ meltfptr[1290] = (void*)&cdat->dobj_1285; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1285", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1285", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1285.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1285.obj_num = 1; cdat->dobj_1285.obj_hash = 381376637; cdat->dobj_1285.obj_len = 2; /*inistring dstr_1286__meltgc_add_strbu*/ /*_.VALSTR___V1293*/ meltfptr[1292] = (void*)&cdat->dstr_1286__meltgc_add_strbu; cdat->dstr_1286__meltgc_add_strbu.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1286__meltgc_add_strbu.val, "meltgc_add_strbuf_dec((melt_ptr_t)(", sizeof (cdat->dstr_1286__meltgc_add_strbu.val)-1); /*inistring dstr_1287__*/ /*_.VALSTR___V1294*/ meltfptr[1293] = (void*)&cdat->dstr_1287__; cdat->dstr_1287__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1287__.val, "), (", sizeof (cdat->dstr_1287__.val)-1); /*inistring dstr_1288__*/ /*_.VALSTR___V1295*/ meltfptr[1294] = (void*)&cdat->dstr_1288__; cdat->dstr_1288__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1288__.val, "))", sizeof (cdat->dstr_1288__.val)-1); /*inistring dstr_1289__ADD2SBUF_LONGDEC*/ /*_.VALSTR___V1289*/ meltfptr[1288] = (void*)&cdat->dstr_1289__ADD2SBUF_LONGDEC; cdat->dstr_1289__ADD2SBUF_LONGDEC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1289__ADD2SBUF_LONGDEC.val, "ADD2SBUF_LONGDEC", sizeof (cdat->dstr_1289__ADD2SBUF_LONGDEC.val)-1); /*iniobj dsym_1290__ADD2SBUF_LONGHEX*/ /*uniqueobj*/ if (!/*_.VALDATA___V1297*/ meltfptr[1296]) /*_.VALDATA___V1297*/ meltfptr[1296] = (void*)&cdat->dsym_1290__ADD2SBUF_LONGHEX; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1290__ADD2SBUF_LONGHEX", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1290__ADD2SBUF_LONGHEX", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1290__ADD2SBUF_LONGHEX.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1290__ADD2SBUF_LONGHEX.obj_hash = 775368802; cdat->dsym_1290__ADD2SBUF_LONGHEX.obj_len = 3; /*inistring dstr_1291__ADD2SBUF_LONGHEX*/ /*_.VALSTR___V1298*/ meltfptr[1297] = (void*)&cdat->dstr_1291__ADD2SBUF_LONGHEX; cdat->dstr_1291__ADD2SBUF_LONGHEX.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1291__ADD2SBUF_LONGHEX.val, "ADD2SBUF_LONGHEX", sizeof (cdat->dstr_1291__ADD2SBUF_LONGHEX.val)-1); MELT_LOCATION("warmelt-base.melt:667:/ iniobj"); /*iniobj dobj_1292__ADD2SBUF_LONGHEX*/ /*_.VALDATA___V1299*/ meltfptr[1298] = (void*)&cdat->dobj_1292__ADD2SBUF_LONGHEX; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1292__ADD2SBUF_LONGHEX", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1292__ADD2SBUF_LONGHEX", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1292__ADD2SBUF_LONGHEX.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1292__ADD2SBUF_LONGHEX.obj_hash = 875616860; cdat->dobj_1292__ADD2SBUF_LONGHEX.obj_len = 5; /*inimult dtup_1293__ADD2SBUF_LONGHEX*/ /*_.VALTUP___V1307*/ meltfptr[1306] = (void*)&cdat->dtup_1293__ADD2SBUF_LONGHEX; cdat->dtup_1293__ADD2SBUF_LONGHEX.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1293__ADD2SBUF_LONGHEX.nbval = 5; /*inimult dtup_1294__ADD2SBUF_LONGHEX*/ /*_.VALTUP___V1303*/ meltfptr[1302] = (void*)&cdat->dtup_1294__ADD2SBUF_LONGHEX; cdat->dtup_1294__ADD2SBUF_LONGHEX.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1294__ADD2SBUF_LONGHEX.nbval = 2; /*^iniobj*/ /*iniobj dobj_1295*/ /*_.VALDATA___V1301*/ meltfptr[1300] = (void*)&cdat->dobj_1295; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1295", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1295", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1295.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1295.obj_num = 0; cdat->dobj_1295.obj_hash = 912206125; cdat->dobj_1295.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1296*/ /*_.VALDATA___V1302*/ meltfptr[1301] = (void*)&cdat->dobj_1296; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1296", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1296", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1296.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1296.obj_num = 1; cdat->dobj_1296.obj_hash = 103467343; cdat->dobj_1296.obj_len = 2; /*inistring dstr_1297__meltgc_add_strbu*/ /*_.VALSTR___V1304*/ meltfptr[1303] = (void*)&cdat->dstr_1297__meltgc_add_strbu; cdat->dstr_1297__meltgc_add_strbu.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1297__meltgc_add_strbu.val, "meltgc_add_strbuf_hex((melt_ptr_t)(", sizeof (cdat->dstr_1297__meltgc_add_strbu.val)-1); /*inistring dstr_1298__*/ /*_.VALSTR___V1305*/ meltfptr[1304] = (void*)&cdat->dstr_1298__; cdat->dstr_1298__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1298__.val, "), (", sizeof (cdat->dstr_1298__.val)-1); /*inistring dstr_1299__*/ /*_.VALSTR___V1306*/ meltfptr[1305] = (void*)&cdat->dstr_1299__; cdat->dstr_1299__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1299__.val, "))", sizeof (cdat->dstr_1299__.val)-1); /*inistring dstr_1300__ADD2SBUF_LONGHEX*/ /*_.VALSTR___V1300*/ meltfptr[1299] = (void*)&cdat->dstr_1300__ADD2SBUF_LONGHEX; cdat->dstr_1300__ADD2SBUF_LONGHEX.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1300__ADD2SBUF_LONGHEX.val, "ADD2SBUF_LONGHEX", sizeof (cdat->dstr_1300__ADD2SBUF_LONGHEX.val)-1); /*iniobj dsym_1301__ADD2SBUF_ROUTINEDESCR*/ /*uniqueobj*/ if (!/*_.VALDATA___V1308*/ meltfptr[1307]) /*_.VALDATA___V1308*/ meltfptr[1307] = (void*)&cdat->dsym_1301__ADD2SBUF_ROUTINEDESCR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1301__ADD2SBUF_ROUTINEDESCR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1301__ADD2SBUF_ROUTINEDESCR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1301__ADD2SBUF_ROUTINEDESCR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1301__ADD2SBUF_ROUTINEDESCR.obj_hash = 1011092199; cdat->dsym_1301__ADD2SBUF_ROUTINEDESCR.obj_len = 3; /*inistring dstr_1302__ADD2SBUF_ROUTINE*/ /*_.VALSTR___V1309*/ meltfptr[1308] = (void*)&cdat->dstr_1302__ADD2SBUF_ROUTINE; cdat->dstr_1302__ADD2SBUF_ROUTINE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1302__ADD2SBUF_ROUTINE.val, "ADD2SBUF_ROUTINEDESCR", sizeof (cdat->dstr_1302__ADD2SBUF_ROUTINE.val)-1); MELT_LOCATION("warmelt-base.melt:672:/ iniobj"); /*iniobj dobj_1303__ADD2SBUF_ROUTINEDESCR*/ /*_.VALDATA___V1310*/ meltfptr[1309] = (void*)&cdat->dobj_1303__ADD2SBUF_ROUTINEDESCR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1303__ADD2SBUF_ROUTINEDESCR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1303__ADD2SBUF_ROUTINEDESCR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1303__ADD2SBUF_ROUTINEDESCR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1303__ADD2SBUF_ROUTINEDESCR.obj_hash = 760865963; cdat->dobj_1303__ADD2SBUF_ROUTINEDESCR.obj_len = 5; /*inimult dtup_1304__ADD2SBUF_ROUTINEDESCR*/ /*_.VALTUP___V1320*/ meltfptr[1319] = (void*)&cdat->dtup_1304__ADD2SBUF_ROUTINEDESCR; cdat->dtup_1304__ADD2SBUF_ROUTINEDESCR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1304__ADD2SBUF_ROUTINEDESCR.nbval = 5; /*inimult dtup_1305__ADD2SBUF_ROUTINEDESCR*/ /*_.VALTUP___V1316*/ meltfptr[1315] = (void*)&cdat->dtup_1305__ADD2SBUF_ROUTINEDESCR; cdat->dtup_1305__ADD2SBUF_ROUTINEDESCR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1305__ADD2SBUF_ROUTINEDESCR.nbval = 2; /*^iniobj*/ /*iniobj dobj_1306*/ /*_.VALDATA___V1312*/ meltfptr[1311] = (void*)&cdat->dobj_1306; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1306", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1306", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1306.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1306.obj_num = 0; cdat->dobj_1306.obj_hash = 406071180; cdat->dobj_1306.obj_len = 2; /*iniobj dsym_1307__ROUT*/ /*uniqueobj*/ if (!/*_.VALDATA___V1314*/ meltfptr[1313]) /*_.VALDATA___V1314*/ meltfptr[1313] = (void*)&cdat->dsym_1307__ROUT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1307__ROUT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1307__ROUT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1307__ROUT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1307__ROUT.obj_hash = 50801246; cdat->dsym_1307__ROUT.obj_len = 3; /*inistring dstr_1308__ROUT*/ /*_.VALSTR___V1315*/ meltfptr[1314] = (void*)&cdat->dstr_1308__ROUT; cdat->dstr_1308__ROUT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1308__ROUT.val, "ROUT", sizeof (cdat->dstr_1308__ROUT.val)-1); /*^iniobj*/ /*iniobj dobj_1309*/ /*_.VALDATA___V1313*/ meltfptr[1312] = (void*)&cdat->dobj_1309; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1309", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1309", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1309.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1309.obj_num = 1; cdat->dobj_1309.obj_hash = 516325961; cdat->dobj_1309.obj_len = 2; /*inistring dstr_1310__meltgc_add_strbu*/ /*_.VALSTR___V1317*/ meltfptr[1316] = (void*)&cdat->dstr_1310__meltgc_add_strbu; cdat->dstr_1310__meltgc_add_strbu.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1310__meltgc_add_strbu.val, "meltgc_add_strbuf((melt_ptr_t)(", sizeof (cdat->dstr_1310__meltgc_add_strbu.val)-1); /*inistring dstr_1311__melt_routine_*/ /*_.VALSTR___V1318*/ meltfptr[1317] = (void*)&cdat->dstr_1311__melt_routine_; cdat->dstr_1311__melt_routine_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1311__melt_routine_.val, "), melt_routine_descrstr((melt_ptr_t)(", sizeof (cdat->dstr_1311__melt_routine_.val)-1); /*inistring dstr_1312__*/ /*_.VALSTR___V1319*/ meltfptr[1318] = (void*)&cdat->dstr_1312__; cdat->dstr_1312__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1312__.val, ")))", sizeof (cdat->dstr_1312__.val)-1); /*inistring dstr_1313__ADD2SBUF_ROUTINE*/ /*_.VALSTR___V1311*/ meltfptr[1310] = (void*)&cdat->dstr_1313__ADD2SBUF_ROUTINE; cdat->dstr_1313__ADD2SBUF_ROUTINE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1313__ADD2SBUF_ROUTINE.val, "ADD2SBUF_ROUTINEDESCR", sizeof (cdat->dstr_1313__ADD2SBUF_ROUTINE.val)-1); /*iniobj dsym_1314__OUTPUT_SBUF_STRCONST*/ /*uniqueobj*/ if (!/*_.VALDATA___V1321*/ meltfptr[1320]) /*_.VALDATA___V1321*/ meltfptr[1320] = (void*)&cdat->dsym_1314__OUTPUT_SBUF_STRCONST; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1314__OUTPUT_SBUF_STRCONST", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1314__OUTPUT_SBUF_STRCONST", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1314__OUTPUT_SBUF_STRCONST.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1314__OUTPUT_SBUF_STRCONST.obj_hash = 578809862; cdat->dsym_1314__OUTPUT_SBUF_STRCONST.obj_len = 3; /*inistring dstr_1315__OUTPUT_SBUF_STRC*/ /*_.VALSTR___V1322*/ meltfptr[1321] = (void*)&cdat->dstr_1315__OUTPUT_SBUF_STRC; cdat->dstr_1315__OUTPUT_SBUF_STRC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1315__OUTPUT_SBUF_STRC.val, "OUTPUT_SBUF_STRCONST", sizeof (cdat->dstr_1315__OUTPUT_SBUF_STRC.val)-1); MELT_LOCATION("warmelt-base.melt:678:/ iniobj"); /*iniobj dobj_1316__OUTPUT_SBUF_STRCONST*/ /*_.VALDATA___V1323*/ meltfptr[1322] = (void*)&cdat->dobj_1316__OUTPUT_SBUF_STRCONST; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1316__OUTPUT_SBUF_STRCONST", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1316__OUTPUT_SBUF_STRCONST", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1316__OUTPUT_SBUF_STRCONST.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1316__OUTPUT_SBUF_STRCONST.obj_hash = 636475851; cdat->dobj_1316__OUTPUT_SBUF_STRCONST.obj_len = 5; /*inimult dtup_1317__OUTPUT_SBUF_STRCONST*/ /*_.VALTUP___V1333*/ meltfptr[1332] = (void*)&cdat->dtup_1317__OUTPUT_SBUF_STRCONST; cdat->dtup_1317__OUTPUT_SBUF_STRCONST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1317__OUTPUT_SBUF_STRCONST.nbval = 5; /*inimult dtup_1318__OUTPUT_SBUF_STRCONST*/ /*_.VALTUP___V1329*/ meltfptr[1328] = (void*)&cdat->dtup_1318__OUTPUT_SBUF_STRCONST; cdat->dtup_1318__OUTPUT_SBUF_STRCONST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1318__OUTPUT_SBUF_STRCONST.nbval = 2; /*^iniobj*/ /*iniobj dobj_1319*/ /*_.VALDATA___V1325*/ meltfptr[1324] = (void*)&cdat->dobj_1319; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1319", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1319", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1319.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1319.obj_num = 0; cdat->dobj_1319.obj_hash = 78646332; cdat->dobj_1319.obj_len = 2; /*iniobj dsym_1320__NAM*/ /*uniqueobj*/ if (!/*_.VALDATA___V1327*/ meltfptr[1326]) /*_.VALDATA___V1327*/ meltfptr[1326] = (void*)&cdat->dsym_1320__NAM; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1320__NAM", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1320__NAM", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1320__NAM.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1320__NAM.obj_hash = 707406315; cdat->dsym_1320__NAM.obj_len = 3; /*inistring dstr_1321__NAM*/ /*_.VALSTR___V1328*/ meltfptr[1327] = (void*)&cdat->dstr_1321__NAM; cdat->dstr_1321__NAM.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1321__NAM.val, "NAM", sizeof (cdat->dstr_1321__NAM.val)-1); /*^iniobj*/ /*iniobj dobj_1322*/ /*_.VALDATA___V1326*/ meltfptr[1325] = (void*)&cdat->dobj_1322; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1322", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1322", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1322.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1322.obj_num = 1; cdat->dobj_1322.obj_hash = 461982245; cdat->dobj_1322.obj_len = 2; /*inistring dstr_1323__melt_output_str*/ /*_.VALSTR___V1330*/ meltfptr[1329] = (void*)&cdat->dstr_1323__melt_output_str; cdat->dstr_1323__melt_output_str.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1323__melt_output_str.val, " melt_output_strbuf_to_file((", sizeof (cdat->dstr_1323__melt_output_str.val)-1); /*inistring dstr_1324__*/ /*_.VALSTR___V1331*/ meltfptr[1330] = (void*)&cdat->dstr_1324__; cdat->dstr_1324__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1324__.val, "), (", sizeof (cdat->dstr_1324__.val)-1); /*inistring dstr_1325__*/ /*_.VALSTR___V1332*/ meltfptr[1331] = (void*)&cdat->dstr_1325__; cdat->dstr_1325__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1325__.val, ")) ", sizeof (cdat->dstr_1325__.val)-1); /*inistring dstr_1326__OUTPUT_SBUF_STRC*/ /*_.VALSTR___V1324*/ meltfptr[1323] = (void*)&cdat->dstr_1326__OUTPUT_SBUF_STRC; cdat->dstr_1326__OUTPUT_SBUF_STRC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1326__OUTPUT_SBUF_STRC.val, "OUTPUT_SBUF_STRCONST", sizeof (cdat->dstr_1326__OUTPUT_SBUF_STRC.val)-1); /*iniobj dsym_1327__OUTPUT_SBUF_STRVAL*/ /*uniqueobj*/ if (!/*_.VALDATA___V1334*/ meltfptr[1333]) /*_.VALDATA___V1334*/ meltfptr[1333] = (void*)&cdat->dsym_1327__OUTPUT_SBUF_STRVAL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1327__OUTPUT_SBUF_STRVAL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1327__OUTPUT_SBUF_STRVAL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1327__OUTPUT_SBUF_STRVAL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1327__OUTPUT_SBUF_STRVAL.obj_hash = 599443866; cdat->dsym_1327__OUTPUT_SBUF_STRVAL.obj_len = 3; /*inistring dstr_1328__OUTPUT_SBUF_STRV*/ /*_.VALSTR___V1335*/ meltfptr[1334] = (void*)&cdat->dstr_1328__OUTPUT_SBUF_STRV; cdat->dstr_1328__OUTPUT_SBUF_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1328__OUTPUT_SBUF_STRV.val, "OUTPUT_SBUF_STRVAL", sizeof (cdat->dstr_1328__OUTPUT_SBUF_STRV.val)-1); MELT_LOCATION("warmelt-base.melt:682:/ iniobj"); /*iniobj dobj_1329__OUTPUT_SBUF_STRVAL*/ /*_.VALDATA___V1336*/ meltfptr[1335] = (void*)&cdat->dobj_1329__OUTPUT_SBUF_STRVAL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1329__OUTPUT_SBUF_STRVAL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1329__OUTPUT_SBUF_STRVAL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1329__OUTPUT_SBUF_STRVAL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1329__OUTPUT_SBUF_STRVAL.obj_hash = 475501736; cdat->dobj_1329__OUTPUT_SBUF_STRVAL.obj_len = 5; /*inimult dtup_1330__OUTPUT_SBUF_STRVAL*/ /*_.VALTUP___V1346*/ meltfptr[1345] = (void*)&cdat->dtup_1330__OUTPUT_SBUF_STRVAL; cdat->dtup_1330__OUTPUT_SBUF_STRVAL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1330__OUTPUT_SBUF_STRVAL.nbval = 5; /*inimult dtup_1331__OUTPUT_SBUF_STRVAL*/ /*_.VALTUP___V1342*/ meltfptr[1341] = (void*)&cdat->dtup_1331__OUTPUT_SBUF_STRVAL; cdat->dtup_1331__OUTPUT_SBUF_STRVAL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1331__OUTPUT_SBUF_STRVAL.nbval = 2; /*^iniobj*/ /*iniobj dobj_1332*/ /*_.VALDATA___V1338*/ meltfptr[1337] = (void*)&cdat->dobj_1332; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1332", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1332", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1332.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1332.obj_num = 0; cdat->dobj_1332.obj_hash = 471025405; cdat->dobj_1332.obj_len = 2; /*iniobj dsym_1333__VNAM*/ /*uniqueobj*/ if (!/*_.VALDATA___V1340*/ meltfptr[1339]) /*_.VALDATA___V1340*/ meltfptr[1339] = (void*)&cdat->dsym_1333__VNAM; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1333__VNAM", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1333__VNAM", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1333__VNAM.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1333__VNAM.obj_hash = 355615829; cdat->dsym_1333__VNAM.obj_len = 3; /*inistring dstr_1334__VNAM*/ /*_.VALSTR___V1341*/ meltfptr[1340] = (void*)&cdat->dstr_1334__VNAM; cdat->dstr_1334__VNAM.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1334__VNAM.val, "VNAM", sizeof (cdat->dstr_1334__VNAM.val)-1); /*^iniobj*/ /*iniobj dobj_1335*/ /*_.VALDATA___V1339*/ meltfptr[1338] = (void*)&cdat->dobj_1335; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1335", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1335", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1335.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1335.obj_num = 1; cdat->dobj_1335.obj_hash = 193845107; cdat->dobj_1335.obj_len = 2; /*inistring dstr_1336__melt_output_str*/ /*_.VALSTR___V1343*/ meltfptr[1342] = (void*)&cdat->dstr_1336__melt_output_str; cdat->dstr_1336__melt_output_str.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1336__melt_output_str.val, " melt_output_strbuf_to_file((", sizeof (cdat->dstr_1336__melt_output_str.val)-1); /*inistring dstr_1337__melt_string_s*/ /*_.VALSTR___V1344*/ meltfptr[1343] = (void*)&cdat->dstr_1337__melt_string_s; cdat->dstr_1337__melt_string_s.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1337__melt_string_s.val, "), melt_string_str(", sizeof (cdat->dstr_1337__melt_string_s.val)-1); /*inistring dstr_1338__*/ /*_.VALSTR___V1345*/ meltfptr[1344] = (void*)&cdat->dstr_1338__; cdat->dstr_1338__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1338__.val, ")) ", sizeof (cdat->dstr_1338__.val)-1); /*inistring dstr_1339__OUTPUT_SBUF_STRV*/ /*_.VALSTR___V1337*/ meltfptr[1336] = (void*)&cdat->dstr_1339__OUTPUT_SBUF_STRV; cdat->dstr_1339__OUTPUT_SBUF_STRV.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1339__OUTPUT_SBUF_STRV.val, "OUTPUT_SBUF_STRVAL", sizeof (cdat->dstr_1339__OUTPUT_SBUF_STRV.val)-1); /*iniobj dsym_1340__ADD2OUT_STRCONST*/ /*uniqueobj*/ if (!/*_.VALDATA___V1347*/ meltfptr[1346]) /*_.VALDATA___V1347*/ meltfptr[1346] = (void*)&cdat->dsym_1340__ADD2OUT_STRCONST; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1340__ADD2OUT_STRCONST", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1340__ADD2OUT_STRCONST", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1340__ADD2OUT_STRCONST.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1340__ADD2OUT_STRCONST.obj_hash = 519917503; cdat->dsym_1340__ADD2OUT_STRCONST.obj_len = 3; /*inistring dstr_1341__ADD2OUT_STRCONST*/ /*_.VALSTR___V1348*/ meltfptr[1347] = (void*)&cdat->dstr_1341__ADD2OUT_STRCONST; cdat->dstr_1341__ADD2OUT_STRCONST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1341__ADD2OUT_STRCONST.val, "ADD2OUT_STRCONST", sizeof (cdat->dstr_1341__ADD2OUT_STRCONST.val)-1); MELT_LOCATION("warmelt-base.melt:690:/ iniobj"); /*iniobj dobj_1342__ADD2OUT_STRCONST*/ /*_.VALDATA___V1349*/ meltfptr[1348] = (void*)&cdat->dobj_1342__ADD2OUT_STRCONST; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1342__ADD2OUT_STRCONST", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1342__ADD2OUT_STRCONST", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1342__ADD2OUT_STRCONST.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1342__ADD2OUT_STRCONST.obj_hash = 899333929; cdat->dobj_1342__ADD2OUT_STRCONST.obj_len = 5; /*inimult dtup_1343__ADD2OUT_STRCONST*/ /*_.VALTUP___V1359*/ meltfptr[1358] = (void*)&cdat->dtup_1343__ADD2OUT_STRCONST; cdat->dtup_1343__ADD2OUT_STRCONST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1343__ADD2OUT_STRCONST.nbval = 5; /*inimult dtup_1344__ADD2OUT_STRCONST*/ /*_.VALTUP___V1355*/ meltfptr[1354] = (void*)&cdat->dtup_1344__ADD2OUT_STRCONST; cdat->dtup_1344__ADD2OUT_STRCONST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1344__ADD2OUT_STRCONST.nbval = 2; /*iniobj dsym_1345__OUT*/ /*uniqueobj*/ if (!/*_.VALDATA___V1352*/ meltfptr[1351]) /*_.VALDATA___V1352*/ meltfptr[1351] = (void*)&cdat->dsym_1345__OUT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1345__OUT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1345__OUT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1345__OUT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1345__OUT.obj_hash = 649051035; cdat->dsym_1345__OUT.obj_len = 3; /*inistring dstr_1346__OUT*/ /*_.VALSTR___V1353*/ meltfptr[1352] = (void*)&cdat->dstr_1346__OUT; cdat->dstr_1346__OUT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1346__OUT.val, "OUT", sizeof (cdat->dstr_1346__OUT.val)-1); /*^iniobj*/ /*iniobj dobj_1347*/ /*_.VALDATA___V1351*/ meltfptr[1350] = (void*)&cdat->dobj_1347; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1347", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1347", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1347.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1347.obj_num = 0; cdat->dobj_1347.obj_hash = 649966914; cdat->dobj_1347.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1348*/ /*_.VALDATA___V1354*/ meltfptr[1353] = (void*)&cdat->dobj_1348; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1348", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1348", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1348.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1348.obj_num = 1; cdat->dobj_1348.obj_hash = 428144039; cdat->dobj_1348.obj_len = 2; /*inistring dstr_1349__meltgc_add_out_*/ /*_.VALSTR___V1356*/ meltfptr[1355] = (void*)&cdat->dstr_1349__meltgc_add_out_; cdat->dstr_1349__meltgc_add_out_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1349__meltgc_add_out_.val, "meltgc_add_out((melt_ptr_t)(", sizeof (cdat->dstr_1349__meltgc_add_out_.val)-1); /*inistring dstr_1350__*/ /*_.VALSTR___V1357*/ meltfptr[1356] = (void*)&cdat->dstr_1350__; cdat->dstr_1350__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1350__.val, "), (", sizeof (cdat->dstr_1350__.val)-1); /*inistring dstr_1351__*/ /*_.VALSTR___V1358*/ meltfptr[1357] = (void*)&cdat->dstr_1351__; cdat->dstr_1351__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1351__.val, "))", sizeof (cdat->dstr_1351__.val)-1); /*inistring dstr_1352__ADD2OUT_STRCONST*/ /*_.VALSTR___V1350*/ meltfptr[1349] = (void*)&cdat->dstr_1352__ADD2OUT_STRCONST; cdat->dstr_1352__ADD2OUT_STRCONST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1352__ADD2OUT_STRCONST.val, "ADD2OUT_STRCONST", sizeof (cdat->dstr_1352__ADD2OUT_STRCONST.val)-1); /*iniobj dsym_1353__ADD2OUT_STRING*/ /*uniqueobj*/ if (!/*_.VALDATA___V1360*/ meltfptr[1359]) /*_.VALDATA___V1360*/ meltfptr[1359] = (void*)&cdat->dsym_1353__ADD2OUT_STRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1353__ADD2OUT_STRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1353__ADD2OUT_STRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1353__ADD2OUT_STRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1353__ADD2OUT_STRING.obj_hash = 251302583; cdat->dsym_1353__ADD2OUT_STRING.obj_len = 3; /*inistring dstr_1354__ADD2OUT_STRING*/ /*_.VALSTR___V1361*/ meltfptr[1360] = (void*)&cdat->dstr_1354__ADD2OUT_STRING; cdat->dstr_1354__ADD2OUT_STRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1354__ADD2OUT_STRING.val, "ADD2OUT_STRING", sizeof (cdat->dstr_1354__ADD2OUT_STRING.val)-1); MELT_LOCATION("warmelt-base.melt:694:/ iniobj"); /*iniobj dobj_1355__ADD2OUT_STRING*/ /*_.VALDATA___V1362*/ meltfptr[1361] = (void*)&cdat->dobj_1355__ADD2OUT_STRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1355__ADD2OUT_STRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1355__ADD2OUT_STRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1355__ADD2OUT_STRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1355__ADD2OUT_STRING.obj_hash = 217171248; cdat->dobj_1355__ADD2OUT_STRING.obj_len = 5; /*inimult dtup_1356__ADD2OUT_STRING*/ /*_.VALTUP___V1370*/ meltfptr[1369] = (void*)&cdat->dtup_1356__ADD2OUT_STRING; cdat->dtup_1356__ADD2OUT_STRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1356__ADD2OUT_STRING.nbval = 5; /*inimult dtup_1357__ADD2OUT_STRING*/ /*_.VALTUP___V1366*/ meltfptr[1365] = (void*)&cdat->dtup_1357__ADD2OUT_STRING; cdat->dtup_1357__ADD2OUT_STRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1357__ADD2OUT_STRING.nbval = 2; /*^iniobj*/ /*iniobj dobj_1358*/ /*_.VALDATA___V1364*/ meltfptr[1363] = (void*)&cdat->dobj_1358; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1358", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1358", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1358.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1358.obj_num = 0; cdat->dobj_1358.obj_hash = 649002624; cdat->dobj_1358.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1359*/ /*_.VALDATA___V1365*/ meltfptr[1364] = (void*)&cdat->dobj_1359; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1359", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1359", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1359.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1359.obj_num = 1; cdat->dobj_1359.obj_hash = 316518201; cdat->dobj_1359.obj_len = 2; /*inistring dstr_1360__meltgc_add_out_*/ /*_.VALSTR___V1367*/ meltfptr[1366] = (void*)&cdat->dstr_1360__meltgc_add_out_; cdat->dstr_1360__meltgc_add_out_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1360__meltgc_add_out_.val, "meltgc_add_out((melt_ptr_t)(", sizeof (cdat->dstr_1360__meltgc_add_out_.val)-1); /*inistring dstr_1361__melt_string_s*/ /*_.VALSTR___V1368*/ meltfptr[1367] = (void*)&cdat->dstr_1361__melt_string_s; cdat->dstr_1361__melt_string_s.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1361__melt_string_s.val, "), melt_string_str((melt_ptr_t)(", sizeof (cdat->dstr_1361__melt_string_s.val)-1); /*inistring dstr_1362__*/ /*_.VALSTR___V1369*/ meltfptr[1368] = (void*)&cdat->dstr_1362__; cdat->dstr_1362__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1362__.val, ")))", sizeof (cdat->dstr_1362__.val)-1); /*inistring dstr_1363__ADD2OUT_STRING*/ /*_.VALSTR___V1363*/ meltfptr[1362] = (void*)&cdat->dstr_1363__ADD2OUT_STRING; cdat->dstr_1363__ADD2OUT_STRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1363__ADD2OUT_STRING.val, "ADD2OUT_STRING", sizeof (cdat->dstr_1363__ADD2OUT_STRING.val)-1); /*iniobj dsym_1364__ADD2OUT_MIXLOC*/ /*uniqueobj*/ if (!/*_.VALDATA___V1371*/ meltfptr[1370]) /*_.VALDATA___V1371*/ meltfptr[1370] = (void*)&cdat->dsym_1364__ADD2OUT_MIXLOC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1364__ADD2OUT_MIXLOC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1364__ADD2OUT_MIXLOC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1364__ADD2OUT_MIXLOC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1364__ADD2OUT_MIXLOC.obj_hash = 298772127; cdat->dsym_1364__ADD2OUT_MIXLOC.obj_len = 3; /*inistring dstr_1365__ADD2OUT_MIXLOC*/ /*_.VALSTR___V1372*/ meltfptr[1371] = (void*)&cdat->dstr_1365__ADD2OUT_MIXLOC; cdat->dstr_1365__ADD2OUT_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1365__ADD2OUT_MIXLOC.val, "ADD2OUT_MIXLOC", sizeof (cdat->dstr_1365__ADD2OUT_MIXLOC.val)-1); MELT_LOCATION("warmelt-base.melt:699:/ iniobj"); /*iniobj dobj_1366__ADD2OUT_MIXLOC*/ /*_.VALDATA___V1373*/ meltfptr[1372] = (void*)&cdat->dobj_1366__ADD2OUT_MIXLOC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1366__ADD2OUT_MIXLOC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1366__ADD2OUT_MIXLOC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1366__ADD2OUT_MIXLOC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1366__ADD2OUT_MIXLOC.obj_hash = 399703568; cdat->dobj_1366__ADD2OUT_MIXLOC.obj_len = 5; /*inimult dtup_1367__ADD2OUT_MIXLOC*/ /*_.VALTUP___V1382*/ meltfptr[1381] = (void*)&cdat->dtup_1367__ADD2OUT_MIXLOC; cdat->dtup_1367__ADD2OUT_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1367__ADD2OUT_MIXLOC.nbval = 7; /*inimult dtup_1368__ADD2OUT_MIXLOC*/ /*_.VALTUP___V1377*/ meltfptr[1376] = (void*)&cdat->dtup_1368__ADD2OUT_MIXLOC; cdat->dtup_1368__ADD2OUT_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1368__ADD2OUT_MIXLOC.nbval = 2; /*^iniobj*/ /*iniobj dobj_1369*/ /*_.VALDATA___V1375*/ meltfptr[1374] = (void*)&cdat->dobj_1369; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1369", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1369", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1369.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1369.obj_num = 0; cdat->dobj_1369.obj_hash = 516332997; cdat->dobj_1369.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1370*/ /*_.VALDATA___V1376*/ meltfptr[1375] = (void*)&cdat->dobj_1370; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1370", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1370", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1370.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1370.obj_num = 1; cdat->dobj_1370.obj_hash = 624137258; cdat->dobj_1370.obj_len = 2; /*inistring dstr_1371__add2outmixloc_*/ /*_.VALSTR___V1378*/ meltfptr[1377] = (void*)&cdat->dstr_1371__add2outmixloc_; cdat->dstr_1371__add2outmixloc_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1371__add2outmixloc_.val, "/*add2outmixloc*/ if (melt_magic_discr((melt_ptr_t)(", sizeof (cdat->dstr_1371__add2outmixloc_.val)-1); /*inistring dstr_1372__OBMAG_MIXL*/ /*_.VALSTR___V1379*/ meltfptr[1378] = (void*)&cdat->dstr_1372__OBMAG_MIXL; cdat->dstr_1372__OBMAG_MIXL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1372__OBMAG_MIXL.val, ")) == OBMAG_MIXLOC) {\n char locbuf[128];\n location_t tloc = melt_location_mixloc((melt_ptr_t)", sizeof (cdat->dstr_1372__OBMAG_MIXL.val)-1); /*inistring dstr_1373__memset_loc*/ /*_.VALSTR___V1380*/ meltfptr[1379] = (void*)&cdat->dstr_1373__memset_loc; cdat->dstr_1373__memset_loc.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1373__memset_loc.val, ");\n memset (locbuf, 0, sizeof(locbuf));\n snprintf (locbuf, sizeof(locbuf)-1,\n\t\t \"{%.110s:%d}\",\n\t\t LOCATION_FILE (tloc),\n\t\t LOCATION_LINE (tloc));\n meltgc_add_out_raw ((melt_ptr_t) ", sizeof (cdat->dstr_1373__memset_loc.val)-1); /*inistring dstr_1374__locbuf_*/ /*_.VALSTR___V1381*/ meltfptr[1380] = (void*)&cdat->dstr_1374__locbuf_; cdat->dstr_1374__locbuf_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1374__locbuf_.val, ", locbuf);\n } /*end add2outmixloc*/\n", sizeof (cdat->dstr_1374__locbuf_.val)-1); /*inistring dstr_1375__ADD2OUT_MIXLOC*/ /*_.VALSTR___V1374*/ meltfptr[1373] = (void*)&cdat->dstr_1375__ADD2OUT_MIXLOC; cdat->dstr_1375__ADD2OUT_MIXLOC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1375__ADD2OUT_MIXLOC.val, "ADD2OUT_MIXLOC", sizeof (cdat->dstr_1375__ADD2OUT_MIXLOC.val)-1); /*iniobj dsym_1376__ADD2OUT_INDENT*/ /*uniqueobj*/ if (!/*_.VALDATA___V1383*/ meltfptr[1382]) /*_.VALDATA___V1383*/ meltfptr[1382] = (void*)&cdat->dsym_1376__ADD2OUT_INDENT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1376__ADD2OUT_INDENT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1376__ADD2OUT_INDENT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1376__ADD2OUT_INDENT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1376__ADD2OUT_INDENT.obj_hash = 712679235; cdat->dsym_1376__ADD2OUT_INDENT.obj_len = 3; /*inistring dstr_1377__ADD2OUT_INDENT*/ /*_.VALSTR___V1384*/ meltfptr[1383] = (void*)&cdat->dstr_1377__ADD2OUT_INDENT; cdat->dstr_1377__ADD2OUT_INDENT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1377__ADD2OUT_INDENT.val, "ADD2OUT_INDENT", sizeof (cdat->dstr_1377__ADD2OUT_INDENT.val)-1); MELT_LOCATION("warmelt-base.melt:714:/ iniobj"); /*iniobj dobj_1378__ADD2OUT_INDENT*/ /*_.VALDATA___V1385*/ meltfptr[1384] = (void*)&cdat->dobj_1378__ADD2OUT_INDENT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1378__ADD2OUT_INDENT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1378__ADD2OUT_INDENT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1378__ADD2OUT_INDENT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1378__ADD2OUT_INDENT.obj_hash = 994666120; cdat->dobj_1378__ADD2OUT_INDENT.obj_len = 5; /*inimult dtup_1379__ADD2OUT_INDENT*/ /*_.VALTUP___V1393*/ meltfptr[1392] = (void*)&cdat->dtup_1379__ADD2OUT_INDENT; cdat->dtup_1379__ADD2OUT_INDENT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1379__ADD2OUT_INDENT.nbval = 5; /*inimult dtup_1380__ADD2OUT_INDENT*/ /*_.VALTUP___V1389*/ meltfptr[1388] = (void*)&cdat->dtup_1380__ADD2OUT_INDENT; cdat->dtup_1380__ADD2OUT_INDENT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1380__ADD2OUT_INDENT.nbval = 2; /*^iniobj*/ /*iniobj dobj_1381*/ /*_.VALDATA___V1387*/ meltfptr[1386] = (void*)&cdat->dobj_1381; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1381", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1381", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1381.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1381.obj_num = 0; cdat->dobj_1381.obj_hash = 30173770; cdat->dobj_1381.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1382*/ /*_.VALDATA___V1388*/ meltfptr[1387] = (void*)&cdat->dobj_1382; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1382", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1382", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1382.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1382.obj_num = 1; cdat->dobj_1382.obj_hash = 324849305; cdat->dobj_1382.obj_len = 2; /*inistring dstr_1383__meltgc_out_add_i*/ /*_.VALSTR___V1390*/ meltfptr[1389] = (void*)&cdat->dstr_1383__meltgc_out_add_i; cdat->dstr_1383__meltgc_out_add_i.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1383__meltgc_out_add_i.val, "meltgc_out_add_indent((melt_ptr_t)(", sizeof (cdat->dstr_1383__meltgc_out_add_i.val)-1); /*inistring dstr_1384__*/ /*_.VALSTR___V1391*/ meltfptr[1390] = (void*)&cdat->dstr_1384__; cdat->dstr_1384__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1384__.val, "), (", sizeof (cdat->dstr_1384__.val)-1); /*inistring dstr_1385__64_*/ /*_.VALSTR___V1392*/ meltfptr[1391] = (void*)&cdat->dstr_1385__64_; cdat->dstr_1385__64_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1385__64_.val, "), 64);", sizeof (cdat->dstr_1385__64_.val)-1); /*inistring dstr_1386__ADD2OUT_INDENT*/ /*_.VALSTR___V1386*/ meltfptr[1385] = (void*)&cdat->dstr_1386__ADD2OUT_INDENT; cdat->dstr_1386__ADD2OUT_INDENT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1386__ADD2OUT_INDENT.val, "ADD2OUT_INDENT", sizeof (cdat->dstr_1386__ADD2OUT_INDENT.val)-1); /*iniobj dsym_1387__ADD2OUT_INDENTNL*/ /*uniqueobj*/ if (!/*_.VALDATA___V1394*/ meltfptr[1393]) /*_.VALDATA___V1394*/ meltfptr[1393] = (void*)&cdat->dsym_1387__ADD2OUT_INDENTNL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1387__ADD2OUT_INDENTNL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1387__ADD2OUT_INDENTNL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1387__ADD2OUT_INDENTNL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1387__ADD2OUT_INDENTNL.obj_hash = 741830835; cdat->dsym_1387__ADD2OUT_INDENTNL.obj_len = 3; /*inistring dstr_1388__ADD2OUT_INDENTNL*/ /*_.VALSTR___V1395*/ meltfptr[1394] = (void*)&cdat->dstr_1388__ADD2OUT_INDENTNL; cdat->dstr_1388__ADD2OUT_INDENTNL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1388__ADD2OUT_INDENTNL.val, "ADD2OUT_INDENTNL", sizeof (cdat->dstr_1388__ADD2OUT_INDENTNL.val)-1); MELT_LOCATION("warmelt-base.melt:720:/ iniobj"); /*iniobj dobj_1389__ADD2OUT_INDENTNL*/ /*_.VALDATA___V1396*/ meltfptr[1395] = (void*)&cdat->dobj_1389__ADD2OUT_INDENTNL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1389__ADD2OUT_INDENTNL", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1389__ADD2OUT_INDENTNL", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1389__ADD2OUT_INDENTNL.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1389__ADD2OUT_INDENTNL.obj_hash = 246463601; cdat->dobj_1389__ADD2OUT_INDENTNL.obj_len = 5; /*inimult dtup_1390__ADD2OUT_INDENTNL*/ /*_.VALTUP___V1404*/ meltfptr[1403] = (void*)&cdat->dtup_1390__ADD2OUT_INDENTNL; cdat->dtup_1390__ADD2OUT_INDENTNL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1390__ADD2OUT_INDENTNL.nbval = 5; /*inimult dtup_1391__ADD2OUT_INDENTNL*/ /*_.VALTUP___V1400*/ meltfptr[1399] = (void*)&cdat->dtup_1391__ADD2OUT_INDENTNL; cdat->dtup_1391__ADD2OUT_INDENTNL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1391__ADD2OUT_INDENTNL.nbval = 2; /*^iniobj*/ /*iniobj dobj_1392*/ /*_.VALDATA___V1398*/ meltfptr[1397] = (void*)&cdat->dobj_1392; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1392", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1392", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1392.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1392.obj_num = 0; cdat->dobj_1392.obj_hash = 220372992; cdat->dobj_1392.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1393*/ /*_.VALDATA___V1399*/ meltfptr[1398] = (void*)&cdat->dobj_1393; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1393", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1393", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1393.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1393.obj_num = 1; cdat->dobj_1393.obj_hash = 355260979; cdat->dobj_1393.obj_len = 2; /*inistring dstr_1394__meltgc_out_add_i*/ /*_.VALSTR___V1401*/ meltfptr[1400] = (void*)&cdat->dstr_1394__meltgc_out_add_i; cdat->dstr_1394__meltgc_out_add_i.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1394__meltgc_out_add_i.val, "meltgc_out_add_indent((melt_ptr_t)(", sizeof (cdat->dstr_1394__meltgc_out_add_i.val)-1); /*inistring dstr_1395__*/ /*_.VALSTR___V1402*/ meltfptr[1401] = (void*)&cdat->dstr_1395__; cdat->dstr_1395__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1395__.val, "), (", sizeof (cdat->dstr_1395__.val)-1); /*inistring dstr_1396__0_*/ /*_.VALSTR___V1403*/ meltfptr[1402] = (void*)&cdat->dstr_1396__0_; cdat->dstr_1396__0_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1396__0_.val, "), 0);", sizeof (cdat->dstr_1396__0_.val)-1); /*inistring dstr_1397__ADD2OUT_INDENTNL*/ /*_.VALSTR___V1397*/ meltfptr[1396] = (void*)&cdat->dstr_1397__ADD2OUT_INDENTNL; cdat->dstr_1397__ADD2OUT_INDENTNL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1397__ADD2OUT_INDENTNL.val, "ADD2OUT_INDENTNL", sizeof (cdat->dstr_1397__ADD2OUT_INDENTNL.val)-1); /*iniobj dsym_1398__ADD2OUT_SBUF*/ /*uniqueobj*/ if (!/*_.VALDATA___V1405*/ meltfptr[1404]) /*_.VALDATA___V1405*/ meltfptr[1404] = (void*)&cdat->dsym_1398__ADD2OUT_SBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1398__ADD2OUT_SBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1398__ADD2OUT_SBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1398__ADD2OUT_SBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1398__ADD2OUT_SBUF.obj_hash = 368240084; cdat->dsym_1398__ADD2OUT_SBUF.obj_len = 3; /*inistring dstr_1399__ADD2OUT_SBUF*/ /*_.VALSTR___V1406*/ meltfptr[1405] = (void*)&cdat->dstr_1399__ADD2OUT_SBUF; cdat->dstr_1399__ADD2OUT_SBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1399__ADD2OUT_SBUF.val, "ADD2OUT_SBUF", sizeof (cdat->dstr_1399__ADD2OUT_SBUF.val)-1); MELT_LOCATION("warmelt-base.melt:726:/ iniobj"); /*iniobj dobj_1400__ADD2OUT_SBUF*/ /*_.VALDATA___V1407*/ meltfptr[1406] = (void*)&cdat->dobj_1400__ADD2OUT_SBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1400__ADD2OUT_SBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1400__ADD2OUT_SBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1400__ADD2OUT_SBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1400__ADD2OUT_SBUF.obj_hash = 613337766; cdat->dobj_1400__ADD2OUT_SBUF.obj_len = 5; /*inimult dtup_1401__ADD2OUT_SBUF*/ /*_.VALTUP___V1415*/ meltfptr[1414] = (void*)&cdat->dtup_1401__ADD2OUT_SBUF; cdat->dtup_1401__ADD2OUT_SBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1401__ADD2OUT_SBUF.nbval = 5; /*inimult dtup_1402__ADD2OUT_SBUF*/ /*_.VALTUP___V1411*/ meltfptr[1410] = (void*)&cdat->dtup_1402__ADD2OUT_SBUF; cdat->dtup_1402__ADD2OUT_SBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1402__ADD2OUT_SBUF.nbval = 2; /*^iniobj*/ /*iniobj dobj_1403*/ /*_.VALDATA___V1409*/ meltfptr[1408] = (void*)&cdat->dobj_1403; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1403", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1403", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1403.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1403.obj_num = 0; cdat->dobj_1403.obj_hash = 968346417; cdat->dobj_1403.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1404*/ /*_.VALDATA___V1410*/ meltfptr[1409] = (void*)&cdat->dobj_1404; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1404", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1404", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1404.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1404.obj_num = 1; cdat->dobj_1404.obj_hash = 1015955073; cdat->dobj_1404.obj_len = 2; /*inistring dstr_1405__meltgc_add_out_*/ /*_.VALSTR___V1412*/ meltfptr[1411] = (void*)&cdat->dstr_1405__meltgc_add_out_; cdat->dstr_1405__meltgc_add_out_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1405__meltgc_add_out_.val, "meltgc_add_out((melt_ptr_t)(", sizeof (cdat->dstr_1405__meltgc_add_out_.val)-1); /*inistring dstr_1406__melt_out_str_*/ /*_.VALSTR___V1413*/ meltfptr[1412] = (void*)&cdat->dstr_1406__melt_out_str_; cdat->dstr_1406__melt_out_str_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1406__melt_out_str_.val, "), melt_out_str(", sizeof (cdat->dstr_1406__melt_out_str_.val)-1); /*inistring dstr_1407__*/ /*_.VALSTR___V1414*/ meltfptr[1413] = (void*)&cdat->dstr_1407__; cdat->dstr_1407__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1407__.val, "))", sizeof (cdat->dstr_1407__.val)-1); /*inistring dstr_1408__ADD2OUT_SBUF*/ /*_.VALSTR___V1408*/ meltfptr[1407] = (void*)&cdat->dstr_1408__ADD2OUT_SBUF; cdat->dstr_1408__ADD2OUT_SBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1408__ADD2OUT_SBUF.val, "ADD2OUT_SBUF", sizeof (cdat->dstr_1408__ADD2OUT_SBUF.val)-1); /*iniobj dsym_1409__ADD2OUT_CENCSTRING*/ /*uniqueobj*/ if (!/*_.VALDATA___V1416*/ meltfptr[1415]) /*_.VALDATA___V1416*/ meltfptr[1415] = (void*)&cdat->dsym_1409__ADD2OUT_CENCSTRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1409__ADD2OUT_CENCSTRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1409__ADD2OUT_CENCSTRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1409__ADD2OUT_CENCSTRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1409__ADD2OUT_CENCSTRING.obj_hash = 48397919; cdat->dsym_1409__ADD2OUT_CENCSTRING.obj_len = 3; /*inistring dstr_1410__ADD2OUT_CENCSTRI*/ /*_.VALSTR___V1417*/ meltfptr[1416] = (void*)&cdat->dstr_1410__ADD2OUT_CENCSTRI; cdat->dstr_1410__ADD2OUT_CENCSTRI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1410__ADD2OUT_CENCSTRI.val, "ADD2OUT_CENCSTRING", sizeof (cdat->dstr_1410__ADD2OUT_CENCSTRI.val)-1); MELT_LOCATION("warmelt-base.melt:731:/ iniobj"); /*iniobj dobj_1411__ADD2OUT_CENCSTRING*/ /*_.VALDATA___V1418*/ meltfptr[1417] = (void*)&cdat->dobj_1411__ADD2OUT_CENCSTRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1411__ADD2OUT_CENCSTRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1411__ADD2OUT_CENCSTRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1411__ADD2OUT_CENCSTRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1411__ADD2OUT_CENCSTRING.obj_hash = 43459597; cdat->dobj_1411__ADD2OUT_CENCSTRING.obj_len = 5; /*inimult dtup_1412__ADD2OUT_CENCSTRING*/ /*_.VALTUP___V1426*/ meltfptr[1425] = (void*)&cdat->dtup_1412__ADD2OUT_CENCSTRING; cdat->dtup_1412__ADD2OUT_CENCSTRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1412__ADD2OUT_CENCSTRING.nbval = 5; /*inimult dtup_1413__ADD2OUT_CENCSTRING*/ /*_.VALTUP___V1422*/ meltfptr[1421] = (void*)&cdat->dtup_1413__ADD2OUT_CENCSTRING; cdat->dtup_1413__ADD2OUT_CENCSTRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1413__ADD2OUT_CENCSTRING.nbval = 2; /*^iniobj*/ /*iniobj dobj_1414*/ /*_.VALDATA___V1420*/ meltfptr[1419] = (void*)&cdat->dobj_1414; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1414", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1414", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1414.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1414.obj_num = 0; cdat->dobj_1414.obj_hash = 880904191; cdat->dobj_1414.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1415*/ /*_.VALDATA___V1421*/ meltfptr[1420] = (void*)&cdat->dobj_1415; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1415", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1415", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1415.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1415.obj_num = 1; cdat->dobj_1415.obj_hash = 1051914761; cdat->dobj_1415.obj_len = 2; /*inistring dstr_1416__meltgc_add_out_c*/ /*_.VALSTR___V1423*/ meltfptr[1422] = (void*)&cdat->dstr_1416__meltgc_add_out_c; cdat->dstr_1416__meltgc_add_out_c.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1416__meltgc_add_out_c.val, "meltgc_add_out_cstr((melt_ptr_t)(", sizeof (cdat->dstr_1416__meltgc_add_out_c.val)-1); /*inistring dstr_1417__melt_string_s*/ /*_.VALSTR___V1424*/ meltfptr[1423] = (void*)&cdat->dstr_1417__melt_string_s; cdat->dstr_1417__melt_string_s.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1417__melt_string_s.val, "), melt_string_str((melt_ptr_t)(", sizeof (cdat->dstr_1417__melt_string_s.val)-1); /*inistring dstr_1418__*/ /*_.VALSTR___V1425*/ meltfptr[1424] = (void*)&cdat->dstr_1418__; cdat->dstr_1418__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1418__.val, ")))", sizeof (cdat->dstr_1418__.val)-1); /*inistring dstr_1419__ADD2OUT_CENCSTRI*/ /*_.VALSTR___V1419*/ meltfptr[1418] = (void*)&cdat->dstr_1419__ADD2OUT_CENCSTRI; cdat->dstr_1419__ADD2OUT_CENCSTRI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1419__ADD2OUT_CENCSTRI.val, "ADD2OUT_CENCSTRING", sizeof (cdat->dstr_1419__ADD2OUT_CENCSTRI.val)-1); /*iniobj dsym_1420__ADD2OUT_CENCSTRBUF*/ /*uniqueobj*/ if (!/*_.VALDATA___V1427*/ meltfptr[1426]) /*_.VALDATA___V1427*/ meltfptr[1426] = (void*)&cdat->dsym_1420__ADD2OUT_CENCSTRBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1420__ADD2OUT_CENCSTRBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1420__ADD2OUT_CENCSTRBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1420__ADD2OUT_CENCSTRBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1420__ADD2OUT_CENCSTRBUF.obj_hash = 720576994; cdat->dsym_1420__ADD2OUT_CENCSTRBUF.obj_len = 3; /*inistring dstr_1421__ADD2OUT_CENCSTRB*/ /*_.VALSTR___V1428*/ meltfptr[1427] = (void*)&cdat->dstr_1421__ADD2OUT_CENCSTRB; cdat->dstr_1421__ADD2OUT_CENCSTRB.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1421__ADD2OUT_CENCSTRB.val, "ADD2OUT_CENCSTRBUF", sizeof (cdat->dstr_1421__ADD2OUT_CENCSTRB.val)-1); MELT_LOCATION("warmelt-base.melt:736:/ iniobj"); /*iniobj dobj_1422__ADD2OUT_CENCSTRBUF*/ /*_.VALDATA___V1429*/ meltfptr[1428] = (void*)&cdat->dobj_1422__ADD2OUT_CENCSTRBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1422__ADD2OUT_CENCSTRBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1422__ADD2OUT_CENCSTRBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1422__ADD2OUT_CENCSTRBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1422__ADD2OUT_CENCSTRBUF.obj_hash = 486591543; cdat->dobj_1422__ADD2OUT_CENCSTRBUF.obj_len = 5; /*inimult dtup_1423__ADD2OUT_CENCSTRBUF*/ /*_.VALTUP___V1437*/ meltfptr[1436] = (void*)&cdat->dtup_1423__ADD2OUT_CENCSTRBUF; cdat->dtup_1423__ADD2OUT_CENCSTRBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1423__ADD2OUT_CENCSTRBUF.nbval = 5; /*inimult dtup_1424__ADD2OUT_CENCSTRBUF*/ /*_.VALTUP___V1433*/ meltfptr[1432] = (void*)&cdat->dtup_1424__ADD2OUT_CENCSTRBUF; cdat->dtup_1424__ADD2OUT_CENCSTRBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1424__ADD2OUT_CENCSTRBUF.nbval = 2; /*^iniobj*/ /*iniobj dobj_1425*/ /*_.VALDATA___V1431*/ meltfptr[1430] = (void*)&cdat->dobj_1425; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1425", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1425", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1425.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1425.obj_num = 0; cdat->dobj_1425.obj_hash = 29543499; cdat->dobj_1425.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1426*/ /*_.VALDATA___V1432*/ meltfptr[1431] = (void*)&cdat->dobj_1426; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1426", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1426", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1426.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1426.obj_num = 1; cdat->dobj_1426.obj_hash = 535182223; cdat->dobj_1426.obj_len = 2; /*inistring dstr_1427__meltgc_add_out_c*/ /*_.VALSTR___V1434*/ meltfptr[1433] = (void*)&cdat->dstr_1427__meltgc_add_out_c; cdat->dstr_1427__meltgc_add_out_c.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1427__meltgc_add_out_c.val, "meltgc_add_out_cstr((melt_ptr_t)(", sizeof (cdat->dstr_1427__meltgc_add_out_c.val)-1); /*inistring dstr_1428__melt_out_str_*/ /*_.VALSTR___V1435*/ meltfptr[1434] = (void*)&cdat->dstr_1428__melt_out_str_; cdat->dstr_1428__melt_out_str_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1428__melt_out_str_.val, "), melt_out_str((melt_ptr_t)(", sizeof (cdat->dstr_1428__melt_out_str_.val)-1); /*inistring dstr_1429__*/ /*_.VALSTR___V1436*/ meltfptr[1435] = (void*)&cdat->dstr_1429__; cdat->dstr_1429__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1429__.val, ")))", sizeof (cdat->dstr_1429__.val)-1); /*inistring dstr_1430__ADD2OUT_CENCSTRB*/ /*_.VALSTR___V1430*/ meltfptr[1429] = (void*)&cdat->dstr_1430__ADD2OUT_CENCSTRB; cdat->dstr_1430__ADD2OUT_CENCSTRB.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1430__ADD2OUT_CENCSTRB.val, "ADD2OUT_CENCSTRBUF", sizeof (cdat->dstr_1430__ADD2OUT_CENCSTRB.val)-1); /*iniobj dsym_1431__ADD2OUT_CCOMSTRING*/ /*uniqueobj*/ if (!/*_.VALDATA___V1438*/ meltfptr[1437]) /*_.VALDATA___V1438*/ meltfptr[1437] = (void*)&cdat->dsym_1431__ADD2OUT_CCOMSTRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1431__ADD2OUT_CCOMSTRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1431__ADD2OUT_CCOMSTRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1431__ADD2OUT_CCOMSTRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1431__ADD2OUT_CCOMSTRING.obj_hash = 16248573; cdat->dsym_1431__ADD2OUT_CCOMSTRING.obj_len = 3; /*inistring dstr_1432__ADD2OUT_CCOMSTRI*/ /*_.VALSTR___V1439*/ meltfptr[1438] = (void*)&cdat->dstr_1432__ADD2OUT_CCOMSTRI; cdat->dstr_1432__ADD2OUT_CCOMSTRI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1432__ADD2OUT_CCOMSTRI.val, "ADD2OUT_CCOMSTRING", sizeof (cdat->dstr_1432__ADD2OUT_CCOMSTRI.val)-1); MELT_LOCATION("warmelt-base.melt:741:/ iniobj"); /*iniobj dobj_1433__ADD2OUT_CCOMSTRING*/ /*_.VALDATA___V1440*/ meltfptr[1439] = (void*)&cdat->dobj_1433__ADD2OUT_CCOMSTRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1433__ADD2OUT_CCOMSTRING", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1433__ADD2OUT_CCOMSTRING", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1433__ADD2OUT_CCOMSTRING.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1433__ADD2OUT_CCOMSTRING.obj_hash = 621187295; cdat->dobj_1433__ADD2OUT_CCOMSTRING.obj_len = 5; /*inimult dtup_1434__ADD2OUT_CCOMSTRING*/ /*_.VALTUP___V1448*/ meltfptr[1447] = (void*)&cdat->dtup_1434__ADD2OUT_CCOMSTRING; cdat->dtup_1434__ADD2OUT_CCOMSTRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1434__ADD2OUT_CCOMSTRING.nbval = 5; /*inimult dtup_1435__ADD2OUT_CCOMSTRING*/ /*_.VALTUP___V1444*/ meltfptr[1443] = (void*)&cdat->dtup_1435__ADD2OUT_CCOMSTRING; cdat->dtup_1435__ADD2OUT_CCOMSTRING.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1435__ADD2OUT_CCOMSTRING.nbval = 2; /*^iniobj*/ /*iniobj dobj_1436*/ /*_.VALDATA___V1442*/ meltfptr[1441] = (void*)&cdat->dobj_1436; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1436", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1436", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1436.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1436.obj_num = 0; cdat->dobj_1436.obj_hash = 126464302; cdat->dobj_1436.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1437*/ /*_.VALDATA___V1443*/ meltfptr[1442] = (void*)&cdat->dobj_1437; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1437", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1437", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1437.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1437.obj_num = 1; cdat->dobj_1437.obj_hash = 233954535; cdat->dobj_1437.obj_len = 2; /*inistring dstr_1438__meltgc_add_out_c*/ /*_.VALSTR___V1445*/ meltfptr[1444] = (void*)&cdat->dstr_1438__meltgc_add_out_c; cdat->dstr_1438__meltgc_add_out_c.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1438__meltgc_add_out_c.val, "meltgc_add_out_ccomment((melt_ptr_t)(", sizeof (cdat->dstr_1438__meltgc_add_out_c.val)-1); /*inistring dstr_1439__melt_string_s*/ /*_.VALSTR___V1446*/ meltfptr[1445] = (void*)&cdat->dstr_1439__melt_string_s; cdat->dstr_1439__melt_string_s.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1439__melt_string_s.val, "), melt_string_str((melt_ptr_t)(", sizeof (cdat->dstr_1439__melt_string_s.val)-1); /*inistring dstr_1440__*/ /*_.VALSTR___V1447*/ meltfptr[1446] = (void*)&cdat->dstr_1440__; cdat->dstr_1440__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1440__.val, ")))", sizeof (cdat->dstr_1440__.val)-1); /*inistring dstr_1441__ADD2OUT_CCOMSTRI*/ /*_.VALSTR___V1441*/ meltfptr[1440] = (void*)&cdat->dstr_1441__ADD2OUT_CCOMSTRI; cdat->dstr_1441__ADD2OUT_CCOMSTRI.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1441__ADD2OUT_CCOMSTRI.val, "ADD2OUT_CCOMSTRING", sizeof (cdat->dstr_1441__ADD2OUT_CCOMSTRI.val)-1); /*iniobj dsym_1442__ADD2OUT_CCOMSTRBUF*/ /*uniqueobj*/ if (!/*_.VALDATA___V1449*/ meltfptr[1448]) /*_.VALDATA___V1449*/ meltfptr[1448] = (void*)&cdat->dsym_1442__ADD2OUT_CCOMSTRBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1442__ADD2OUT_CCOMSTRBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1442__ADD2OUT_CCOMSTRBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1442__ADD2OUT_CCOMSTRBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1442__ADD2OUT_CCOMSTRBUF.obj_hash = 188407821; cdat->dsym_1442__ADD2OUT_CCOMSTRBUF.obj_len = 3; /*inistring dstr_1443__ADD2OUT_CCOMSTRB*/ /*_.VALSTR___V1450*/ meltfptr[1449] = (void*)&cdat->dstr_1443__ADD2OUT_CCOMSTRB; cdat->dstr_1443__ADD2OUT_CCOMSTRB.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1443__ADD2OUT_CCOMSTRB.val, "ADD2OUT_CCOMSTRBUF", sizeof (cdat->dstr_1443__ADD2OUT_CCOMSTRB.val)-1); MELT_LOCATION("warmelt-base.melt:746:/ iniobj"); /*iniobj dobj_1444__ADD2OUT_CCOMSTRBUF*/ /*_.VALDATA___V1451*/ meltfptr[1450] = (void*)&cdat->dobj_1444__ADD2OUT_CCOMSTRBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1444__ADD2OUT_CCOMSTRBUF", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1444__ADD2OUT_CCOMSTRBUF", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1444__ADD2OUT_CCOMSTRBUF.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1444__ADD2OUT_CCOMSTRBUF.obj_hash = 574164621; cdat->dobj_1444__ADD2OUT_CCOMSTRBUF.obj_len = 5; /*inimult dtup_1445__ADD2OUT_CCOMSTRBUF*/ /*_.VALTUP___V1459*/ meltfptr[1458] = (void*)&cdat->dtup_1445__ADD2OUT_CCOMSTRBUF; cdat->dtup_1445__ADD2OUT_CCOMSTRBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1445__ADD2OUT_CCOMSTRBUF.nbval = 5; /*inimult dtup_1446__ADD2OUT_CCOMSTRBUF*/ /*_.VALTUP___V1455*/ meltfptr[1454] = (void*)&cdat->dtup_1446__ADD2OUT_CCOMSTRBUF; cdat->dtup_1446__ADD2OUT_CCOMSTRBUF.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1446__ADD2OUT_CCOMSTRBUF.nbval = 2; /*^iniobj*/ /*iniobj dobj_1447*/ /*_.VALDATA___V1453*/ meltfptr[1452] = (void*)&cdat->dobj_1447; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1447", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1447", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1447.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1447.obj_num = 0; cdat->dobj_1447.obj_hash = 16118798; cdat->dobj_1447.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1448*/ /*_.VALDATA___V1454*/ meltfptr[1453] = (void*)&cdat->dobj_1448; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1448", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1448", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1448.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1448.obj_num = 1; cdat->dobj_1448.obj_hash = 461098861; cdat->dobj_1448.obj_len = 2; /*inistring dstr_1449__meltgc_add_out_c*/ /*_.VALSTR___V1456*/ meltfptr[1455] = (void*)&cdat->dstr_1449__meltgc_add_out_c; cdat->dstr_1449__meltgc_add_out_c.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1449__meltgc_add_out_c.val, "meltgc_add_out_ccomment((melt_ptr_t)(", sizeof (cdat->dstr_1449__meltgc_add_out_c.val)-1); /*inistring dstr_1450__melt_out_str_*/ /*_.VALSTR___V1457*/ meltfptr[1456] = (void*)&cdat->dstr_1450__melt_out_str_; cdat->dstr_1450__melt_out_str_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1450__melt_out_str_.val, "), melt_out_str((melt_ptr_t)(", sizeof (cdat->dstr_1450__melt_out_str_.val)-1); /*inistring dstr_1451__*/ /*_.VALSTR___V1458*/ meltfptr[1457] = (void*)&cdat->dstr_1451__; cdat->dstr_1451__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1451__.val, ")))", sizeof (cdat->dstr_1451__.val)-1); /*inistring dstr_1452__ADD2OUT_CCOMSTRB*/ /*_.VALSTR___V1452*/ meltfptr[1451] = (void*)&cdat->dstr_1452__ADD2OUT_CCOMSTRB; cdat->dstr_1452__ADD2OUT_CCOMSTRB.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1452__ADD2OUT_CCOMSTRB.val, "ADD2OUT_CCOMSTRBUF", sizeof (cdat->dstr_1452__ADD2OUT_CCOMSTRB.val)-1); /*iniobj dsym_1453__ADD2OUT_CCOMCONST*/ /*uniqueobj*/ if (!/*_.VALDATA___V1460*/ meltfptr[1459]) /*_.VALDATA___V1460*/ meltfptr[1459] = (void*)&cdat->dsym_1453__ADD2OUT_CCOMCONST; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1453__ADD2OUT_CCOMCONST", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1453__ADD2OUT_CCOMCONST", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1453__ADD2OUT_CCOMCONST.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1453__ADD2OUT_CCOMCONST.obj_hash = 909236249; cdat->dsym_1453__ADD2OUT_CCOMCONST.obj_len = 3; /*inistring dstr_1454__ADD2OUT_CCOMCONS*/ /*_.VALSTR___V1461*/ meltfptr[1460] = (void*)&cdat->dstr_1454__ADD2OUT_CCOMCONS; cdat->dstr_1454__ADD2OUT_CCOMCONS.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1454__ADD2OUT_CCOMCONS.val, "ADD2OUT_CCOMCONST", sizeof (cdat->dstr_1454__ADD2OUT_CCOMCONS.val)-1); MELT_LOCATION("warmelt-base.melt:751:/ iniobj"); /*iniobj dobj_1455__ADD2OUT_CCOMCONST*/ /*_.VALDATA___V1462*/ meltfptr[1461] = (void*)&cdat->dobj_1455__ADD2OUT_CCOMCONST; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1455__ADD2OUT_CCOMCONST", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1455__ADD2OUT_CCOMCONST", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1455__ADD2OUT_CCOMCONST.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1455__ADD2OUT_CCOMCONST.obj_hash = 216989261; cdat->dobj_1455__ADD2OUT_CCOMCONST.obj_len = 5; /*inimult dtup_1456__ADD2OUT_CCOMCONST*/ /*_.VALTUP___V1470*/ meltfptr[1469] = (void*)&cdat->dtup_1456__ADD2OUT_CCOMCONST; cdat->dtup_1456__ADD2OUT_CCOMCONST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1456__ADD2OUT_CCOMCONST.nbval = 5; /*inimult dtup_1457__ADD2OUT_CCOMCONST*/ /*_.VALTUP___V1466*/ meltfptr[1465] = (void*)&cdat->dtup_1457__ADD2OUT_CCOMCONST; cdat->dtup_1457__ADD2OUT_CCOMCONST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1457__ADD2OUT_CCOMCONST.nbval = 2; /*^iniobj*/ /*iniobj dobj_1458*/ /*_.VALDATA___V1464*/ meltfptr[1463] = (void*)&cdat->dobj_1458; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1458", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1458", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1458.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1458.obj_num = 0; cdat->dobj_1458.obj_hash = 774980949; cdat->dobj_1458.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1459*/ /*_.VALDATA___V1465*/ meltfptr[1464] = (void*)&cdat->dobj_1459; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1459", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1459", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1459.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1459.obj_num = 1; cdat->dobj_1459.obj_hash = 906037275; cdat->dobj_1459.obj_len = 2; /*inistring dstr_1460__meltgc_add_out_c*/ /*_.VALSTR___V1467*/ meltfptr[1466] = (void*)&cdat->dstr_1460__meltgc_add_out_c; cdat->dstr_1460__meltgc_add_out_c.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1460__meltgc_add_out_c.val, "meltgc_add_out_ccomment((", sizeof (cdat->dstr_1460__meltgc_add_out_c.val)-1); /*inistring dstr_1461__*/ /*_.VALSTR___V1468*/ meltfptr[1467] = (void*)&cdat->dstr_1461__; cdat->dstr_1461__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1461__.val, "), ", sizeof (cdat->dstr_1461__.val)-1); /*inistring dstr_1462__*/ /*_.VALSTR___V1469*/ meltfptr[1468] = (void*)&cdat->dstr_1462__; cdat->dstr_1462__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1462__.val, ")", sizeof (cdat->dstr_1462__.val)-1); /*inistring dstr_1463__ADD2OUT_CCOMCONS*/ /*_.VALSTR___V1463*/ meltfptr[1462] = (void*)&cdat->dstr_1463__ADD2OUT_CCOMCONS; cdat->dstr_1463__ADD2OUT_CCOMCONS.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1463__ADD2OUT_CCOMCONS.val, "ADD2OUT_CCOMCONST", sizeof (cdat->dstr_1463__ADD2OUT_CCOMCONS.val)-1); /*iniobj dsym_1464__ADD2OUT_CIDENT*/ /*uniqueobj*/ if (!/*_.VALDATA___V1471*/ meltfptr[1470]) /*_.VALDATA___V1471*/ meltfptr[1470] = (void*)&cdat->dsym_1464__ADD2OUT_CIDENT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1464__ADD2OUT_CIDENT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1464__ADD2OUT_CIDENT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1464__ADD2OUT_CIDENT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1464__ADD2OUT_CIDENT.obj_hash = 814562778; cdat->dsym_1464__ADD2OUT_CIDENT.obj_len = 3; /*inistring dstr_1465__ADD2OUT_CIDENT*/ /*_.VALSTR___V1472*/ meltfptr[1471] = (void*)&cdat->dstr_1465__ADD2OUT_CIDENT; cdat->dstr_1465__ADD2OUT_CIDENT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1465__ADD2OUT_CIDENT.val, "ADD2OUT_CIDENT", sizeof (cdat->dstr_1465__ADD2OUT_CIDENT.val)-1); MELT_LOCATION("warmelt-base.melt:757:/ iniobj"); /*iniobj dobj_1466__ADD2OUT_CIDENT*/ /*_.VALDATA___V1473*/ meltfptr[1472] = (void*)&cdat->dobj_1466__ADD2OUT_CIDENT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1466__ADD2OUT_CIDENT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1466__ADD2OUT_CIDENT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1466__ADD2OUT_CIDENT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1466__ADD2OUT_CIDENT.obj_hash = 233409168; cdat->dobj_1466__ADD2OUT_CIDENT.obj_len = 5; /*inimult dtup_1467__ADD2OUT_CIDENT*/ /*_.VALTUP___V1481*/ meltfptr[1480] = (void*)&cdat->dtup_1467__ADD2OUT_CIDENT; cdat->dtup_1467__ADD2OUT_CIDENT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1467__ADD2OUT_CIDENT.nbval = 5; /*inimult dtup_1468__ADD2OUT_CIDENT*/ /*_.VALTUP___V1477*/ meltfptr[1476] = (void*)&cdat->dtup_1468__ADD2OUT_CIDENT; cdat->dtup_1468__ADD2OUT_CIDENT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1468__ADD2OUT_CIDENT.nbval = 2; /*^iniobj*/ /*iniobj dobj_1469*/ /*_.VALDATA___V1475*/ meltfptr[1474] = (void*)&cdat->dobj_1469; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1469", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1469", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1469.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1469.obj_num = 0; cdat->dobj_1469.obj_hash = 340794057; cdat->dobj_1469.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1470*/ /*_.VALDATA___V1476*/ meltfptr[1475] = (void*)&cdat->dobj_1470; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1470", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1470", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1470.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1470.obj_num = 1; cdat->dobj_1470.obj_hash = 848910654; cdat->dobj_1470.obj_len = 2; /*inistring dstr_1471__meltgc_add_out_c*/ /*_.VALSTR___V1478*/ meltfptr[1477] = (void*)&cdat->dstr_1471__meltgc_add_out_c; cdat->dstr_1471__meltgc_add_out_c.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1471__meltgc_add_out_c.val, "meltgc_add_out_cident((melt_ptr_t)(", sizeof (cdat->dstr_1471__meltgc_add_out_c.val)-1); /*inistring dstr_1472__melt_st*/ /*_.VALSTR___V1479*/ meltfptr[1478] = (void*)&cdat->dstr_1472__melt_st; cdat->dstr_1472__melt_st.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1472__melt_st.val, "), \n\t\t\t melt_string_str((melt_ptr_t)(", sizeof (cdat->dstr_1472__melt_st.val)-1); /*inistring dstr_1473__*/ /*_.VALSTR___V1480*/ meltfptr[1479] = (void*)&cdat->dstr_1473__; cdat->dstr_1473__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1473__.val, ")))", sizeof (cdat->dstr_1473__.val)-1); /*inistring dstr_1474__ADD2OUT_CIDENT*/ /*_.VALSTR___V1474*/ meltfptr[1473] = (void*)&cdat->dstr_1474__ADD2OUT_CIDENT; cdat->dstr_1474__ADD2OUT_CIDENT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1474__ADD2OUT_CIDENT.val, "ADD2OUT_CIDENT", sizeof (cdat->dstr_1474__ADD2OUT_CIDENT.val)-1); /*iniobj dsym_1475__ADD2OUT_CIDENTPREFIX*/ /*uniqueobj*/ if (!/*_.VALDATA___V1482*/ meltfptr[1481]) /*_.VALDATA___V1482*/ meltfptr[1481] = (void*)&cdat->dsym_1475__ADD2OUT_CIDENTPREFIX; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1475__ADD2OUT_CIDENTPREFIX", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1475__ADD2OUT_CIDENTPREFIX", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1475__ADD2OUT_CIDENTPREFIX.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1475__ADD2OUT_CIDENTPREFIX.obj_hash = 470334497; cdat->dsym_1475__ADD2OUT_CIDENTPREFIX.obj_len = 3; /*inistring dstr_1476__ADD2OUT_CIDENTPR*/ /*_.VALSTR___V1483*/ meltfptr[1482] = (void*)&cdat->dstr_1476__ADD2OUT_CIDENTPR; cdat->dstr_1476__ADD2OUT_CIDENTPR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1476__ADD2OUT_CIDENTPR.val, "ADD2OUT_CIDENTPREFIX", sizeof (cdat->dstr_1476__ADD2OUT_CIDENTPR.val)-1); MELT_LOCATION("warmelt-base.melt:765:/ iniobj"); /*iniobj dobj_1477__ADD2OUT_CIDENTPREFIX*/ /*_.VALDATA___V1484*/ meltfptr[1483] = (void*)&cdat->dobj_1477__ADD2OUT_CIDENTPREFIX; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1477__ADD2OUT_CIDENTPREFIX", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1477__ADD2OUT_CIDENTPREFIX", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1477__ADD2OUT_CIDENTPREFIX.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1477__ADD2OUT_CIDENTPREFIX.obj_hash = 315197741; cdat->dobj_1477__ADD2OUT_CIDENTPREFIX.obj_len = 5; /*inimult dtup_1478__ADD2OUT_CIDENTPREFIX*/ /*_.VALTUP___V1494*/ meltfptr[1493] = (void*)&cdat->dtup_1478__ADD2OUT_CIDENTPREFIX; cdat->dtup_1478__ADD2OUT_CIDENTPREFIX.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1478__ADD2OUT_CIDENTPREFIX.nbval = 7; /*inimult dtup_1479__ADD2OUT_CIDENTPREFIX*/ /*_.VALTUP___V1489*/ meltfptr[1488] = (void*)&cdat->dtup_1479__ADD2OUT_CIDENTPREFIX; cdat->dtup_1479__ADD2OUT_CIDENTPREFIX.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1479__ADD2OUT_CIDENTPREFIX.nbval = 3; /*^iniobj*/ /*iniobj dobj_1480*/ /*_.VALDATA___V1486*/ meltfptr[1485] = (void*)&cdat->dobj_1480; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1480", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1480", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1480.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1480.obj_num = 0; cdat->dobj_1480.obj_hash = 1045781372; cdat->dobj_1480.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1481*/ /*_.VALDATA___V1487*/ meltfptr[1486] = (void*)&cdat->dobj_1481; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1481", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1481", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1481.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1481.obj_num = 1; cdat->dobj_1481.obj_hash = 609101773; cdat->dobj_1481.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1482*/ /*_.VALDATA___V1488*/ meltfptr[1487] = (void*)&cdat->dobj_1482; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1482", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1482", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1482.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1482.obj_num = 2; cdat->dobj_1482.obj_hash = 234321277; cdat->dobj_1482.obj_len = 2; /*inistring dstr_1483__meltgc_add_out_c*/ /*_.VALSTR___V1490*/ meltfptr[1489] = (void*)&cdat->dstr_1483__meltgc_add_out_c; cdat->dstr_1483__meltgc_add_out_c.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1483__meltgc_add_out_c.val, "meltgc_add_out_cidentprefix((melt_ptr_t)(", sizeof (cdat->dstr_1483__meltgc_add_out_c.val)-1); /*inistring dstr_1484__melt_str*/ /*_.VALSTR___V1491*/ meltfptr[1490] = (void*)&cdat->dstr_1484__melt_str; cdat->dstr_1484__melt_str.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1484__melt_str.val, "), \n\t\t\t\tmelt_string_str((melt_ptr_t)(", sizeof (cdat->dstr_1484__melt_str.val)-1); /*inistring dstr_1485__*/ /*_.VALSTR___V1492*/ meltfptr[1491] = (void*)&cdat->dstr_1485__; cdat->dstr_1485__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1485__.val, ")), \n\t\t\t\t(", sizeof (cdat->dstr_1485__.val)-1); /*inistring dstr_1486__*/ /*_.VALSTR___V1493*/ meltfptr[1492] = (void*)&cdat->dstr_1486__; cdat->dstr_1486__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1486__.val, "))", sizeof (cdat->dstr_1486__.val)-1); /*inistring dstr_1487__ADD2OUT_CIDENTPR*/ /*_.VALSTR___V1485*/ meltfptr[1484] = (void*)&cdat->dstr_1487__ADD2OUT_CIDENTPR; cdat->dstr_1487__ADD2OUT_CIDENTPR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1487__ADD2OUT_CIDENTPR.val, "ADD2OUT_CIDENTPREFIX", sizeof (cdat->dstr_1487__ADD2OUT_CIDENTPR.val)-1); /*iniobj dsym_1488__ADD2OUT_LONGDEC*/ /*uniqueobj*/ if (!/*_.VALDATA___V1495*/ meltfptr[1494]) /*_.VALDATA___V1495*/ meltfptr[1494] = (void*)&cdat->dsym_1488__ADD2OUT_LONGDEC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1488__ADD2OUT_LONGDEC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1488__ADD2OUT_LONGDEC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1488__ADD2OUT_LONGDEC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1488__ADD2OUT_LONGDEC.obj_hash = 953606948; cdat->dsym_1488__ADD2OUT_LONGDEC.obj_len = 3; /*inistring dstr_1489__ADD2OUT_LONGDEC*/ /*_.VALSTR___V1496*/ meltfptr[1495] = (void*)&cdat->dstr_1489__ADD2OUT_LONGDEC; cdat->dstr_1489__ADD2OUT_LONGDEC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1489__ADD2OUT_LONGDEC.val, "ADD2OUT_LONGDEC", sizeof (cdat->dstr_1489__ADD2OUT_LONGDEC.val)-1); MELT_LOCATION("warmelt-base.melt:773:/ iniobj"); /*iniobj dobj_1490__ADD2OUT_LONGDEC*/ /*_.VALDATA___V1497*/ meltfptr[1496] = (void*)&cdat->dobj_1490__ADD2OUT_LONGDEC; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1490__ADD2OUT_LONGDEC", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1490__ADD2OUT_LONGDEC", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1490__ADD2OUT_LONGDEC.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1490__ADD2OUT_LONGDEC.obj_hash = 18282568; cdat->dobj_1490__ADD2OUT_LONGDEC.obj_len = 5; /*inimult dtup_1491__ADD2OUT_LONGDEC*/ /*_.VALTUP___V1505*/ meltfptr[1504] = (void*)&cdat->dtup_1491__ADD2OUT_LONGDEC; cdat->dtup_1491__ADD2OUT_LONGDEC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1491__ADD2OUT_LONGDEC.nbval = 5; /*inimult dtup_1492__ADD2OUT_LONGDEC*/ /*_.VALTUP___V1501*/ meltfptr[1500] = (void*)&cdat->dtup_1492__ADD2OUT_LONGDEC; cdat->dtup_1492__ADD2OUT_LONGDEC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1492__ADD2OUT_LONGDEC.nbval = 2; /*^iniobj*/ /*iniobj dobj_1493*/ /*_.VALDATA___V1499*/ meltfptr[1498] = (void*)&cdat->dobj_1493; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1493", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1493", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1493.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1493.obj_num = 0; cdat->dobj_1493.obj_hash = 308560115; cdat->dobj_1493.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1494*/ /*_.VALDATA___V1500*/ meltfptr[1499] = (void*)&cdat->dobj_1494; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1494", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1494", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1494.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1494.obj_num = 1; cdat->dobj_1494.obj_hash = 94467378; cdat->dobj_1494.obj_len = 2; /*inistring dstr_1495__meltgc_add_out_d*/ /*_.VALSTR___V1502*/ meltfptr[1501] = (void*)&cdat->dstr_1495__meltgc_add_out_d; cdat->dstr_1495__meltgc_add_out_d.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1495__meltgc_add_out_d.val, "meltgc_add_out_dec((melt_ptr_t)(", sizeof (cdat->dstr_1495__meltgc_add_out_d.val)-1); /*inistring dstr_1496__*/ /*_.VALSTR___V1503*/ meltfptr[1502] = (void*)&cdat->dstr_1496__; cdat->dstr_1496__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1496__.val, "), (", sizeof (cdat->dstr_1496__.val)-1); /*inistring dstr_1497__*/ /*_.VALSTR___V1504*/ meltfptr[1503] = (void*)&cdat->dstr_1497__; cdat->dstr_1497__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1497__.val, "))", sizeof (cdat->dstr_1497__.val)-1); /*inistring dstr_1498__ADD2OUT_LONGDEC*/ /*_.VALSTR___V1498*/ meltfptr[1497] = (void*)&cdat->dstr_1498__ADD2OUT_LONGDEC; cdat->dstr_1498__ADD2OUT_LONGDEC.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1498__ADD2OUT_LONGDEC.val, "ADD2OUT_LONGDEC", sizeof (cdat->dstr_1498__ADD2OUT_LONGDEC.val)-1); /*iniobj dsym_1499__ADD2OUT_LONGHEX*/ /*uniqueobj*/ if (!/*_.VALDATA___V1506*/ meltfptr[1505]) /*_.VALDATA___V1506*/ meltfptr[1505] = (void*)&cdat->dsym_1499__ADD2OUT_LONGHEX; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1499__ADD2OUT_LONGHEX", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1499__ADD2OUT_LONGHEX", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1499__ADD2OUT_LONGHEX.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1499__ADD2OUT_LONGHEX.obj_hash = 852707617; cdat->dsym_1499__ADD2OUT_LONGHEX.obj_len = 3; /*inistring dstr_1500__ADD2OUT_LONGHEX*/ /*_.VALSTR___V1507*/ meltfptr[1506] = (void*)&cdat->dstr_1500__ADD2OUT_LONGHEX; cdat->dstr_1500__ADD2OUT_LONGHEX.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1500__ADD2OUT_LONGHEX.val, "ADD2OUT_LONGHEX", sizeof (cdat->dstr_1500__ADD2OUT_LONGHEX.val)-1); MELT_LOCATION("warmelt-base.melt:778:/ iniobj"); /*iniobj dobj_1501__ADD2OUT_LONGHEX*/ /*_.VALDATA___V1508*/ meltfptr[1507] = (void*)&cdat->dobj_1501__ADD2OUT_LONGHEX; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1501__ADD2OUT_LONGHEX", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1501__ADD2OUT_LONGHEX", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1501__ADD2OUT_LONGHEX.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1501__ADD2OUT_LONGHEX.obj_hash = 1024633510; cdat->dobj_1501__ADD2OUT_LONGHEX.obj_len = 5; /*inimult dtup_1502__ADD2OUT_LONGHEX*/ /*_.VALTUP___V1516*/ meltfptr[1515] = (void*)&cdat->dtup_1502__ADD2OUT_LONGHEX; cdat->dtup_1502__ADD2OUT_LONGHEX.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1502__ADD2OUT_LONGHEX.nbval = 5; /*inimult dtup_1503__ADD2OUT_LONGHEX*/ /*_.VALTUP___V1512*/ meltfptr[1511] = (void*)&cdat->dtup_1503__ADD2OUT_LONGHEX; cdat->dtup_1503__ADD2OUT_LONGHEX.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1503__ADD2OUT_LONGHEX.nbval = 2; /*^iniobj*/ /*iniobj dobj_1504*/ /*_.VALDATA___V1510*/ meltfptr[1509] = (void*)&cdat->dobj_1504; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1504", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1504", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1504.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1504.obj_num = 0; cdat->dobj_1504.obj_hash = 190389766; cdat->dobj_1504.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1505*/ /*_.VALDATA___V1511*/ meltfptr[1510] = (void*)&cdat->dobj_1505; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1505", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1505", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1505.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1505.obj_num = 1; cdat->dobj_1505.obj_hash = 134286839; cdat->dobj_1505.obj_len = 2; /*inistring dstr_1506__meltgc_add_out_h*/ /*_.VALSTR___V1513*/ meltfptr[1512] = (void*)&cdat->dstr_1506__meltgc_add_out_h; cdat->dstr_1506__meltgc_add_out_h.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1506__meltgc_add_out_h.val, "meltgc_add_out_hex((melt_ptr_t)(", sizeof (cdat->dstr_1506__meltgc_add_out_h.val)-1); /*inistring dstr_1507__*/ /*_.VALSTR___V1514*/ meltfptr[1513] = (void*)&cdat->dstr_1507__; cdat->dstr_1507__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1507__.val, "), (", sizeof (cdat->dstr_1507__.val)-1); /*inistring dstr_1508__*/ /*_.VALSTR___V1515*/ meltfptr[1514] = (void*)&cdat->dstr_1508__; cdat->dstr_1508__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1508__.val, "))", sizeof (cdat->dstr_1508__.val)-1); /*inistring dstr_1509__ADD2OUT_LONGHEX*/ /*_.VALSTR___V1509*/ meltfptr[1508] = (void*)&cdat->dstr_1509__ADD2OUT_LONGHEX; cdat->dstr_1509__ADD2OUT_LONGHEX.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1509__ADD2OUT_LONGHEX.val, "ADD2OUT_LONGHEX", sizeof (cdat->dstr_1509__ADD2OUT_LONGHEX.val)-1); /*iniobj dsym_1510__ADD2OUT_ROUTINEDESCR*/ /*uniqueobj*/ if (!/*_.VALDATA___V1517*/ meltfptr[1516]) /*_.VALDATA___V1517*/ meltfptr[1516] = (void*)&cdat->dsym_1510__ADD2OUT_ROUTINEDESCR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1510__ADD2OUT_ROUTINEDESCR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1510__ADD2OUT_ROUTINEDESCR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1510__ADD2OUT_ROUTINEDESCR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1510__ADD2OUT_ROUTINEDESCR.obj_hash = 746498952; cdat->dsym_1510__ADD2OUT_ROUTINEDESCR.obj_len = 3; /*inistring dstr_1511__ADD2OUT_ROUTINED*/ /*_.VALSTR___V1518*/ meltfptr[1517] = (void*)&cdat->dstr_1511__ADD2OUT_ROUTINED; cdat->dstr_1511__ADD2OUT_ROUTINED.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1511__ADD2OUT_ROUTINED.val, "ADD2OUT_ROUTINEDESCR", sizeof (cdat->dstr_1511__ADD2OUT_ROUTINED.val)-1); MELT_LOCATION("warmelt-base.melt:783:/ iniobj"); /*iniobj dobj_1512__ADD2OUT_ROUTINEDESCR*/ /*_.VALDATA___V1519*/ meltfptr[1518] = (void*)&cdat->dobj_1512__ADD2OUT_ROUTINEDESCR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1512__ADD2OUT_ROUTINEDESCR", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1512__ADD2OUT_ROUTINEDESCR", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1512__ADD2OUT_ROUTINEDESCR.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1512__ADD2OUT_ROUTINEDESCR.obj_hash = 11897391; cdat->dobj_1512__ADD2OUT_ROUTINEDESCR.obj_len = 5; /*inimult dtup_1513__ADD2OUT_ROUTINEDESCR*/ /*_.VALTUP___V1527*/ meltfptr[1526] = (void*)&cdat->dtup_1513__ADD2OUT_ROUTINEDESCR; cdat->dtup_1513__ADD2OUT_ROUTINEDESCR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1513__ADD2OUT_ROUTINEDESCR.nbval = 5; /*inimult dtup_1514__ADD2OUT_ROUTINEDESCR*/ /*_.VALTUP___V1523*/ meltfptr[1522] = (void*)&cdat->dtup_1514__ADD2OUT_ROUTINEDESCR; cdat->dtup_1514__ADD2OUT_ROUTINEDESCR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1514__ADD2OUT_ROUTINEDESCR.nbval = 2; /*^iniobj*/ /*iniobj dobj_1515*/ /*_.VALDATA___V1521*/ meltfptr[1520] = (void*)&cdat->dobj_1515; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1515", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1515", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1515.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1515.obj_num = 0; cdat->dobj_1515.obj_hash = 964875119; cdat->dobj_1515.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1516*/ /*_.VALDATA___V1522*/ meltfptr[1521] = (void*)&cdat->dobj_1516; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1516", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1516", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1516.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1516.obj_num = 1; cdat->dobj_1516.obj_hash = 286556734; cdat->dobj_1516.obj_len = 2; /*inistring dstr_1517__meltgc_add_out_*/ /*_.VALSTR___V1524*/ meltfptr[1523] = (void*)&cdat->dstr_1517__meltgc_add_out_; cdat->dstr_1517__meltgc_add_out_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1517__meltgc_add_out_.val, "meltgc_add_out((melt_ptr_t)(", sizeof (cdat->dstr_1517__meltgc_add_out_.val)-1); /*inistring dstr_1518__melt_ro*/ /*_.VALSTR___V1525*/ meltfptr[1524] = (void*)&cdat->dstr_1518__melt_ro; cdat->dstr_1518__melt_ro.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1518__melt_ro.val, "), \n\t\t melt_routine_descrstr((melt_ptr_t)(", sizeof (cdat->dstr_1518__melt_ro.val)-1); /*inistring dstr_1519__*/ /*_.VALSTR___V1526*/ meltfptr[1525] = (void*)&cdat->dstr_1519__; cdat->dstr_1519__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1519__.val, ")))", sizeof (cdat->dstr_1519__.val)-1); /*inistring dstr_1520__ADD2OUT_ROUTINED*/ /*_.VALSTR___V1520*/ meltfptr[1519] = (void*)&cdat->dstr_1520__ADD2OUT_ROUTINED; cdat->dstr_1520__ADD2OUT_ROUTINED.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1520__ADD2OUT_ROUTINED.val, "ADD2OUT_ROUTINEDESCR", sizeof (cdat->dstr_1520__ADD2OUT_ROUTINED.val)-1); MELT_LOCATION("warmelt-base.melt:790:/ iniobj"); /*iniobj dobj_1521__CSTRING_SAME*/ /*_.VALDATA___V1528*/ meltfptr[1527] = (void*)&cdat->dobj_1521__CSTRING_SAME; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1521__CSTRING_SAME", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_CMATCHER)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1521__CSTRING_SAME", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_CMATCHER)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1521__CSTRING_SAME.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_CMATCHER)))); cdat->dobj_1521__CSTRING_SAME.obj_hash = 451362769; cdat->dobj_1521__CSTRING_SAME.obj_len = 9; /*inistring dstr_1522__CSTRING_SAME*/ /*_.VALSTR___V1529*/ meltfptr[1528] = (void*)&cdat->dstr_1522__CSTRING_SAME; cdat->dstr_1522__CSTRING_SAME.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1522__CSTRING_SAME.val, "CSTRING_SAME", sizeof (cdat->dstr_1522__CSTRING_SAME.val)-1); /*^iniobj*/ /*iniobj dobj_1523*/ /*_.VALDATA___V1530*/ meltfptr[1529] = (void*)&cdat->dobj_1523; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1523", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1523", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1523.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1523.obj_num = 0; cdat->dobj_1523.obj_hash = 739859956; cdat->dobj_1523.obj_len = 2; /*inimult dtup_1524__CSTRING_SAME*/ /*_.VALTUP___V1531*/ meltfptr[1530] = (void*)&cdat->dtup_1524__CSTRING_SAME; cdat->dtup_1524__CSTRING_SAME.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1524__CSTRING_SAME.nbval = 1; /*^iniobj*/ /*iniobj dobj_1525*/ /*_.VALDATA___V1532*/ meltfptr[1531] = (void*)&cdat->dobj_1525; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1525", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1525", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1525.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1525.obj_hash = 325979851; cdat->dobj_1525.obj_len = 2; /*inimult dtup_1526__CSTRING_SAME*/ /*_.VALTUP___V1533*/ meltfptr[1532] = (void*)&cdat->dtup_1526__CSTRING_SAME; cdat->dtup_1526__CSTRING_SAME.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1526__CSTRING_SAME.nbval = 0; /*iniobj dsym_1527__STRSAM*/ /*uniqueobj*/ if (!/*_.VALDATA___V1534*/ meltfptr[1533]) /*_.VALDATA___V1534*/ meltfptr[1533] = (void*)&cdat->dsym_1527__STRSAM; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1527__STRSAM", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1527__STRSAM", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1527__STRSAM.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1527__STRSAM.obj_hash = 226540121; cdat->dsym_1527__STRSAM.obj_len = 3; /*inistring dstr_1528__STRSAM*/ /*_.VALSTR___V1535*/ meltfptr[1534] = (void*)&cdat->dstr_1528__STRSAM; cdat->dstr_1528__STRSAM.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1528__STRSAM.val, "STRSAM", sizeof (cdat->dstr_1528__STRSAM.val)-1); /*inistring dstr_1529__*/ /*_.VALSTR___V1536*/ meltfptr[1535] = (void*)&cdat->dstr_1529__; cdat->dstr_1529__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1529__.val, "/*", sizeof (cdat->dstr_1529__.val)-1); /*inistring dstr_1530__test_*/ /*_.VALSTR___V1537*/ meltfptr[1536] = (void*)&cdat->dstr_1530__test_; cdat->dstr_1530__test_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1530__test_.val, " test*/ (", sizeof (cdat->dstr_1530__test_.val)-1); /*inistring dstr_1531__*/ /*_.VALSTR___V1538*/ meltfptr[1537] = (void*)&cdat->dstr_1531__; cdat->dstr_1531__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1531__.val, " && ", sizeof (cdat->dstr_1531__.val)-1); /*inistring dstr_1532__strcmp_*/ /*_.VALSTR___V1539*/ meltfptr[1538] = (void*)&cdat->dstr_1532__strcmp_; cdat->dstr_1532__strcmp_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1532__strcmp_.val, " && !strcmp(", sizeof (cdat->dstr_1532__strcmp_.val)-1); /*inistring dstr_1533__*/ /*_.VALSTR___V1540*/ meltfptr[1539] = (void*)&cdat->dstr_1533__; cdat->dstr_1533__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1533__.val, ", ", sizeof (cdat->dstr_1533__.val)-1); /*inistring dstr_1534__*/ /*_.VALSTR___V1541*/ meltfptr[1540] = (void*)&cdat->dstr_1534__; cdat->dstr_1534__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1534__.val, ")) ", sizeof (cdat->dstr_1534__.val)-1); /*inimult dtup_1535__CSTRING_SAME*/ /*_.VALTUP___V1542*/ meltfptr[1541] = (void*)&cdat->dtup_1535__CSTRING_SAME; cdat->dtup_1535__CSTRING_SAME.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1535__CSTRING_SAME.nbval = 11; /*iniobj dsym_1536__CSTRING_LENGTH*/ /*uniqueobj*/ if (!/*_.VALDATA___V1543*/ meltfptr[1542]) /*_.VALDATA___V1543*/ meltfptr[1542] = (void*)&cdat->dsym_1536__CSTRING_LENGTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1536__CSTRING_LENGTH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1536__CSTRING_LENGTH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1536__CSTRING_LENGTH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1536__CSTRING_LENGTH.obj_hash = 871204499; cdat->dsym_1536__CSTRING_LENGTH.obj_len = 3; /*inistring dstr_1537__CSTRING_LENGTH*/ /*_.VALSTR___V1544*/ meltfptr[1543] = (void*)&cdat->dstr_1537__CSTRING_LENGTH; cdat->dstr_1537__CSTRING_LENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1537__CSTRING_LENGTH.val, "CSTRING_LENGTH", sizeof (cdat->dstr_1537__CSTRING_LENGTH.val)-1); MELT_LOCATION("warmelt-base.melt:803:/ iniobj"); /*iniobj dobj_1538__CSTRING_LENGTH*/ /*_.VALDATA___V1545*/ meltfptr[1544] = (void*)&cdat->dobj_1538__CSTRING_LENGTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1538__CSTRING_LENGTH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1538__CSTRING_LENGTH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1538__CSTRING_LENGTH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1538__CSTRING_LENGTH.obj_hash = 964453673; cdat->dobj_1538__CSTRING_LENGTH.obj_len = 5; /*inimult dtup_1539__CSTRING_LENGTH*/ /*_.VALTUP___V1552*/ meltfptr[1551] = (void*)&cdat->dtup_1539__CSTRING_LENGTH; cdat->dtup_1539__CSTRING_LENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1539__CSTRING_LENGTH.nbval = 5; /*inimult dtup_1540__CSTRING_LENGTH*/ /*_.VALTUP___V1548*/ meltfptr[1547] = (void*)&cdat->dtup_1540__CSTRING_LENGTH; cdat->dtup_1540__CSTRING_LENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1540__CSTRING_LENGTH.nbval = 1; /*^iniobj*/ /*iniobj dobj_1541*/ /*_.VALDATA___V1547*/ meltfptr[1546] = (void*)&cdat->dobj_1541; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1541", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1541", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1541.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1541.obj_num = 0; cdat->dobj_1541.obj_hash = 476988349; cdat->dobj_1541.obj_len = 2; /*inistring dstr_1542__*/ /*_.VALSTR___V1549*/ meltfptr[1548] = (void*)&cdat->dstr_1542__; cdat->dstr_1542__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1542__.val, "((", sizeof (cdat->dstr_1542__.val)-1); /*inistring dstr_1543__strlen_*/ /*_.VALSTR___V1550*/ meltfptr[1549] = (void*)&cdat->dstr_1543__strlen_; cdat->dstr_1543__strlen_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1543__strlen_.val, ")?strlen(", sizeof (cdat->dstr_1543__strlen_.val)-1); /*inistring dstr_1544__0_*/ /*_.VALSTR___V1551*/ meltfptr[1550] = (void*)&cdat->dstr_1544__0_; cdat->dstr_1544__0_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1544__0_.val, "):0)", sizeof (cdat->dstr_1544__0_.val)-1); /*inistring dstr_1545__CSTRING_LENGTH*/ /*_.VALSTR___V1546*/ meltfptr[1545] = (void*)&cdat->dstr_1545__CSTRING_LENGTH; cdat->dstr_1545__CSTRING_LENGTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1545__CSTRING_LENGTH.val, "CSTRING_LENGTH", sizeof (cdat->dstr_1545__CSTRING_LENGTH.val)-1); /*inirout drout_1546__MAPSTRING_EVERY*/ /*_.VALROUT___V1553*/ meltfptr[1552] = (void*)&cdat->drout_1546__MAPSTRING_EVERY; cdat->drout_1546__MAPSTRING_EVERY.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy(cdat->drout_1546__MAPSTRING_EVERY.routdescr, "MAPSTRING_EVERY @warmelt-base.melt:813", MELT_ROUTDESCR_LEN - 1); cdat->drout_1546__MAPSTRING_EVERY.nbval = 0; MELT_ROUTINE_SET_ROUTCODE(&cdat->drout_1546__MAPSTRING_EVERY, meltrout_2_warmelt_base_MAPSTRING_EVERY); /*iniclos dclo_1547__MAPSTRING_EVERY*/ /*_.VALCLO___V1554*/ meltfptr[1553] = (void*)&cdat->dclo_1547__MAPSTRING_EVERY; cdat->dclo_1547__MAPSTRING_EVERY.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_CLOSURE)))); cdat->dclo_1547__MAPSTRING_EVERY.nbval = 0; /*inirout drout_1548__MAPSTRING_ITERATE_TEST*/ /*_.VALROUT___V1555*/ meltfptr[1554] = (void*)&cdat->drout_1548__MAPSTRING_ITERATE_TEST; cdat->drout_1548__MAPSTRING_ITERATE_TEST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy(cdat->drout_1548__MAPSTRING_ITERATE_TEST.routdescr, "MAPSTRING_ITERATE_TEST @warmelt-base.melt:826", MELT_ROUTDESCR_LEN - 1); cdat->drout_1548__MAPSTRING_ITERATE_TEST.nbval = 0; MELT_ROUTINE_SET_ROUTCODE(&cdat->drout_1548__MAPSTRING_ITERATE_TEST, meltrout_3_warmelt_base_MAPSTRING_ITERATE_TEST); /*iniclos dclo_1549__MAPSTRING_ITERATE_TEST*/ /*_.VALCLO___V1556*/ meltfptr[1555] = (void*)&cdat->dclo_1549__MAPSTRING_ITERATE_TEST; cdat->dclo_1549__MAPSTRING_ITERATE_TEST.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_CLOSURE)))); cdat->dclo_1549__MAPSTRING_ITERATE_TEST.nbval = 0; /*iniobj dsym_1550__MAPSTRING_SIZE*/ /*uniqueobj*/ if (!/*_.VALDATA___V1557*/ meltfptr[1556]) /*_.VALDATA___V1557*/ meltfptr[1556] = (void*)&cdat->dsym_1550__MAPSTRING_SIZE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1550__MAPSTRING_SIZE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1550__MAPSTRING_SIZE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1550__MAPSTRING_SIZE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1550__MAPSTRING_SIZE.obj_hash = 245736163; cdat->dsym_1550__MAPSTRING_SIZE.obj_len = 3; /*inistring dstr_1551__MAPSTRING_SIZE*/ /*_.VALSTR___V1558*/ meltfptr[1557] = (void*)&cdat->dstr_1551__MAPSTRING_SIZE; cdat->dstr_1551__MAPSTRING_SIZE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1551__MAPSTRING_SIZE.val, "MAPSTRING_SIZE", sizeof (cdat->dstr_1551__MAPSTRING_SIZE.val)-1); MELT_LOCATION("warmelt-base.melt:847:/ iniobj"); /*iniobj dobj_1552__MAPSTRING_SIZE*/ /*_.VALDATA___V1559*/ meltfptr[1558] = (void*)&cdat->dobj_1552__MAPSTRING_SIZE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1552__MAPSTRING_SIZE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1552__MAPSTRING_SIZE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1552__MAPSTRING_SIZE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1552__MAPSTRING_SIZE.obj_hash = 265333701; cdat->dobj_1552__MAPSTRING_SIZE.obj_len = 5; /*inimult dtup_1553__MAPSTRING_SIZE*/ /*_.VALTUP___V1567*/ meltfptr[1566] = (void*)&cdat->dtup_1553__MAPSTRING_SIZE; cdat->dtup_1553__MAPSTRING_SIZE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1553__MAPSTRING_SIZE.nbval = 3; /*inimult dtup_1554__MAPSTRING_SIZE*/ /*_.VALTUP___V1564*/ meltfptr[1563] = (void*)&cdat->dtup_1554__MAPSTRING_SIZE; cdat->dtup_1554__MAPSTRING_SIZE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1554__MAPSTRING_SIZE.nbval = 1; /*iniobj dsym_1555__MAP*/ /*uniqueobj*/ if (!/*_.VALDATA___V1562*/ meltfptr[1561]) /*_.VALDATA___V1562*/ meltfptr[1561] = (void*)&cdat->dsym_1555__MAP; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1555__MAP", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1555__MAP", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1555__MAP.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1555__MAP.obj_hash = 74541903; cdat->dsym_1555__MAP.obj_len = 3; /*inistring dstr_1556__MAP*/ /*_.VALSTR___V1563*/ meltfptr[1562] = (void*)&cdat->dstr_1556__MAP; cdat->dstr_1556__MAP.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1556__MAP.val, "MAP", sizeof (cdat->dstr_1556__MAP.val)-1); /*^iniobj*/ /*iniobj dobj_1557*/ /*_.VALDATA___V1561*/ meltfptr[1560] = (void*)&cdat->dobj_1557; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1557", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1557", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1557.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1557.obj_num = 0; cdat->dobj_1557.obj_hash = 450613806; cdat->dobj_1557.obj_len = 2; /*inistring dstr_1558__melt_size_mapst*/ /*_.VALSTR___V1565*/ meltfptr[1564] = (void*)&cdat->dstr_1558__melt_size_mapst; cdat->dstr_1558__melt_size_mapst.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1558__melt_size_mapst.val, "(melt_size_mapstrings((struct meltmapstrings_st*)(", sizeof (cdat->dstr_1558__melt_size_mapst.val)-1); /*inistring dstr_1559__*/ /*_.VALSTR___V1566*/ meltfptr[1565] = (void*)&cdat->dstr_1559__; cdat->dstr_1559__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1559__.val, ")))", sizeof (cdat->dstr_1559__.val)-1); /*inistring dstr_1560__MAPSTRING_SIZE*/ /*_.VALSTR___V1560*/ meltfptr[1559] = (void*)&cdat->dstr_1560__MAPSTRING_SIZE; cdat->dstr_1560__MAPSTRING_SIZE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1560__MAPSTRING_SIZE.val, "MAPSTRING_SIZE", sizeof (cdat->dstr_1560__MAPSTRING_SIZE.val)-1); /*iniobj dsym_1561__MAPSTRING_COUNT*/ /*uniqueobj*/ if (!/*_.VALDATA___V1568*/ meltfptr[1567]) /*_.VALDATA___V1568*/ meltfptr[1567] = (void*)&cdat->dsym_1561__MAPSTRING_COUNT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1561__MAPSTRING_COUNT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1561__MAPSTRING_COUNT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1561__MAPSTRING_COUNT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1561__MAPSTRING_COUNT.obj_hash = 52002003; cdat->dsym_1561__MAPSTRING_COUNT.obj_len = 3; /*inistring dstr_1562__MAPSTRING_COUNT*/ /*_.VALSTR___V1569*/ meltfptr[1568] = (void*)&cdat->dstr_1562__MAPSTRING_COUNT; cdat->dstr_1562__MAPSTRING_COUNT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1562__MAPSTRING_COUNT.val, "MAPSTRING_COUNT", sizeof (cdat->dstr_1562__MAPSTRING_COUNT.val)-1); MELT_LOCATION("warmelt-base.melt:852:/ iniobj"); /*iniobj dobj_1563__MAPSTRING_COUNT*/ /*_.VALDATA___V1570*/ meltfptr[1569] = (void*)&cdat->dobj_1563__MAPSTRING_COUNT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1563__MAPSTRING_COUNT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1563__MAPSTRING_COUNT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1563__MAPSTRING_COUNT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1563__MAPSTRING_COUNT.obj_hash = 868866748; cdat->dobj_1563__MAPSTRING_COUNT.obj_len = 5; /*inimult dtup_1564__MAPSTRING_COUNT*/ /*_.VALTUP___V1576*/ meltfptr[1575] = (void*)&cdat->dtup_1564__MAPSTRING_COUNT; cdat->dtup_1564__MAPSTRING_COUNT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1564__MAPSTRING_COUNT.nbval = 3; /*inimult dtup_1565__MAPSTRING_COUNT*/ /*_.VALTUP___V1573*/ meltfptr[1572] = (void*)&cdat->dtup_1565__MAPSTRING_COUNT; cdat->dtup_1565__MAPSTRING_COUNT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1565__MAPSTRING_COUNT.nbval = 1; /*^iniobj*/ /*iniobj dobj_1566*/ /*_.VALDATA___V1572*/ meltfptr[1571] = (void*)&cdat->dobj_1566; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1566", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1566", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1566.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1566.obj_num = 0; cdat->dobj_1566.obj_hash = 765658632; cdat->dobj_1566.obj_len = 2; /*inistring dstr_1567__melt_count_maps*/ /*_.VALSTR___V1574*/ meltfptr[1573] = (void*)&cdat->dstr_1567__melt_count_maps; cdat->dstr_1567__melt_count_maps.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1567__melt_count_maps.val, "(melt_count_mapstrings((struct meltmapstrings_st*)(", sizeof (cdat->dstr_1567__melt_count_maps.val)-1); /*inistring dstr_1568__*/ /*_.VALSTR___V1575*/ meltfptr[1574] = (void*)&cdat->dstr_1568__; cdat->dstr_1568__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1568__.val, ")))", sizeof (cdat->dstr_1568__.val)-1); /*inistring dstr_1569__MAPSTRING_COUNT*/ /*_.VALSTR___V1571*/ meltfptr[1570] = (void*)&cdat->dstr_1569__MAPSTRING_COUNT; cdat->dstr_1569__MAPSTRING_COUNT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1569__MAPSTRING_COUNT.val, "MAPSTRING_COUNT", sizeof (cdat->dstr_1569__MAPSTRING_COUNT.val)-1); /*iniobj dsym_1570__MAPSTRING_RAWGET*/ /*uniqueobj*/ if (!/*_.VALDATA___V1577*/ meltfptr[1576]) /*_.VALDATA___V1577*/ meltfptr[1576] = (void*)&cdat->dsym_1570__MAPSTRING_RAWGET; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1570__MAPSTRING_RAWGET", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1570__MAPSTRING_RAWGET", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1570__MAPSTRING_RAWGET.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1570__MAPSTRING_RAWGET.obj_hash = 293498500; cdat->dsym_1570__MAPSTRING_RAWGET.obj_len = 3; /*inistring dstr_1571__MAPSTRING_RAWGET*/ /*_.VALSTR___V1578*/ meltfptr[1577] = (void*)&cdat->dstr_1571__MAPSTRING_RAWGET; cdat->dstr_1571__MAPSTRING_RAWGET.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1571__MAPSTRING_RAWGET.val, "MAPSTRING_RAWGET", sizeof (cdat->dstr_1571__MAPSTRING_RAWGET.val)-1); MELT_LOCATION("warmelt-base.melt:858:/ iniobj"); /*iniobj dobj_1572__MAPSTRING_RAWGET*/ /*_.VALDATA___V1579*/ meltfptr[1578] = (void*)&cdat->dobj_1572__MAPSTRING_RAWGET; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1572__MAPSTRING_RAWGET", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1572__MAPSTRING_RAWGET", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1572__MAPSTRING_RAWGET.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1572__MAPSTRING_RAWGET.obj_hash = 661931941; cdat->dobj_1572__MAPSTRING_RAWGET.obj_len = 5; /*inimult dtup_1573__MAPSTRING_RAWGET*/ /*_.VALTUP___V1587*/ meltfptr[1586] = (void*)&cdat->dtup_1573__MAPSTRING_RAWGET; cdat->dtup_1573__MAPSTRING_RAWGET.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1573__MAPSTRING_RAWGET.nbval = 5; /*inimult dtup_1574__MAPSTRING_RAWGET*/ /*_.VALTUP___V1583*/ meltfptr[1582] = (void*)&cdat->dtup_1574__MAPSTRING_RAWGET; cdat->dtup_1574__MAPSTRING_RAWGET.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1574__MAPSTRING_RAWGET.nbval = 2; /*^iniobj*/ /*iniobj dobj_1575*/ /*_.VALDATA___V1581*/ meltfptr[1580] = (void*)&cdat->dobj_1575; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1575", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1575", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1575.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1575.obj_num = 0; cdat->dobj_1575.obj_hash = 689561976; cdat->dobj_1575.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1576*/ /*_.VALDATA___V1582*/ meltfptr[1581] = (void*)&cdat->dobj_1576; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1576", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1576", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1576.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1576.obj_num = 1; cdat->dobj_1576.obj_hash = 616097463; cdat->dobj_1576.obj_len = 2; /*inistring dstr_1577__melt_get_mapstr*/ /*_.VALSTR___V1584*/ meltfptr[1583] = (void*)&cdat->dstr_1577__melt_get_mapstr; cdat->dstr_1577__melt_get_mapstr.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1577__melt_get_mapstr.val, "(melt_get_mapstrings((struct meltmapstrings_st*)(", sizeof (cdat->dstr_1577__melt_get_mapstr.val)-1); /*inistring dstr_1578__*/ /*_.VALSTR___V1585*/ meltfptr[1584] = (void*)&cdat->dstr_1578__; cdat->dstr_1578__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1578__.val, "), (", sizeof (cdat->dstr_1578__.val)-1); /*inistring dstr_1579__*/ /*_.VALSTR___V1586*/ meltfptr[1585] = (void*)&cdat->dstr_1579__; cdat->dstr_1579__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1579__.val, ")))", sizeof (cdat->dstr_1579__.val)-1); /*inistring dstr_1580__MAPSTRING_RAWGET*/ /*_.VALSTR___V1580*/ meltfptr[1579] = (void*)&cdat->dstr_1580__MAPSTRING_RAWGET; cdat->dstr_1580__MAPSTRING_RAWGET.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1580__MAPSTRING_RAWGET.val, "MAPSTRING_RAWGET", sizeof (cdat->dstr_1580__MAPSTRING_RAWGET.val)-1); /*iniobj dsym_1581__MAPSTRING_RAWPUT*/ /*uniqueobj*/ if (!/*_.VALDATA___V1588*/ meltfptr[1587]) /*_.VALDATA___V1588*/ meltfptr[1587] = (void*)&cdat->dsym_1581__MAPSTRING_RAWPUT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1581__MAPSTRING_RAWPUT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1581__MAPSTRING_RAWPUT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1581__MAPSTRING_RAWPUT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1581__MAPSTRING_RAWPUT.obj_hash = 338216364; cdat->dsym_1581__MAPSTRING_RAWPUT.obj_len = 3; /*inistring dstr_1582__MAPSTRING_RAWPUT*/ /*_.VALSTR___V1589*/ meltfptr[1588] = (void*)&cdat->dstr_1582__MAPSTRING_RAWPUT; cdat->dstr_1582__MAPSTRING_RAWPUT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1582__MAPSTRING_RAWPUT.val, "MAPSTRING_RAWPUT", sizeof (cdat->dstr_1582__MAPSTRING_RAWPUT.val)-1); MELT_LOCATION("warmelt-base.melt:863:/ iniobj"); /*iniobj dobj_1583__MAPSTRING_RAWPUT*/ /*_.VALDATA___V1590*/ meltfptr[1589] = (void*)&cdat->dobj_1583__MAPSTRING_RAWPUT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1583__MAPSTRING_RAWPUT", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1583__MAPSTRING_RAWPUT", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1583__MAPSTRING_RAWPUT.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1583__MAPSTRING_RAWPUT.obj_hash = 1046291195; cdat->dobj_1583__MAPSTRING_RAWPUT.obj_len = 5; /*inimult dtup_1584__MAPSTRING_RAWPUT*/ /*_.VALTUP___V1602*/ meltfptr[1601] = (void*)&cdat->dtup_1584__MAPSTRING_RAWPUT; cdat->dtup_1584__MAPSTRING_RAWPUT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1584__MAPSTRING_RAWPUT.nbval = 7; /*inimult dtup_1585__MAPSTRING_RAWPUT*/ /*_.VALTUP___V1597*/ meltfptr[1596] = (void*)&cdat->dtup_1585__MAPSTRING_RAWPUT; cdat->dtup_1585__MAPSTRING_RAWPUT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1585__MAPSTRING_RAWPUT.nbval = 3; /*^iniobj*/ /*iniobj dobj_1586*/ /*_.VALDATA___V1592*/ meltfptr[1591] = (void*)&cdat->dobj_1586; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1586", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1586", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1586.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1586.obj_num = 0; cdat->dobj_1586.obj_hash = 771923666; cdat->dobj_1586.obj_len = 2; /*iniobj dsym_1587__KEY*/ /*uniqueobj*/ if (!/*_.VALDATA___V1594*/ meltfptr[1593]) /*_.VALDATA___V1594*/ meltfptr[1593] = (void*)&cdat->dsym_1587__KEY; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1587__KEY", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1587__KEY", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1587__KEY.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1587__KEY.obj_hash = 65825675; cdat->dsym_1587__KEY.obj_len = 3; /*inistring dstr_1588__KEY*/ /*_.VALSTR___V1595*/ meltfptr[1594] = (void*)&cdat->dstr_1588__KEY; cdat->dstr_1588__KEY.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1588__KEY.val, "KEY", sizeof (cdat->dstr_1588__KEY.val)-1); /*^iniobj*/ /*iniobj dobj_1589*/ /*_.VALDATA___V1593*/ meltfptr[1592] = (void*)&cdat->dobj_1589; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1589", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1589", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1589.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1589.obj_num = 1; cdat->dobj_1589.obj_hash = 540439981; cdat->dobj_1589.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1590*/ /*_.VALDATA___V1596*/ meltfptr[1595] = (void*)&cdat->dobj_1590; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1590", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1590", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1590.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1590.obj_num = 2; cdat->dobj_1590.obj_hash = 443395413; cdat->dobj_1590.obj_len = 2; /*inistring dstr_1591__meltgc_put_mapst*/ /*_.VALSTR___V1598*/ meltfptr[1597] = (void*)&cdat->dstr_1591__meltgc_put_mapst; cdat->dstr_1591__meltgc_put_mapst.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1591__meltgc_put_mapst.val, "meltgc_put_mapstrings( (struct meltmapstrings_st *) (", sizeof (cdat->dstr_1591__meltgc_put_mapst.val)-1); /*inistring dstr_1592__*/ /*_.VALSTR___V1599*/ meltfptr[1598] = (void*)&cdat->dstr_1592__; cdat->dstr_1592__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1592__.val, "), (", sizeof (cdat->dstr_1592__.val)-1); /*inistring dstr_1593__melt_ptr_t_*/ /*_.VALSTR___V1600*/ meltfptr[1599] = (void*)&cdat->dstr_1593__melt_ptr_t_; cdat->dstr_1593__melt_ptr_t_.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1593__melt_ptr_t_.val, "), (melt_ptr_t) (", sizeof (cdat->dstr_1593__melt_ptr_t_.val)-1); /*inistring dstr_1594__*/ /*_.VALSTR___V1601*/ meltfptr[1600] = (void*)&cdat->dstr_1594__; cdat->dstr_1594__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1594__.val, "))", sizeof (cdat->dstr_1594__.val)-1); /*inistring dstr_1595__MAPSTRING_RAWPUT*/ /*_.VALSTR___V1591*/ meltfptr[1590] = (void*)&cdat->dstr_1595__MAPSTRING_RAWPUT; cdat->dstr_1595__MAPSTRING_RAWPUT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1595__MAPSTRING_RAWPUT.val, "MAPSTRING_RAWPUT", sizeof (cdat->dstr_1595__MAPSTRING_RAWPUT.val)-1); /*iniobj dsym_1596__MAPSTRING_RAWREMOVE*/ /*uniqueobj*/ if (!/*_.VALDATA___V1603*/ meltfptr[1602]) /*_.VALDATA___V1603*/ meltfptr[1602] = (void*)&cdat->dsym_1596__MAPSTRING_RAWREMOVE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1596__MAPSTRING_RAWREMOVE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1596__MAPSTRING_RAWREMOVE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1596__MAPSTRING_RAWREMOVE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1596__MAPSTRING_RAWREMOVE.obj_hash = 793006697; cdat->dsym_1596__MAPSTRING_RAWREMOVE.obj_len = 3; /*inistring dstr_1597__MAPSTRING_RAWREM*/ /*_.VALSTR___V1604*/ meltfptr[1603] = (void*)&cdat->dstr_1597__MAPSTRING_RAWREM; cdat->dstr_1597__MAPSTRING_RAWREM.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1597__MAPSTRING_RAWREM.val, "MAPSTRING_RAWREMOVE", sizeof (cdat->dstr_1597__MAPSTRING_RAWREM.val)-1); MELT_LOCATION("warmelt-base.melt:868:/ iniobj"); /*iniobj dobj_1598__MAPSTRING_RAWREMOVE*/ /*_.VALDATA___V1605*/ meltfptr[1604] = (void*)&cdat->dobj_1598__MAPSTRING_RAWREMOVE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1598__MAPSTRING_RAWREMOVE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1598__MAPSTRING_RAWREMOVE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1598__MAPSTRING_RAWREMOVE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_PRIMITIVE)))); cdat->dobj_1598__MAPSTRING_RAWREMOVE.obj_hash = 670160827; cdat->dobj_1598__MAPSTRING_RAWREMOVE.obj_len = 5; /*inimult dtup_1599__MAPSTRING_RAWREMOVE*/ /*_.VALTUP___V1613*/ meltfptr[1612] = (void*)&cdat->dtup_1599__MAPSTRING_RAWREMOVE; cdat->dtup_1599__MAPSTRING_RAWREMOVE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1599__MAPSTRING_RAWREMOVE.nbval = 5; /*inimult dtup_1600__MAPSTRING_RAWREMOVE*/ /*_.VALTUP___V1609*/ meltfptr[1608] = (void*)&cdat->dtup_1600__MAPSTRING_RAWREMOVE; cdat->dtup_1600__MAPSTRING_RAWREMOVE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_MULTIPLE)))); cdat->dtup_1600__MAPSTRING_RAWREMOVE.nbval = 2; /*^iniobj*/ /*iniobj dobj_1601*/ /*_.VALDATA___V1607*/ meltfptr[1606] = (void*)&cdat->dobj_1601; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1601", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1601", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1601.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1601.obj_num = 0; cdat->dobj_1601.obj_hash = 301695272; cdat->dobj_1601.obj_len = 2; /*^iniobj*/ /*iniobj dobj_1602*/ /*_.VALDATA___V1608*/ meltfptr[1607] = (void*)&cdat->dobj_1602; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_1602", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_1602", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->object_magic == OBMAG_OBJECT); cdat->dobj_1602.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); cdat->dobj_1602.obj_num = 1; cdat->dobj_1602.obj_hash = 123298822; cdat->dobj_1602.obj_len = 2; /*inistring dstr_1603__meltgc_remove_ma*/ /*_.VALSTR___V1610*/ meltfptr[1609] = (void*)&cdat->dstr_1603__meltgc_remove_ma; cdat->dstr_1603__meltgc_remove_ma.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1603__meltgc_remove_ma.val, "meltgc_remove_mapstrings((struct meltmapstrings_st*) (", sizeof (cdat->dstr_1603__meltgc_remove_ma.val)-1); /*inistring dstr_1604__*/ /*_.VALSTR___V1611*/ meltfptr[1610] = (void*)&cdat->dstr_1604__; cdat->dstr_1604__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1604__.val, "), (", sizeof (cdat->dstr_1604__.val)-1); /*inistring dstr_1605__*/ /*_.VALSTR___V1612*/ meltfptr[1611] = (void*)&cdat->dstr_1605__; cdat->dstr_1605__.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); strncpy(cdat->dstr_1605__.val, "))", sizeof (cdat->dstr_1605__.val)-1); /*inistring dstr_1606__MAPSTRING_RAWREM*/ /*_.VALSTR___V1606*/ meltfptr[1605] = (void*)&cdat->dstr_1606__MAPSTRING_RAWREM; cdat->dstr_1606__MAPSTRING_RAWREM.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1606__MAPSTRING_RAWREM.val, "MAPSTRING_RAWREMOVE", sizeof (cdat->dstr_1606__MAPSTRING_RAWREM.val)-1); /*inirout drout_1607__MULTIPLE_EVERY*/ /*_.VALROUT___V1614*/ meltfptr[1613] = (void*)&cdat->drout_1607__MULTIPLE_EVERY; cdat->drout_1607__MULTIPLE_EVERY.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy(cdat->drout_1607__MULTIPLE_EVERY.routdescr, "MULTIPLE_EVERY @warmelt-base.melt:875", MELT_ROUTDESCR_LEN - 1); cdat->drout_1607__MULTIPLE_EVERY.nbval = 0; MELT_ROUTINE_SET_ROUTCODE(&cdat->drout_1607__MULTIPLE_EVERY, meltrout_4_warmelt_base_MULTIPLE_EVERY); /*iniclos dclo_1608__MULTIPLE_EVERY*/ /*_.VALCLO___V1615*/ meltfptr[1614] = (void*)&cdat->dclo_1608__MULTIPLE_EVERY; cdat->dclo_1608__MULTIPLE_EVERY.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_CLOSURE)))); cdat->dclo_1608__MULTIPLE_EVERY.nbval = 0; /*inirout drout_1609__MULTIPLE_BACKWARD_EVERY*/ /*_.VALROUT___V1616*/ meltfptr[1615] = (void*)&cdat->drout_1609__MULTIPLE_BACKWARD_EVERY; cdat->drout_1609__MULTIPLE_BACKWARD_EVERY.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy(cdat->drout_1609__MULTIPLE_BACKWARD_EVERY.routdescr, "MULTIPLE_BACKWARD_EVERY @warmelt-base.melt:886", MELT_ROUTDESCR_LEN - 1); cdat->drout_1609__MULTIPLE_BACKWARD_EVERY.nbval = 0; MELT_ROUTINE_SET_ROUTCODE(&cdat->drout_1609__MULTIPLE_BACKWARD_EVERY, meltrout_5_warmelt_base_MULTIPLE_BACKWARD_EVERY); /*iniclos dclo_1610__MULTIPLE_BACKWARD_EVERY*/ /*_.VALCLO___V1617*/ meltfptr[1616] = (void*)&cdat->dclo_1610__MULTIPLE_BACKWARD_EVERY; cdat->dclo_1610__MULTIPLE_BACKWARD_EVERY.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_CLOSURE)))); cdat->dclo_1610__MULTIPLE_BACKWARD_EVERY.nbval = 0; /*inirout drout_1611__MULTIPLE_EVERY_BOTH*/ /*_.VALROUT___V1618*/ meltfptr[1617] = (void*)&cdat->drout_1611__MULTIPLE_EVERY_BOTH; cdat->drout_1611__MULTIPLE_EVERY_BOTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy(cdat->drout_1611__MULTIPLE_EVERY_BOTH.routdescr, "MULTIPLE_EVERY_BOTH @warmelt-base.melt:898", MELT_ROUTDESCR_LEN - 1); cdat->drout_1611__MULTIPLE_EVERY_BOTH.nbval = 0; MELT_ROUTINE_SET_ROUTCODE(&cdat->drout_1611__MULTIPLE_EVERY_BOTH, meltrout_6_warmelt_base_MULTIPLE_EVERY_BOTH); /*iniclos dclo_1612__MULTIPLE_EVERY_BOTH*/ /*_.VALCLO___V1619*/ meltfptr[1618] = (void*)&cdat->dclo_1612__MULTIPLE_EVERY_BOTH; cdat->dclo_1612__MULTIPLE_EVERY_BOTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_CLOSURE)))); cdat->dclo_1612__MULTIPLE_EVERY_BOTH.nbval = 0; /*iniobj dsym_1613__FOREACH_LONG_UPTO*/ /*uniqueobj*/ if (!/*_.VALDATA___V1620*/ meltfptr[1619]) /*_.VALDATA___V1620*/ meltfptr[1619] = (void*)&cdat->dsym_1613__FOREACH_LONG_UPTO; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1613__FOREACH_LONG_UPTO", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1613__FOREACH_LONG_UPTO", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1613__FOREACH_LONG_UPTO.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1613__FOREACH_LONG_UPTO.obj_hash = 84906035; cdat->dsym_1613__FOREACH_LONG_UPTO.obj_len = 3; /*inistring dstr_1614__FOREACH_LONG_UPT*/ /*_.VALSTR___V1621*/ meltfptr[1620] = (void*)&cdat->dstr_1614__FOREACH_LONG_UPT; cdat->dstr_1614__FOREACH_LONG_UPT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1614__FOREACH_LONG_UPT.val, "FOREACH_LONG_UPTO", sizeof (cdat->dstr_1614__FOREACH_LONG_UPT.val)-1); /*iniobj dsym_1615__SOME_INTEGER_MULTIPLE*/ /*uniqueobj*/ if (!/*_.VALDATA___V1622*/ meltfptr[1621]) /*_.VALDATA___V1622*/ meltfptr[1621] = (void*)&cdat->dsym_1615__SOME_INTEGER_MULTIPLE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1615__SOME_INTEGER_MULTIPLE", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1615__SOME_INTEGER_MULTIPLE", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1615__SOME_INTEGER_MULTIPLE.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1615__SOME_INTEGER_MULTIPLE.obj_hash = 300265104; cdat->dsym_1615__SOME_INTEGER_MULTIPLE.obj_len = 3; /*inistring dstr_1616__SOME_INTEGER_MUL*/ /*_.VALSTR___V1623*/ meltfptr[1622] = (void*)&cdat->dstr_1616__SOME_INTEGER_MUL; cdat->dstr_1616__SOME_INTEGER_MUL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1616__SOME_INTEGER_MUL.val, "SOME_INTEGER_MULTIPLE", sizeof (cdat->dstr_1616__SOME_INTEGER_MUL.val)-1); /*iniobj dsym_1617__SOME_INTEGER_GREATER_THAN*/ /*uniqueobj*/ if (!/*_.VALDATA___V1624*/ meltfptr[1623]) /*_.VALDATA___V1624*/ meltfptr[1623] = (void*)&cdat->dsym_1617__SOME_INTEGER_GREATER_THAN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1617__SOME_INTEGER_GREATER_THAN", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1617__SOME_INTEGER_GREATER_THAN", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1617__SOME_INTEGER_GREATER_THAN.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1617__SOME_INTEGER_GREATER_THAN.obj_hash = 254063814; cdat->dsym_1617__SOME_INTEGER_GREATER_THAN.obj_len = 3; /*inistring dstr_1618__SOME_INTEGER_GRE*/ /*_.VALSTR___V1625*/ meltfptr[1624] = (void*)&cdat->dstr_1618__SOME_INTEGER_GRE; cdat->dstr_1618__SOME_INTEGER_GRE.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1618__SOME_INTEGER_GRE.val, "SOME_INTEGER_GREATER_THAN", sizeof (cdat->dstr_1618__SOME_INTEGER_GRE.val)-1); /*iniobj dsym_1619__COMPARE_NAMED_ALPHA*/ /*uniqueobj*/ if (!/*_.VALDATA___V1626*/ meltfptr[1625]) /*_.VALDATA___V1626*/ meltfptr[1625] = (void*)&cdat->dsym_1619__COMPARE_NAMED_ALPHA; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1619__COMPARE_NAMED_ALPHA", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1619__COMPARE_NAMED_ALPHA", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1619__COMPARE_NAMED_ALPHA.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1619__COMPARE_NAMED_ALPHA.obj_hash = 155514911; cdat->dsym_1619__COMPARE_NAMED_ALPHA.obj_len = 3; /*inistring dstr_1620__COMPARE_NAMED_AL*/ /*_.VALSTR___V1627*/ meltfptr[1626] = (void*)&cdat->dstr_1620__COMPARE_NAMED_AL; cdat->dstr_1620__COMPARE_NAMED_AL.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1620__COMPARE_NAMED_AL.val, "COMPARE_NAMED_ALPHA", sizeof (cdat->dstr_1620__COMPARE_NAMED_AL.val)-1); /*iniobj dsym_1621__TUPLE_NTH*/ /*uniqueobj*/ if (!/*_.VALDATA___V1628*/ meltfptr[1627]) /*_.VALDATA___V1628*/ meltfptr[1627] = (void*)&cdat->dsym_1621__TUPLE_NTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1621__TUPLE_NTH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1621__TUPLE_NTH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1621__TUPLE_NTH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1621__TUPLE_NTH.obj_hash = 253823407; cdat->dsym_1621__TUPLE_NTH.obj_len = 3; /*inistring dstr_1622__TUPLE_NTH*/ /*_.VALSTR___V1629*/ meltfptr[1628] = (void*)&cdat->dstr_1622__TUPLE_NTH; cdat->dstr_1622__TUPLE_NTH.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1622__TUPLE_NTH.val, "TUPLE_NTH", sizeof (cdat->dstr_1622__TUPLE_NTH.val)-1); /*iniobj dsym_1623__TUPLE_SIZED*/ /*uniqueobj*/ if (!/*_.VALDATA___V1630*/ meltfptr[1629]) /*_.VALDATA___V1630*/ meltfptr[1629] = (void*)&cdat->dsym_1623__TUPLE_SIZED; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1623__TUPLE_SIZED", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1623__TUPLE_SIZED", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1623__TUPLE_SIZED.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1623__TUPLE_SIZED.obj_hash = 620511343; cdat->dsym_1623__TUPLE_SIZED.obj_len = 3; /*inistring dstr_1624__TUPLE_SIZED*/ /*_.VALSTR___V1631*/ meltfptr[1630] = (void*)&cdat->dstr_1624__TUPLE_SIZED; cdat->dstr_1624__TUPLE_SIZED.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1624__TUPLE_SIZED.val, "TUPLE_SIZED", sizeof (cdat->dstr_1624__TUPLE_SIZED.val)-1); /*iniobj dsym_1625__CSTRING_SAME*/ /*uniqueobj*/ if (!/*_.VALDATA___V1632*/ meltfptr[1631]) /*_.VALDATA___V1632*/ meltfptr[1631] = (void*)&cdat->dsym_1625__CSTRING_SAME; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1625__CSTRING_SAME", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1625__CSTRING_SAME", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1625__CSTRING_SAME.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1625__CSTRING_SAME.obj_hash = 180971052; cdat->dsym_1625__CSTRING_SAME.obj_len = 3; /*inistring dstr_1626__CSTRING_SAME*/ /*_.VALSTR___V1633*/ meltfptr[1632] = (void*)&cdat->dstr_1626__CSTRING_SAME; cdat->dstr_1626__CSTRING_SAME.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1626__CSTRING_SAME.val, "CSTRING_SAME", sizeof (cdat->dstr_1626__CSTRING_SAME.val)-1); /*iniobj dsym_1627__MAPSTRING_EVERY*/ /*uniqueobj*/ if (!/*_.VALDATA___V1634*/ meltfptr[1633]) /*_.VALDATA___V1634*/ meltfptr[1633] = (void*)&cdat->dsym_1627__MAPSTRING_EVERY; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1627__MAPSTRING_EVERY", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1627__MAPSTRING_EVERY", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1627__MAPSTRING_EVERY.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1627__MAPSTRING_EVERY.obj_hash = 173778712; cdat->dsym_1627__MAPSTRING_EVERY.obj_len = 3; /*inistring dstr_1628__MAPSTRING_EVERY*/ /*_.VALSTR___V1635*/ meltfptr[1634] = (void*)&cdat->dstr_1628__MAPSTRING_EVERY; cdat->dstr_1628__MAPSTRING_EVERY.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1628__MAPSTRING_EVERY.val, "MAPSTRING_EVERY", sizeof (cdat->dstr_1628__MAPSTRING_EVERY.val)-1); /*iniobj dsym_1629__MAPSTRING_ITERATE_TEST*/ /*uniqueobj*/ if (!/*_.VALDATA___V1636*/ meltfptr[1635]) /*_.VALDATA___V1636*/ meltfptr[1635] = (void*)&cdat->dsym_1629__MAPSTRING_ITERATE_TEST; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1629__MAPSTRING_ITERATE_TEST", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1629__MAPSTRING_ITERATE_TEST", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1629__MAPSTRING_ITERATE_TEST.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1629__MAPSTRING_ITERATE_TEST.obj_hash = 933389776; cdat->dsym_1629__MAPSTRING_ITERATE_TEST.obj_len = 3; /*inistring dstr_1630__MAPSTRING_ITERAT*/ /*_.VALSTR___V1637*/ meltfptr[1636] = (void*)&cdat->dstr_1630__MAPSTRING_ITERAT; cdat->dstr_1630__MAPSTRING_ITERAT.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1630__MAPSTRING_ITERAT.val, "MAPSTRING_ITERATE_TEST", sizeof (cdat->dstr_1630__MAPSTRING_ITERAT.val)-1); /*iniobj dsym_1631__MULTIPLE_EVERY_BOTH*/ /*uniqueobj*/ if (!/*_.VALDATA___V1638*/ meltfptr[1637]) /*_.VALDATA___V1638*/ meltfptr[1637] = (void*)&cdat->dsym_1631__MULTIPLE_EVERY_BOTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1631__MULTIPLE_EVERY_BOTH", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1631__MULTIPLE_EVERY_BOTH", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1631__MULTIPLE_EVERY_BOTH.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1631__MULTIPLE_EVERY_BOTH.obj_hash = 528900272; cdat->dsym_1631__MULTIPLE_EVERY_BOTH.obj_len = 3; /*inistring dstr_1632__MULTIPLE_EVERY_B*/ /*_.VALSTR___V1639*/ meltfptr[1638] = (void*)&cdat->dstr_1632__MULTIPLE_EVERY_B; cdat->dstr_1632__MULTIPLE_EVERY_B.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1632__MULTIPLE_EVERY_B.val, "MULTIPLE_EVERY_BOTH", sizeof (cdat->dstr_1632__MULTIPLE_EVERY_B.val)-1); /*iniobj dsym_1633__MULTIPLE_EVERY*/ /*uniqueobj*/ if (!/*_.VALDATA___V1640*/ meltfptr[1639]) /*_.VALDATA___V1640*/ meltfptr[1639] = (void*)&cdat->dsym_1633__MULTIPLE_EVERY; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1633__MULTIPLE_EVERY", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1633__MULTIPLE_EVERY", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1633__MULTIPLE_EVERY.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1633__MULTIPLE_EVERY.obj_hash = 130098745; cdat->dsym_1633__MULTIPLE_EVERY.obj_len = 3; /*inistring dstr_1634__MULTIPLE_EVERY*/ /*_.VALSTR___V1641*/ meltfptr[1640] = (void*)&cdat->dstr_1634__MULTIPLE_EVERY; cdat->dstr_1634__MULTIPLE_EVERY.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1634__MULTIPLE_EVERY.val, "MULTIPLE_EVERY", sizeof (cdat->dstr_1634__MULTIPLE_EVERY.val)-1); /*iniobj dsym_1635__MULTIPLE_BACKWARD_EVERY*/ /*uniqueobj*/ if (!/*_.VALDATA___V1642*/ meltfptr[1641]) /*_.VALDATA___V1642*/ meltfptr[1641] = (void*)&cdat->dsym_1635__MULTIPLE_BACKWARD_EVERY; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1635__MULTIPLE_BACKWARD_EVERY", melt_magic_discr (((void*)(MELT_PREDEF(CLASS_SYMBOL)))) == OBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1635__MULTIPLE_BACKWARD_EVERY", ((meltobject_ptr_t) (((void*)(MELT_PREDEF(CLASS_SYMBOL)))))->object_magic == OBMAG_OBJECT); cdat->dsym_1635__MULTIPLE_BACKWARD_EVERY.obj_class = (meltobject_ptr_t)(((void*)(MELT_PREDEF(CLASS_SYMBOL)))); cdat->dsym_1635__MULTIPLE_BACKWARD_EVERY.obj_hash = 79677830; cdat->dsym_1635__MULTIPLE_BACKWARD_EVERY.obj_len = 3; /*inistring dstr_1636__MULTIPLE_BACKWAR*/ /*_.VALSTR___V1643*/ meltfptr[1642] = (void*)&cdat->dstr_1636__MULTIPLE_BACKWAR; cdat->dstr_1636__MULTIPLE_BACKWAR.discr = (meltobject_ptr_t)(((void*)(MELT_PREDEF(DISCR_STRING)))); strncpy(cdat->dstr_1636__MULTIPLE_BACKWAR.val, "MULTIPLE_BACKWARD_EVERY", sizeof (cdat->dstr_1636__MULTIPLE_BACKWAR.val)-1); cdat = NULL; melt_prohibit_garbcoll = FALSE; #undef meltfram__ } /*end initialize_module_meltdata*/ void* start_module_melt(void* modargp_) { char predefinited[MELTGLOB__LASTGLOB+8]; #if ENABLE_CHECKING static long call_counter__; long thiscallcounter__ ATTRIBUTE_UNUSED = ++ call_counter__; #undef meltcallcount #define meltcallcount thiscallcounter__ #else #undef meltcallcount #define meltcallcount 0L #endif initial_frame_st meltframe; #define meltfram__ meltframe memset(&meltfram__, 0, sizeof(meltfram__)); meltfram__.nbvar = 1647; meltfram__.prev = (struct callframe_melt_st *) melt_topframe; melt_topframe = (struct callframe_melt_st *) &meltfram__; /**initial routine prologue**/ initial_frame_melt = (void*) &meltfram__; /**COMMENT: get previous environment **/; /*^compute*/ /*_.PREVENV___V4*/ meltfptr[3] = modargp_; /*^comment*/ /**COMMENT: compute boxloc **/; /*^cond*/ /*cond*/ if (/*_.CONTENV___V2*/ meltfptr[1] || melt_object_length((melt_ptr_t) MELT_PREDEF (INITIAL_SYSTEM_DATA))", /*_.FRESHENV___V3*/ meltfptr[2], __FILE__, __LINE__);;; /*^apply*/ /*apply*/{ /*_.CONTENV___V2*/ meltfptr[1] = melt_apply ((meltclosure_ptr_t)(/*_.FRESHENV___V3*/ meltfptr[2]), (melt_ptr_t)(/*_.PREVENV___V4*/ meltfptr[3]), (""), (union meltparam_un*)0, "", (union meltparam_un*)0); } ;}/*com.end block:compute fresh module environment*/ ; } /*^comment*/ /**COMMENT: get symbols & keywords **/; /*^getnamedsymbol*/ /*getnamedsym:IGNORE*/ { melt_ptr_t sy_IGNORE = meltgc_named_symbol("IGNORE", MELT_GET); if (sy_IGNORE && NULL == /*_.VALDATA___V8*/ meltfptr[7]) /*_.VALDATA___V8*/ meltfptr[7] = (void*) sy_IGNORE; } /*^getnamedsymbol*/ /*getnamedsym:V*/ { melt_ptr_t sy_V = meltgc_named_symbol("V", MELT_GET); if (sy_V && NULL == /*_.VALDATA___V13*/ meltfptr[12]) /*_.VALDATA___V13*/ meltfptr[12] = (void*) sy_V; } /*^getnamedsymbol*/ /*getnamedsym:VOID*/ { melt_ptr_t sy_VOID = meltgc_named_symbol("VOID", MELT_GET); if (sy_VOID && NULL == /*_.VALDATA___V19*/ meltfptr[18]) /*_.VALDATA___V19*/ meltfptr[18] = (void*) sy_VOID; } /*^getnamedsymbol*/ /*getnamedsym:IS_NOT_OBJECT*/ { melt_ptr_t sy_IS_NOT_OBJECT = meltgc_named_symbol("IS_NOT_OBJECT", MELT_GET); if (sy_IS_NOT_OBJECT && NULL == /*_.VALDATA___V26*/ meltfptr[25]) /*_.VALDATA___V26*/ meltfptr[25] = (void*) sy_IS_NOT_OBJECT; } /*^getnamedsymbol*/ /*getnamedsym:OBJ*/ { melt_ptr_t sy_OBJ = meltgc_named_symbol("OBJ", MELT_GET); if (sy_OBJ && NULL == /*_.VALDATA___V31*/ meltfptr[30]) /*_.VALDATA___V31*/ meltfptr[30] = (void*) sy_OBJ; } /*^getnamedsymbol*/ /*getnamedsym:GET_GLOBPREDEF*/ { melt_ptr_t sy_GET_GLOBPREDEF = meltgc_named_symbol("GET_GLOBPREDEF", MELT_GET); if (sy_GET_GLOBPREDEF && NULL == /*_.VALDATA___V37*/ meltfptr[36]) /*_.VALDATA___V37*/ meltfptr[36] = (void*) sy_GET_GLOBPREDEF; } /*^getnamedsymbol*/ /*getnamedsym:IX*/ { melt_ptr_t sy_IX = meltgc_named_symbol("IX", MELT_GET); if (sy_IX && NULL == /*_.VALDATA___V42*/ meltfptr[41]) /*_.VALDATA___V42*/ meltfptr[41] = (void*) sy_IX; } /*^getnamedsymbol*/ /*getnamedsym:OBJ_HASH*/ { melt_ptr_t sy_OBJ_HASH = meltgc_named_symbol("OBJ_HASH", MELT_GET); if (sy_OBJ_HASH && NULL == /*_.VALDATA___V48*/ meltfptr[47]) /*_.VALDATA___V48*/ meltfptr[47] = (void*) sy_OBJ_HASH; } /*^getnamedsymbol*/ /*getnamedsym:OBJ_LEN*/ { melt_ptr_t sy_OBJ_LEN = meltgc_named_symbol("OBJ_LEN", MELT_GET); if (sy_OBJ_LEN && NULL == /*_.VALDATA___V57*/ meltfptr[56]) /*_.VALDATA___V57*/ meltfptr[56] = (void*) sy_OBJ_LEN; } /*^getnamedsymbol*/ /*getnamedsym:OBJ_NUM*/ { melt_ptr_t sy_OBJ_NUM = meltgc_named_symbol("OBJ_NUM", MELT_GET); if (sy_OBJ_NUM && NULL == /*_.VALDATA___V66*/ meltfptr[65]) /*_.VALDATA___V66*/ meltfptr[65] = (void*) sy_OBJ_NUM; } /*^getnamedsymbol*/ /*getnamedsym:NONZERO_HASH*/ { melt_ptr_t sy_NONZERO_HASH = meltgc_named_symbol("NONZERO_HASH", MELT_GET); if (sy_NONZERO_HASH && NULL == /*_.VALDATA___V75*/ meltfptr[74]) /*_.VALDATA___V75*/ meltfptr[74] = (void*) sy_NONZERO_HASH; } /*^getnamedsymbol*/ /*getnamedsym:MINOR_GARBCOLL*/ { melt_ptr_t sy_MINOR_GARBCOLL = meltgc_named_symbol("MINOR_GARBCOLL", MELT_GET); if (sy_MINOR_GARBCOLL && NULL == /*_.VALDATA___V82*/ meltfptr[81]) /*_.VALDATA___V82*/ meltfptr[81] = (void*) sy_MINOR_GARBCOLL; } /*^getnamedsymbol*/ /*getnamedsym:SIZ*/ { melt_ptr_t sy_SIZ = meltgc_named_symbol("SIZ", MELT_GET); if (sy_SIZ && NULL == /*_.VALDATA___V87*/ meltfptr[86]) /*_.VALDATA___V87*/ meltfptr[86] = (void*) sy_SIZ; } /*^getnamedsymbol*/ /*getnamedsym:FULL_GARBCOLL*/ { melt_ptr_t sy_FULL_GARBCOLL = meltgc_named_symbol("FULL_GARBCOLL", MELT_GET); if (sy_FULL_GARBCOLL && NULL == /*_.VALDATA___V93*/ meltfptr[92]) /*_.VALDATA___V93*/ meltfptr[92] = (void*) sy_FULL_GARBCOLL; } /*^getnamedsymbol*/ /*getnamedsym:CHECKCALLSTACK_MSG*/ { melt_ptr_t sy_CHECKCALLSTACK_MSG = meltgc_named_symbol("CHECKCALLSTACK_MSG", MELT_GET); if (sy_CHECKCALLSTACK_MSG && NULL == /*_.VALDATA___V102*/ meltfptr[101]) /*_.VALDATA___V102*/ meltfptr[101] = (void*) sy_CHECKCALLSTACK_MSG; } /*^getnamedsymbol*/ /*getnamedsym:MSG*/ { melt_ptr_t sy_MSG = meltgc_named_symbol("MSG", MELT_GET); if (sy_MSG && NULL == /*_.VALDATA___V107*/ meltfptr[106]) /*_.VALDATA___V107*/ meltfptr[106] = (void*) sy_MSG; } /*^getnamedsymbol*/ /*getnamedsym:CBREAK_MSG*/ { melt_ptr_t sy_CBREAK_MSG = meltgc_named_symbol("CBREAK_MSG", MELT_GET); if (sy_CBREAK_MSG && NULL == /*_.VALDATA___V113*/ meltfptr[112]) /*_.VALDATA___V113*/ meltfptr[112] = (void*) sy_CBREAK_MSG; } /*^getnamedsymbol*/ /*getnamedsym:<=I*/ { melt_ptr_t sy_I = meltgc_named_symbol("<=I", MELT_GET); if (sy_I && NULL == /*_.VALDATA___V122*/ meltfptr[121]) /*_.VALDATA___V122*/ meltfptr[121] = (void*) sy_I; } /*^getnamedsymbol*/ /*getnamedsym:A*/ { melt_ptr_t sy_A = meltgc_named_symbol("A", MELT_GET); if (sy_A && NULL == /*_.VALDATA___V127*/ meltfptr[126]) /*_.VALDATA___V127*/ meltfptr[126] = (void*) sy_A; } /*^getnamedsymbol*/ /*getnamedsym:B*/ { melt_ptr_t sy_B = meltgc_named_symbol("B", MELT_GET); if (sy_B && NULL == /*_.VALDATA___V130*/ meltfptr[129]) /*_.VALDATA___V130*/ meltfptr[129] = (void*) sy_B; } /*^getnamedsymbol*/ /*getnamedsym:==I*/ { melt_ptr_t sy_I = meltgc_named_symbol("==I", MELT_GET); if (sy_I && NULL == /*_.VALDATA___V137*/ meltfptr[136]) /*_.VALDATA___V137*/ meltfptr[136] = (void*) sy_I; } /*^getnamedsymbol*/ /*getnamedsym:!=I*/ { melt_ptr_t sy_I = meltgc_named_symbol("!=I", MELT_GET); if (sy_I && NULL == /*_.VALDATA___V148*/ meltfptr[147]) /*_.VALDATA___V148*/ meltfptr[147] = (void*) sy_I; } /*^getnamedsymbol*/ /*getnamedsym:-I*/ { melt_ptr_t sy_I = meltgc_named_symbol("-I", MELT_GET); if (sy_I && NULL == /*_.VALDATA___V159*/ meltfptr[158]) /*_.VALDATA___V159*/ meltfptr[158] = (void*) sy_I; } /*^getnamedsymbol*/ /*getnamedsym:*I*/ { melt_ptr_t sy_I = meltgc_named_symbol("*I", MELT_GET); if (sy_I && NULL == /*_.VALDATA___V170*/ meltfptr[169]) /*_.VALDATA___V170*/ meltfptr[169] = (void*) sy_I; } /*^getnamedsymbol*/ /*getnamedsym:ANDI*/ { melt_ptr_t sy_ANDI = meltgc_named_symbol("ANDI", MELT_GET); if (sy_ANDI && NULL == /*_.VALDATA___V181*/ meltfptr[180]) /*_.VALDATA___V181*/ meltfptr[180] = (void*) sy_ANDI; } /*^getnamedsymbol*/ /*getnamedsym:ORI*/ { melt_ptr_t sy_ORI = meltgc_named_symbol("ORI", MELT_GET); if (sy_ORI && NULL == /*_.VALDATA___V192*/ meltfptr[191]) /*_.VALDATA___V192*/ meltfptr[191] = (void*) sy_ORI; } /*^getnamedsymbol*/ /*getnamedsym:XORI*/ { melt_ptr_t sy_XORI = meltgc_named_symbol("XORI", MELT_GET); if (sy_XORI && NULL == /*_.VALDATA___V203*/ meltfptr[202]) /*_.VALDATA___V203*/ meltfptr[202] = (void*) sy_XORI; } /*^getnamedsymbol*/ /*getnamedsym:NEGI*/ { melt_ptr_t sy_NEGI = meltgc_named_symbol("NEGI", MELT_GET); if (sy_NEGI && NULL == /*_.VALDATA___V214*/ meltfptr[213]) /*_.VALDATA___V214*/ meltfptr[213] = (void*) sy_NEGI; } /*^getnamedsymbol*/ /*getnamedsym:I*/ { melt_ptr_t sy_I = meltgc_named_symbol("I", MELT_GET); if (sy_I && NULL == /*_.VALDATA___V219*/ meltfptr[218]) /*_.VALDATA___V219*/ meltfptr[218] = (void*) sy_I; } /*^getnamedsymbol*/ /*getnamedsym:NOTI*/ { melt_ptr_t sy_NOTI = meltgc_named_symbol("NOTI", MELT_GET); if (sy_NOTI && NULL == /*_.VALDATA___V225*/ meltfptr[224]) /*_.VALDATA___V225*/ meltfptr[224] = (void*) sy_NOTI; } /*^getnamedsymbol*/ /*getnamedsym:NOTNULL*/ { melt_ptr_t sy_NOTNULL = meltgc_named_symbol("NOTNULL", MELT_GET); if (sy_NOTNULL && NULL == /*_.VALDATA___V234*/ meltfptr[233]) /*_.VALDATA___V234*/ meltfptr[233] = (void*) sy_NOTNULL; } /*^getnamedsymbol*/ /*getnamedsym:ZEROP*/ { melt_ptr_t sy_ZEROP = meltgc_named_symbol("ZEROP", MELT_GET); if (sy_ZEROP && NULL == /*_.VALDATA___V243*/ meltfptr[242]) /*_.VALDATA___V243*/ meltfptr[242] = (void*) sy_ZEROP; } /*^getnamedsymbol*/ /*getnamedsym:OUTCSTRING_DBG*/ { melt_ptr_t sy_OUTCSTRING_DBG = meltgc_named_symbol("OUTCSTRING_DBG", MELT_GET); if (sy_OUTCSTRING_DBG && NULL == /*_.VALDATA___V252*/ meltfptr[251]) /*_.VALDATA___V252*/ meltfptr[251] = (void*) sy_OUTCSTRING_DBG; } /*^getnamedsymbol*/ /*getnamedsym:S*/ { melt_ptr_t sy_S = meltgc_named_symbol("S", MELT_GET); if (sy_S && NULL == /*_.VALDATA___V257*/ meltfptr[256]) /*_.VALDATA___V257*/ meltfptr[256] = (void*) sy_S; } /*^getnamedsymbol*/ /*getnamedsym:OUTNUM_DBG*/ { melt_ptr_t sy_OUTNUM_DBG = meltgc_named_symbol("OUTNUM_DBG", MELT_GET); if (sy_OUTNUM_DBG && NULL == /*_.VALDATA___V263*/ meltfptr[262]) /*_.VALDATA___V263*/ meltfptr[262] = (void*) sy_OUTNUM_DBG; } /*^getnamedsymbol*/ /*getnamedsym:PREF*/ { melt_ptr_t sy_PREF = meltgc_named_symbol("PREF", MELT_GET); if (sy_PREF && NULL == /*_.VALDATA___V268*/ meltfptr[267]) /*_.VALDATA___V268*/ meltfptr[267] = (void*) sy_PREF; } /*^getnamedsymbol*/ /*getnamedsym:L*/ { melt_ptr_t sy_L = meltgc_named_symbol("L", MELT_GET); if (sy_L && NULL == /*_.VALDATA___V271*/ meltfptr[270]) /*_.VALDATA___V271*/ meltfptr[270] = (void*) sy_L; } /*^getnamedsymbol*/ /*getnamedsym:SUF*/ { melt_ptr_t sy_SUF = meltgc_named_symbol("SUF", MELT_GET); if (sy_SUF && NULL == /*_.VALDATA___V274*/ meltfptr[273]) /*_.VALDATA___V274*/ meltfptr[273] = (void*) sy_SUF; } /*^getnamedsymbol*/ /*getnamedsym:OUTSTR_DBG*/ { melt_ptr_t sy_OUTSTR_DBG = meltgc_named_symbol("OUTSTR_DBG", MELT_GET); if (sy_OUTSTR_DBG && NULL == /*_.VALDATA___V282*/ meltfptr[281]) /*_.VALDATA___V282*/ meltfptr[281] = (void*) sy_OUTSTR_DBG; } /*^getnamedsymbol*/ /*getnamedsym:STR*/ { melt_ptr_t sy_STR = meltgc_named_symbol("STR", MELT_GET); if (sy_STR && NULL == /*_.VALDATA___V287*/ meltfptr[286]) /*_.VALDATA___V287*/ meltfptr[286] = (void*) sy_STR; } /*^getnamedsymbol*/ /*getnamedsym:OUTSTRBUF_DBG*/ { melt_ptr_t sy_OUTSTRBUF_DBG = meltgc_named_symbol("OUTSTRBUF_DBG", MELT_GET); if (sy_OUTSTRBUF_DBG && NULL == /*_.VALDATA___V293*/ meltfptr[292]) /*_.VALDATA___V293*/ meltfptr[292] = (void*) sy_OUTSTRBUF_DBG; } /*^getnamedsymbol*/ /*getnamedsym:SBUF*/ { melt_ptr_t sy_SBUF = meltgc_named_symbol("SBUF", MELT_GET); if (sy_SBUF && NULL == /*_.VALDATA___V298*/ meltfptr[297]) /*_.VALDATA___V298*/ meltfptr[297] = (void*) sy_SBUF; } /*^getnamedsymbol*/ /*getnamedsym:OUTNEWLINE_DBG*/ { melt_ptr_t sy_OUTNEWLINE_DBG = meltgc_named_symbol("OUTNEWLINE_DBG", MELT_GET); if (sy_OUTNEWLINE_DBG && NULL == /*_.VALDATA___V304*/ meltfptr[303]) /*_.VALDATA___V304*/ meltfptr[303] = (void*) sy_OUTNEWLINE_DBG; } /*^getnamedsymbol*/ /*getnamedsym:OUTNUM_ERR*/ { melt_ptr_t sy_OUTNUM_ERR = meltgc_named_symbol("OUTNUM_ERR", MELT_GET); if (sy_OUTNUM_ERR && NULL == /*_.VALDATA___V311*/ meltfptr[310]) /*_.VALDATA___V311*/ meltfptr[310] = (void*) sy_OUTNUM_ERR; } /*^getnamedsymbol*/ /*getnamedsym:OUTCSTRING_ERR*/ { melt_ptr_t sy_OUTCSTRING_ERR = meltgc_named_symbol("OUTCSTRING_ERR", MELT_GET); if (sy_OUTCSTRING_ERR && NULL == /*_.VALDATA___V324*/ meltfptr[323]) /*_.VALDATA___V324*/ meltfptr[323] = (void*) sy_OUTCSTRING_ERR; } /*^getnamedsymbol*/ /*getnamedsym:OUTSTRBUF_ERR*/ { melt_ptr_t sy_OUTSTRBUF_ERR = meltgc_named_symbol("OUTSTRBUF_ERR", MELT_GET); if (sy_OUTSTRBUF_ERR && NULL == /*_.VALDATA___V333*/ meltfptr[332]) /*_.VALDATA___V333*/ meltfptr[332] = (void*) sy_OUTSTRBUF_ERR; } /*^getnamedsymbol*/ /*getnamedsym:PAIR_SET_HEAD*/ { melt_ptr_t sy_PAIR_SET_HEAD = meltgc_named_symbol("PAIR_SET_HEAD", MELT_GET); if (sy_PAIR_SET_HEAD && NULL == /*_.VALDATA___V342*/ meltfptr[341]) /*_.VALDATA___V342*/ meltfptr[341] = (void*) sy_PAIR_SET_HEAD; } /*^getnamedsymbol*/ /*getnamedsym:PA*/ { melt_ptr_t sy_PA = meltgc_named_symbol("PA", MELT_GET); if (sy_PA && NULL == /*_.VALDATA___V347*/ meltfptr[346]) /*_.VALDATA___V347*/ meltfptr[346] = (void*) sy_PA; } /*^getnamedsymbol*/ /*getnamedsym:HD*/ { melt_ptr_t sy_HD = meltgc_named_symbol("HD", MELT_GET); if (sy_HD && NULL == /*_.VALDATA___V350*/ meltfptr[349]) /*_.VALDATA___V350*/ meltfptr[349] = (void*) sy_HD; } /*^getnamedsymbol*/ /*getnamedsym:PAIR_LISTLENGTH*/ { melt_ptr_t sy_PAIR_LISTLENGTH = meltgc_named_symbol("PAIR_LISTLENGTH", MELT_GET); if (sy_PAIR_LISTLENGTH && NULL == /*_.VALDATA___V357*/ meltfptr[356]) /*_.VALDATA___V357*/ meltfptr[356] = (void*) sy_PAIR_LISTLENGTH; } /*^getnamedsymbol*/ /*getnamedsym:MAKE_PAIR*/ { melt_ptr_t sy_MAKE_PAIR = meltgc_named_symbol("MAKE_PAIR", MELT_GET); if (sy_MAKE_PAIR && NULL == /*_.VALDATA___V366*/ meltfptr[365]) /*_.VALDATA___V366*/ meltfptr[365] = (void*) sy_MAKE_PAIR; } /*^getnamedsymbol*/ /*getnamedsym:DISCR*/ { melt_ptr_t sy_DISCR = meltgc_named_symbol("DISCR", MELT_GET); if (sy_DISCR && NULL == /*_.VALDATA___V371*/ meltfptr[370]) /*_.VALDATA___V371*/ meltfptr[370] = (void*) sy_DISCR; } /*^getnamedsymbol*/ /*getnamedsym:TL*/ { melt_ptr_t sy_TL = meltgc_named_symbol("TL", MELT_GET); if (sy_TL && NULL == /*_.VALDATA___V375*/ meltfptr[374]) /*_.VALDATA___V375*/ meltfptr[374] = (void*) sy_TL; } /*^getnamedsymbol*/ /*getnamedsym:IS_MIXINT*/ { melt_ptr_t sy_IS_MIXINT = meltgc_named_symbol("IS_MIXINT", MELT_GET); if (sy_IS_MIXINT && NULL == /*_.VALDATA___V383*/ meltfptr[382]) /*_.VALDATA___V383*/ meltfptr[382] = (void*) sy_IS_MIXINT; } /*^getnamedsymbol*/ /*getnamedsym:MI*/ { melt_ptr_t sy_MI = meltgc_named_symbol("MI", MELT_GET); if (sy_MI && NULL == /*_.VALDATA___V388*/ meltfptr[387]) /*_.VALDATA___V388*/ meltfptr[387] = (void*) sy_MI; } /*^getnamedsymbol*/ /*getnamedsym:MIXINT_VAL*/ { melt_ptr_t sy_MIXINT_VAL = meltgc_named_symbol("MIXINT_VAL", MELT_GET); if (sy_MIXINT_VAL && NULL == /*_.VALDATA___V394*/ meltfptr[393]) /*_.VALDATA___V394*/ meltfptr[393] = (void*) sy_MIXINT_VAL; } /*^getnamedsymbol*/ /*getnamedsym:MAKE_MIXINT*/ { melt_ptr_t sy_MAKE_MIXINT = meltgc_named_symbol("MAKE_MIXINT", MELT_GET); if (sy_MAKE_MIXINT && NULL == /*_.VALDATA___V403*/ meltfptr[402]) /*_.VALDATA___V403*/ meltfptr[402] = (void*) sy_MAKE_MIXINT; } /*^getnamedsymbol*/ /*getnamedsym:DIS*/ { melt_ptr_t sy_DIS = meltgc_named_symbol("DIS", MELT_GET); if (sy_DIS && NULL == /*_.VALDATA___V408*/ meltfptr[407]) /*_.VALDATA___V408*/ meltfptr[407] = (void*) sy_DIS; } /*^getnamedsymbol*/ /*getnamedsym:VAL*/ { melt_ptr_t sy_VAL = meltgc_named_symbol("VAL", MELT_GET); if (sy_VAL && NULL == /*_.VALDATA___V411*/ meltfptr[410]) /*_.VALDATA___V411*/ meltfptr[410] = (void*) sy_VAL; } /*^getnamedsymbol*/ /*getnamedsym:NUM*/ { melt_ptr_t sy_NUM = meltgc_named_symbol("NUM", MELT_GET); if (sy_NUM && NULL == /*_.VALDATA___V414*/ meltfptr[413]) /*_.VALDATA___V414*/ meltfptr[413] = (void*) sy_NUM; } /*^getnamedsymbol*/ /*getnamedsym:IS_MIXLOC*/ { melt_ptr_t sy_IS_MIXLOC = meltgc_named_symbol("IS_MIXLOC", MELT_GET); if (sy_IS_MIXLOC && NULL == /*_.VALDATA___V422*/ meltfptr[421]) /*_.VALDATA___V422*/ meltfptr[421] = (void*) sy_IS_MIXLOC; } /*^getnamedsymbol*/ /*getnamedsym:MIXLOC_VAL*/ { melt_ptr_t sy_MIXLOC_VAL = meltgc_named_symbol("MIXLOC_VAL", MELT_GET); if (sy_MIXLOC_VAL && NULL == /*_.VALDATA___V431*/ meltfptr[430]) /*_.VALDATA___V431*/ meltfptr[430] = (void*) sy_MIXLOC_VAL; } /*^getnamedsymbol*/ /*getnamedsym:MIXLOC_LOCATION*/ { melt_ptr_t sy_MIXLOC_LOCATION = meltgc_named_symbol("MIXLOC_LOCATION", MELT_GET); if (sy_MIXLOC_LOCATION && NULL == /*_.VALDATA___V440*/ meltfptr[439]) /*_.VALDATA___V440*/ meltfptr[439] = (void*) sy_MIXLOC_LOCATION; } /*^getnamedsymbol*/ /*getnamedsym:MIXLOC_LOCLINE*/ { melt_ptr_t sy_MIXLOC_LOCLINE = meltgc_named_symbol("MIXLOC_LOCLINE", MELT_GET); if (sy_MIXLOC_LOCLINE && NULL == /*_.VALDATA___V449*/ meltfptr[448]) /*_.VALDATA___V449*/ meltfptr[448] = (void*) sy_MIXLOC_LOCLINE; } /*^getnamedsymbol*/ /*getnamedsym:MIXLOC_LOCFILE*/ { melt_ptr_t sy_MIXLOC_LOCFILE = meltgc_named_symbol("MIXLOC_LOCFILE", MELT_GET); if (sy_MIXLOC_LOCFILE && NULL == /*_.VALDATA___V458*/ meltfptr[457]) /*_.VALDATA___V458*/ meltfptr[457] = (void*) sy_MIXLOC_LOCFILE; } /*^getnamedsymbol*/ /*getnamedsym:MAKE_MIXLOC*/ { melt_ptr_t sy_MAKE_MIXLOC = meltgc_named_symbol("MAKE_MIXLOC", MELT_GET); if (sy_MAKE_MIXLOC && NULL == /*_.VALDATA___V467*/ meltfptr[466]) /*_.VALDATA___V467*/ meltfptr[466] = (void*) sy_MAKE_MIXLOC; } /*^getnamedsymbol*/ /*getnamedsym:LOC*/ { melt_ptr_t sy_LOC = meltgc_named_symbol("LOC", MELT_GET); if (sy_LOC && NULL == /*_.VALDATA___V475*/ meltfptr[474]) /*_.VALDATA___V475*/ meltfptr[474] = (void*) sy_LOC; } /*^getnamedsymbol*/ /*getnamedsym:IS_MIXBIGINT*/ { melt_ptr_t sy_IS_MIXBIGINT = meltgc_named_symbol("IS_MIXBIGINT", MELT_GET); if (sy_IS_MIXBIGINT && NULL == /*_.VALDATA___V484*/ meltfptr[483]) /*_.VALDATA___V484*/ meltfptr[483] = (void*) sy_IS_MIXBIGINT; } /*^getnamedsymbol*/ /*getnamedsym:MB*/ { melt_ptr_t sy_MB = meltgc_named_symbol("MB", MELT_GET); if (sy_MB && NULL == /*_.VALDATA___V489*/ meltfptr[488]) /*_.VALDATA___V489*/ meltfptr[488] = (void*) sy_MB; } /*^getnamedsymbol*/ /*getnamedsym:MIXBIGINT_VAL*/ { melt_ptr_t sy_MIXBIGINT_VAL = meltgc_named_symbol("MIXBIGINT_VAL", MELT_GET); if (sy_MIXBIGINT_VAL && NULL == /*_.VALDATA___V495*/ meltfptr[494]) /*_.VALDATA___V495*/ meltfptr[494] = (void*) sy_MIXBIGINT_VAL; } /*^getnamedsymbol*/ /*getnamedsym:PPSTRBUF_MIXBIGINT*/ { melt_ptr_t sy_PPSTRBUF_MIXBIGINT = meltgc_named_symbol("PPSTRBUF_MIXBIGINT", MELT_GET); if (sy_PPSTRBUF_MIXBIGINT && NULL == /*_.VALDATA___V504*/ meltfptr[503]) /*_.VALDATA___V504*/ meltfptr[503] = (void*) sy_PPSTRBUF_MIXBIGINT; } /*^getnamedsymbol*/ /*getnamedsym:INDENT*/ { melt_ptr_t sy_INDENT = meltgc_named_symbol("INDENT", MELT_GET); if (sy_INDENT && NULL == /*_.VALDATA___V510*/ meltfptr[509]) /*_.VALDATA___V510*/ meltfptr[509] = (void*) sy_INDENT; } /*^getnamedsymbol*/ /*getnamedsym:READ_FILE*/ { melt_ptr_t sy_READ_FILE = meltgc_named_symbol("READ_FILE", MELT_GET); if (sy_READ_FILE && NULL == /*_.VALDATA___V519*/ meltfptr[518]) /*_.VALDATA___V519*/ meltfptr[518] = (void*) sy_READ_FILE; } /*^getnamedsymbol*/ /*getnamedsym:FILNAM*/ { melt_ptr_t sy_FILNAM = meltgc_named_symbol("FILNAM", MELT_GET); if (sy_FILNAM && NULL == /*_.VALDATA___V524*/ meltfptr[523]) /*_.VALDATA___V524*/ meltfptr[523] = (void*) sy_FILNAM; } /*^getnamedsymbol*/ /*getnamedsym:ERROR_STRV*/ { melt_ptr_t sy_ERROR_STRV = meltgc_named_symbol("ERROR_STRV", MELT_GET); if (sy_ERROR_STRV && NULL == /*_.VALDATA___V530*/ meltfptr[529]) /*_.VALDATA___V530*/ meltfptr[529] = (void*) sy_ERROR_STRV; } /*^getnamedsymbol*/ /*getnamedsym:CMSG*/ { melt_ptr_t sy_CMSG = meltgc_named_symbol("CMSG", MELT_GET); if (sy_CMSG && NULL == /*_.VALDATA___V536*/ meltfptr[535]) /*_.VALDATA___V536*/ meltfptr[535] = (void*) sy_CMSG; } /*^getnamedsymbol*/ /*getnamedsym:STRV*/ { melt_ptr_t sy_STRV = meltgc_named_symbol("STRV", MELT_GET); if (sy_STRV && NULL == /*_.VALDATA___V539*/ meltfptr[538]) /*_.VALDATA___V539*/ meltfptr[538] = (void*) sy_STRV; } /*^getnamedsymbol*/ /*getnamedsym:ERROR_PLAIN*/ { melt_ptr_t sy_ERROR_PLAIN = meltgc_named_symbol("ERROR_PLAIN", MELT_GET); if (sy_ERROR_PLAIN && NULL == /*_.VALDATA___V547*/ meltfptr[546]) /*_.VALDATA___V547*/ meltfptr[546] = (void*) sy_ERROR_PLAIN; } /*^getnamedsymbol*/ /*getnamedsym:WARNING_STRV*/ { melt_ptr_t sy_WARNING_STRV = meltgc_named_symbol("WARNING_STRV", MELT_GET); if (sy_WARNING_STRV && NULL == /*_.VALDATA___V558*/ meltfptr[557]) /*_.VALDATA___V558*/ meltfptr[557] = (void*) sy_WARNING_STRV; } /*^getnamedsymbol*/ /*getnamedsym:WARNING_PLAIN*/ { melt_ptr_t sy_WARNING_PLAIN = meltgc_named_symbol("WARNING_PLAIN", MELT_GET); if (sy_WARNING_PLAIN && NULL == /*_.VALDATA___V571*/ meltfptr[570]) /*_.VALDATA___V571*/ meltfptr[570] = (void*) sy_WARNING_PLAIN; } /*^getnamedsymbol*/ /*getnamedsym:WARNINGMSG_PLAIN*/ { melt_ptr_t sy_WARNINGMSG_PLAIN = meltgc_named_symbol("WARNINGMSG_PLAIN", MELT_GET); if (sy_WARNINGMSG_PLAIN && NULL == /*_.VALDATA___V582*/ meltfptr[581]) /*_.VALDATA___V582*/ meltfptr[581] = (void*) sy_WARNINGMSG_PLAIN; } /*^getnamedsymbol*/ /*getnamedsym:ERRORMSG_PLAIN*/ { melt_ptr_t sy_ERRORMSG_PLAIN = meltgc_named_symbol("ERRORMSG_PLAIN", MELT_GET); if (sy_ERRORMSG_PLAIN && NULL == /*_.VALDATA___V591*/ meltfptr[590]) /*_.VALDATA___V591*/ meltfptr[590] = (void*) sy_ERRORMSG_PLAIN; } /*^getnamedsymbol*/ /*getnamedsym:ERRORMSG_STRV*/ { melt_ptr_t sy_ERRORMSG_STRV = meltgc_named_symbol("ERRORMSG_STRV", MELT_GET); if (sy_ERRORMSG_STRV && NULL == /*_.VALDATA___V600*/ meltfptr[599]) /*_.VALDATA___V600*/ meltfptr[599] = (void*) sy_ERRORMSG_STRV; } /*^getnamedsymbol*/ /*getnamedsym:INFORM_STRV*/ { melt_ptr_t sy_INFORM_STRV = meltgc_named_symbol("INFORM_STRV", MELT_GET); if (sy_INFORM_STRV && NULL == /*_.VALDATA___V611*/ meltfptr[610]) /*_.VALDATA___V611*/ meltfptr[610] = (void*) sy_INFORM_STRV; } /*^getnamedsymbol*/ /*getnamedsym:INFORM_PLAIN*/ { melt_ptr_t sy_INFORM_PLAIN = meltgc_named_symbol("INFORM_PLAIN", MELT_GET); if (sy_INFORM_PLAIN && NULL == /*_.VALDATA___V624*/ meltfptr[623]) /*_.VALDATA___V624*/ meltfptr[623] = (void*) sy_INFORM_PLAIN; } /*^getnamedsymbol*/ /*getnamedsym:INFORMSG_PLAIN*/ { melt_ptr_t sy_INFORMSG_PLAIN = meltgc_named_symbol("INFORMSG_PLAIN", MELT_GET); if (sy_INFORMSG_PLAIN && NULL == /*_.VALDATA___V635*/ meltfptr[634]) /*_.VALDATA___V635*/ meltfptr[634] = (void*) sy_INFORMSG_PLAIN; } /*^getnamedsymbol*/ /*getnamedsym:IMIN*/ { melt_ptr_t sy_IMIN = meltgc_named_symbol("IMIN", MELT_GET); if (sy_IMIN && NULL == /*_.VALDATA___V647*/ meltfptr[646]) /*_.VALDATA___V647*/ meltfptr[646] = (void*) sy_IMIN; } /*^getnamedsymbol*/ /*getnamedsym:IMAX*/ { melt_ptr_t sy_IMAX = meltgc_named_symbol("IMAX", MELT_GET); if (sy_IMAX && NULL == /*_.VALDATA___V650*/ meltfptr[649]) /*_.VALDATA___V650*/ meltfptr[649] = (void*) sy_IMAX; } /*^getnamedsymbol*/ /*getnamedsym:EACHLONG*/ { melt_ptr_t sy_EACHLONG = meltgc_named_symbol("EACHLONG", MELT_GET); if (sy_EACHLONG && NULL == /*_.VALDATA___V653*/ meltfptr[652]) /*_.VALDATA___V653*/ meltfptr[652] = (void*) sy_EACHLONG; } /*^getnamedsymbol*/ /*getnamedsym:N*/ { melt_ptr_t sy_N = meltgc_named_symbol("N", MELT_GET); if (sy_N && NULL == /*_.VALDATA___V677*/ meltfptr[676]) /*_.VALDATA___V677*/ meltfptr[676] = (void*) sy_N; } /*^getnamedsymbol*/ /*getnamedsym:Q*/ { melt_ptr_t sy_Q = meltgc_named_symbol("Q", MELT_GET); if (sy_Q && NULL == /*_.VALDATA___V682*/ meltfptr[681]) /*_.VALDATA___V682*/ meltfptr[681] = (void*) sy_Q; } /*^getnamedsymbol*/ /*getnamedsym:INTMULT*/ { melt_ptr_t sy_INTMULT = meltgc_named_symbol("INTMULT", MELT_GET); if (sy_INTMULT && NULL == /*_.VALDATA___V685*/ meltfptr[684]) /*_.VALDATA___V685*/ meltfptr[684] = (void*) sy_INTMULT; } /*^getnamedsymbol*/ /*getnamedsym:INTGREATHAN*/ { melt_ptr_t sy_INTGREATHAN = meltgc_named_symbol("INTGREATHAN", MELT_GET); if (sy_INTGREATHAN && NULL == /*_.VALDATA___V705*/ meltfptr[704]) /*_.VALDATA___V705*/ meltfptr[704] = (void*) sy_INTGREATHAN; } /*^getnamedsymbol*/ /*getnamedsym:OUTNEWLINE_ERR*/ { melt_ptr_t sy_OUTNEWLINE_ERR = meltgc_named_symbol("OUTNEWLINE_ERR", MELT_GET); if (sy_OUTNEWLINE_ERR && NULL == /*_.VALDATA___V712*/ meltfptr[711]) /*_.VALDATA___V712*/ meltfptr[711] = (void*) sy_OUTNEWLINE_ERR; } /*^getnamedsymbol*/ /*getnamedsym:OUTSTR_ERR*/ { melt_ptr_t sy_OUTSTR_ERR = meltgc_named_symbol("OUTSTR_ERR", MELT_GET); if (sy_OUTSTR_ERR && NULL == /*_.VALDATA___V719*/ meltfptr[718]) /*_.VALDATA___V719*/ meltfptr[718] = (void*) sy_OUTSTR_ERR; } /*^getnamedsymbol*/ /*getnamedsym:MESSAGE_DBG*/ { melt_ptr_t sy_MESSAGE_DBG = meltgc_named_symbol("MESSAGE_DBG", MELT_GET); if (sy_MESSAGE_DBG && NULL == /*_.VALDATA___V728*/ meltfptr[727]) /*_.VALDATA___V728*/ meltfptr[727] = (void*) sy_MESSAGE_DBG; } /*^getnamedsymbol*/ /*getnamedsym:MESSAGENUM_DBG*/ { melt_ptr_t sy_MESSAGENUM_DBG = meltgc_named_symbol("MESSAGENUM_DBG", MELT_GET); if (sy_MESSAGENUM_DBG && NULL == /*_.VALDATA___V737*/ meltfptr[736]) /*_.VALDATA___V737*/ meltfptr[736] = (void*) sy_MESSAGENUM_DBG; } /*^getnamedsymbol*/ /*getnamedsym:MESSAGEVAL_DBG*/ { melt_ptr_t sy_MESSAGEVAL_DBG = meltgc_named_symbol("MESSAGEVAL_DBG", MELT_GET); if (sy_MESSAGEVAL_DBG && NULL == /*_.VALDATA___V748*/ meltfptr[747]) /*_.VALDATA___V748*/ meltfptr[747] = (void*) sy_MESSAGEVAL_DBG; } /*^getnamedsymbol*/ /*getnamedsym:LONGBACKTRACE_DBG*/ { melt_ptr_t sy_LONGBACKTRACE_DBG = meltgc_named_symbol("LONGBACKTRACE_DBG", MELT_GET); if (sy_LONGBACKTRACE_DBG && NULL == /*_.VALDATA___V759*/ meltfptr[758]) /*_.VALDATA___V759*/ meltfptr[758] = (void*) sy_LONGBACKTRACE_DBG; } /*^getnamedsymbol*/ /*getnamedsym:MAXDEPTH*/ { melt_ptr_t sy_MAXDEPTH = meltgc_named_symbol("MAXDEPTH", MELT_GET); if (sy_MAXDEPTH && NULL == /*_.VALDATA___V765*/ meltfptr[764]) /*_.VALDATA___V765*/ meltfptr[764] = (void*) sy_MAXDEPTH; } /*^getnamedsymbol*/ /*getnamedsym:CHECKVAL_DBG*/ { melt_ptr_t sy_CHECKVAL_DBG = meltgc_named_symbol("CHECKVAL_DBG", MELT_GET); if (sy_CHECKVAL_DBG && NULL == /*_.VALDATA___V771*/ meltfptr[770]) /*_.VALDATA___V771*/ meltfptr[770] = (void*) sy_CHECKVAL_DBG; } /*^getnamedsymbol*/ /*getnamedsym:DEBUGCSTRING*/ { melt_ptr_t sy_DEBUGCSTRING = meltgc_named_symbol("DEBUGCSTRING", MELT_GET); if (sy_DEBUGCSTRING && NULL == /*_.VALDATA___V782*/ meltfptr[781]) /*_.VALDATA___V782*/ meltfptr[781] = (void*) sy_DEBUGCSTRING; } /*^getnamedsymbol*/ /*getnamedsym:MAKE_STRBUF*/ { melt_ptr_t sy_MAKE_STRBUF = meltgc_named_symbol("MAKE_STRBUF", MELT_GET); if (sy_MAKE_STRBUF && NULL == /*_.VALDATA___V793*/ meltfptr[792]) /*_.VALDATA___V793*/ meltfptr[792] = (void*) sy_MAKE_STRBUF; } /*^getnamedsymbol*/ /*getnamedsym:STRBUF_USEDLENGTH*/ { melt_ptr_t sy_STRBUF_USEDLENGTH = meltgc_named_symbol("STRBUF_USEDLENGTH", MELT_GET); if (sy_STRBUF_USEDLENGTH && NULL == /*_.VALDATA___V802*/ meltfptr[801]) /*_.VALDATA___V802*/ meltfptr[801] = (void*) sy_STRBUF_USEDLENGTH; } /*^getnamedsymbol*/ /*getnamedsym:IS_STRBUF*/ { melt_ptr_t sy_IS_STRBUF = meltgc_named_symbol("IS_STRBUF", MELT_GET); if (sy_IS_STRBUF && NULL == /*_.VALDATA___V811*/ meltfptr[810]) /*_.VALDATA___V811*/ meltfptr[810] = (void*) sy_IS_STRBUF; } /*^getnamedsymbol*/ /*getnamedsym:MAKE_STRING*/ { melt_ptr_t sy_MAKE_STRING = meltgc_named_symbol("MAKE_STRING", MELT_GET); if (sy_MAKE_STRING && NULL == /*_.VALDATA___V820*/ meltfptr[819]) /*_.VALDATA___V820*/ meltfptr[819] = (void*) sy_MAKE_STRING; } /*^getnamedsymbol*/ /*getnamedsym:IS_STRINGCONST*/ { melt_ptr_t sy_IS_STRINGCONST = meltgc_named_symbol("IS_STRINGCONST", MELT_GET); if (sy_IS_STRINGCONST && NULL == /*_.VALDATA___V831*/ meltfptr[830]) /*_.VALDATA___V831*/ meltfptr[830] = (void*) sy_IS_STRINGCONST; } /*^getnamedsymbol*/ /*getnamedsym:CS*/ { melt_ptr_t sy_CS = meltgc_named_symbol("CS", MELT_GET); if (sy_CS && NULL == /*_.VALDATA___V837*/ meltfptr[836]) /*_.VALDATA___V837*/ meltfptr[836] = (void*) sy_CS; } /*^getnamedsymbol*/ /*getnamedsym:STRING_LENGTH*/ { melt_ptr_t sy_STRING_LENGTH = meltgc_named_symbol("STRING_LENGTH", MELT_GET); if (sy_STRING_LENGTH && NULL == /*_.VALDATA___V844*/ meltfptr[843]) /*_.VALDATA___V844*/ meltfptr[843] = (void*) sy_STRING_LENGTH; } /*^getnamedsymbol*/ /*getnamedsym:STRING=*/ { melt_ptr_t sy_STRING_ = meltgc_named_symbol("STRING=", MELT_GET); if (sy_STRING_ && NULL == /*_.VALDATA___V853*/ meltfptr[852]) /*_.VALDATA___V853*/ meltfptr[852] = (void*) sy_STRING_; } /*^getnamedsymbol*/ /*getnamedsym:S1*/ { melt_ptr_t sy_S1 = meltgc_named_symbol("S1", MELT_GET); if (sy_S1 && NULL == /*_.VALDATA___V858*/ meltfptr[857]) /*_.VALDATA___V858*/ meltfptr[857] = (void*) sy_S1; } /*^getnamedsymbol*/ /*getnamedsym:S2*/ { melt_ptr_t sy_S2 = meltgc_named_symbol("S2", MELT_GET); if (sy_S2 && NULL == /*_.VALDATA___V861*/ meltfptr[860]) /*_.VALDATA___V861*/ meltfptr[860] = (void*) sy_S2; } /*^getnamedsymbol*/ /*getnamedsym:SPLIT_STRING_SPACE*/ { melt_ptr_t sy_SPLIT_STRING_SPACE = meltgc_named_symbol("SPLIT_STRING_SPACE", MELT_GET); if (sy_SPLIT_STRING_SPACE && NULL == /*_.VALDATA___V868*/ meltfptr[867]) /*_.VALDATA___V868*/ meltfptr[867] = (void*) sy_SPLIT_STRING_SPACE; } /*^getnamedsymbol*/ /*getnamedsym:SPLIT_STRING_COMMA*/ { melt_ptr_t sy_SPLIT_STRING_COMMA = meltgc_named_symbol("SPLIT_STRING_COMMA", MELT_GET); if (sy_SPLIT_STRING_COMMA && NULL == /*_.VALDATA___V879*/ meltfptr[878]) /*_.VALDATA___V879*/ meltfptr[878] = (void*) sy_SPLIT_STRING_COMMA; } /*^getnamedsymbol*/ /*getnamedsym:SPLIT_STRING_COLON*/ { melt_ptr_t sy_SPLIT_STRING_COLON = meltgc_named_symbol("SPLIT_STRING_COLON", MELT_GET); if (sy_SPLIT_STRING_COLON && NULL == /*_.VALDATA___V890*/ meltfptr[889]) /*_.VALDATA___V890*/ meltfptr[889] = (void*) sy_SPLIT_STRING_COLON; } /*^getnamedsymbol*/ /*getnamedsym:STRBUF2STRING*/ { melt_ptr_t sy_STRBUF2STRING = meltgc_named_symbol("STRBUF2STRING", MELT_GET); if (sy_STRBUF2STRING && NULL == /*_.VALDATA___V901*/ meltfptr[900]) /*_.VALDATA___V901*/ meltfptr[900] = (void*) sy_STRBUF2STRING; } /*^getnamedsymbol*/ /*getnamedsym:MAKE_STRING_NAKEDBASENAME*/ { melt_ptr_t sy_MAKE_STRING_NAKEDBASENAME = meltgc_named_symbol("MAKE_STRING_NAKEDBASENAME", MELT_GET); if (sy_MAKE_STRING_NAKEDBASENAME && NULL == /*_.VALDATA___V912*/ meltfptr[911]) /*_.VALDATA___V912*/ meltfptr[911] = (void*) sy_MAKE_STRING_NAKEDBASENAME; } /*^getnamedsymbol*/ /*getnamedsym:MAKE_STRING_TEMPNAME_SUFFIXED*/ { melt_ptr_t sy_MAKE_STRING_TEMPNAME_SUFFIXED = meltgc_named_symbol("MAKE_STRING_TEMPNAME_SUFFIXED", MELT_GET); if (sy_MAKE_STRING_TEMPNAME_SUFFIXED && NULL == /*_.VALDATA___V923*/ meltfptr[922]) /*_.VALDATA___V923*/ meltfptr[922] = (void*) sy_MAKE_STRING_TEMPNAME_SUFFIXED; } /*^getnamedsymbol*/ /*getnamedsym:SUFF*/ { melt_ptr_t sy_SUFF = meltgc_named_symbol("SUFF", MELT_GET); if (sy_SUFF && NULL == /*_.VALDATA___V930*/ meltfptr[929]) /*_.VALDATA___V930*/ meltfptr[929] = (void*) sy_SUFF; } /*^getnamedsymbol*/ /*getnamedsym:LOAD_MELT_MODULE*/ { melt_ptr_t sy_LOAD_MELT_MODULE = meltgc_named_symbol("LOAD_MELT_MODULE", MELT_GET); if (sy_LOAD_MELT_MODULE && NULL == /*_.VALDATA___V938*/ meltfptr[937]) /*_.VALDATA___V938*/ meltfptr[937] = (void*) sy_LOAD_MELT_MODULE; } /*^getnamedsymbol*/ /*getnamedsym:ENV*/ { melt_ptr_t sy_ENV = meltgc_named_symbol("ENV", MELT_GET); if (sy_ENV && NULL == /*_.VALDATA___V943*/ meltfptr[942]) /*_.VALDATA___V943*/ meltfptr[942] = (void*) sy_ENV; } /*^getnamedsymbol*/ /*getnamedsym:GENERATE_MELT_MODULE*/ { melt_ptr_t sy_GENERATE_MELT_MODULE = meltgc_named_symbol("GENERATE_MELT_MODULE", MELT_GET); if (sy_GENERATE_MELT_MODULE && NULL == /*_.VALDATA___V951*/ meltfptr[950]) /*_.VALDATA___V951*/ meltfptr[950] = (void*) sy_GENERATE_MELT_MODULE; } /*^getnamedsymbol*/ /*getnamedsym:SRC*/ { melt_ptr_t sy_SRC = meltgc_named_symbol("SRC", MELT_GET); if (sy_SRC && NULL == /*_.VALDATA___V956*/ meltfptr[955]) /*_.VALDATA___V956*/ meltfptr[955] = (void*) sy_SRC; } /*^getnamedsymbol*/ /*getnamedsym:OUTNAM*/ { melt_ptr_t sy_OUTNAM = meltgc_named_symbol("OUTNAM", MELT_GET); if (sy_OUTNAM && NULL == /*_.VALDATA___V959*/ meltfptr[958]) /*_.VALDATA___V959*/ meltfptr[958] = (void*) sy_OUTNAM; } /*^getnamedsymbol*/ /*getnamedsym:OBJECT_LENGTH*/ { melt_ptr_t sy_OBJECT_LENGTH = meltgc_named_symbol("OBJECT_LENGTH", MELT_GET); if (sy_OBJECT_LENGTH && NULL == /*_.VALDATA___V966*/ meltfptr[965]) /*_.VALDATA___V966*/ meltfptr[965] = (void*) sy_OBJECT_LENGTH; } /*^getnamedsymbol*/ /*getnamedsym:OB*/ { melt_ptr_t sy_OB = meltgc_named_symbol("OB", MELT_GET); if (sy_OB && NULL == /*_.VALDATA___V971*/ meltfptr[970]) /*_.VALDATA___V971*/ meltfptr[970] = (void*) sy_OB; } /*^getnamedsymbol*/ /*getnamedsym:OBJECT_NTH_FIELD*/ { melt_ptr_t sy_OBJECT_NTH_FIELD = meltgc_named_symbol("OBJECT_NTH_FIELD", MELT_GET); if (sy_OBJECT_NTH_FIELD && NULL == /*_.VALDATA___V977*/ meltfptr[976]) /*_.VALDATA___V977*/ meltfptr[976] = (void*) sy_OBJECT_NTH_FIELD; } /*^getnamedsymbol*/ /*getnamedsym:SUBCLASS_OF*/ { melt_ptr_t sy_SUBCLASS_OF = meltgc_named_symbol("SUBCLASS_OF", MELT_GET); if (sy_SUBCLASS_OF && NULL == /*_.VALDATA___V988*/ meltfptr[987]) /*_.VALDATA___V988*/ meltfptr[987] = (void*) sy_SUBCLASS_OF; } /*^getnamedsymbol*/ /*getnamedsym:CL1*/ { melt_ptr_t sy_CL1 = meltgc_named_symbol("CL1", MELT_GET); if (sy_CL1 && NULL == /*_.VALDATA___V993*/ meltfptr[992]) /*_.VALDATA___V993*/ meltfptr[992] = (void*) sy_CL1; } /*^getnamedsymbol*/ /*getnamedsym:CL2*/ { melt_ptr_t sy_CL2 = meltgc_named_symbol("CL2", MELT_GET); if (sy_CL2 && NULL == /*_.VALDATA___V996*/ meltfptr[995]) /*_.VALDATA___V996*/ meltfptr[995] = (void*) sy_CL2; } /*^getnamedsymbol*/ /*getnamedsym:SUBCLASS_OR_EQ*/ { melt_ptr_t sy_SUBCLASS_OR_EQ = meltgc_named_symbol("SUBCLASS_OR_EQ", MELT_GET); if (sy_SUBCLASS_OR_EQ && NULL == /*_.VALDATA___V1003*/ meltfptr[1002]) /*_.VALDATA___V1003*/ meltfptr[1002] = (void*) sy_SUBCLASS_OR_EQ; } /*^getnamedsymbol*/ /*getnamedsym:IS_MULTIPLE_OR_NULL*/ { melt_ptr_t sy_IS_MULTIPLE_OR_NULL = meltgc_named_symbol("IS_MULTIPLE_OR_NULL", MELT_GET); if (sy_IS_MULTIPLE_OR_NULL && NULL == /*_.VALDATA___V1016*/ meltfptr[1015]) /*_.VALDATA___V1016*/ meltfptr[1015] = (void*) sy_IS_MULTIPLE_OR_NULL; } /*^getnamedsymbol*/ /*getnamedsym:MUL*/ { melt_ptr_t sy_MUL = meltgc_named_symbol("MUL", MELT_GET); if (sy_MUL && NULL == /*_.VALDATA___V1021*/ meltfptr[1020]) /*_.VALDATA___V1021*/ meltfptr[1020] = (void*) sy_MUL; } /*^getnamedsymbol*/ /*getnamedsym:SUBSEQ_MULTIPLE*/ { melt_ptr_t sy_SUBSEQ_MULTIPLE = meltgc_named_symbol("SUBSEQ_MULTIPLE", MELT_GET); if (sy_SUBSEQ_MULTIPLE && NULL == /*_.VALDATA___V1028*/ meltfptr[1027]) /*_.VALDATA___V1028*/ meltfptr[1027] = (void*) sy_SUBSEQ_MULTIPLE; } /*^getnamedsymbol*/ /*getnamedsym:STARTIX*/ { melt_ptr_t sy_STARTIX = meltgc_named_symbol("STARTIX", MELT_GET); if (sy_STARTIX && NULL == /*_.VALDATA___V1034*/ meltfptr[1033]) /*_.VALDATA___V1034*/ meltfptr[1033] = (void*) sy_STARTIX; } /*^getnamedsymbol*/ /*getnamedsym:ENDIX*/ { melt_ptr_t sy_ENDIX = meltgc_named_symbol("ENDIX", MELT_GET); if (sy_ENDIX && NULL == /*_.VALDATA___V1037*/ meltfptr[1036]) /*_.VALDATA___V1037*/ meltfptr[1036] = (void*) sy_ENDIX; } /*^getnamedsymbol*/ /*getnamedsym:MATCHEDRK*/ { melt_ptr_t sy_MATCHEDRK = meltgc_named_symbol("MATCHEDRK", MELT_GET); if (sy_MATCHEDRK && NULL == /*_.VALDATA___V1048*/ meltfptr[1047]) /*_.VALDATA___V1048*/ meltfptr[1047] = (void*) sy_MATCHEDRK; } /*^getnamedsymbol*/ /*getnamedsym:MATCHEDTUP*/ { melt_ptr_t sy_MATCHEDTUP = meltgc_named_symbol("MATCHEDTUP", MELT_GET); if (sy_MATCHEDTUP && NULL == /*_.VALDATA___V1052*/ meltfptr[1051]) /*_.VALDATA___V1052*/ meltfptr[1051] = (void*) sy_MATCHEDTUP; } /*^getnamedsymbol*/ /*getnamedsym:OUTCOMP*/ { melt_ptr_t sy_OUTCOMP = meltgc_named_symbol("OUTCOMP", MELT_GET); if (sy_OUTCOMP && NULL == /*_.VALDATA___V1055*/ meltfptr[1054]) /*_.VALDATA___V1055*/ meltfptr[1054] = (void*) sy_OUTCOMP; } /*^getnamedsymbol*/ /*getnamedsym:TUPNTH*/ { melt_ptr_t sy_TUPNTH = meltgc_named_symbol("TUPNTH", MELT_GET); if (sy_TUPNTH && NULL == /*_.VALDATA___V1058*/ meltfptr[1057]) /*_.VALDATA___V1058*/ meltfptr[1057] = (void*) sy_TUPNTH; } /*^getnamedsymbol*/ /*getnamedsym:LN*/ { melt_ptr_t sy_LN = meltgc_named_symbol("LN", MELT_GET); if (sy_LN && NULL == /*_.VALDATA___V1074*/ meltfptr[1073]) /*_.VALDATA___V1074*/ meltfptr[1073] = (void*) sy_LN; } /*^getnamedsymbol*/ /*getnamedsym:TUP*/ { melt_ptr_t sy_TUP = meltgc_named_symbol("TUP", MELT_GET); if (sy_TUP && NULL == /*_.VALDATA___V1078*/ meltfptr[1077]) /*_.VALDATA___V1078*/ meltfptr[1077] = (void*) sy_TUP; } /*^getnamedsymbol*/ /*getnamedsym:TUPSIZ*/ { melt_ptr_t sy_TUPSIZ = meltgc_named_symbol("TUPSIZ", MELT_GET); if (sy_TUPSIZ && NULL == /*_.VALDATA___V1081*/ meltfptr[1080]) /*_.VALDATA___V1081*/ meltfptr[1080] = (void*) sy_TUPSIZ; } /*^getnamedsymbol*/ /*getnamedsym:CLASS_NAMED*/ { melt_ptr_t sy_CLASS_NAMED = meltgc_named_symbol("CLASS_NAMED", MELT_GET); if (sy_CLASS_NAMED && NULL == /*_.VALDATA___V1095*/ meltfptr[1094]) /*_.VALDATA___V1095*/ meltfptr[1094] = (void*) sy_CLASS_NAMED; } /*^getnamedsymbol*/ /*getnamedsym:IS_OUT*/ { melt_ptr_t sy_IS_OUT = meltgc_named_symbol("IS_OUT", MELT_GET); if (sy_IS_OUT && NULL == /*_.VALDATA___V1097*/ meltfptr[1096]) /*_.VALDATA___V1097*/ meltfptr[1096] = (void*) sy_IS_OUT; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_STRCONST*/ { melt_ptr_t sy_ADD2SBUF_STRCONST = meltgc_named_symbol("ADD2SBUF_STRCONST", MELT_GET); if (sy_ADD2SBUF_STRCONST && NULL == /*_.VALDATA___V1106*/ meltfptr[1105]) /*_.VALDATA___V1106*/ meltfptr[1105] = (void*) sy_ADD2SBUF_STRCONST; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_STRING*/ { melt_ptr_t sy_ADD2SBUF_STRING = meltgc_named_symbol("ADD2SBUF_STRING", MELT_GET); if (sy_ADD2SBUF_STRING && NULL == /*_.VALDATA___V1117*/ meltfptr[1116]) /*_.VALDATA___V1117*/ meltfptr[1116] = (void*) sy_ADD2SBUF_STRING; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_MIXLOC*/ { melt_ptr_t sy_ADD2SBUF_MIXLOC = meltgc_named_symbol("ADD2SBUF_MIXLOC", MELT_GET); if (sy_ADD2SBUF_MIXLOC && NULL == /*_.VALDATA___V1128*/ meltfptr[1127]) /*_.VALDATA___V1128*/ meltfptr[1127] = (void*) sy_ADD2SBUF_MIXLOC; } /*^getnamedsymbol*/ /*getnamedsym:MIXL*/ { melt_ptr_t sy_MIXL = meltgc_named_symbol("MIXL", MELT_GET); if (sy_MIXL && NULL == /*_.VALDATA___V1134*/ meltfptr[1133]) /*_.VALDATA___V1134*/ meltfptr[1133] = (void*) sy_MIXL; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_SHORT_MIXLOC*/ { melt_ptr_t sy_ADD2SBUF_SHORT_MIXLOC = meltgc_named_symbol("ADD2SBUF_SHORT_MIXLOC", MELT_GET); if (sy_ADD2SBUF_SHORT_MIXLOC && NULL == /*_.VALDATA___V1142*/ meltfptr[1141]) /*_.VALDATA___V1142*/ meltfptr[1141] = (void*) sy_ADD2SBUF_SHORT_MIXLOC; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_TEXI_MIXLOC*/ { melt_ptr_t sy_ADD2SBUF_TEXI_MIXLOC = meltgc_named_symbol("ADD2SBUF_TEXI_MIXLOC", MELT_GET); if (sy_ADD2SBUF_TEXI_MIXLOC && NULL == /*_.VALDATA___V1154*/ meltfptr[1153]) /*_.VALDATA___V1154*/ meltfptr[1153] = (void*) sy_ADD2SBUF_TEXI_MIXLOC; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_INDENT*/ { melt_ptr_t sy_ADD2SBUF_INDENT = meltgc_named_symbol("ADD2SBUF_INDENT", MELT_GET); if (sy_ADD2SBUF_INDENT && NULL == /*_.VALDATA___V1166*/ meltfptr[1165]) /*_.VALDATA___V1166*/ meltfptr[1165] = (void*) sy_ADD2SBUF_INDENT; } /*^getnamedsymbol*/ /*getnamedsym:DEPTH*/ { melt_ptr_t sy_DEPTH = meltgc_named_symbol("DEPTH", MELT_GET); if (sy_DEPTH && NULL == /*_.VALDATA___V1172*/ meltfptr[1171]) /*_.VALDATA___V1172*/ meltfptr[1171] = (void*) sy_DEPTH; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_INDENTNL*/ { melt_ptr_t sy_ADD2SBUF_INDENTNL = meltgc_named_symbol("ADD2SBUF_INDENTNL", MELT_GET); if (sy_ADD2SBUF_INDENTNL && NULL == /*_.VALDATA___V1179*/ meltfptr[1178]) /*_.VALDATA___V1179*/ meltfptr[1178] = (void*) sy_ADD2SBUF_INDENTNL; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_SBUF*/ { melt_ptr_t sy_ADD2SBUF_SBUF = meltgc_named_symbol("ADD2SBUF_SBUF", MELT_GET); if (sy_ADD2SBUF_SBUF && NULL == /*_.VALDATA___V1190*/ meltfptr[1189]) /*_.VALDATA___V1190*/ meltfptr[1189] = (void*) sy_ADD2SBUF_SBUF; } /*^getnamedsymbol*/ /*getnamedsym:ASBUF*/ { melt_ptr_t sy_ASBUF = meltgc_named_symbol("ASBUF", MELT_GET); if (sy_ASBUF && NULL == /*_.VALDATA___V1196*/ meltfptr[1195]) /*_.VALDATA___V1196*/ meltfptr[1195] = (void*) sy_ASBUF; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_CENCSTRING*/ { melt_ptr_t sy_ADD2SBUF_CENCSTRING = meltgc_named_symbol("ADD2SBUF_CENCSTRING", MELT_GET); if (sy_ADD2SBUF_CENCSTRING && NULL == /*_.VALDATA___V1203*/ meltfptr[1202]) /*_.VALDATA___V1203*/ meltfptr[1202] = (void*) sy_ADD2SBUF_CENCSTRING; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_CENCSTRBUF*/ { melt_ptr_t sy_ADD2SBUF_CENCSTRBUF = meltgc_named_symbol("ADD2SBUF_CENCSTRBUF", MELT_GET); if (sy_ADD2SBUF_CENCSTRBUF && NULL == /*_.VALDATA___V1214*/ meltfptr[1213]) /*_.VALDATA___V1214*/ meltfptr[1213] = (void*) sy_ADD2SBUF_CENCSTRBUF; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_CCOMSTRING*/ { melt_ptr_t sy_ADD2SBUF_CCOMSTRING = meltgc_named_symbol("ADD2SBUF_CCOMSTRING", MELT_GET); if (sy_ADD2SBUF_CCOMSTRING && NULL == /*_.VALDATA___V1225*/ meltfptr[1224]) /*_.VALDATA___V1225*/ meltfptr[1224] = (void*) sy_ADD2SBUF_CCOMSTRING; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_CCOMSTRBUF*/ { melt_ptr_t sy_ADD2SBUF_CCOMSTRBUF = meltgc_named_symbol("ADD2SBUF_CCOMSTRBUF", MELT_GET); if (sy_ADD2SBUF_CCOMSTRBUF && NULL == /*_.VALDATA___V1236*/ meltfptr[1235]) /*_.VALDATA___V1236*/ meltfptr[1235] = (void*) sy_ADD2SBUF_CCOMSTRBUF; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_CCOMCONST*/ { melt_ptr_t sy_ADD2SBUF_CCOMCONST = meltgc_named_symbol("ADD2SBUF_CCOMCONST", MELT_GET); if (sy_ADD2SBUF_CCOMCONST && NULL == /*_.VALDATA___V1247*/ meltfptr[1246]) /*_.VALDATA___V1247*/ meltfptr[1246] = (void*) sy_ADD2SBUF_CCOMCONST; } /*^getnamedsymbol*/ /*getnamedsym:CSTR*/ { melt_ptr_t sy_CSTR = meltgc_named_symbol("CSTR", MELT_GET); if (sy_CSTR && NULL == /*_.VALDATA___V1253*/ meltfptr[1252]) /*_.VALDATA___V1253*/ meltfptr[1252] = (void*) sy_CSTR; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_CIDENT*/ { melt_ptr_t sy_ADD2SBUF_CIDENT = meltgc_named_symbol("ADD2SBUF_CIDENT", MELT_GET); if (sy_ADD2SBUF_CIDENT && NULL == /*_.VALDATA___V1260*/ meltfptr[1259]) /*_.VALDATA___V1260*/ meltfptr[1259] = (void*) sy_ADD2SBUF_CIDENT; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_CIDENTPREFIX*/ { melt_ptr_t sy_ADD2SBUF_CIDENTPREFIX = meltgc_named_symbol("ADD2SBUF_CIDENTPREFIX", MELT_GET); if (sy_ADD2SBUF_CIDENTPREFIX && NULL == /*_.VALDATA___V1271*/ meltfptr[1270]) /*_.VALDATA___V1271*/ meltfptr[1270] = (void*) sy_ADD2SBUF_CIDENTPREFIX; } /*^getnamedsymbol*/ /*getnamedsym:PREFLEN*/ { melt_ptr_t sy_PREFLEN = meltgc_named_symbol("PREFLEN", MELT_GET); if (sy_PREFLEN && NULL == /*_.VALDATA___V1278*/ meltfptr[1277]) /*_.VALDATA___V1278*/ meltfptr[1277] = (void*) sy_PREFLEN; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_LONGDEC*/ { melt_ptr_t sy_ADD2SBUF_LONGDEC = meltgc_named_symbol("ADD2SBUF_LONGDEC", MELT_GET); if (sy_ADD2SBUF_LONGDEC && NULL == /*_.VALDATA___V1286*/ meltfptr[1285]) /*_.VALDATA___V1286*/ meltfptr[1285] = (void*) sy_ADD2SBUF_LONGDEC; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_LONGHEX*/ { melt_ptr_t sy_ADD2SBUF_LONGHEX = meltgc_named_symbol("ADD2SBUF_LONGHEX", MELT_GET); if (sy_ADD2SBUF_LONGHEX && NULL == /*_.VALDATA___V1297*/ meltfptr[1296]) /*_.VALDATA___V1297*/ meltfptr[1296] = (void*) sy_ADD2SBUF_LONGHEX; } /*^getnamedsymbol*/ /*getnamedsym:ADD2SBUF_ROUTINEDESCR*/ { melt_ptr_t sy_ADD2SBUF_ROUTINEDESCR = meltgc_named_symbol("ADD2SBUF_ROUTINEDESCR", MELT_GET); if (sy_ADD2SBUF_ROUTINEDESCR && NULL == /*_.VALDATA___V1308*/ meltfptr[1307]) /*_.VALDATA___V1308*/ meltfptr[1307] = (void*) sy_ADD2SBUF_ROUTINEDESCR; } /*^getnamedsymbol*/ /*getnamedsym:ROUT*/ { melt_ptr_t sy_ROUT = meltgc_named_symbol("ROUT", MELT_GET); if (sy_ROUT && NULL == /*_.VALDATA___V1314*/ meltfptr[1313]) /*_.VALDATA___V1314*/ meltfptr[1313] = (void*) sy_ROUT; } /*^getnamedsymbol*/ /*getnamedsym:OUTPUT_SBUF_STRCONST*/ { melt_ptr_t sy_OUTPUT_SBUF_STRCONST = meltgc_named_symbol("OUTPUT_SBUF_STRCONST", MELT_GET); if (sy_OUTPUT_SBUF_STRCONST && NULL == /*_.VALDATA___V1321*/ meltfptr[1320]) /*_.VALDATA___V1321*/ meltfptr[1320] = (void*) sy_OUTPUT_SBUF_STRCONST; } /*^getnamedsymbol*/ /*getnamedsym:NAM*/ { melt_ptr_t sy_NAM = meltgc_named_symbol("NAM", MELT_GET); if (sy_NAM && NULL == /*_.VALDATA___V1327*/ meltfptr[1326]) /*_.VALDATA___V1327*/ meltfptr[1326] = (void*) sy_NAM; } /*^getnamedsymbol*/ /*getnamedsym:OUTPUT_SBUF_STRVAL*/ { melt_ptr_t sy_OUTPUT_SBUF_STRVAL = meltgc_named_symbol("OUTPUT_SBUF_STRVAL", MELT_GET); if (sy_OUTPUT_SBUF_STRVAL && NULL == /*_.VALDATA___V1334*/ meltfptr[1333]) /*_.VALDATA___V1334*/ meltfptr[1333] = (void*) sy_OUTPUT_SBUF_STRVAL; } /*^getnamedsymbol*/ /*getnamedsym:VNAM*/ { melt_ptr_t sy_VNAM = meltgc_named_symbol("VNAM", MELT_GET); if (sy_VNAM && NULL == /*_.VALDATA___V1340*/ meltfptr[1339]) /*_.VALDATA___V1340*/ meltfptr[1339] = (void*) sy_VNAM; } /*^getnamedsymbol*/ /*getnamedsym:ADD2OUT_STRCONST*/ { melt_ptr_t sy_ADD2OUT_STRCONST = meltgc_named_symbol("ADD2OUT_STRCONST", MELT_GET); if (sy_ADD2OUT_STRCONST && NULL == /*_.VALDATA___V1347*/ meltfptr[1346]) /*_.VALDATA___V1347*/ meltfptr[1346] = (void*) sy_ADD2OUT_STRCONST; } /*^getnamedsymbol*/ /*getnamedsym:OUT*/ { melt_ptr_t sy_OUT = meltgc_named_symbol("OUT", MELT_GET); if (sy_OUT && NULL == /*_.VALDATA___V1352*/ meltfptr[1351]) /*_.VALDATA___V1352*/ meltfptr[1351] = (void*) sy_OUT; } /*^getnamedsymbol*/ /*getnamedsym:ADD2OUT_STRING*/ { melt_ptr_t sy_ADD2OUT_STRING = meltgc_named_symbol("ADD2OUT_STRING", MELT_GET); if (sy_ADD2OUT_STRING && NULL == /*_.VALDATA___V1360*/ meltfptr[1359]) /*_.VALDATA___V1360*/ meltfptr[1359] = (void*) sy_ADD2OUT_STRING; } /*^getnamedsymbol*/ /*getnamedsym:ADD2OUT_MIXLOC*/ { melt_ptr_t sy_ADD2OUT_MIXLOC = meltgc_named_symbol("ADD2OUT_MIXLOC", MELT_GET); if (sy_ADD2OUT_MIXLOC && NULL == /*_.VALDATA___V1371*/ meltfptr[1370]) /*_.VALDATA___V1371*/ meltfptr[1370] = (void*) sy_ADD2OUT_MIXLOC; } /*^getnamedsymbol*/ /*getnamedsym:ADD2OUT_INDENT*/ { melt_ptr_t sy_ADD2OUT_INDENT = meltgc_named_symbol("ADD2OUT_INDENT", MELT_GET); if (sy_ADD2OUT_INDENT && NULL == /*_.VALDATA___V1383*/ meltfptr[1382]) /*_.VALDATA___V1383*/ meltfptr[1382] = (void*) sy_ADD2OUT_INDENT; } /*^getnamedsymbol*/ /*getnamedsym:ADD2OUT_INDENTNL*/ { melt_ptr_t sy_ADD2OUT_INDENTNL = meltgc_named_symbol("ADD2OUT_INDENTNL", MELT_GET); if (sy_ADD2OUT_INDENTNL && NULL == /*_.VALDATA___V1394*/ meltfptr[1393]) /*_.VALDATA___V1394*/ meltfptr[1393] = (void*) sy_ADD2OUT_INDENTNL; } /*^getnamedsymbol*/ /*getnamedsym:ADD2OUT_SBUF*/ { melt_ptr_t sy_ADD2OUT_SBUF = meltgc_named_symbol("ADD2OUT_SBUF", MELT_GET); if (sy_ADD2OUT_SBUF && NULL == /*_.VALDATA___V1405*/ meltfptr[1404]) /*_.VALDATA___V1405*/ meltfptr[1404] = (void*) sy_ADD2OUT_SBUF; } /*^getnamedsymbol*/ /*getnamedsym:ADD2OUT_CENCSTRING*/ { melt_ptr_t sy_ADD2OUT_CENCSTRING = meltgc_named_symbol("ADD2OUT_CENCSTRING", MELT_GET); if (sy_ADD2OUT_CENCSTRING && NULL == /*_.VALDATA___V1416*/ meltfptr[1415]) /*_.VALDATA___V1416*/ meltfptr[1415] = (void*) sy_ADD2OUT_CENCSTRING; } /*^getnamedsymbol*/ /*getnamedsym:ADD2OUT_CENCSTRBUF*/ { melt_ptr_t sy_ADD2OUT_CENCSTRBUF = meltgc_named_symbol("ADD2OUT_CENCSTRBUF", MELT_GET); if (sy_ADD2OUT_CENCSTRBUF && NULL == /*_.VALDATA___V1427*/ meltfptr[1426]) /*_.VALDATA___V1427*/ meltfptr[1426] = (void*) sy_ADD2OUT_CENCSTRBUF; } /*^getnamedsymbol*/ /*getnamedsym:ADD2OUT_CCOMSTRING*/ { melt_ptr_t sy_ADD2OUT_CCOMSTRING = meltgc_named_symbol("ADD2OUT_CCOMSTRING", MELT_GET); if (sy_ADD2OUT_CCOMSTRING && NULL == /*_.VALDATA___V1438*/ meltfptr[1437]) /*_.VALDATA___V1438*/ meltfptr[1437] = (void*) sy_ADD2OUT_CCOMSTRING; } /*^getnamedsymbol*/ /*getnamedsym:ADD2OUT_CCOMSTRBUF*/ { melt_ptr_t sy_ADD2OUT_CCOMSTRBUF = meltgc_named_symbol("ADD2OUT_CCOMSTRBUF", MELT_GET); if (sy_ADD2OUT_CCOMSTRBUF && NULL == /*_.VALDATA___V1449*/ meltfptr[1448]) /*_.VALDATA___V1449*/ meltfptr[1448] = (void*) sy_ADD2OUT_CCOMSTRBUF; } /*^getnamedsymbol*/ /*getnamedsym:ADD2OUT_CCOMCONST*/ { melt_ptr_t sy_ADD2OUT_CCOMCONST = meltgc_named_symbol("ADD2OUT_CCOMCONST", MELT_GET); if (sy_ADD2OUT_CCOMCONST && NULL == /*_.VALDATA___V1460*/ meltfptr[1459]) /*_.VALDATA___V1460*/ meltfptr[1459] = (void*) sy_ADD2OUT_CCOMCONST; } /*^getnamedsymbol*/ /*getnamedsym:ADD2OUT_CIDENT*/ { melt_ptr_t sy_ADD2OUT_CIDENT = meltgc_named_symbol("ADD2OUT_CIDENT", MELT_GET); if (sy_ADD2OUT_CIDENT && NULL == /*_.VALDATA___V1471*/ meltfptr[1470]) /*_.VALDATA___V1471*/ meltfptr[1470] = (void*) sy_ADD2OUT_CIDENT; } /*^getnamedsymbol*/ /*getnamedsym:ADD2OUT_CIDENTPREFIX*/ { melt_ptr_t sy_ADD2OUT_CIDENTPREFIX = meltgc_named_symbol("ADD2OUT_CIDENTPREFIX", MELT_GET); if (sy_ADD2OUT_CIDENTPREFIX && NULL == /*_.VALDATA___V1482*/ meltfptr[1481]) /*_.VALDATA___V1482*/ meltfptr[1481] = (void*) sy_ADD2OUT_CIDENTPREFIX; } /*^getnamedsymbol*/ /*getnamedsym:ADD2OUT_LONGDEC*/ { melt_ptr_t sy_ADD2OUT_LONGDEC = meltgc_named_symbol("ADD2OUT_LONGDEC", MELT_GET); if (sy_ADD2OUT_LONGDEC && NULL == /*_.VALDATA___V1495*/ meltfptr[1494]) /*_.VALDATA___V1495*/ meltfptr[1494] = (void*) sy_ADD2OUT_LONGDEC; } /*^getnamedsymbol*/ /*getnamedsym:ADD2OUT_LONGHEX*/ { melt_ptr_t sy_ADD2OUT_LONGHEX = meltgc_named_symbol("ADD2OUT_LONGHEX", MELT_GET); if (sy_ADD2OUT_LONGHEX && NULL == /*_.VALDATA___V1506*/ meltfptr[1505]) /*_.VALDATA___V1506*/ meltfptr[1505] = (void*) sy_ADD2OUT_LONGHEX; } /*^getnamedsymbol*/ /*getnamedsym:ADD2OUT_ROUTINEDESCR*/ { melt_ptr_t sy_ADD2OUT_ROUTINEDESCR = meltgc_named_symbol("ADD2OUT_ROUTINEDESCR", MELT_GET); if (sy_ADD2OUT_ROUTINEDESCR && NULL == /*_.VALDATA___V1517*/ meltfptr[1516]) /*_.VALDATA___V1517*/ meltfptr[1516] = (void*) sy_ADD2OUT_ROUTINEDESCR; } /*^getnamedsymbol*/ /*getnamedsym:STRSAM*/ { melt_ptr_t sy_STRSAM = meltgc_named_symbol("STRSAM", MELT_GET); if (sy_STRSAM && NULL == /*_.VALDATA___V1534*/ meltfptr[1533]) /*_.VALDATA___V1534*/ meltfptr[1533] = (void*) sy_STRSAM; } /*^getnamedsymbol*/ /*getnamedsym:CSTRING_LENGTH*/ { melt_ptr_t sy_CSTRING_LENGTH = meltgc_named_symbol("CSTRING_LENGTH", MELT_GET); if (sy_CSTRING_LENGTH && NULL == /*_.VALDATA___V1543*/ meltfptr[1542]) /*_.VALDATA___V1543*/ meltfptr[1542] = (void*) sy_CSTRING_LENGTH; } /*^getnamedsymbol*/ /*getnamedsym:MAPSTRING_SIZE*/ { melt_ptr_t sy_MAPSTRING_SIZE = meltgc_named_symbol("MAPSTRING_SIZE", MELT_GET); if (sy_MAPSTRING_SIZE && NULL == /*_.VALDATA___V1557*/ meltfptr[1556]) /*_.VALDATA___V1557*/ meltfptr[1556] = (void*) sy_MAPSTRING_SIZE; } /*^getnamedsymbol*/ /*getnamedsym:MAP*/ { melt_ptr_t sy_MAP = meltgc_named_symbol("MAP", MELT_GET); if (sy_MAP && NULL == /*_.VALDATA___V1562*/ meltfptr[1561]) /*_.VALDATA___V1562*/ meltfptr[1561] = (void*) sy_MAP; } /*^getnamedsymbol*/ /*getnamedsym:MAPSTRING_COUNT*/ { melt_ptr_t sy_MAPSTRING_COUNT = meltgc_named_symbol("MAPSTRING_COUNT", MELT_GET); if (sy_MAPSTRING_COUNT && NULL == /*_.VALDATA___V1568*/ meltfptr[1567]) /*_.VALDATA___V1568*/ meltfptr[1567] = (void*) sy_MAPSTRING_COUNT; } /*^getnamedsymbol*/ /*getnamedsym:MAPSTRING_RAWGET*/ { melt_ptr_t sy_MAPSTRING_RAWGET = meltgc_named_symbol("MAPSTRING_RAWGET", MELT_GET); if (sy_MAPSTRING_RAWGET && NULL == /*_.VALDATA___V1577*/ meltfptr[1576]) /*_.VALDATA___V1577*/ meltfptr[1576] = (void*) sy_MAPSTRING_RAWGET; } /*^getnamedsymbol*/ /*getnamedsym:MAPSTRING_RAWPUT*/ { melt_ptr_t sy_MAPSTRING_RAWPUT = meltgc_named_symbol("MAPSTRING_RAWPUT", MELT_GET); if (sy_MAPSTRING_RAWPUT && NULL == /*_.VALDATA___V1588*/ meltfptr[1587]) /*_.VALDATA___V1588*/ meltfptr[1587] = (void*) sy_MAPSTRING_RAWPUT; } /*^getnamedsymbol*/ /*getnamedsym:KEY*/ { melt_ptr_t sy_KEY = meltgc_named_symbol("KEY", MELT_GET); if (sy_KEY && NULL == /*_.VALDATA___V1594*/ meltfptr[1593]) /*_.VALDATA___V1594*/ meltfptr[1593] = (void*) sy_KEY; } /*^getnamedsymbol*/ /*getnamedsym:MAPSTRING_RAWREMOVE*/ { melt_ptr_t sy_MAPSTRING_RAWREMOVE = meltgc_named_symbol("MAPSTRING_RAWREMOVE", MELT_GET); if (sy_MAPSTRING_RAWREMOVE && NULL == /*_.VALDATA___V1603*/ meltfptr[1602]) /*_.VALDATA___V1603*/ meltfptr[1602] = (void*) sy_MAPSTRING_RAWREMOVE; } /*^getnamedsymbol*/ /*getnamedsym:FOREACH_LONG_UPTO*/ { melt_ptr_t sy_FOREACH_LONG_UPTO = meltgc_named_symbol("FOREACH_LONG_UPTO", MELT_GET); if (sy_FOREACH_LONG_UPTO && NULL == /*_.VALDATA___V1620*/ meltfptr[1619]) /*_.VALDATA___V1620*/ meltfptr[1619] = (void*) sy_FOREACH_LONG_UPTO; } /*^getnamedsymbol*/ /*getnamedsym:SOME_INTEGER_MULTIPLE*/ { melt_ptr_t sy_SOME_INTEGER_MULTIPLE = meltgc_named_symbol("SOME_INTEGER_MULTIPLE", MELT_GET); if (sy_SOME_INTEGER_MULTIPLE && NULL == /*_.VALDATA___V1622*/ meltfptr[1621]) /*_.VALDATA___V1622*/ meltfptr[1621] = (void*) sy_SOME_INTEGER_MULTIPLE; } /*^getnamedsymbol*/ /*getnamedsym:SOME_INTEGER_GREATER_THAN*/ { melt_ptr_t sy_SOME_INTEGER_GREATER_THAN = meltgc_named_symbol("SOME_INTEGER_GREATER_THAN", MELT_GET); if (sy_SOME_INTEGER_GREATER_THAN && NULL == /*_.VALDATA___V1624*/ meltfptr[1623]) /*_.VALDATA___V1624*/ meltfptr[1623] = (void*) sy_SOME_INTEGER_GREATER_THAN; } /*^getnamedsymbol*/ /*getnamedsym:COMPARE_NAMED_ALPHA*/ { melt_ptr_t sy_COMPARE_NAMED_ALPHA = meltgc_named_symbol("COMPARE_NAMED_ALPHA", MELT_GET); if (sy_COMPARE_NAMED_ALPHA && NULL == /*_.VALDATA___V1626*/ meltfptr[1625]) /*_.VALDATA___V1626*/ meltfptr[1625] = (void*) sy_COMPARE_NAMED_ALPHA; } /*^getnamedsymbol*/ /*getnamedsym:TUPLE_NTH*/ { melt_ptr_t sy_TUPLE_NTH = meltgc_named_symbol("TUPLE_NTH", MELT_GET); if (sy_TUPLE_NTH && NULL == /*_.VALDATA___V1628*/ meltfptr[1627]) /*_.VALDATA___V1628*/ meltfptr[1627] = (void*) sy_TUPLE_NTH; } /*^getnamedsymbol*/ /*getnamedsym:TUPLE_SIZED*/ { melt_ptr_t sy_TUPLE_SIZED = meltgc_named_symbol("TUPLE_SIZED", MELT_GET); if (sy_TUPLE_SIZED && NULL == /*_.VALDATA___V1630*/ meltfptr[1629]) /*_.VALDATA___V1630*/ meltfptr[1629] = (void*) sy_TUPLE_SIZED; } /*^getnamedsymbol*/ /*getnamedsym:CSTRING_SAME*/ { melt_ptr_t sy_CSTRING_SAME = meltgc_named_symbol("CSTRING_SAME", MELT_GET); if (sy_CSTRING_SAME && NULL == /*_.VALDATA___V1632*/ meltfptr[1631]) /*_.VALDATA___V1632*/ meltfptr[1631] = (void*) sy_CSTRING_SAME; } /*^getnamedsymbol*/ /*getnamedsym:MAPSTRING_EVERY*/ { melt_ptr_t sy_MAPSTRING_EVERY = meltgc_named_symbol("MAPSTRING_EVERY", MELT_GET); if (sy_MAPSTRING_EVERY && NULL == /*_.VALDATA___V1634*/ meltfptr[1633]) /*_.VALDATA___V1634*/ meltfptr[1633] = (void*) sy_MAPSTRING_EVERY; } /*^getnamedsymbol*/ /*getnamedsym:MAPSTRING_ITERATE_TEST*/ { melt_ptr_t sy_MAPSTRING_ITERATE_TEST = meltgc_named_symbol("MAPSTRING_ITERATE_TEST", MELT_GET); if (sy_MAPSTRING_ITERATE_TEST && NULL == /*_.VALDATA___V1636*/ meltfptr[1635]) /*_.VALDATA___V1636*/ meltfptr[1635] = (void*) sy_MAPSTRING_ITERATE_TEST; } /*^getnamedsymbol*/ /*getnamedsym:MULTIPLE_EVERY_BOTH*/ { melt_ptr_t sy_MULTIPLE_EVERY_BOTH = meltgc_named_symbol("MULTIPLE_EVERY_BOTH", MELT_GET); if (sy_MULTIPLE_EVERY_BOTH && NULL == /*_.VALDATA___V1638*/ meltfptr[1637]) /*_.VALDATA___V1638*/ meltfptr[1637] = (void*) sy_MULTIPLE_EVERY_BOTH; } /*^getnamedsymbol*/ /*getnamedsym:MULTIPLE_EVERY*/ { melt_ptr_t sy_MULTIPLE_EVERY = meltgc_named_symbol("MULTIPLE_EVERY", MELT_GET); if (sy_MULTIPLE_EVERY && NULL == /*_.VALDATA___V1640*/ meltfptr[1639]) /*_.VALDATA___V1640*/ meltfptr[1639] = (void*) sy_MULTIPLE_EVERY; } /*^getnamedsymbol*/ /*getnamedsym:MULTIPLE_BACKWARD_EVERY*/ { melt_ptr_t sy_MULTIPLE_BACKWARD_EVERY = meltgc_named_symbol("MULTIPLE_BACKWARD_EVERY", MELT_GET); if (sy_MULTIPLE_BACKWARD_EVERY && NULL == /*_.VALDATA___V1642*/ meltfptr[1641]) /*_.VALDATA___V1642*/ meltfptr[1641] = (void*) sy_MULTIPLE_BACKWARD_EVERY; } /*^comment*/ /**COMMENT: get the value importer **/; /*^getslot*/ { melt_ptr_t slot=0; melt_object_get_field(slot,(melt_ptr_t)(((void*)(MELT_PREDEF(INITIAL_SYSTEM_DATA)))), 12, "SYSDATA_VALUE_IMPORTER");/*_.VALIMPORT___V6*/ meltfptr[5] = slot; }; /*^comment*/ /**COMMENT: before getting imported values **/; /*^apply*/ /*apply*/{ union meltparam_un argtab[3]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.PREVENV___V4*/ meltfptr[3]; /*^apply.arg*/ argtab[1].bp_cstring = "CLASS_NAMED"; /*^apply.arg*/ argtab[2].bp_cstring = "warmelt-base"; /*_.CLASS_NAMED__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t)(/*_.VALIMPORT___V6*/ meltfptr[5]), (melt_ptr_t)(/*_.VALDATA___V1095*/ meltfptr[1094]), (BPARSTR_PTR BPARSTR_CSTRING BPARSTR_CSTRING ""), argtab, "", (union meltparam_un*)0); } /*^comment*/ /**COMMENT: after getting imported values **/; /**initial routine cdata initializer**/ memset(predefinited, 0, sizeof(predefinited)); initialize_module_meltdata(&meltfram__, predefinited); /**initial routine body**/ warmelt_base_initialmeltchunk_0 (&meltfram__, predefinited); warmelt_base_initialmeltchunk_1 (&meltfram__, predefinited); warmelt_base_initialmeltchunk_2 (&meltfram__, predefinited); warmelt_base_initialmeltchunk_3 (&meltfram__, predefinited); warmelt_base_initialmeltchunk_4 (&meltfram__, predefinited); warmelt_base_initialmeltchunk_5 (&meltfram__, predefinited); warmelt_base_initialmeltchunk_6 (&meltfram__, predefinited); warmelt_base_initialmeltchunk_7 (&meltfram__, predefinited); warmelt_base_initialmeltchunk_8 (&meltfram__, predefinited); warmelt_base_initialmeltchunk_9 (&meltfram__, predefinited); warmelt_base_initialmeltchunk_10 (&meltfram__, predefinited); warmelt_base_initialmeltchunk_11 (&meltfram__, predefinited); warmelt_base_initialmeltchunk_12 (&meltfram__, predefinited);; goto labend_rout; labend_rout: melt_topframe = (struct callframe_melt_st *) meltfram__.prev; initial_frame_melt = (void*)0; return /*_.RETINIT___V1*/ meltfptr[0]; #undef meltcallcount #undef meltfram__ #undef MELTFRAM_NBVARNUM #undef MELTFRAM_NBVARPTR } /* end start_module_melt */ void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_0 (struct frame_start_module_melt_st* meltframptr__, char predefinited[]) { #define meltfram__ (*meltframptr__) #undef meltcallcount #define meltcallcount 0L /**COMMENT: start of oinibody **/; /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V8*/ meltfptr[7])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V8*/ meltfptr[7])))); ((meltobject_ptr_t)(/*_.VALDATA___V8*/ meltfptr[7]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V9*/ meltfptr[8]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V8*/ meltfptr[7]); MELT_LOCATION("warmelt-base.melt:35:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V10*/ meltfptr[9])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V10*/ meltfptr[9])))); ((meltobject_ptr_t)(/*_.VALDATA___V10*/ meltfptr[9]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V11*/ meltfptr[10]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V13*/ meltfptr[12])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V13*/ meltfptr[12])))); ((meltobject_ptr_t)(/*_.VALDATA___V13*/ meltfptr[12]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V14*/ meltfptr[13]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V13*/ meltfptr[12]); MELT_LOCATION("warmelt-base.melt:35:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V12*/ meltfptr[11])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V12*/ meltfptr[11])))); ((meltobject_ptr_t)(/*_.VALDATA___V12*/ meltfptr[11]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V13*/ meltfptr[12]); MELT_LOCATION("warmelt-base.melt:35:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V12*/ meltfptr[11])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V12*/ meltfptr[11])))); ((meltobject_ptr_t)(/*_.VALDATA___V12*/ meltfptr[11]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:35:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V12*/ meltfptr[11]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V15*/ meltfptr[14]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V15*/ meltfptr[14])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V15*/ meltfptr[14]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V12*/ meltfptr[11]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V15*/ meltfptr[14]); MELT_LOCATION("warmelt-base.melt:35:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V10*/ meltfptr[9])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V10*/ meltfptr[9])))); ((meltobject_ptr_t)(/*_.VALDATA___V10*/ meltfptr[9]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V15*/ meltfptr[14]); MELT_LOCATION("warmelt-base.melt:35:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V10*/ meltfptr[9])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V10*/ meltfptr[9])))); ((meltobject_ptr_t)(/*_.VALDATA___V10*/ meltfptr[9]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V18*/ meltfptr[17]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V18*/ meltfptr[17])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V18*/ meltfptr[17]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V16*/ meltfptr[15]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V18*/ meltfptr[17]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V18*/ meltfptr[17])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V18*/ meltfptr[17]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V13*/ meltfptr[12]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V18*/ meltfptr[17]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V18*/ meltfptr[17])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V18*/ meltfptr[17]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V17*/ meltfptr[16]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V18*/ meltfptr[17]); MELT_LOCATION("warmelt-base.melt:35:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V10*/ meltfptr[9])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V10*/ meltfptr[9])))); ((meltobject_ptr_t)(/*_.VALDATA___V10*/ meltfptr[9]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V18*/ meltfptr[17]); MELT_LOCATION("warmelt-base.melt:35:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V10*/ meltfptr[9]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V19*/ meltfptr[18])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V19*/ meltfptr[18])))); ((meltobject_ptr_t)(/*_.VALDATA___V19*/ meltfptr[18]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V20*/ meltfptr[19]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V19*/ meltfptr[18]); MELT_LOCATION("warmelt-base.melt:41:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V21*/ meltfptr[20])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V21*/ meltfptr[20])))); ((meltobject_ptr_t)(/*_.VALDATA___V21*/ meltfptr[20]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V22*/ meltfptr[21]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V23*/ meltfptr[22]); MELT_LOCATION("warmelt-base.melt:41:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V21*/ meltfptr[20])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V21*/ meltfptr[20])))); ((meltobject_ptr_t)(/*_.VALDATA___V21*/ meltfptr[20]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V23*/ meltfptr[22]); MELT_LOCATION("warmelt-base.melt:41:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V21*/ meltfptr[20])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V21*/ meltfptr[20])))); ((meltobject_ptr_t)(/*_.VALDATA___V21*/ meltfptr[20]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V25*/ meltfptr[24]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V25*/ meltfptr[24])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V25*/ meltfptr[24]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V24*/ meltfptr[23]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V25*/ meltfptr[24]); MELT_LOCATION("warmelt-base.melt:41:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V21*/ meltfptr[20])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V21*/ meltfptr[20])))); ((meltobject_ptr_t)(/*_.VALDATA___V21*/ meltfptr[20]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V25*/ meltfptr[24]); MELT_LOCATION("warmelt-base.melt:41:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V21*/ meltfptr[20]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V26*/ meltfptr[25])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V26*/ meltfptr[25])))); ((meltobject_ptr_t)(/*_.VALDATA___V26*/ meltfptr[25]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V27*/ meltfptr[26]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V26*/ meltfptr[25]); MELT_LOCATION("warmelt-base.melt:46:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V28*/ meltfptr[27])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V28*/ meltfptr[27])))); ((meltobject_ptr_t)(/*_.VALDATA___V28*/ meltfptr[27]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V29*/ meltfptr[28]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V31*/ meltfptr[30])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V31*/ meltfptr[30])))); ((meltobject_ptr_t)(/*_.VALDATA___V31*/ meltfptr[30]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V32*/ meltfptr[31]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V31*/ meltfptr[30]); MELT_LOCATION("warmelt-base.melt:46:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V30*/ meltfptr[29])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V30*/ meltfptr[29])))); ((meltobject_ptr_t)(/*_.VALDATA___V30*/ meltfptr[29]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V31*/ meltfptr[30]); MELT_LOCATION("warmelt-base.melt:46:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V30*/ meltfptr[29])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V30*/ meltfptr[29])))); ((meltobject_ptr_t)(/*_.VALDATA___V30*/ meltfptr[29]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:46:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V30*/ meltfptr[29]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V33*/ meltfptr[32]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V33*/ meltfptr[32])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V33*/ meltfptr[32]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V30*/ meltfptr[29]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V33*/ meltfptr[32]); MELT_LOCATION("warmelt-base.melt:46:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V28*/ meltfptr[27])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V28*/ meltfptr[27])))); ((meltobject_ptr_t)(/*_.VALDATA___V28*/ meltfptr[27]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V33*/ meltfptr[32]); MELT_LOCATION("warmelt-base.melt:46:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V28*/ meltfptr[27])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V28*/ meltfptr[27])))); ((meltobject_ptr_t)(/*_.VALDATA___V28*/ meltfptr[27]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V36*/ meltfptr[35]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V36*/ meltfptr[35])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V36*/ meltfptr[35]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V34*/ meltfptr[33]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V36*/ meltfptr[35]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V36*/ meltfptr[35])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V36*/ meltfptr[35]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V31*/ meltfptr[30]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V36*/ meltfptr[35]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V36*/ meltfptr[35])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V36*/ meltfptr[35]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V35*/ meltfptr[34]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V36*/ meltfptr[35]); MELT_LOCATION("warmelt-base.melt:46:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V28*/ meltfptr[27])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V28*/ meltfptr[27])))); ((meltobject_ptr_t)(/*_.VALDATA___V28*/ meltfptr[27]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V36*/ meltfptr[35]); MELT_LOCATION("warmelt-base.melt:46:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V28*/ meltfptr[27]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V37*/ meltfptr[36])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V37*/ meltfptr[36])))); ((meltobject_ptr_t)(/*_.VALDATA___V37*/ meltfptr[36]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V38*/ meltfptr[37]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V37*/ meltfptr[36]); MELT_LOCATION("warmelt-base.melt:52:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V39*/ meltfptr[38])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V39*/ meltfptr[38])))); ((meltobject_ptr_t)(/*_.VALDATA___V39*/ meltfptr[38]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V40*/ meltfptr[39]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V42*/ meltfptr[41])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V42*/ meltfptr[41])))); ((meltobject_ptr_t)(/*_.VALDATA___V42*/ meltfptr[41]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V43*/ meltfptr[42]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V42*/ meltfptr[41]); MELT_LOCATION("warmelt-base.melt:52:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V41*/ meltfptr[40])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V41*/ meltfptr[40])))); ((meltobject_ptr_t)(/*_.VALDATA___V41*/ meltfptr[40]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V42*/ meltfptr[41]); MELT_LOCATION("warmelt-base.melt:52:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V41*/ meltfptr[40])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V41*/ meltfptr[40])))); ((meltobject_ptr_t)(/*_.VALDATA___V41*/ meltfptr[40]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:52:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V41*/ meltfptr[40]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V44*/ meltfptr[43]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V44*/ meltfptr[43])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V44*/ meltfptr[43]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V41*/ meltfptr[40]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V44*/ meltfptr[43]); MELT_LOCATION("warmelt-base.melt:52:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V39*/ meltfptr[38])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V39*/ meltfptr[38])))); ((meltobject_ptr_t)(/*_.VALDATA___V39*/ meltfptr[38]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V44*/ meltfptr[43]); MELT_LOCATION("warmelt-base.melt:52:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V39*/ meltfptr[38])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V39*/ meltfptr[38])))); ((meltobject_ptr_t)(/*_.VALDATA___V39*/ meltfptr[38]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V47*/ meltfptr[46]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V47*/ meltfptr[46])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V47*/ meltfptr[46]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V45*/ meltfptr[44]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V47*/ meltfptr[46]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V47*/ meltfptr[46])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V47*/ meltfptr[46]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V42*/ meltfptr[41]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V47*/ meltfptr[46]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V47*/ meltfptr[46])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V47*/ meltfptr[46]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V46*/ meltfptr[45]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V47*/ meltfptr[46]); MELT_LOCATION("warmelt-base.melt:52:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V39*/ meltfptr[38])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V39*/ meltfptr[38])))); ((meltobject_ptr_t)(/*_.VALDATA___V39*/ meltfptr[38]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V47*/ meltfptr[46]); MELT_LOCATION("warmelt-base.melt:52:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V39*/ meltfptr[38]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V48*/ meltfptr[47])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V48*/ meltfptr[47])))); ((meltobject_ptr_t)(/*_.VALDATA___V48*/ meltfptr[47]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V49*/ meltfptr[48]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V48*/ meltfptr[47]); MELT_LOCATION("warmelt-base.melt:57:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V50*/ meltfptr[49])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V50*/ meltfptr[49])))); ((meltobject_ptr_t)(/*_.VALDATA___V50*/ meltfptr[49]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V51*/ meltfptr[50]); MELT_LOCATION("warmelt-base.melt:57:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V52*/ meltfptr[51])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V52*/ meltfptr[51])))); ((meltobject_ptr_t)(/*_.VALDATA___V52*/ meltfptr[51]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V13*/ meltfptr[12]); MELT_LOCATION("warmelt-base.melt:57:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V52*/ meltfptr[51])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V52*/ meltfptr[51])))); ((meltobject_ptr_t)(/*_.VALDATA___V52*/ meltfptr[51]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:57:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V52*/ meltfptr[51]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V53*/ meltfptr[52]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V53*/ meltfptr[52])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V53*/ meltfptr[52]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V52*/ meltfptr[51]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V53*/ meltfptr[52]); MELT_LOCATION("warmelt-base.melt:57:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V50*/ meltfptr[49])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V50*/ meltfptr[49])))); ((meltobject_ptr_t)(/*_.VALDATA___V50*/ meltfptr[49]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V53*/ meltfptr[52]); MELT_LOCATION("warmelt-base.melt:57:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V50*/ meltfptr[49])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V50*/ meltfptr[49])))); ((meltobject_ptr_t)(/*_.VALDATA___V50*/ meltfptr[49]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V56*/ meltfptr[55]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V56*/ meltfptr[55])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V56*/ meltfptr[55]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V54*/ meltfptr[53]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V56*/ meltfptr[55]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V56*/ meltfptr[55])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V56*/ meltfptr[55]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V13*/ meltfptr[12]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V56*/ meltfptr[55]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V56*/ meltfptr[55])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V56*/ meltfptr[55]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V55*/ meltfptr[54]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V56*/ meltfptr[55]); MELT_LOCATION("warmelt-base.melt:57:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V50*/ meltfptr[49])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V50*/ meltfptr[49])))); ((meltobject_ptr_t)(/*_.VALDATA___V50*/ meltfptr[49]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V56*/ meltfptr[55]); MELT_LOCATION("warmelt-base.melt:57:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V50*/ meltfptr[49]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V57*/ meltfptr[56])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V57*/ meltfptr[56])))); ((meltobject_ptr_t)(/*_.VALDATA___V57*/ meltfptr[56]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V58*/ meltfptr[57]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V57*/ meltfptr[56]); MELT_LOCATION("warmelt-base.melt:63:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V59*/ meltfptr[58])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V59*/ meltfptr[58])))); ((meltobject_ptr_t)(/*_.VALDATA___V59*/ meltfptr[58]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V60*/ meltfptr[59]); MELT_LOCATION("warmelt-base.melt:63:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V61*/ meltfptr[60])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V61*/ meltfptr[60])))); ((meltobject_ptr_t)(/*_.VALDATA___V61*/ meltfptr[60]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V13*/ meltfptr[12]); MELT_LOCATION("warmelt-base.melt:63:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V61*/ meltfptr[60])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V61*/ meltfptr[60])))); ((meltobject_ptr_t)(/*_.VALDATA___V61*/ meltfptr[60]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:63:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V61*/ meltfptr[60]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V62*/ meltfptr[61]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V62*/ meltfptr[61])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V62*/ meltfptr[61]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V61*/ meltfptr[60]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V62*/ meltfptr[61]); MELT_LOCATION("warmelt-base.melt:63:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V59*/ meltfptr[58])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V59*/ meltfptr[58])))); ((meltobject_ptr_t)(/*_.VALDATA___V59*/ meltfptr[58]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V62*/ meltfptr[61]); MELT_LOCATION("warmelt-base.melt:63:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V59*/ meltfptr[58])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V59*/ meltfptr[58])))); ((meltobject_ptr_t)(/*_.VALDATA___V59*/ meltfptr[58]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V65*/ meltfptr[64]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V65*/ meltfptr[64])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V65*/ meltfptr[64]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V63*/ meltfptr[62]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V65*/ meltfptr[64]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V65*/ meltfptr[64])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V65*/ meltfptr[64]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V13*/ meltfptr[12]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V65*/ meltfptr[64]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V65*/ meltfptr[64])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V65*/ meltfptr[64]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V64*/ meltfptr[63]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V65*/ meltfptr[64]); MELT_LOCATION("warmelt-base.melt:63:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V59*/ meltfptr[58])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V59*/ meltfptr[58])))); ((meltobject_ptr_t)(/*_.VALDATA___V59*/ meltfptr[58]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V65*/ meltfptr[64]); MELT_LOCATION("warmelt-base.melt:63:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V59*/ meltfptr[58]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V66*/ meltfptr[65])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V66*/ meltfptr[65])))); ((meltobject_ptr_t)(/*_.VALDATA___V66*/ meltfptr[65]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V67*/ meltfptr[66]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V66*/ meltfptr[65]); MELT_LOCATION("warmelt-base.melt:69:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V68*/ meltfptr[67])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V68*/ meltfptr[67])))); ((meltobject_ptr_t)(/*_.VALDATA___V68*/ meltfptr[67]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V69*/ meltfptr[68]); MELT_LOCATION("warmelt-base.melt:69:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V70*/ meltfptr[69])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V70*/ meltfptr[69])))); ((meltobject_ptr_t)(/*_.VALDATA___V70*/ meltfptr[69]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V13*/ meltfptr[12]); MELT_LOCATION("warmelt-base.melt:69:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V70*/ meltfptr[69])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V70*/ meltfptr[69])))); ((meltobject_ptr_t)(/*_.VALDATA___V70*/ meltfptr[69]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:69:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V70*/ meltfptr[69]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V71*/ meltfptr[70]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V71*/ meltfptr[70])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V71*/ meltfptr[70]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V70*/ meltfptr[69]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V71*/ meltfptr[70]); MELT_LOCATION("warmelt-base.melt:69:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V68*/ meltfptr[67])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V68*/ meltfptr[67])))); ((meltobject_ptr_t)(/*_.VALDATA___V68*/ meltfptr[67]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V71*/ meltfptr[70]); MELT_LOCATION("warmelt-base.melt:69:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V68*/ meltfptr[67])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V68*/ meltfptr[67])))); ((meltobject_ptr_t)(/*_.VALDATA___V68*/ meltfptr[67]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V74*/ meltfptr[73]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V74*/ meltfptr[73])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V74*/ meltfptr[73]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V72*/ meltfptr[71]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V74*/ meltfptr[73]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V74*/ meltfptr[73])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V74*/ meltfptr[73]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V13*/ meltfptr[12]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V74*/ meltfptr[73]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V74*/ meltfptr[73])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V74*/ meltfptr[73]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V73*/ meltfptr[72]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V74*/ meltfptr[73]); MELT_LOCATION("warmelt-base.melt:69:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V68*/ meltfptr[67])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V68*/ meltfptr[67])))); ((meltobject_ptr_t)(/*_.VALDATA___V68*/ meltfptr[67]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V74*/ meltfptr[73]); MELT_LOCATION("warmelt-base.melt:69:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V68*/ meltfptr[67]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V75*/ meltfptr[74])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V75*/ meltfptr[74])))); ((meltobject_ptr_t)(/*_.VALDATA___V75*/ meltfptr[74]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V76*/ meltfptr[75]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V75*/ meltfptr[74]); MELT_LOCATION("warmelt-base.melt:74:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V77*/ meltfptr[76])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V77*/ meltfptr[76])))); ((meltobject_ptr_t)(/*_.VALDATA___V77*/ meltfptr[76]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V78*/ meltfptr[77]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V79*/ meltfptr[78]); MELT_LOCATION("warmelt-base.melt:74:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V77*/ meltfptr[76])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V77*/ meltfptr[76])))); ((meltobject_ptr_t)(/*_.VALDATA___V77*/ meltfptr[76]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V79*/ meltfptr[78]); MELT_LOCATION("warmelt-base.melt:74:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V77*/ meltfptr[76])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V77*/ meltfptr[76])))); ((meltobject_ptr_t)(/*_.VALDATA___V77*/ meltfptr[76]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V81*/ meltfptr[80]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V81*/ meltfptr[80])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V81*/ meltfptr[80]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V80*/ meltfptr[79]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V81*/ meltfptr[80]); MELT_LOCATION("warmelt-base.melt:74:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V77*/ meltfptr[76])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V77*/ meltfptr[76])))); ((meltobject_ptr_t)(/*_.VALDATA___V77*/ meltfptr[76]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V81*/ meltfptr[80]); MELT_LOCATION("warmelt-base.melt:74:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V77*/ meltfptr[76]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V82*/ meltfptr[81])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V82*/ meltfptr[81])))); ((meltobject_ptr_t)(/*_.VALDATA___V82*/ meltfptr[81]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V83*/ meltfptr[82]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V82*/ meltfptr[81]); MELT_LOCATION("warmelt-base.melt:80:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V84*/ meltfptr[83])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V84*/ meltfptr[83])))); ((meltobject_ptr_t)(/*_.VALDATA___V84*/ meltfptr[83]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V85*/ meltfptr[84]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V87*/ meltfptr[86])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V87*/ meltfptr[86])))); ((meltobject_ptr_t)(/*_.VALDATA___V87*/ meltfptr[86]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V88*/ meltfptr[87]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V87*/ meltfptr[86]); MELT_LOCATION("warmelt-base.melt:80:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V86*/ meltfptr[85])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V86*/ meltfptr[85])))); ((meltobject_ptr_t)(/*_.VALDATA___V86*/ meltfptr[85]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V87*/ meltfptr[86]); MELT_LOCATION("warmelt-base.melt:80:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V86*/ meltfptr[85])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V86*/ meltfptr[85])))); ((meltobject_ptr_t)(/*_.VALDATA___V86*/ meltfptr[85]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:80:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V86*/ meltfptr[85]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V89*/ meltfptr[88]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V89*/ meltfptr[88])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V89*/ meltfptr[88]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V86*/ meltfptr[85]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V89*/ meltfptr[88]); MELT_LOCATION("warmelt-base.melt:80:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V84*/ meltfptr[83])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V84*/ meltfptr[83])))); ((meltobject_ptr_t)(/*_.VALDATA___V84*/ meltfptr[83]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V89*/ meltfptr[88]); MELT_LOCATION("warmelt-base.melt:80:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V84*/ meltfptr[83])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V84*/ meltfptr[83])))); ((meltobject_ptr_t)(/*_.VALDATA___V84*/ meltfptr[83]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V92*/ meltfptr[91]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V92*/ meltfptr[91])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V92*/ meltfptr[91]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V90*/ meltfptr[89]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V92*/ meltfptr[91]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V92*/ meltfptr[91])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V92*/ meltfptr[91]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V87*/ meltfptr[86]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V92*/ meltfptr[91]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V92*/ meltfptr[91])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V92*/ meltfptr[91]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V91*/ meltfptr[90]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V92*/ meltfptr[91]); MELT_LOCATION("warmelt-base.melt:80:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V84*/ meltfptr[83])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V84*/ meltfptr[83])))); ((meltobject_ptr_t)(/*_.VALDATA___V84*/ meltfptr[83]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V92*/ meltfptr[91]); MELT_LOCATION("warmelt-base.melt:80:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V84*/ meltfptr[83]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V93*/ meltfptr[92])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V93*/ meltfptr[92])))); ((meltobject_ptr_t)(/*_.VALDATA___V93*/ meltfptr[92]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V94*/ meltfptr[93]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V93*/ meltfptr[92]); MELT_LOCATION("warmelt-base.melt:85:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V95*/ meltfptr[94])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V95*/ meltfptr[94])))); ((meltobject_ptr_t)(/*_.VALDATA___V95*/ meltfptr[94]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V96*/ meltfptr[95]); MELT_LOCATION("warmelt-base.melt:85:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V97*/ meltfptr[96])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V97*/ meltfptr[96])))); ((meltobject_ptr_t)(/*_.VALDATA___V97*/ meltfptr[96]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V87*/ meltfptr[86]); MELT_LOCATION("warmelt-base.melt:85:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V97*/ meltfptr[96])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V97*/ meltfptr[96])))); ((meltobject_ptr_t)(/*_.VALDATA___V97*/ meltfptr[96]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:85:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V97*/ meltfptr[96]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V98*/ meltfptr[97]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V98*/ meltfptr[97])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V98*/ meltfptr[97]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V97*/ meltfptr[96]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V98*/ meltfptr[97]); MELT_LOCATION("warmelt-base.melt:85:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V95*/ meltfptr[94])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V95*/ meltfptr[94])))); ((meltobject_ptr_t)(/*_.VALDATA___V95*/ meltfptr[94]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V98*/ meltfptr[97]); MELT_LOCATION("warmelt-base.melt:85:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V95*/ meltfptr[94])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V95*/ meltfptr[94])))); ((meltobject_ptr_t)(/*_.VALDATA___V95*/ meltfptr[94]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V101*/ meltfptr[100]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V101*/ meltfptr[100])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V101*/ meltfptr[100]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V99*/ meltfptr[98]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V101*/ meltfptr[100]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V101*/ meltfptr[100])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V101*/ meltfptr[100]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V87*/ meltfptr[86]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V101*/ meltfptr[100]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V101*/ meltfptr[100])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V101*/ meltfptr[100]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V100*/ meltfptr[99]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V101*/ meltfptr[100]); MELT_LOCATION("warmelt-base.melt:85:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V95*/ meltfptr[94])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V95*/ meltfptr[94])))); ((meltobject_ptr_t)(/*_.VALDATA___V95*/ meltfptr[94]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V101*/ meltfptr[100]); MELT_LOCATION("warmelt-base.melt:85:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V95*/ meltfptr[94]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V102*/ meltfptr[101])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V102*/ meltfptr[101])))); ((meltobject_ptr_t)(/*_.VALDATA___V102*/ meltfptr[101]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V103*/ meltfptr[102]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V102*/ meltfptr[101]); MELT_LOCATION("warmelt-base.melt:92:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V104*/ meltfptr[103])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V104*/ meltfptr[103])))); ((meltobject_ptr_t)(/*_.VALDATA___V104*/ meltfptr[103]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V105*/ meltfptr[104]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V107*/ meltfptr[106])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V107*/ meltfptr[106])))); ((meltobject_ptr_t)(/*_.VALDATA___V107*/ meltfptr[106]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V108*/ meltfptr[107]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V107*/ meltfptr[106]); MELT_LOCATION("warmelt-base.melt:92:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V106*/ meltfptr[105])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V106*/ meltfptr[105])))); ((meltobject_ptr_t)(/*_.VALDATA___V106*/ meltfptr[105]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V107*/ meltfptr[106]); MELT_LOCATION("warmelt-base.melt:92:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V106*/ meltfptr[105])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V106*/ meltfptr[105])))); ((meltobject_ptr_t)(/*_.VALDATA___V106*/ meltfptr[105]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:92:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V106*/ meltfptr[105]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V109*/ meltfptr[108]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V109*/ meltfptr[108])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V109*/ meltfptr[108]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V106*/ meltfptr[105]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V109*/ meltfptr[108]); MELT_LOCATION("warmelt-base.melt:92:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V104*/ meltfptr[103])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V104*/ meltfptr[103])))); ((meltobject_ptr_t)(/*_.VALDATA___V104*/ meltfptr[103]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V109*/ meltfptr[108]); MELT_LOCATION("warmelt-base.melt:92:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V104*/ meltfptr[103])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V104*/ meltfptr[103])))); ((meltobject_ptr_t)(/*_.VALDATA___V104*/ meltfptr[103]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V112*/ meltfptr[111]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V112*/ meltfptr[111])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V112*/ meltfptr[111]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V110*/ meltfptr[109]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V112*/ meltfptr[111]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V112*/ meltfptr[111])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V112*/ meltfptr[111]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V107*/ meltfptr[106]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V112*/ meltfptr[111]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V112*/ meltfptr[111])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V112*/ meltfptr[111]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V111*/ meltfptr[110]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V112*/ meltfptr[111]); MELT_LOCATION("warmelt-base.melt:92:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V104*/ meltfptr[103])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V104*/ meltfptr[103])))); ((meltobject_ptr_t)(/*_.VALDATA___V104*/ meltfptr[103]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V112*/ meltfptr[111]); MELT_LOCATION("warmelt-base.melt:92:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V104*/ meltfptr[103]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V113*/ meltfptr[112])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V113*/ meltfptr[112])))); ((meltobject_ptr_t)(/*_.VALDATA___V113*/ meltfptr[112]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V114*/ meltfptr[113]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V113*/ meltfptr[112]); MELT_LOCATION("warmelt-base.melt:100:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V115*/ meltfptr[114])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V115*/ meltfptr[114])))); ((meltobject_ptr_t)(/*_.VALDATA___V115*/ meltfptr[114]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V116*/ meltfptr[115]); MELT_LOCATION("warmelt-base.melt:100:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V117*/ meltfptr[116])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V117*/ meltfptr[116])))); ((meltobject_ptr_t)(/*_.VALDATA___V117*/ meltfptr[116]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V107*/ meltfptr[106]); MELT_LOCATION("warmelt-base.melt:100:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V117*/ meltfptr[116])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V117*/ meltfptr[116])))); ((meltobject_ptr_t)(/*_.VALDATA___V117*/ meltfptr[116]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:100:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V117*/ meltfptr[116]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V118*/ meltfptr[117]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V118*/ meltfptr[117])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V118*/ meltfptr[117]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V117*/ meltfptr[116]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V118*/ meltfptr[117]); MELT_LOCATION("warmelt-base.melt:100:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V115*/ meltfptr[114])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V115*/ meltfptr[114])))); ((meltobject_ptr_t)(/*_.VALDATA___V115*/ meltfptr[114]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V118*/ meltfptr[117]); MELT_LOCATION("warmelt-base.melt:100:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V115*/ meltfptr[114])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V115*/ meltfptr[114])))); ((meltobject_ptr_t)(/*_.VALDATA___V115*/ meltfptr[114]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V121*/ meltfptr[120]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V121*/ meltfptr[120])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V121*/ meltfptr[120]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V119*/ meltfptr[118]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V121*/ meltfptr[120]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V121*/ meltfptr[120])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V121*/ meltfptr[120]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V107*/ meltfptr[106]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V121*/ meltfptr[120]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V121*/ meltfptr[120])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V121*/ meltfptr[120]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V120*/ meltfptr[119]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V121*/ meltfptr[120]); MELT_LOCATION("warmelt-base.melt:100:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V115*/ meltfptr[114])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V115*/ meltfptr[114])))); ((meltobject_ptr_t)(/*_.VALDATA___V115*/ meltfptr[114]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V121*/ meltfptr[120]); MELT_LOCATION("warmelt-base.melt:100:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V115*/ meltfptr[114]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V122*/ meltfptr[121])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V122*/ meltfptr[121])))); ((meltobject_ptr_t)(/*_.VALDATA___V122*/ meltfptr[121]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V123*/ meltfptr[122]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V122*/ meltfptr[121]); MELT_LOCATION("warmelt-base.melt:109:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V124*/ meltfptr[123])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V124*/ meltfptr[123])))); ((meltobject_ptr_t)(/*_.VALDATA___V124*/ meltfptr[123]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V125*/ meltfptr[124]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V127*/ meltfptr[126])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V127*/ meltfptr[126])))); ((meltobject_ptr_t)(/*_.VALDATA___V127*/ meltfptr[126]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V128*/ meltfptr[127]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V127*/ meltfptr[126]); MELT_LOCATION("warmelt-base.melt:109:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V126*/ meltfptr[125])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V126*/ meltfptr[125])))); ((meltobject_ptr_t)(/*_.VALDATA___V126*/ meltfptr[125]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V127*/ meltfptr[126]); MELT_LOCATION("warmelt-base.melt:109:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V126*/ meltfptr[125])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V126*/ meltfptr[125])))); ((meltobject_ptr_t)(/*_.VALDATA___V126*/ meltfptr[125]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:109:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V126*/ meltfptr[125]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V130*/ meltfptr[129])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V130*/ meltfptr[129])))); ((meltobject_ptr_t)(/*_.VALDATA___V130*/ meltfptr[129]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V131*/ meltfptr[130]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V130*/ meltfptr[129]); MELT_LOCATION("warmelt-base.melt:109:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V129*/ meltfptr[128])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V129*/ meltfptr[128])))); ((meltobject_ptr_t)(/*_.VALDATA___V129*/ meltfptr[128]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V130*/ meltfptr[129]); MELT_LOCATION("warmelt-base.melt:109:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V129*/ meltfptr[128])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V129*/ meltfptr[128])))); ((meltobject_ptr_t)(/*_.VALDATA___V129*/ meltfptr[128]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:109:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V129*/ meltfptr[128]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V132*/ meltfptr[131]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V132*/ meltfptr[131])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V132*/ meltfptr[131]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V126*/ meltfptr[125]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V132*/ meltfptr[131]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V132*/ meltfptr[131])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V132*/ meltfptr[131]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V129*/ meltfptr[128]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V132*/ meltfptr[131]); MELT_LOCATION("warmelt-base.melt:109:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V124*/ meltfptr[123])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V124*/ meltfptr[123])))); ((meltobject_ptr_t)(/*_.VALDATA___V124*/ meltfptr[123]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V132*/ meltfptr[131]); MELT_LOCATION("warmelt-base.melt:109:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V124*/ meltfptr[123])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V124*/ meltfptr[123])))); ((meltobject_ptr_t)(/*_.VALDATA___V124*/ meltfptr[123]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V136*/ meltfptr[135]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V136*/ meltfptr[135])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V136*/ meltfptr[135]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V133*/ meltfptr[132]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V136*/ meltfptr[135]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V136*/ meltfptr[135])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V136*/ meltfptr[135]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V127*/ meltfptr[126]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V136*/ meltfptr[135]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V136*/ meltfptr[135])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V136*/ meltfptr[135]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V134*/ meltfptr[133]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V136*/ meltfptr[135]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V136*/ meltfptr[135])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V136*/ meltfptr[135]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V130*/ meltfptr[129]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V136*/ meltfptr[135]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V136*/ meltfptr[135])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V136*/ meltfptr[135]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V135*/ meltfptr[134]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V136*/ meltfptr[135]); MELT_LOCATION("warmelt-base.melt:109:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V124*/ meltfptr[123])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V124*/ meltfptr[123])))); ((meltobject_ptr_t)(/*_.VALDATA___V124*/ meltfptr[123]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V136*/ meltfptr[135]); MELT_LOCATION("warmelt-base.melt:109:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V124*/ meltfptr[123]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V137*/ meltfptr[136])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V137*/ meltfptr[136])))); ((meltobject_ptr_t)(/*_.VALDATA___V137*/ meltfptr[136]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V138*/ meltfptr[137]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V137*/ meltfptr[136]); MELT_LOCATION("warmelt-base.melt:112:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V139*/ meltfptr[138])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V139*/ meltfptr[138])))); ((meltobject_ptr_t)(/*_.VALDATA___V139*/ meltfptr[138]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V140*/ meltfptr[139]); MELT_LOCATION("warmelt-base.melt:112:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V141*/ meltfptr[140])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V141*/ meltfptr[140])))); ((meltobject_ptr_t)(/*_.VALDATA___V141*/ meltfptr[140]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V127*/ meltfptr[126]); MELT_LOCATION("warmelt-base.melt:112:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V141*/ meltfptr[140])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V141*/ meltfptr[140])))); ((meltobject_ptr_t)(/*_.VALDATA___V141*/ meltfptr[140]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:112:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V141*/ meltfptr[140]); MELT_LOCATION("warmelt-base.melt:112:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V142*/ meltfptr[141])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V142*/ meltfptr[141])))); ((meltobject_ptr_t)(/*_.VALDATA___V142*/ meltfptr[141]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V130*/ meltfptr[129]); MELT_LOCATION("warmelt-base.melt:112:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V142*/ meltfptr[141])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V142*/ meltfptr[141])))); ((meltobject_ptr_t)(/*_.VALDATA___V142*/ meltfptr[141]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:112:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V142*/ meltfptr[141]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V143*/ meltfptr[142]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V143*/ meltfptr[142])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V143*/ meltfptr[142]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V141*/ meltfptr[140]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V143*/ meltfptr[142]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V143*/ meltfptr[142])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V143*/ meltfptr[142]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V142*/ meltfptr[141]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V143*/ meltfptr[142]); MELT_LOCATION("warmelt-base.melt:112:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V139*/ meltfptr[138])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V139*/ meltfptr[138])))); ((meltobject_ptr_t)(/*_.VALDATA___V139*/ meltfptr[138]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V143*/ meltfptr[142]); MELT_LOCATION("warmelt-base.melt:112:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V139*/ meltfptr[138])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V139*/ meltfptr[138])))); ((meltobject_ptr_t)(/*_.VALDATA___V139*/ meltfptr[138]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V147*/ meltfptr[146]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V147*/ meltfptr[146])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V147*/ meltfptr[146]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V144*/ meltfptr[143]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V147*/ meltfptr[146]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V147*/ meltfptr[146])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V147*/ meltfptr[146]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V127*/ meltfptr[126]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V147*/ meltfptr[146]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V147*/ meltfptr[146])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V147*/ meltfptr[146]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V145*/ meltfptr[144]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V147*/ meltfptr[146]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V147*/ meltfptr[146])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V147*/ meltfptr[146]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V130*/ meltfptr[129]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V147*/ meltfptr[146]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V147*/ meltfptr[146])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V147*/ meltfptr[146]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V146*/ meltfptr[145]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V147*/ meltfptr[146]); MELT_LOCATION("warmelt-base.melt:112:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V139*/ meltfptr[138])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V139*/ meltfptr[138])))); ((meltobject_ptr_t)(/*_.VALDATA___V139*/ meltfptr[138]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V147*/ meltfptr[146]); MELT_LOCATION("warmelt-base.melt:112:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V139*/ meltfptr[138]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V148*/ meltfptr[147])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V148*/ meltfptr[147])))); ((meltobject_ptr_t)(/*_.VALDATA___V148*/ meltfptr[147]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V149*/ meltfptr[148]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V148*/ meltfptr[147]); MELT_LOCATION("warmelt-base.melt:116:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V150*/ meltfptr[149])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V150*/ meltfptr[149])))); ((meltobject_ptr_t)(/*_.VALDATA___V150*/ meltfptr[149]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V151*/ meltfptr[150]); MELT_LOCATION("warmelt-base.melt:116:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V152*/ meltfptr[151])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V152*/ meltfptr[151])))); ((meltobject_ptr_t)(/*_.VALDATA___V152*/ meltfptr[151]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V127*/ meltfptr[126]); MELT_LOCATION("warmelt-base.melt:116:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V152*/ meltfptr[151])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V152*/ meltfptr[151])))); ((meltobject_ptr_t)(/*_.VALDATA___V152*/ meltfptr[151]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:116:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V152*/ meltfptr[151]); MELT_LOCATION("warmelt-base.melt:116:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V153*/ meltfptr[152])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V153*/ meltfptr[152])))); ((meltobject_ptr_t)(/*_.VALDATA___V153*/ meltfptr[152]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V130*/ meltfptr[129]); MELT_LOCATION("warmelt-base.melt:116:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V153*/ meltfptr[152])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V153*/ meltfptr[152])))); ((meltobject_ptr_t)(/*_.VALDATA___V153*/ meltfptr[152]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:116:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V153*/ meltfptr[152]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V154*/ meltfptr[153]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V154*/ meltfptr[153])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V154*/ meltfptr[153]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V152*/ meltfptr[151]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V154*/ meltfptr[153]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V154*/ meltfptr[153])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V154*/ meltfptr[153]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V153*/ meltfptr[152]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V154*/ meltfptr[153]); MELT_LOCATION("warmelt-base.melt:116:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V150*/ meltfptr[149])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V150*/ meltfptr[149])))); ((meltobject_ptr_t)(/*_.VALDATA___V150*/ meltfptr[149]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V154*/ meltfptr[153]); MELT_LOCATION("warmelt-base.melt:116:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V150*/ meltfptr[149])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V150*/ meltfptr[149])))); ((meltobject_ptr_t)(/*_.VALDATA___V150*/ meltfptr[149]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V158*/ meltfptr[157]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V158*/ meltfptr[157])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V158*/ meltfptr[157]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V155*/ meltfptr[154]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V158*/ meltfptr[157]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V158*/ meltfptr[157])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V158*/ meltfptr[157]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V127*/ meltfptr[126]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V158*/ meltfptr[157]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V158*/ meltfptr[157])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V158*/ meltfptr[157]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V156*/ meltfptr[155]); #undef meltfram__ } /*end of warmelt_base_initialmeltchunk_0*/ void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_1 (struct frame_start_module_melt_st* meltframptr__, char predefinited[]) { #define meltfram__ (*meltframptr__) #undef meltcallcount #define meltcallcount 0L /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V158*/ meltfptr[157]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V158*/ meltfptr[157])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V158*/ meltfptr[157]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V130*/ meltfptr[129]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V158*/ meltfptr[157]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V158*/ meltfptr[157])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V158*/ meltfptr[157]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V157*/ meltfptr[156]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V158*/ meltfptr[157]); MELT_LOCATION("warmelt-base.melt:116:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V150*/ meltfptr[149])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V150*/ meltfptr[149])))); ((meltobject_ptr_t)(/*_.VALDATA___V150*/ meltfptr[149]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V158*/ meltfptr[157]); MELT_LOCATION("warmelt-base.melt:116:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V150*/ meltfptr[149]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V159*/ meltfptr[158])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V159*/ meltfptr[158])))); ((meltobject_ptr_t)(/*_.VALDATA___V159*/ meltfptr[158]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V160*/ meltfptr[159]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V159*/ meltfptr[158]); MELT_LOCATION("warmelt-base.melt:121:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V161*/ meltfptr[160])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V161*/ meltfptr[160])))); ((meltobject_ptr_t)(/*_.VALDATA___V161*/ meltfptr[160]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V162*/ meltfptr[161]); MELT_LOCATION("warmelt-base.melt:121:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V163*/ meltfptr[162])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V163*/ meltfptr[162])))); ((meltobject_ptr_t)(/*_.VALDATA___V163*/ meltfptr[162]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V127*/ meltfptr[126]); MELT_LOCATION("warmelt-base.melt:121:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V163*/ meltfptr[162])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V163*/ meltfptr[162])))); ((meltobject_ptr_t)(/*_.VALDATA___V163*/ meltfptr[162]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:121:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V163*/ meltfptr[162]); MELT_LOCATION("warmelt-base.melt:121:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V164*/ meltfptr[163])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V164*/ meltfptr[163])))); ((meltobject_ptr_t)(/*_.VALDATA___V164*/ meltfptr[163]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V130*/ meltfptr[129]); MELT_LOCATION("warmelt-base.melt:121:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V164*/ meltfptr[163])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V164*/ meltfptr[163])))); ((meltobject_ptr_t)(/*_.VALDATA___V164*/ meltfptr[163]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:121:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V164*/ meltfptr[163]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V165*/ meltfptr[164]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V165*/ meltfptr[164])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V165*/ meltfptr[164]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V163*/ meltfptr[162]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V165*/ meltfptr[164]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V165*/ meltfptr[164])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V165*/ meltfptr[164]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V164*/ meltfptr[163]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V165*/ meltfptr[164]); MELT_LOCATION("warmelt-base.melt:121:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V161*/ meltfptr[160])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V161*/ meltfptr[160])))); ((meltobject_ptr_t)(/*_.VALDATA___V161*/ meltfptr[160]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V165*/ meltfptr[164]); MELT_LOCATION("warmelt-base.melt:121:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V161*/ meltfptr[160])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V161*/ meltfptr[160])))); ((meltobject_ptr_t)(/*_.VALDATA___V161*/ meltfptr[160]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V169*/ meltfptr[168]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V169*/ meltfptr[168])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V169*/ meltfptr[168]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V166*/ meltfptr[165]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V169*/ meltfptr[168]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V169*/ meltfptr[168])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V169*/ meltfptr[168]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V127*/ meltfptr[126]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V169*/ meltfptr[168]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V169*/ meltfptr[168])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V169*/ meltfptr[168]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V167*/ meltfptr[166]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V169*/ meltfptr[168]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V169*/ meltfptr[168])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V169*/ meltfptr[168]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V130*/ meltfptr[129]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V169*/ meltfptr[168]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V169*/ meltfptr[168])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V169*/ meltfptr[168]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V168*/ meltfptr[167]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V169*/ meltfptr[168]); MELT_LOCATION("warmelt-base.melt:121:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V161*/ meltfptr[160])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V161*/ meltfptr[160])))); ((meltobject_ptr_t)(/*_.VALDATA___V161*/ meltfptr[160]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V169*/ meltfptr[168]); MELT_LOCATION("warmelt-base.melt:121:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V161*/ meltfptr[160]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V170*/ meltfptr[169])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V170*/ meltfptr[169])))); ((meltobject_ptr_t)(/*_.VALDATA___V170*/ meltfptr[169]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V171*/ meltfptr[170]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V170*/ meltfptr[169]); MELT_LOCATION("warmelt-base.melt:124:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V172*/ meltfptr[171])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V172*/ meltfptr[171])))); ((meltobject_ptr_t)(/*_.VALDATA___V172*/ meltfptr[171]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V173*/ meltfptr[172]); MELT_LOCATION("warmelt-base.melt:124:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V174*/ meltfptr[173])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V174*/ meltfptr[173])))); ((meltobject_ptr_t)(/*_.VALDATA___V174*/ meltfptr[173]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V127*/ meltfptr[126]); MELT_LOCATION("warmelt-base.melt:124:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V174*/ meltfptr[173])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V174*/ meltfptr[173])))); ((meltobject_ptr_t)(/*_.VALDATA___V174*/ meltfptr[173]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:124:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V174*/ meltfptr[173]); MELT_LOCATION("warmelt-base.melt:124:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V175*/ meltfptr[174])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V175*/ meltfptr[174])))); ((meltobject_ptr_t)(/*_.VALDATA___V175*/ meltfptr[174]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V130*/ meltfptr[129]); MELT_LOCATION("warmelt-base.melt:124:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V175*/ meltfptr[174])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V175*/ meltfptr[174])))); ((meltobject_ptr_t)(/*_.VALDATA___V175*/ meltfptr[174]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:124:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V175*/ meltfptr[174]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V176*/ meltfptr[175]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V176*/ meltfptr[175])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V176*/ meltfptr[175]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V174*/ meltfptr[173]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V176*/ meltfptr[175]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V176*/ meltfptr[175])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V176*/ meltfptr[175]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V175*/ meltfptr[174]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V176*/ meltfptr[175]); MELT_LOCATION("warmelt-base.melt:124:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V172*/ meltfptr[171])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V172*/ meltfptr[171])))); ((meltobject_ptr_t)(/*_.VALDATA___V172*/ meltfptr[171]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V176*/ meltfptr[175]); MELT_LOCATION("warmelt-base.melt:124:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V172*/ meltfptr[171])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V172*/ meltfptr[171])))); ((meltobject_ptr_t)(/*_.VALDATA___V172*/ meltfptr[171]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V180*/ meltfptr[179]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V180*/ meltfptr[179])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V180*/ meltfptr[179]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V177*/ meltfptr[176]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V180*/ meltfptr[179]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V180*/ meltfptr[179])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V180*/ meltfptr[179]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V127*/ meltfptr[126]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V180*/ meltfptr[179]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V180*/ meltfptr[179])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V180*/ meltfptr[179]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V178*/ meltfptr[177]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V180*/ meltfptr[179]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V180*/ meltfptr[179])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V180*/ meltfptr[179]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V130*/ meltfptr[129]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V180*/ meltfptr[179]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V180*/ meltfptr[179])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V180*/ meltfptr[179]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V179*/ meltfptr[178]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V180*/ meltfptr[179]); MELT_LOCATION("warmelt-base.melt:124:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V172*/ meltfptr[171])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V172*/ meltfptr[171])))); ((meltobject_ptr_t)(/*_.VALDATA___V172*/ meltfptr[171]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V180*/ meltfptr[179]); MELT_LOCATION("warmelt-base.melt:124:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V172*/ meltfptr[171]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V181*/ meltfptr[180])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V181*/ meltfptr[180])))); ((meltobject_ptr_t)(/*_.VALDATA___V181*/ meltfptr[180]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V182*/ meltfptr[181]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V181*/ meltfptr[180]); MELT_LOCATION("warmelt-base.melt:126:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V183*/ meltfptr[182])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V183*/ meltfptr[182])))); ((meltobject_ptr_t)(/*_.VALDATA___V183*/ meltfptr[182]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V184*/ meltfptr[183]); MELT_LOCATION("warmelt-base.melt:126:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V185*/ meltfptr[184])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V185*/ meltfptr[184])))); ((meltobject_ptr_t)(/*_.VALDATA___V185*/ meltfptr[184]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V127*/ meltfptr[126]); MELT_LOCATION("warmelt-base.melt:126:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V185*/ meltfptr[184])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V185*/ meltfptr[184])))); ((meltobject_ptr_t)(/*_.VALDATA___V185*/ meltfptr[184]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:126:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V185*/ meltfptr[184]); MELT_LOCATION("warmelt-base.melt:126:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V186*/ meltfptr[185])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V186*/ meltfptr[185])))); ((meltobject_ptr_t)(/*_.VALDATA___V186*/ meltfptr[185]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V130*/ meltfptr[129]); MELT_LOCATION("warmelt-base.melt:126:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V186*/ meltfptr[185])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V186*/ meltfptr[185])))); ((meltobject_ptr_t)(/*_.VALDATA___V186*/ meltfptr[185]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:126:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V186*/ meltfptr[185]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V187*/ meltfptr[186]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V187*/ meltfptr[186])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V187*/ meltfptr[186]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V185*/ meltfptr[184]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V187*/ meltfptr[186]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V187*/ meltfptr[186])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V187*/ meltfptr[186]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V186*/ meltfptr[185]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V187*/ meltfptr[186]); MELT_LOCATION("warmelt-base.melt:126:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V183*/ meltfptr[182])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V183*/ meltfptr[182])))); ((meltobject_ptr_t)(/*_.VALDATA___V183*/ meltfptr[182]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V187*/ meltfptr[186]); MELT_LOCATION("warmelt-base.melt:126:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V183*/ meltfptr[182])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V183*/ meltfptr[182])))); ((meltobject_ptr_t)(/*_.VALDATA___V183*/ meltfptr[182]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V191*/ meltfptr[190]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V191*/ meltfptr[190])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V191*/ meltfptr[190]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V188*/ meltfptr[187]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V191*/ meltfptr[190]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V191*/ meltfptr[190])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V191*/ meltfptr[190]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V127*/ meltfptr[126]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V191*/ meltfptr[190]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V191*/ meltfptr[190])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V191*/ meltfptr[190]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V189*/ meltfptr[188]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V191*/ meltfptr[190]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V191*/ meltfptr[190])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V191*/ meltfptr[190]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V130*/ meltfptr[129]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V191*/ meltfptr[190]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V191*/ meltfptr[190])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V191*/ meltfptr[190]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V190*/ meltfptr[189]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V191*/ meltfptr[190]); MELT_LOCATION("warmelt-base.melt:126:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V183*/ meltfptr[182])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V183*/ meltfptr[182])))); ((meltobject_ptr_t)(/*_.VALDATA___V183*/ meltfptr[182]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V191*/ meltfptr[190]); MELT_LOCATION("warmelt-base.melt:126:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V183*/ meltfptr[182]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V192*/ meltfptr[191])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V192*/ meltfptr[191])))); ((meltobject_ptr_t)(/*_.VALDATA___V192*/ meltfptr[191]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V193*/ meltfptr[192]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V192*/ meltfptr[191]); MELT_LOCATION("warmelt-base.melt:128:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V194*/ meltfptr[193])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V194*/ meltfptr[193])))); ((meltobject_ptr_t)(/*_.VALDATA___V194*/ meltfptr[193]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V195*/ meltfptr[194]); MELT_LOCATION("warmelt-base.melt:128:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V196*/ meltfptr[195])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V196*/ meltfptr[195])))); ((meltobject_ptr_t)(/*_.VALDATA___V196*/ meltfptr[195]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V127*/ meltfptr[126]); MELT_LOCATION("warmelt-base.melt:128:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V196*/ meltfptr[195])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V196*/ meltfptr[195])))); ((meltobject_ptr_t)(/*_.VALDATA___V196*/ meltfptr[195]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:128:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V196*/ meltfptr[195]); MELT_LOCATION("warmelt-base.melt:128:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V197*/ meltfptr[196])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V197*/ meltfptr[196])))); ((meltobject_ptr_t)(/*_.VALDATA___V197*/ meltfptr[196]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V130*/ meltfptr[129]); MELT_LOCATION("warmelt-base.melt:128:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V197*/ meltfptr[196])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V197*/ meltfptr[196])))); ((meltobject_ptr_t)(/*_.VALDATA___V197*/ meltfptr[196]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:128:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V197*/ meltfptr[196]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V198*/ meltfptr[197]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V198*/ meltfptr[197])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V198*/ meltfptr[197]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V196*/ meltfptr[195]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V198*/ meltfptr[197]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V198*/ meltfptr[197])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V198*/ meltfptr[197]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V197*/ meltfptr[196]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V198*/ meltfptr[197]); MELT_LOCATION("warmelt-base.melt:128:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V194*/ meltfptr[193])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V194*/ meltfptr[193])))); ((meltobject_ptr_t)(/*_.VALDATA___V194*/ meltfptr[193]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V198*/ meltfptr[197]); MELT_LOCATION("warmelt-base.melt:128:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V194*/ meltfptr[193])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V194*/ meltfptr[193])))); ((meltobject_ptr_t)(/*_.VALDATA___V194*/ meltfptr[193]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V202*/ meltfptr[201]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V202*/ meltfptr[201])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V202*/ meltfptr[201]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V199*/ meltfptr[198]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V202*/ meltfptr[201]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V202*/ meltfptr[201])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V202*/ meltfptr[201]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V127*/ meltfptr[126]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V202*/ meltfptr[201]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V202*/ meltfptr[201])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V202*/ meltfptr[201]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V200*/ meltfptr[199]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V202*/ meltfptr[201]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V202*/ meltfptr[201])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V202*/ meltfptr[201]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V130*/ meltfptr[129]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V202*/ meltfptr[201]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V202*/ meltfptr[201])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V202*/ meltfptr[201]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V201*/ meltfptr[200]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V202*/ meltfptr[201]); MELT_LOCATION("warmelt-base.melt:128:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V194*/ meltfptr[193])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V194*/ meltfptr[193])))); ((meltobject_ptr_t)(/*_.VALDATA___V194*/ meltfptr[193]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V202*/ meltfptr[201]); MELT_LOCATION("warmelt-base.melt:128:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V194*/ meltfptr[193]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V203*/ meltfptr[202])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V203*/ meltfptr[202])))); ((meltobject_ptr_t)(/*_.VALDATA___V203*/ meltfptr[202]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V204*/ meltfptr[203]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V203*/ meltfptr[202]); MELT_LOCATION("warmelt-base.melt:130:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V205*/ meltfptr[204])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V205*/ meltfptr[204])))); ((meltobject_ptr_t)(/*_.VALDATA___V205*/ meltfptr[204]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V206*/ meltfptr[205]); MELT_LOCATION("warmelt-base.melt:130:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V207*/ meltfptr[206])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V207*/ meltfptr[206])))); ((meltobject_ptr_t)(/*_.VALDATA___V207*/ meltfptr[206]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V127*/ meltfptr[126]); MELT_LOCATION("warmelt-base.melt:130:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V207*/ meltfptr[206])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V207*/ meltfptr[206])))); ((meltobject_ptr_t)(/*_.VALDATA___V207*/ meltfptr[206]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:130:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V207*/ meltfptr[206]); MELT_LOCATION("warmelt-base.melt:130:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V208*/ meltfptr[207])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V208*/ meltfptr[207])))); ((meltobject_ptr_t)(/*_.VALDATA___V208*/ meltfptr[207]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V130*/ meltfptr[129]); MELT_LOCATION("warmelt-base.melt:130:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V208*/ meltfptr[207])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V208*/ meltfptr[207])))); ((meltobject_ptr_t)(/*_.VALDATA___V208*/ meltfptr[207]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:130:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V208*/ meltfptr[207]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V209*/ meltfptr[208]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V209*/ meltfptr[208])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V209*/ meltfptr[208]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V207*/ meltfptr[206]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V209*/ meltfptr[208]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V209*/ meltfptr[208])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V209*/ meltfptr[208]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V208*/ meltfptr[207]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V209*/ meltfptr[208]); MELT_LOCATION("warmelt-base.melt:130:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V205*/ meltfptr[204])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V205*/ meltfptr[204])))); ((meltobject_ptr_t)(/*_.VALDATA___V205*/ meltfptr[204]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V209*/ meltfptr[208]); MELT_LOCATION("warmelt-base.melt:130:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V205*/ meltfptr[204])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V205*/ meltfptr[204])))); ((meltobject_ptr_t)(/*_.VALDATA___V205*/ meltfptr[204]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V213*/ meltfptr[212]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V213*/ meltfptr[212])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V213*/ meltfptr[212]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V210*/ meltfptr[209]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V213*/ meltfptr[212]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V213*/ meltfptr[212])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V213*/ meltfptr[212]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V127*/ meltfptr[126]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V213*/ meltfptr[212]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V213*/ meltfptr[212])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V213*/ meltfptr[212]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V211*/ meltfptr[210]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V213*/ meltfptr[212]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V213*/ meltfptr[212])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V213*/ meltfptr[212]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V130*/ meltfptr[129]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V213*/ meltfptr[212]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V213*/ meltfptr[212])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V213*/ meltfptr[212]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V212*/ meltfptr[211]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V213*/ meltfptr[212]); MELT_LOCATION("warmelt-base.melt:130:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V205*/ meltfptr[204])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V205*/ meltfptr[204])))); ((meltobject_ptr_t)(/*_.VALDATA___V205*/ meltfptr[204]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V213*/ meltfptr[212]); MELT_LOCATION("warmelt-base.melt:130:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V205*/ meltfptr[204]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V214*/ meltfptr[213])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V214*/ meltfptr[213])))); ((meltobject_ptr_t)(/*_.VALDATA___V214*/ meltfptr[213]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V215*/ meltfptr[214]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V214*/ meltfptr[213]); MELT_LOCATION("warmelt-base.melt:133:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V216*/ meltfptr[215])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V216*/ meltfptr[215])))); ((meltobject_ptr_t)(/*_.VALDATA___V216*/ meltfptr[215]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V217*/ meltfptr[216]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V219*/ meltfptr[218])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V219*/ meltfptr[218])))); ((meltobject_ptr_t)(/*_.VALDATA___V219*/ meltfptr[218]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V220*/ meltfptr[219]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V219*/ meltfptr[218]); MELT_LOCATION("warmelt-base.melt:133:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V218*/ meltfptr[217])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V218*/ meltfptr[217])))); ((meltobject_ptr_t)(/*_.VALDATA___V218*/ meltfptr[217]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V219*/ meltfptr[218]); MELT_LOCATION("warmelt-base.melt:133:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V218*/ meltfptr[217])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V218*/ meltfptr[217])))); ((meltobject_ptr_t)(/*_.VALDATA___V218*/ meltfptr[217]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:133:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V218*/ meltfptr[217]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V221*/ meltfptr[220]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V221*/ meltfptr[220])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V221*/ meltfptr[220]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V218*/ meltfptr[217]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V221*/ meltfptr[220]); MELT_LOCATION("warmelt-base.melt:133:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V216*/ meltfptr[215])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V216*/ meltfptr[215])))); ((meltobject_ptr_t)(/*_.VALDATA___V216*/ meltfptr[215]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V221*/ meltfptr[220]); MELT_LOCATION("warmelt-base.melt:133:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V216*/ meltfptr[215])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V216*/ meltfptr[215])))); ((meltobject_ptr_t)(/*_.VALDATA___V216*/ meltfptr[215]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V224*/ meltfptr[223]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V224*/ meltfptr[223])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V224*/ meltfptr[223]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V222*/ meltfptr[221]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V224*/ meltfptr[223]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V224*/ meltfptr[223])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V224*/ meltfptr[223]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V219*/ meltfptr[218]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V224*/ meltfptr[223]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V224*/ meltfptr[223])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V224*/ meltfptr[223]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V223*/ meltfptr[222]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V224*/ meltfptr[223]); MELT_LOCATION("warmelt-base.melt:133:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V216*/ meltfptr[215])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V216*/ meltfptr[215])))); ((meltobject_ptr_t)(/*_.VALDATA___V216*/ meltfptr[215]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V224*/ meltfptr[223]); MELT_LOCATION("warmelt-base.melt:133:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V216*/ meltfptr[215]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V225*/ meltfptr[224])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V225*/ meltfptr[224])))); ((meltobject_ptr_t)(/*_.VALDATA___V225*/ meltfptr[224]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V226*/ meltfptr[225]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V225*/ meltfptr[224]); MELT_LOCATION("warmelt-base.melt:135:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V227*/ meltfptr[226])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V227*/ meltfptr[226])))); ((meltobject_ptr_t)(/*_.VALDATA___V227*/ meltfptr[226]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V228*/ meltfptr[227]); MELT_LOCATION("warmelt-base.melt:135:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V229*/ meltfptr[228])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V229*/ meltfptr[228])))); ((meltobject_ptr_t)(/*_.VALDATA___V229*/ meltfptr[228]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V219*/ meltfptr[218]); MELT_LOCATION("warmelt-base.melt:135:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V229*/ meltfptr[228])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V229*/ meltfptr[228])))); ((meltobject_ptr_t)(/*_.VALDATA___V229*/ meltfptr[228]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:135:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V229*/ meltfptr[228]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V230*/ meltfptr[229]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V230*/ meltfptr[229])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V230*/ meltfptr[229]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V229*/ meltfptr[228]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V230*/ meltfptr[229]); MELT_LOCATION("warmelt-base.melt:135:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V227*/ meltfptr[226])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V227*/ meltfptr[226])))); ((meltobject_ptr_t)(/*_.VALDATA___V227*/ meltfptr[226]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V230*/ meltfptr[229]); MELT_LOCATION("warmelt-base.melt:135:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V227*/ meltfptr[226])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V227*/ meltfptr[226])))); ((meltobject_ptr_t)(/*_.VALDATA___V227*/ meltfptr[226]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V233*/ meltfptr[232]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V233*/ meltfptr[232])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V233*/ meltfptr[232]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V231*/ meltfptr[230]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V233*/ meltfptr[232]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V233*/ meltfptr[232])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V233*/ meltfptr[232]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V219*/ meltfptr[218]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V233*/ meltfptr[232]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V233*/ meltfptr[232])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V233*/ meltfptr[232]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V232*/ meltfptr[231]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V233*/ meltfptr[232]); MELT_LOCATION("warmelt-base.melt:135:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V227*/ meltfptr[226])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V227*/ meltfptr[226])))); ((meltobject_ptr_t)(/*_.VALDATA___V227*/ meltfptr[226]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V233*/ meltfptr[232]); MELT_LOCATION("warmelt-base.melt:135:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V227*/ meltfptr[226]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V234*/ meltfptr[233])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V234*/ meltfptr[233])))); ((meltobject_ptr_t)(/*_.VALDATA___V234*/ meltfptr[233]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V235*/ meltfptr[234]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V234*/ meltfptr[233]); MELT_LOCATION("warmelt-base.melt:140:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V236*/ meltfptr[235])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V236*/ meltfptr[235])))); ((meltobject_ptr_t)(/*_.VALDATA___V236*/ meltfptr[235]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V237*/ meltfptr[236]); MELT_LOCATION("warmelt-base.melt:140:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V238*/ meltfptr[237])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V238*/ meltfptr[237])))); ((meltobject_ptr_t)(/*_.VALDATA___V238*/ meltfptr[237]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V13*/ meltfptr[12]); MELT_LOCATION("warmelt-base.melt:140:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V238*/ meltfptr[237])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V238*/ meltfptr[237])))); ((meltobject_ptr_t)(/*_.VALDATA___V238*/ meltfptr[237]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:140:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V238*/ meltfptr[237]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V239*/ meltfptr[238]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V239*/ meltfptr[238])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V239*/ meltfptr[238]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V238*/ meltfptr[237]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V239*/ meltfptr[238]); MELT_LOCATION("warmelt-base.melt:140:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V236*/ meltfptr[235])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V236*/ meltfptr[235])))); ((meltobject_ptr_t)(/*_.VALDATA___V236*/ meltfptr[235]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V239*/ meltfptr[238]); MELT_LOCATION("warmelt-base.melt:140:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V236*/ meltfptr[235])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V236*/ meltfptr[235])))); ((meltobject_ptr_t)(/*_.VALDATA___V236*/ meltfptr[235]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V242*/ meltfptr[241]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V242*/ meltfptr[241])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V242*/ meltfptr[241]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V240*/ meltfptr[239]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V242*/ meltfptr[241]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V242*/ meltfptr[241])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V242*/ meltfptr[241]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V13*/ meltfptr[12]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V242*/ meltfptr[241]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V242*/ meltfptr[241])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V242*/ meltfptr[241]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V241*/ meltfptr[240]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V242*/ meltfptr[241]); MELT_LOCATION("warmelt-base.melt:140:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V236*/ meltfptr[235])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V236*/ meltfptr[235])))); ((meltobject_ptr_t)(/*_.VALDATA___V236*/ meltfptr[235]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V242*/ meltfptr[241]); MELT_LOCATION("warmelt-base.melt:140:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V236*/ meltfptr[235]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V243*/ meltfptr[242])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V243*/ meltfptr[242])))); ((meltobject_ptr_t)(/*_.VALDATA___V243*/ meltfptr[242]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V244*/ meltfptr[243]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V243*/ meltfptr[242]); MELT_LOCATION("warmelt-base.melt:144:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V245*/ meltfptr[244])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V245*/ meltfptr[244])))); ((meltobject_ptr_t)(/*_.VALDATA___V245*/ meltfptr[244]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V246*/ meltfptr[245]); MELT_LOCATION("warmelt-base.melt:144:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V247*/ meltfptr[246])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V247*/ meltfptr[246])))); ((meltobject_ptr_t)(/*_.VALDATA___V247*/ meltfptr[246]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V219*/ meltfptr[218]); MELT_LOCATION("warmelt-base.melt:144:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V247*/ meltfptr[246])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V247*/ meltfptr[246])))); ((meltobject_ptr_t)(/*_.VALDATA___V247*/ meltfptr[246]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:144:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V247*/ meltfptr[246]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V248*/ meltfptr[247]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V248*/ meltfptr[247])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V248*/ meltfptr[247]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V247*/ meltfptr[246]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V248*/ meltfptr[247]); MELT_LOCATION("warmelt-base.melt:144:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V245*/ meltfptr[244])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V245*/ meltfptr[244])))); ((meltobject_ptr_t)(/*_.VALDATA___V245*/ meltfptr[244]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V248*/ meltfptr[247]); MELT_LOCATION("warmelt-base.melt:144:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V245*/ meltfptr[244])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V245*/ meltfptr[244])))); ((meltobject_ptr_t)(/*_.VALDATA___V245*/ meltfptr[244]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V251*/ meltfptr[250]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V251*/ meltfptr[250])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V251*/ meltfptr[250]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V249*/ meltfptr[248]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V251*/ meltfptr[250]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V251*/ meltfptr[250])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V251*/ meltfptr[250]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V219*/ meltfptr[218]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V251*/ meltfptr[250]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V251*/ meltfptr[250])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V251*/ meltfptr[250]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V250*/ meltfptr[249]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V251*/ meltfptr[250]); MELT_LOCATION("warmelt-base.melt:144:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V245*/ meltfptr[244])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V245*/ meltfptr[244])))); ((meltobject_ptr_t)(/*_.VALDATA___V245*/ meltfptr[244]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V251*/ meltfptr[250]); MELT_LOCATION("warmelt-base.melt:144:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V245*/ meltfptr[244]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V252*/ meltfptr[251])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V252*/ meltfptr[251])))); ((meltobject_ptr_t)(/*_.VALDATA___V252*/ meltfptr[251]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V253*/ meltfptr[252]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V252*/ meltfptr[251]); MELT_LOCATION("warmelt-base.melt:147:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V254*/ meltfptr[253])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V254*/ meltfptr[253])))); ((meltobject_ptr_t)(/*_.VALDATA___V254*/ meltfptr[253]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V255*/ meltfptr[254]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V257*/ meltfptr[256])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V257*/ meltfptr[256])))); ((meltobject_ptr_t)(/*_.VALDATA___V257*/ meltfptr[256]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V258*/ meltfptr[257]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V257*/ meltfptr[256]); MELT_LOCATION("warmelt-base.melt:147:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V256*/ meltfptr[255])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V256*/ meltfptr[255])))); ((meltobject_ptr_t)(/*_.VALDATA___V256*/ meltfptr[255]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V257*/ meltfptr[256]); MELT_LOCATION("warmelt-base.melt:147:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V256*/ meltfptr[255])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V256*/ meltfptr[255])))); ((meltobject_ptr_t)(/*_.VALDATA___V256*/ meltfptr[255]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:147:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V256*/ meltfptr[255]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V259*/ meltfptr[258]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V259*/ meltfptr[258])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V259*/ meltfptr[258]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V256*/ meltfptr[255]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V259*/ meltfptr[258]); MELT_LOCATION("warmelt-base.melt:147:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V254*/ meltfptr[253])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V254*/ meltfptr[253])))); ((meltobject_ptr_t)(/*_.VALDATA___V254*/ meltfptr[253]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V259*/ meltfptr[258]); MELT_LOCATION("warmelt-base.melt:147:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V254*/ meltfptr[253])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V254*/ meltfptr[253])))); ((meltobject_ptr_t)(/*_.VALDATA___V254*/ meltfptr[253]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V262*/ meltfptr[261]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V262*/ meltfptr[261])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V262*/ meltfptr[261]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V260*/ meltfptr[259]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V262*/ meltfptr[261]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V262*/ meltfptr[261])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V262*/ meltfptr[261]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V257*/ meltfptr[256]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V262*/ meltfptr[261]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V262*/ meltfptr[261])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V262*/ meltfptr[261]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V261*/ meltfptr[260]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V262*/ meltfptr[261]); MELT_LOCATION("warmelt-base.melt:147:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V254*/ meltfptr[253])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V254*/ meltfptr[253])))); ((meltobject_ptr_t)(/*_.VALDATA___V254*/ meltfptr[253]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V262*/ meltfptr[261]); MELT_LOCATION("warmelt-base.melt:147:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V254*/ meltfptr[253]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V263*/ meltfptr[262])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V263*/ meltfptr[262])))); ((meltobject_ptr_t)(/*_.VALDATA___V263*/ meltfptr[262]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V264*/ meltfptr[263]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V263*/ meltfptr[262]); MELT_LOCATION("warmelt-base.melt:149:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V265*/ meltfptr[264])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V265*/ meltfptr[264])))); ((meltobject_ptr_t)(/*_.VALDATA___V265*/ meltfptr[264]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V266*/ meltfptr[265]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V268*/ meltfptr[267])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V268*/ meltfptr[267])))); ((meltobject_ptr_t)(/*_.VALDATA___V268*/ meltfptr[267]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V269*/ meltfptr[268]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V268*/ meltfptr[267]); MELT_LOCATION("warmelt-base.melt:149:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V267*/ meltfptr[266])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V267*/ meltfptr[266])))); ((meltobject_ptr_t)(/*_.VALDATA___V267*/ meltfptr[266]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V268*/ meltfptr[267]); MELT_LOCATION("warmelt-base.melt:149:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V267*/ meltfptr[266])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V267*/ meltfptr[266])))); ((meltobject_ptr_t)(/*_.VALDATA___V267*/ meltfptr[266]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:149:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V267*/ meltfptr[266]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V271*/ meltfptr[270])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V271*/ meltfptr[270])))); ((meltobject_ptr_t)(/*_.VALDATA___V271*/ meltfptr[270]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V272*/ meltfptr[271]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V271*/ meltfptr[270]); MELT_LOCATION("warmelt-base.melt:149:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V270*/ meltfptr[269])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V270*/ meltfptr[269])))); ((meltobject_ptr_t)(/*_.VALDATA___V270*/ meltfptr[269]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V271*/ meltfptr[270]); MELT_LOCATION("warmelt-base.melt:149:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V270*/ meltfptr[269])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V270*/ meltfptr[269])))); ((meltobject_ptr_t)(/*_.VALDATA___V270*/ meltfptr[269]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:149:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V270*/ meltfptr[269]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V274*/ meltfptr[273])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V274*/ meltfptr[273])))); ((meltobject_ptr_t)(/*_.VALDATA___V274*/ meltfptr[273]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V275*/ meltfptr[274]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V274*/ meltfptr[273]); MELT_LOCATION("warmelt-base.melt:149:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V273*/ meltfptr[272])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V273*/ meltfptr[272])))); ((meltobject_ptr_t)(/*_.VALDATA___V273*/ meltfptr[272]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V274*/ meltfptr[273]); MELT_LOCATION("warmelt-base.melt:149:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V273*/ meltfptr[272])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V273*/ meltfptr[272])))); ((meltobject_ptr_t)(/*_.VALDATA___V273*/ meltfptr[272]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:149:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V273*/ meltfptr[272]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V276*/ meltfptr[275]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V276*/ meltfptr[275])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V276*/ meltfptr[275]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V267*/ meltfptr[266]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V276*/ meltfptr[275]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V276*/ meltfptr[275])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V276*/ meltfptr[275]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V270*/ meltfptr[269]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V276*/ meltfptr[275]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V276*/ meltfptr[275])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V276*/ meltfptr[275]))->tabval[2] = (melt_ptr_t)(/*_.VALDATA___V273*/ meltfptr[272]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V276*/ meltfptr[275]); MELT_LOCATION("warmelt-base.melt:149:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V265*/ meltfptr[264])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V265*/ meltfptr[264])))); ((meltobject_ptr_t)(/*_.VALDATA___V265*/ meltfptr[264]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V276*/ meltfptr[275]); MELT_LOCATION("warmelt-base.melt:149:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V265*/ meltfptr[264])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V265*/ meltfptr[264])))); ((meltobject_ptr_t)(/*_.VALDATA___V265*/ meltfptr[264]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V277*/ meltfptr[276]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V268*/ meltfptr[267]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V278*/ meltfptr[277]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V271*/ meltfptr[270]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V279*/ meltfptr[278]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V274*/ meltfptr[273]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V281*/ meltfptr[280]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V280*/ meltfptr[279]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V281*/ meltfptr[280]); MELT_LOCATION("warmelt-base.melt:149:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V265*/ meltfptr[264])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V265*/ meltfptr[264])))); ((meltobject_ptr_t)(/*_.VALDATA___V265*/ meltfptr[264]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V281*/ meltfptr[280]); MELT_LOCATION("warmelt-base.melt:149:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V265*/ meltfptr[264]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V282*/ meltfptr[281])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V282*/ meltfptr[281])))); ((meltobject_ptr_t)(/*_.VALDATA___V282*/ meltfptr[281]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V283*/ meltfptr[282]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V282*/ meltfptr[281]); MELT_LOCATION("warmelt-base.melt:152:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V284*/ meltfptr[283])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V284*/ meltfptr[283])))); ((meltobject_ptr_t)(/*_.VALDATA___V284*/ meltfptr[283]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V285*/ meltfptr[284]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286])))); ((meltobject_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V288*/ meltfptr[287]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:152:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V286*/ meltfptr[285])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V286*/ meltfptr[285])))); ((meltobject_ptr_t)(/*_.VALDATA___V286*/ meltfptr[285]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:152:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V286*/ meltfptr[285])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V286*/ meltfptr[285])))); ((meltobject_ptr_t)(/*_.VALDATA___V286*/ meltfptr[285]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:152:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V286*/ meltfptr[285]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V289*/ meltfptr[288]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V289*/ meltfptr[288])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V289*/ meltfptr[288]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V286*/ meltfptr[285]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V289*/ meltfptr[288]); MELT_LOCATION("warmelt-base.melt:152:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V284*/ meltfptr[283])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V284*/ meltfptr[283])))); ((meltobject_ptr_t)(/*_.VALDATA___V284*/ meltfptr[283]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V289*/ meltfptr[288]); MELT_LOCATION("warmelt-base.melt:152:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V284*/ meltfptr[283])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V284*/ meltfptr[283])))); ((meltobject_ptr_t)(/*_.VALDATA___V284*/ meltfptr[283]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V292*/ meltfptr[291]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V292*/ meltfptr[291])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V292*/ meltfptr[291]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V290*/ meltfptr[289]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V292*/ meltfptr[291]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V292*/ meltfptr[291])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V292*/ meltfptr[291]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V292*/ meltfptr[291]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V292*/ meltfptr[291])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V292*/ meltfptr[291]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V291*/ meltfptr[290]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V292*/ meltfptr[291]); MELT_LOCATION("warmelt-base.melt:152:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V284*/ meltfptr[283])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V284*/ meltfptr[283])))); ((meltobject_ptr_t)(/*_.VALDATA___V284*/ meltfptr[283]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V292*/ meltfptr[291]); MELT_LOCATION("warmelt-base.melt:152:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V284*/ meltfptr[283]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V293*/ meltfptr[292])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V293*/ meltfptr[292])))); ((meltobject_ptr_t)(/*_.VALDATA___V293*/ meltfptr[292]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V294*/ meltfptr[293]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V293*/ meltfptr[292]); MELT_LOCATION("warmelt-base.melt:155:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V295*/ meltfptr[294])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V295*/ meltfptr[294])))); ((meltobject_ptr_t)(/*_.VALDATA___V295*/ meltfptr[294]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V296*/ meltfptr[295]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297])))); ((meltobject_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V299*/ meltfptr[298]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V298*/ meltfptr[297]); #undef meltfram__ } /*end of warmelt_base_initialmeltchunk_1*/ void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_2 (struct frame_start_module_melt_st* meltframptr__, char predefinited[]) { #define meltfram__ (*meltframptr__) #undef meltcallcount #define meltcallcount 0L MELT_LOCATION("warmelt-base.melt:155:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V297*/ meltfptr[296])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V297*/ meltfptr[296])))); ((meltobject_ptr_t)(/*_.VALDATA___V297*/ meltfptr[296]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:155:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V297*/ meltfptr[296])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V297*/ meltfptr[296])))); ((meltobject_ptr_t)(/*_.VALDATA___V297*/ meltfptr[296]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:155:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V297*/ meltfptr[296]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V300*/ meltfptr[299]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V300*/ meltfptr[299])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V300*/ meltfptr[299]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V297*/ meltfptr[296]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V300*/ meltfptr[299]); MELT_LOCATION("warmelt-base.melt:155:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V295*/ meltfptr[294])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V295*/ meltfptr[294])))); ((meltobject_ptr_t)(/*_.VALDATA___V295*/ meltfptr[294]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V300*/ meltfptr[299]); MELT_LOCATION("warmelt-base.melt:155:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V295*/ meltfptr[294])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V295*/ meltfptr[294])))); ((meltobject_ptr_t)(/*_.VALDATA___V295*/ meltfptr[294]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V303*/ meltfptr[302]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V303*/ meltfptr[302])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V303*/ meltfptr[302]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V301*/ meltfptr[300]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V303*/ meltfptr[302]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V303*/ meltfptr[302])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V303*/ meltfptr[302]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V303*/ meltfptr[302]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V303*/ meltfptr[302])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V303*/ meltfptr[302]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V302*/ meltfptr[301]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V303*/ meltfptr[302]); MELT_LOCATION("warmelt-base.melt:155:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V295*/ meltfptr[294])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V295*/ meltfptr[294])))); ((meltobject_ptr_t)(/*_.VALDATA___V295*/ meltfptr[294]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V303*/ meltfptr[302]); MELT_LOCATION("warmelt-base.melt:155:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V295*/ meltfptr[294]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V304*/ meltfptr[303])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V304*/ meltfptr[303])))); ((meltobject_ptr_t)(/*_.VALDATA___V304*/ meltfptr[303]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V305*/ meltfptr[304]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V304*/ meltfptr[303]); MELT_LOCATION("warmelt-base.melt:157:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V306*/ meltfptr[305])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V306*/ meltfptr[305])))); ((meltobject_ptr_t)(/*_.VALDATA___V306*/ meltfptr[305]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V307*/ meltfptr[306]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V308*/ meltfptr[307]); MELT_LOCATION("warmelt-base.melt:157:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V306*/ meltfptr[305])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V306*/ meltfptr[305])))); ((meltobject_ptr_t)(/*_.VALDATA___V306*/ meltfptr[305]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V308*/ meltfptr[307]); MELT_LOCATION("warmelt-base.melt:157:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V306*/ meltfptr[305])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V306*/ meltfptr[305])))); ((meltobject_ptr_t)(/*_.VALDATA___V306*/ meltfptr[305]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V310*/ meltfptr[309]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V310*/ meltfptr[309])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V310*/ meltfptr[309]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V309*/ meltfptr[308]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V310*/ meltfptr[309]); MELT_LOCATION("warmelt-base.melt:157:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V306*/ meltfptr[305])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V306*/ meltfptr[305])))); ((meltobject_ptr_t)(/*_.VALDATA___V306*/ meltfptr[305]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V310*/ meltfptr[309]); MELT_LOCATION("warmelt-base.melt:157:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V306*/ meltfptr[305]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V311*/ meltfptr[310])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V311*/ meltfptr[310])))); ((meltobject_ptr_t)(/*_.VALDATA___V311*/ meltfptr[310]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V312*/ meltfptr[311]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V311*/ meltfptr[310]); MELT_LOCATION("warmelt-base.melt:160:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V313*/ meltfptr[312])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V313*/ meltfptr[312])))); ((meltobject_ptr_t)(/*_.VALDATA___V313*/ meltfptr[312]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V314*/ meltfptr[313]); MELT_LOCATION("warmelt-base.melt:160:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V315*/ meltfptr[314])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V315*/ meltfptr[314])))); ((meltobject_ptr_t)(/*_.VALDATA___V315*/ meltfptr[314]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V268*/ meltfptr[267]); MELT_LOCATION("warmelt-base.melt:160:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V315*/ meltfptr[314])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V315*/ meltfptr[314])))); ((meltobject_ptr_t)(/*_.VALDATA___V315*/ meltfptr[314]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:160:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V315*/ meltfptr[314]); MELT_LOCATION("warmelt-base.melt:160:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V316*/ meltfptr[315])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V316*/ meltfptr[315])))); ((meltobject_ptr_t)(/*_.VALDATA___V316*/ meltfptr[315]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V271*/ meltfptr[270]); MELT_LOCATION("warmelt-base.melt:160:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V316*/ meltfptr[315])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V316*/ meltfptr[315])))); ((meltobject_ptr_t)(/*_.VALDATA___V316*/ meltfptr[315]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:160:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V316*/ meltfptr[315]); MELT_LOCATION("warmelt-base.melt:160:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V317*/ meltfptr[316])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V317*/ meltfptr[316])))); ((meltobject_ptr_t)(/*_.VALDATA___V317*/ meltfptr[316]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V274*/ meltfptr[273]); MELT_LOCATION("warmelt-base.melt:160:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V317*/ meltfptr[316])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V317*/ meltfptr[316])))); ((meltobject_ptr_t)(/*_.VALDATA___V317*/ meltfptr[316]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:160:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V317*/ meltfptr[316]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V318*/ meltfptr[317]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V318*/ meltfptr[317])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V318*/ meltfptr[317]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V315*/ meltfptr[314]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V318*/ meltfptr[317]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V318*/ meltfptr[317])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V318*/ meltfptr[317]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V316*/ meltfptr[315]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V318*/ meltfptr[317]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V318*/ meltfptr[317])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V318*/ meltfptr[317]))->tabval[2] = (melt_ptr_t)(/*_.VALDATA___V317*/ meltfptr[316]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V318*/ meltfptr[317]); MELT_LOCATION("warmelt-base.melt:160:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V313*/ meltfptr[312])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V313*/ meltfptr[312])))); ((meltobject_ptr_t)(/*_.VALDATA___V313*/ meltfptr[312]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V318*/ meltfptr[317]); MELT_LOCATION("warmelt-base.melt:160:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V313*/ meltfptr[312])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V313*/ meltfptr[312])))); ((meltobject_ptr_t)(/*_.VALDATA___V313*/ meltfptr[312]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V319*/ meltfptr[318]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V268*/ meltfptr[267]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V320*/ meltfptr[319]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V271*/ meltfptr[270]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V321*/ meltfptr[320]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V274*/ meltfptr[273]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V323*/ meltfptr[322]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V322*/ meltfptr[321]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V323*/ meltfptr[322]); MELT_LOCATION("warmelt-base.melt:160:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V313*/ meltfptr[312])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V313*/ meltfptr[312])))); ((meltobject_ptr_t)(/*_.VALDATA___V313*/ meltfptr[312]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V323*/ meltfptr[322]); MELT_LOCATION("warmelt-base.melt:160:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V313*/ meltfptr[312]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V324*/ meltfptr[323])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V324*/ meltfptr[323])))); ((meltobject_ptr_t)(/*_.VALDATA___V324*/ meltfptr[323]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V325*/ meltfptr[324]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V324*/ meltfptr[323]); MELT_LOCATION("warmelt-base.melt:163:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V326*/ meltfptr[325])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V326*/ meltfptr[325])))); ((meltobject_ptr_t)(/*_.VALDATA___V326*/ meltfptr[325]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V327*/ meltfptr[326]); MELT_LOCATION("warmelt-base.melt:163:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V328*/ meltfptr[327])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V328*/ meltfptr[327])))); ((meltobject_ptr_t)(/*_.VALDATA___V328*/ meltfptr[327]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V257*/ meltfptr[256]); MELT_LOCATION("warmelt-base.melt:163:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V328*/ meltfptr[327])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V328*/ meltfptr[327])))); ((meltobject_ptr_t)(/*_.VALDATA___V328*/ meltfptr[327]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:163:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V328*/ meltfptr[327]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V329*/ meltfptr[328]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V329*/ meltfptr[328])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V329*/ meltfptr[328]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V328*/ meltfptr[327]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V329*/ meltfptr[328]); MELT_LOCATION("warmelt-base.melt:163:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V326*/ meltfptr[325])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V326*/ meltfptr[325])))); ((meltobject_ptr_t)(/*_.VALDATA___V326*/ meltfptr[325]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V329*/ meltfptr[328]); MELT_LOCATION("warmelt-base.melt:163:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V326*/ meltfptr[325])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V326*/ meltfptr[325])))); ((meltobject_ptr_t)(/*_.VALDATA___V326*/ meltfptr[325]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V332*/ meltfptr[331]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V332*/ meltfptr[331])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V332*/ meltfptr[331]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V330*/ meltfptr[329]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V332*/ meltfptr[331]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V332*/ meltfptr[331])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V332*/ meltfptr[331]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V257*/ meltfptr[256]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V332*/ meltfptr[331]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V332*/ meltfptr[331])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V332*/ meltfptr[331]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V331*/ meltfptr[330]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V332*/ meltfptr[331]); MELT_LOCATION("warmelt-base.melt:163:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V326*/ meltfptr[325])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V326*/ meltfptr[325])))); ((meltobject_ptr_t)(/*_.VALDATA___V326*/ meltfptr[325]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V332*/ meltfptr[331]); MELT_LOCATION("warmelt-base.melt:163:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V326*/ meltfptr[325]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V333*/ meltfptr[332])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V333*/ meltfptr[332])))); ((meltobject_ptr_t)(/*_.VALDATA___V333*/ meltfptr[332]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V334*/ meltfptr[333]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V333*/ meltfptr[332]); MELT_LOCATION("warmelt-base.melt:166:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V335*/ meltfptr[334])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V335*/ meltfptr[334])))); ((meltobject_ptr_t)(/*_.VALDATA___V335*/ meltfptr[334]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V336*/ meltfptr[335]); MELT_LOCATION("warmelt-base.melt:166:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V337*/ meltfptr[336])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V337*/ meltfptr[336])))); ((meltobject_ptr_t)(/*_.VALDATA___V337*/ meltfptr[336]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:166:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V337*/ meltfptr[336])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V337*/ meltfptr[336])))); ((meltobject_ptr_t)(/*_.VALDATA___V337*/ meltfptr[336]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:166:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V337*/ meltfptr[336]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V338*/ meltfptr[337]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V338*/ meltfptr[337])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V338*/ meltfptr[337]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V337*/ meltfptr[336]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V338*/ meltfptr[337]); MELT_LOCATION("warmelt-base.melt:166:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V335*/ meltfptr[334])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V335*/ meltfptr[334])))); ((meltobject_ptr_t)(/*_.VALDATA___V335*/ meltfptr[334]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V338*/ meltfptr[337]); MELT_LOCATION("warmelt-base.melt:166:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V335*/ meltfptr[334])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V335*/ meltfptr[334])))); ((meltobject_ptr_t)(/*_.VALDATA___V335*/ meltfptr[334]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V341*/ meltfptr[340]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V341*/ meltfptr[340]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V339*/ meltfptr[338]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V341*/ meltfptr[340]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V341*/ meltfptr[340]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V341*/ meltfptr[340]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V341*/ meltfptr[340])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V341*/ meltfptr[340]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V340*/ meltfptr[339]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V341*/ meltfptr[340]); MELT_LOCATION("warmelt-base.melt:166:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V335*/ meltfptr[334])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V335*/ meltfptr[334])))); ((meltobject_ptr_t)(/*_.VALDATA___V335*/ meltfptr[334]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V341*/ meltfptr[340]); MELT_LOCATION("warmelt-base.melt:166:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V335*/ meltfptr[334]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V342*/ meltfptr[341])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V342*/ meltfptr[341])))); ((meltobject_ptr_t)(/*_.VALDATA___V342*/ meltfptr[341]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V343*/ meltfptr[342]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V342*/ meltfptr[341]); MELT_LOCATION("warmelt-base.melt:174:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V344*/ meltfptr[343])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V344*/ meltfptr[343])))); ((meltobject_ptr_t)(/*_.VALDATA___V344*/ meltfptr[343]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V345*/ meltfptr[344]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V347*/ meltfptr[346])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V347*/ meltfptr[346])))); ((meltobject_ptr_t)(/*_.VALDATA___V347*/ meltfptr[346]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V348*/ meltfptr[347]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V347*/ meltfptr[346]); MELT_LOCATION("warmelt-base.melt:174:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V346*/ meltfptr[345])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V346*/ meltfptr[345])))); ((meltobject_ptr_t)(/*_.VALDATA___V346*/ meltfptr[345]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V347*/ meltfptr[346]); MELT_LOCATION("warmelt-base.melt:174:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V346*/ meltfptr[345])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V346*/ meltfptr[345])))); ((meltobject_ptr_t)(/*_.VALDATA___V346*/ meltfptr[345]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:174:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V346*/ meltfptr[345]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V350*/ meltfptr[349])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V350*/ meltfptr[349])))); ((meltobject_ptr_t)(/*_.VALDATA___V350*/ meltfptr[349]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V351*/ meltfptr[350]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V350*/ meltfptr[349]); MELT_LOCATION("warmelt-base.melt:174:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V349*/ meltfptr[348])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V349*/ meltfptr[348])))); ((meltobject_ptr_t)(/*_.VALDATA___V349*/ meltfptr[348]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V350*/ meltfptr[349]); MELT_LOCATION("warmelt-base.melt:174:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V349*/ meltfptr[348])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V349*/ meltfptr[348])))); ((meltobject_ptr_t)(/*_.VALDATA___V349*/ meltfptr[348]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:174:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V349*/ meltfptr[348]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V352*/ meltfptr[351]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V352*/ meltfptr[351])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V352*/ meltfptr[351]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V346*/ meltfptr[345]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V352*/ meltfptr[351]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V352*/ meltfptr[351])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V352*/ meltfptr[351]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V349*/ meltfptr[348]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V352*/ meltfptr[351]); MELT_LOCATION("warmelt-base.melt:174:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V344*/ meltfptr[343])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V344*/ meltfptr[343])))); ((meltobject_ptr_t)(/*_.VALDATA___V344*/ meltfptr[343]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V352*/ meltfptr[351]); MELT_LOCATION("warmelt-base.melt:174:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V344*/ meltfptr[343])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V344*/ meltfptr[343])))); ((meltobject_ptr_t)(/*_.VALDATA___V344*/ meltfptr[343]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V356*/ meltfptr[355]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V356*/ meltfptr[355])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V356*/ meltfptr[355]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V353*/ meltfptr[352]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V356*/ meltfptr[355]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V356*/ meltfptr[355])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V356*/ meltfptr[355]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V347*/ meltfptr[346]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V356*/ meltfptr[355]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V356*/ meltfptr[355])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V356*/ meltfptr[355]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V354*/ meltfptr[353]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V356*/ meltfptr[355]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V356*/ meltfptr[355])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V356*/ meltfptr[355]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V350*/ meltfptr[349]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V356*/ meltfptr[355]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V356*/ meltfptr[355])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V356*/ meltfptr[355]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V355*/ meltfptr[354]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V356*/ meltfptr[355]); MELT_LOCATION("warmelt-base.melt:174:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V344*/ meltfptr[343])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V344*/ meltfptr[343])))); ((meltobject_ptr_t)(/*_.VALDATA___V344*/ meltfptr[343]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V356*/ meltfptr[355]); MELT_LOCATION("warmelt-base.melt:174:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V344*/ meltfptr[343]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V357*/ meltfptr[356])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V357*/ meltfptr[356])))); ((meltobject_ptr_t)(/*_.VALDATA___V357*/ meltfptr[356]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V358*/ meltfptr[357]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V357*/ meltfptr[356]); MELT_LOCATION("warmelt-base.melt:179:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V359*/ meltfptr[358])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V359*/ meltfptr[358])))); ((meltobject_ptr_t)(/*_.VALDATA___V359*/ meltfptr[358]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V360*/ meltfptr[359]); MELT_LOCATION("warmelt-base.melt:179:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V361*/ meltfptr[360])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V361*/ meltfptr[360])))); ((meltobject_ptr_t)(/*_.VALDATA___V361*/ meltfptr[360]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V347*/ meltfptr[346]); MELT_LOCATION("warmelt-base.melt:179:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V361*/ meltfptr[360])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V361*/ meltfptr[360])))); ((meltobject_ptr_t)(/*_.VALDATA___V361*/ meltfptr[360]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:179:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V361*/ meltfptr[360]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V362*/ meltfptr[361]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V362*/ meltfptr[361])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V362*/ meltfptr[361]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V361*/ meltfptr[360]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V362*/ meltfptr[361]); MELT_LOCATION("warmelt-base.melt:179:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V359*/ meltfptr[358])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V359*/ meltfptr[358])))); ((meltobject_ptr_t)(/*_.VALDATA___V359*/ meltfptr[358]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V362*/ meltfptr[361]); MELT_LOCATION("warmelt-base.melt:179:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V359*/ meltfptr[358])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V359*/ meltfptr[358])))); ((meltobject_ptr_t)(/*_.VALDATA___V359*/ meltfptr[358]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V365*/ meltfptr[364]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V365*/ meltfptr[364])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V365*/ meltfptr[364]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V363*/ meltfptr[362]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V365*/ meltfptr[364]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V365*/ meltfptr[364])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V365*/ meltfptr[364]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V347*/ meltfptr[346]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V365*/ meltfptr[364]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V365*/ meltfptr[364])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V365*/ meltfptr[364]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V364*/ meltfptr[363]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V365*/ meltfptr[364]); MELT_LOCATION("warmelt-base.melt:179:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V359*/ meltfptr[358])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V359*/ meltfptr[358])))); ((meltobject_ptr_t)(/*_.VALDATA___V359*/ meltfptr[358]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V365*/ meltfptr[364]); MELT_LOCATION("warmelt-base.melt:179:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V359*/ meltfptr[358]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V366*/ meltfptr[365])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V366*/ meltfptr[365])))); ((meltobject_ptr_t)(/*_.VALDATA___V366*/ meltfptr[365]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V367*/ meltfptr[366]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V366*/ meltfptr[365]); MELT_LOCATION("warmelt-base.melt:184:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V368*/ meltfptr[367])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V368*/ meltfptr[367])))); ((meltobject_ptr_t)(/*_.VALDATA___V368*/ meltfptr[367]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V369*/ meltfptr[368]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V371*/ meltfptr[370])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V371*/ meltfptr[370])))); ((meltobject_ptr_t)(/*_.VALDATA___V371*/ meltfptr[370]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V372*/ meltfptr[371]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V371*/ meltfptr[370]); MELT_LOCATION("warmelt-base.melt:184:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V370*/ meltfptr[369])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V370*/ meltfptr[369])))); ((meltobject_ptr_t)(/*_.VALDATA___V370*/ meltfptr[369]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V371*/ meltfptr[370]); MELT_LOCATION("warmelt-base.melt:184:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V370*/ meltfptr[369])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V370*/ meltfptr[369])))); ((meltobject_ptr_t)(/*_.VALDATA___V370*/ meltfptr[369]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:184:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V370*/ meltfptr[369]); MELT_LOCATION("warmelt-base.melt:184:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V373*/ meltfptr[372])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V373*/ meltfptr[372])))); ((meltobject_ptr_t)(/*_.VALDATA___V373*/ meltfptr[372]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V350*/ meltfptr[349]); MELT_LOCATION("warmelt-base.melt:184:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V373*/ meltfptr[372])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V373*/ meltfptr[372])))); ((meltobject_ptr_t)(/*_.VALDATA___V373*/ meltfptr[372]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:184:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V373*/ meltfptr[372]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V375*/ meltfptr[374])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V375*/ meltfptr[374])))); ((meltobject_ptr_t)(/*_.VALDATA___V375*/ meltfptr[374]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V376*/ meltfptr[375]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V375*/ meltfptr[374]); MELT_LOCATION("warmelt-base.melt:184:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V374*/ meltfptr[373])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V374*/ meltfptr[373])))); ((meltobject_ptr_t)(/*_.VALDATA___V374*/ meltfptr[373]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V375*/ meltfptr[374]); MELT_LOCATION("warmelt-base.melt:184:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V374*/ meltfptr[373])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V374*/ meltfptr[373])))); ((meltobject_ptr_t)(/*_.VALDATA___V374*/ meltfptr[373]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:184:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V374*/ meltfptr[373]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V377*/ meltfptr[376]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V377*/ meltfptr[376])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V377*/ meltfptr[376]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V370*/ meltfptr[369]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V377*/ meltfptr[376]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V377*/ meltfptr[376])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V377*/ meltfptr[376]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V373*/ meltfptr[372]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V377*/ meltfptr[376]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V377*/ meltfptr[376])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V377*/ meltfptr[376]))->tabval[2] = (melt_ptr_t)(/*_.VALDATA___V374*/ meltfptr[373]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V377*/ meltfptr[376]); MELT_LOCATION("warmelt-base.melt:184:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V368*/ meltfptr[367])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V368*/ meltfptr[367])))); ((meltobject_ptr_t)(/*_.VALDATA___V368*/ meltfptr[367]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V377*/ meltfptr[376]); MELT_LOCATION("warmelt-base.melt:184:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V368*/ meltfptr[367])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V368*/ meltfptr[367])))); ((meltobject_ptr_t)(/*_.VALDATA___V368*/ meltfptr[367]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V378*/ meltfptr[377]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V371*/ meltfptr[370]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V379*/ meltfptr[378]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V350*/ meltfptr[349]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V380*/ meltfptr[379]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V375*/ meltfptr[374]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V382*/ meltfptr[381]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V381*/ meltfptr[380]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V382*/ meltfptr[381]); MELT_LOCATION("warmelt-base.melt:184:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V368*/ meltfptr[367])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V368*/ meltfptr[367])))); ((meltobject_ptr_t)(/*_.VALDATA___V368*/ meltfptr[367]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V382*/ meltfptr[381]); MELT_LOCATION("warmelt-base.melt:184:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V368*/ meltfptr[367]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V383*/ meltfptr[382])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V383*/ meltfptr[382])))); ((meltobject_ptr_t)(/*_.VALDATA___V383*/ meltfptr[382]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V384*/ meltfptr[383]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V383*/ meltfptr[382]); MELT_LOCATION("warmelt-base.melt:190:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V385*/ meltfptr[384])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V385*/ meltfptr[384])))); ((meltobject_ptr_t)(/*_.VALDATA___V385*/ meltfptr[384]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V386*/ meltfptr[385]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V388*/ meltfptr[387])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V388*/ meltfptr[387])))); ((meltobject_ptr_t)(/*_.VALDATA___V388*/ meltfptr[387]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V389*/ meltfptr[388]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V388*/ meltfptr[387]); MELT_LOCATION("warmelt-base.melt:190:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V387*/ meltfptr[386])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V387*/ meltfptr[386])))); ((meltobject_ptr_t)(/*_.VALDATA___V387*/ meltfptr[386]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V388*/ meltfptr[387]); MELT_LOCATION("warmelt-base.melt:190:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V387*/ meltfptr[386])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V387*/ meltfptr[386])))); ((meltobject_ptr_t)(/*_.VALDATA___V387*/ meltfptr[386]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:190:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V387*/ meltfptr[386]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V390*/ meltfptr[389]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V390*/ meltfptr[389])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V390*/ meltfptr[389]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V387*/ meltfptr[386]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V390*/ meltfptr[389]); MELT_LOCATION("warmelt-base.melt:190:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V385*/ meltfptr[384])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V385*/ meltfptr[384])))); ((meltobject_ptr_t)(/*_.VALDATA___V385*/ meltfptr[384]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V390*/ meltfptr[389]); MELT_LOCATION("warmelt-base.melt:190:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V385*/ meltfptr[384])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V385*/ meltfptr[384])))); ((meltobject_ptr_t)(/*_.VALDATA___V385*/ meltfptr[384]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V393*/ meltfptr[392]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V393*/ meltfptr[392])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V393*/ meltfptr[392]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V391*/ meltfptr[390]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V393*/ meltfptr[392]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V393*/ meltfptr[392])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V393*/ meltfptr[392]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V388*/ meltfptr[387]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V393*/ meltfptr[392]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V393*/ meltfptr[392])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V393*/ meltfptr[392]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V392*/ meltfptr[391]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V393*/ meltfptr[392]); MELT_LOCATION("warmelt-base.melt:190:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V385*/ meltfptr[384])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V385*/ meltfptr[384])))); ((meltobject_ptr_t)(/*_.VALDATA___V385*/ meltfptr[384]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V393*/ meltfptr[392]); MELT_LOCATION("warmelt-base.melt:190:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V385*/ meltfptr[384]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V394*/ meltfptr[393])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V394*/ meltfptr[393])))); ((meltobject_ptr_t)(/*_.VALDATA___V394*/ meltfptr[393]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V395*/ meltfptr[394]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V394*/ meltfptr[393]); MELT_LOCATION("warmelt-base.melt:194:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V396*/ meltfptr[395])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V396*/ meltfptr[395])))); ((meltobject_ptr_t)(/*_.VALDATA___V396*/ meltfptr[395]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V397*/ meltfptr[396]); MELT_LOCATION("warmelt-base.melt:194:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V398*/ meltfptr[397])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V398*/ meltfptr[397])))); ((meltobject_ptr_t)(/*_.VALDATA___V398*/ meltfptr[397]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V388*/ meltfptr[387]); MELT_LOCATION("warmelt-base.melt:194:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V398*/ meltfptr[397])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V398*/ meltfptr[397])))); ((meltobject_ptr_t)(/*_.VALDATA___V398*/ meltfptr[397]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:194:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V398*/ meltfptr[397]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V399*/ meltfptr[398]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V399*/ meltfptr[398])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V399*/ meltfptr[398]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V398*/ meltfptr[397]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V399*/ meltfptr[398]); MELT_LOCATION("warmelt-base.melt:194:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V396*/ meltfptr[395])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V396*/ meltfptr[395])))); ((meltobject_ptr_t)(/*_.VALDATA___V396*/ meltfptr[395]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V399*/ meltfptr[398]); MELT_LOCATION("warmelt-base.melt:194:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V396*/ meltfptr[395])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V396*/ meltfptr[395])))); ((meltobject_ptr_t)(/*_.VALDATA___V396*/ meltfptr[395]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V402*/ meltfptr[401]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V402*/ meltfptr[401])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V402*/ meltfptr[401]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V400*/ meltfptr[399]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V402*/ meltfptr[401]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V402*/ meltfptr[401])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V402*/ meltfptr[401]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V388*/ meltfptr[387]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V402*/ meltfptr[401]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V402*/ meltfptr[401])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V402*/ meltfptr[401]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V401*/ meltfptr[400]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V402*/ meltfptr[401]); MELT_LOCATION("warmelt-base.melt:194:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V396*/ meltfptr[395])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V396*/ meltfptr[395])))); ((meltobject_ptr_t)(/*_.VALDATA___V396*/ meltfptr[395]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V402*/ meltfptr[401]); MELT_LOCATION("warmelt-base.melt:194:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V396*/ meltfptr[395]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V403*/ meltfptr[402])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V403*/ meltfptr[402])))); ((meltobject_ptr_t)(/*_.VALDATA___V403*/ meltfptr[402]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V404*/ meltfptr[403]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V403*/ meltfptr[402]); MELT_LOCATION("warmelt-base.melt:198:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V405*/ meltfptr[404])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V405*/ meltfptr[404])))); ((meltobject_ptr_t)(/*_.VALDATA___V405*/ meltfptr[404]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V406*/ meltfptr[405]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V408*/ meltfptr[407])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V408*/ meltfptr[407])))); ((meltobject_ptr_t)(/*_.VALDATA___V408*/ meltfptr[407]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V409*/ meltfptr[408]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V408*/ meltfptr[407]); MELT_LOCATION("warmelt-base.melt:198:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V407*/ meltfptr[406])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V407*/ meltfptr[406])))); ((meltobject_ptr_t)(/*_.VALDATA___V407*/ meltfptr[406]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V408*/ meltfptr[407]); MELT_LOCATION("warmelt-base.melt:198:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V407*/ meltfptr[406])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V407*/ meltfptr[406])))); ((meltobject_ptr_t)(/*_.VALDATA___V407*/ meltfptr[406]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:198:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V407*/ meltfptr[406]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V411*/ meltfptr[410])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V411*/ meltfptr[410])))); ((meltobject_ptr_t)(/*_.VALDATA___V411*/ meltfptr[410]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V412*/ meltfptr[411]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V411*/ meltfptr[410]); MELT_LOCATION("warmelt-base.melt:198:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V410*/ meltfptr[409])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V410*/ meltfptr[409])))); ((meltobject_ptr_t)(/*_.VALDATA___V410*/ meltfptr[409]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V411*/ meltfptr[410]); MELT_LOCATION("warmelt-base.melt:198:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V410*/ meltfptr[409])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V410*/ meltfptr[409])))); ((meltobject_ptr_t)(/*_.VALDATA___V410*/ meltfptr[409]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:198:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V410*/ meltfptr[409]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V414*/ meltfptr[413])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V414*/ meltfptr[413])))); ((meltobject_ptr_t)(/*_.VALDATA___V414*/ meltfptr[413]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V415*/ meltfptr[414]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V414*/ meltfptr[413]); MELT_LOCATION("warmelt-base.melt:198:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V413*/ meltfptr[412])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V413*/ meltfptr[412])))); ((meltobject_ptr_t)(/*_.VALDATA___V413*/ meltfptr[412]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V414*/ meltfptr[413]); MELT_LOCATION("warmelt-base.melt:198:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V413*/ meltfptr[412])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V413*/ meltfptr[412])))); ((meltobject_ptr_t)(/*_.VALDATA___V413*/ meltfptr[412]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:198:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V413*/ meltfptr[412]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V416*/ meltfptr[415]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V416*/ meltfptr[415])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V416*/ meltfptr[415]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V407*/ meltfptr[406]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V416*/ meltfptr[415]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V416*/ meltfptr[415])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V416*/ meltfptr[415]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V410*/ meltfptr[409]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V416*/ meltfptr[415]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V416*/ meltfptr[415])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V416*/ meltfptr[415]))->tabval[2] = (melt_ptr_t)(/*_.VALDATA___V413*/ meltfptr[412]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V416*/ meltfptr[415]); MELT_LOCATION("warmelt-base.melt:198:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V405*/ meltfptr[404])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V405*/ meltfptr[404])))); ((meltobject_ptr_t)(/*_.VALDATA___V405*/ meltfptr[404]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V416*/ meltfptr[415]); MELT_LOCATION("warmelt-base.melt:198:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V405*/ meltfptr[404])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V405*/ meltfptr[404])))); ((meltobject_ptr_t)(/*_.VALDATA___V405*/ meltfptr[404]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V417*/ meltfptr[416]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V408*/ meltfptr[407]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V418*/ meltfptr[417]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V411*/ meltfptr[410]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V419*/ meltfptr[418]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V414*/ meltfptr[413]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V421*/ meltfptr[420]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V420*/ meltfptr[419]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V421*/ meltfptr[420]); MELT_LOCATION("warmelt-base.melt:198:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V405*/ meltfptr[404])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V405*/ meltfptr[404])))); ((meltobject_ptr_t)(/*_.VALDATA___V405*/ meltfptr[404]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V421*/ meltfptr[420]); MELT_LOCATION("warmelt-base.melt:198:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V405*/ meltfptr[404]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V422*/ meltfptr[421])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V422*/ meltfptr[421])))); ((meltobject_ptr_t)(/*_.VALDATA___V422*/ meltfptr[421]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V423*/ meltfptr[422]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V422*/ meltfptr[421]); MELT_LOCATION("warmelt-base.melt:205:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V424*/ meltfptr[423])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V424*/ meltfptr[423])))); ((meltobject_ptr_t)(/*_.VALDATA___V424*/ meltfptr[423]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V425*/ meltfptr[424]); MELT_LOCATION("warmelt-base.melt:205:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V426*/ meltfptr[425])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V426*/ meltfptr[425])))); ((meltobject_ptr_t)(/*_.VALDATA___V426*/ meltfptr[425]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V388*/ meltfptr[387]); MELT_LOCATION("warmelt-base.melt:205:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V426*/ meltfptr[425])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V426*/ meltfptr[425])))); ((meltobject_ptr_t)(/*_.VALDATA___V426*/ meltfptr[425]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:205:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V426*/ meltfptr[425]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V427*/ meltfptr[426]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V427*/ meltfptr[426])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V427*/ meltfptr[426]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V426*/ meltfptr[425]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V427*/ meltfptr[426]); MELT_LOCATION("warmelt-base.melt:205:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V424*/ meltfptr[423])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V424*/ meltfptr[423])))); ((meltobject_ptr_t)(/*_.VALDATA___V424*/ meltfptr[423]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V427*/ meltfptr[426]); MELT_LOCATION("warmelt-base.melt:205:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V424*/ meltfptr[423])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V424*/ meltfptr[423])))); ((meltobject_ptr_t)(/*_.VALDATA___V424*/ meltfptr[423]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V430*/ meltfptr[429]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V430*/ meltfptr[429])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V430*/ meltfptr[429]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V428*/ meltfptr[427]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V430*/ meltfptr[429]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V430*/ meltfptr[429])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V430*/ meltfptr[429]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V388*/ meltfptr[387]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V430*/ meltfptr[429]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V430*/ meltfptr[429])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V430*/ meltfptr[429]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V429*/ meltfptr[428]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V430*/ meltfptr[429]); MELT_LOCATION("warmelt-base.melt:205:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V424*/ meltfptr[423])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V424*/ meltfptr[423])))); ((meltobject_ptr_t)(/*_.VALDATA___V424*/ meltfptr[423]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V430*/ meltfptr[429]); MELT_LOCATION("warmelt-base.melt:205:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V424*/ meltfptr[423]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V431*/ meltfptr[430])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V431*/ meltfptr[430])))); ((meltobject_ptr_t)(/*_.VALDATA___V431*/ meltfptr[430]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V432*/ meltfptr[431]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V431*/ meltfptr[430]); MELT_LOCATION("warmelt-base.melt:209:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V433*/ meltfptr[432])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V433*/ meltfptr[432])))); ((meltobject_ptr_t)(/*_.VALDATA___V433*/ meltfptr[432]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V434*/ meltfptr[433]); MELT_LOCATION("warmelt-base.melt:209:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V435*/ meltfptr[434])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V435*/ meltfptr[434])))); ((meltobject_ptr_t)(/*_.VALDATA___V435*/ meltfptr[434]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V388*/ meltfptr[387]); MELT_LOCATION("warmelt-base.melt:209:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V435*/ meltfptr[434])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V435*/ meltfptr[434])))); ((meltobject_ptr_t)(/*_.VALDATA___V435*/ meltfptr[434]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:209:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V435*/ meltfptr[434]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V436*/ meltfptr[435]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V436*/ meltfptr[435])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V436*/ meltfptr[435]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V435*/ meltfptr[434]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V436*/ meltfptr[435]); MELT_LOCATION("warmelt-base.melt:209:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V433*/ meltfptr[432])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V433*/ meltfptr[432])))); ((meltobject_ptr_t)(/*_.VALDATA___V433*/ meltfptr[432]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V436*/ meltfptr[435]); MELT_LOCATION("warmelt-base.melt:209:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V433*/ meltfptr[432])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V433*/ meltfptr[432])))); ((meltobject_ptr_t)(/*_.VALDATA___V433*/ meltfptr[432]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V439*/ meltfptr[438]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V439*/ meltfptr[438])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V439*/ meltfptr[438]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V437*/ meltfptr[436]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V439*/ meltfptr[438]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V439*/ meltfptr[438])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V439*/ meltfptr[438]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V388*/ meltfptr[387]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V439*/ meltfptr[438]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V439*/ meltfptr[438])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V439*/ meltfptr[438]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V438*/ meltfptr[437]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V439*/ meltfptr[438]); MELT_LOCATION("warmelt-base.melt:209:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V433*/ meltfptr[432])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V433*/ meltfptr[432])))); ((meltobject_ptr_t)(/*_.VALDATA___V433*/ meltfptr[432]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V439*/ meltfptr[438]); #undef meltfram__ } /*end of warmelt_base_initialmeltchunk_2*/ void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_3 (struct frame_start_module_melt_st* meltframptr__, char predefinited[]) { #define meltfram__ (*meltframptr__) #undef meltcallcount #define meltcallcount 0L MELT_LOCATION("warmelt-base.melt:209:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V433*/ meltfptr[432]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V440*/ meltfptr[439])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V440*/ meltfptr[439])))); ((meltobject_ptr_t)(/*_.VALDATA___V440*/ meltfptr[439]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V441*/ meltfptr[440]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V440*/ meltfptr[439]); MELT_LOCATION("warmelt-base.melt:212:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V442*/ meltfptr[441])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V442*/ meltfptr[441])))); ((meltobject_ptr_t)(/*_.VALDATA___V442*/ meltfptr[441]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V443*/ meltfptr[442]); MELT_LOCATION("warmelt-base.melt:212:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V444*/ meltfptr[443])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V444*/ meltfptr[443])))); ((meltobject_ptr_t)(/*_.VALDATA___V444*/ meltfptr[443]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V388*/ meltfptr[387]); MELT_LOCATION("warmelt-base.melt:212:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V444*/ meltfptr[443])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V444*/ meltfptr[443])))); ((meltobject_ptr_t)(/*_.VALDATA___V444*/ meltfptr[443]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:212:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V444*/ meltfptr[443]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V445*/ meltfptr[444]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V445*/ meltfptr[444])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V445*/ meltfptr[444]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V444*/ meltfptr[443]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V445*/ meltfptr[444]); MELT_LOCATION("warmelt-base.melt:212:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V442*/ meltfptr[441])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V442*/ meltfptr[441])))); ((meltobject_ptr_t)(/*_.VALDATA___V442*/ meltfptr[441]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V445*/ meltfptr[444]); MELT_LOCATION("warmelt-base.melt:212:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V442*/ meltfptr[441])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V442*/ meltfptr[441])))); ((meltobject_ptr_t)(/*_.VALDATA___V442*/ meltfptr[441]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V448*/ meltfptr[447]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V448*/ meltfptr[447])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V448*/ meltfptr[447]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V446*/ meltfptr[445]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V448*/ meltfptr[447]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V448*/ meltfptr[447])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V448*/ meltfptr[447]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V388*/ meltfptr[387]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V448*/ meltfptr[447]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V448*/ meltfptr[447])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V448*/ meltfptr[447]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V447*/ meltfptr[446]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V448*/ meltfptr[447]); MELT_LOCATION("warmelt-base.melt:212:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V442*/ meltfptr[441])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V442*/ meltfptr[441])))); ((meltobject_ptr_t)(/*_.VALDATA___V442*/ meltfptr[441]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V448*/ meltfptr[447]); MELT_LOCATION("warmelt-base.melt:212:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V442*/ meltfptr[441]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V449*/ meltfptr[448])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V449*/ meltfptr[448])))); ((meltobject_ptr_t)(/*_.VALDATA___V449*/ meltfptr[448]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V450*/ meltfptr[449]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V449*/ meltfptr[448]); MELT_LOCATION("warmelt-base.melt:215:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V451*/ meltfptr[450])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V451*/ meltfptr[450])))); ((meltobject_ptr_t)(/*_.VALDATA___V451*/ meltfptr[450]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V452*/ meltfptr[451]); MELT_LOCATION("warmelt-base.melt:215:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V453*/ meltfptr[452])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V453*/ meltfptr[452])))); ((meltobject_ptr_t)(/*_.VALDATA___V453*/ meltfptr[452]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V388*/ meltfptr[387]); MELT_LOCATION("warmelt-base.melt:215:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V453*/ meltfptr[452])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V453*/ meltfptr[452])))); ((meltobject_ptr_t)(/*_.VALDATA___V453*/ meltfptr[452]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:215:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V453*/ meltfptr[452]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V454*/ meltfptr[453]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V454*/ meltfptr[453])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V454*/ meltfptr[453]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V453*/ meltfptr[452]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V454*/ meltfptr[453]); MELT_LOCATION("warmelt-base.melt:215:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V451*/ meltfptr[450])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V451*/ meltfptr[450])))); ((meltobject_ptr_t)(/*_.VALDATA___V451*/ meltfptr[450]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V454*/ meltfptr[453]); MELT_LOCATION("warmelt-base.melt:215:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V451*/ meltfptr[450])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V451*/ meltfptr[450])))); ((meltobject_ptr_t)(/*_.VALDATA___V451*/ meltfptr[450]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V457*/ meltfptr[456]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V457*/ meltfptr[456])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V457*/ meltfptr[456]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V455*/ meltfptr[454]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V457*/ meltfptr[456]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V457*/ meltfptr[456])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V457*/ meltfptr[456]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V388*/ meltfptr[387]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V457*/ meltfptr[456]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V457*/ meltfptr[456])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V457*/ meltfptr[456]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V456*/ meltfptr[455]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V457*/ meltfptr[456]); MELT_LOCATION("warmelt-base.melt:215:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V451*/ meltfptr[450])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V451*/ meltfptr[450])))); ((meltobject_ptr_t)(/*_.VALDATA___V451*/ meltfptr[450]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V457*/ meltfptr[456]); MELT_LOCATION("warmelt-base.melt:215:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V451*/ meltfptr[450]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V458*/ meltfptr[457])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V458*/ meltfptr[457])))); ((meltobject_ptr_t)(/*_.VALDATA___V458*/ meltfptr[457]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V459*/ meltfptr[458]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V458*/ meltfptr[457]); MELT_LOCATION("warmelt-base.melt:218:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V460*/ meltfptr[459])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V460*/ meltfptr[459])))); ((meltobject_ptr_t)(/*_.VALDATA___V460*/ meltfptr[459]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V461*/ meltfptr[460]); MELT_LOCATION("warmelt-base.melt:218:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V462*/ meltfptr[461])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V462*/ meltfptr[461])))); ((meltobject_ptr_t)(/*_.VALDATA___V462*/ meltfptr[461]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V388*/ meltfptr[387]); MELT_LOCATION("warmelt-base.melt:218:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V462*/ meltfptr[461])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V462*/ meltfptr[461])))); ((meltobject_ptr_t)(/*_.VALDATA___V462*/ meltfptr[461]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:218:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V462*/ meltfptr[461]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V463*/ meltfptr[462]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V463*/ meltfptr[462])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V463*/ meltfptr[462]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V462*/ meltfptr[461]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V463*/ meltfptr[462]); MELT_LOCATION("warmelt-base.melt:218:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V460*/ meltfptr[459])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V460*/ meltfptr[459])))); ((meltobject_ptr_t)(/*_.VALDATA___V460*/ meltfptr[459]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V463*/ meltfptr[462]); MELT_LOCATION("warmelt-base.melt:218:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V460*/ meltfptr[459])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V460*/ meltfptr[459])))); ((meltobject_ptr_t)(/*_.VALDATA___V460*/ meltfptr[459]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V466*/ meltfptr[465]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V466*/ meltfptr[465])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V466*/ meltfptr[465]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V464*/ meltfptr[463]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V466*/ meltfptr[465]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V466*/ meltfptr[465])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V466*/ meltfptr[465]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V388*/ meltfptr[387]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V466*/ meltfptr[465]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V466*/ meltfptr[465])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V466*/ meltfptr[465]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V465*/ meltfptr[464]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V466*/ meltfptr[465]); MELT_LOCATION("warmelt-base.melt:218:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V460*/ meltfptr[459])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V460*/ meltfptr[459])))); ((meltobject_ptr_t)(/*_.VALDATA___V460*/ meltfptr[459]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V466*/ meltfptr[465]); MELT_LOCATION("warmelt-base.melt:218:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V460*/ meltfptr[459]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V467*/ meltfptr[466])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V467*/ meltfptr[466])))); ((meltobject_ptr_t)(/*_.VALDATA___V467*/ meltfptr[466]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V468*/ meltfptr[467]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V467*/ meltfptr[466]); MELT_LOCATION("warmelt-base.melt:223:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V469*/ meltfptr[468])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V469*/ meltfptr[468])))); ((meltobject_ptr_t)(/*_.VALDATA___V469*/ meltfptr[468]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V470*/ meltfptr[469]); MELT_LOCATION("warmelt-base.melt:223:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V471*/ meltfptr[470])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V471*/ meltfptr[470])))); ((meltobject_ptr_t)(/*_.VALDATA___V471*/ meltfptr[470]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V408*/ meltfptr[407]); MELT_LOCATION("warmelt-base.melt:223:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V471*/ meltfptr[470])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V471*/ meltfptr[470])))); ((meltobject_ptr_t)(/*_.VALDATA___V471*/ meltfptr[470]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:223:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V471*/ meltfptr[470]); MELT_LOCATION("warmelt-base.melt:223:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V472*/ meltfptr[471])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V472*/ meltfptr[471])))); ((meltobject_ptr_t)(/*_.VALDATA___V472*/ meltfptr[471]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V411*/ meltfptr[410]); MELT_LOCATION("warmelt-base.melt:223:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V472*/ meltfptr[471])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V472*/ meltfptr[471])))); ((meltobject_ptr_t)(/*_.VALDATA___V472*/ meltfptr[471]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:223:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V472*/ meltfptr[471]); MELT_LOCATION("warmelt-base.melt:223:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V473*/ meltfptr[472])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V473*/ meltfptr[472])))); ((meltobject_ptr_t)(/*_.VALDATA___V473*/ meltfptr[472]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V414*/ meltfptr[413]); MELT_LOCATION("warmelt-base.melt:223:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V473*/ meltfptr[472])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V473*/ meltfptr[472])))); ((meltobject_ptr_t)(/*_.VALDATA___V473*/ meltfptr[472]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:223:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V473*/ meltfptr[472]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V475*/ meltfptr[474])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V475*/ meltfptr[474])))); ((meltobject_ptr_t)(/*_.VALDATA___V475*/ meltfptr[474]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V476*/ meltfptr[475]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V475*/ meltfptr[474]); MELT_LOCATION("warmelt-base.melt:223:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V474*/ meltfptr[473])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V474*/ meltfptr[473])))); ((meltobject_ptr_t)(/*_.VALDATA___V474*/ meltfptr[473]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V475*/ meltfptr[474]); MELT_LOCATION("warmelt-base.melt:223:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V474*/ meltfptr[473])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V474*/ meltfptr[473])))); ((meltobject_ptr_t)(/*_.VALDATA___V474*/ meltfptr[473]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:223:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V474*/ meltfptr[473]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V477*/ meltfptr[476]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V477*/ meltfptr[476])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V477*/ meltfptr[476]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V471*/ meltfptr[470]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V477*/ meltfptr[476]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V477*/ meltfptr[476])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V477*/ meltfptr[476]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V472*/ meltfptr[471]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V477*/ meltfptr[476]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V477*/ meltfptr[476])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V477*/ meltfptr[476]))->tabval[2] = (melt_ptr_t)(/*_.VALDATA___V473*/ meltfptr[472]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V477*/ meltfptr[476]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V477*/ meltfptr[476])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V477*/ meltfptr[476]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V474*/ meltfptr[473]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V477*/ meltfptr[476]); MELT_LOCATION("warmelt-base.melt:223:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V469*/ meltfptr[468])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V469*/ meltfptr[468])))); ((meltobject_ptr_t)(/*_.VALDATA___V469*/ meltfptr[468]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V477*/ meltfptr[476]); MELT_LOCATION("warmelt-base.melt:223:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V469*/ meltfptr[468])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V469*/ meltfptr[468])))); ((meltobject_ptr_t)(/*_.VALDATA___V469*/ meltfptr[468]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V478*/ meltfptr[477]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V408*/ meltfptr[407]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V479*/ meltfptr[478]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V411*/ meltfptr[410]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V480*/ meltfptr[479]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V414*/ meltfptr[413]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V481*/ meltfptr[480]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (7>=0 && 7< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))->tabval[7] = (melt_ptr_t)(/*_.VALDATA___V475*/ meltfptr[474]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (8>=0 && 8< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V483*/ meltfptr[482]))->tabval[8] = (melt_ptr_t)(/*_.VALSTR___V482*/ meltfptr[481]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V483*/ meltfptr[482]); MELT_LOCATION("warmelt-base.melt:223:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V469*/ meltfptr[468])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V469*/ meltfptr[468])))); ((meltobject_ptr_t)(/*_.VALDATA___V469*/ meltfptr[468]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V483*/ meltfptr[482]); MELT_LOCATION("warmelt-base.melt:223:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V469*/ meltfptr[468]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V484*/ meltfptr[483])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V484*/ meltfptr[483])))); ((meltobject_ptr_t)(/*_.VALDATA___V484*/ meltfptr[483]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V485*/ meltfptr[484]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V484*/ meltfptr[483]); MELT_LOCATION("warmelt-base.melt:232:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V486*/ meltfptr[485])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V486*/ meltfptr[485])))); ((meltobject_ptr_t)(/*_.VALDATA___V486*/ meltfptr[485]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V487*/ meltfptr[486]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V489*/ meltfptr[488])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V489*/ meltfptr[488])))); ((meltobject_ptr_t)(/*_.VALDATA___V489*/ meltfptr[488]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V490*/ meltfptr[489]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V489*/ meltfptr[488]); MELT_LOCATION("warmelt-base.melt:232:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V488*/ meltfptr[487])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V488*/ meltfptr[487])))); ((meltobject_ptr_t)(/*_.VALDATA___V488*/ meltfptr[487]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V489*/ meltfptr[488]); MELT_LOCATION("warmelt-base.melt:232:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V488*/ meltfptr[487])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V488*/ meltfptr[487])))); ((meltobject_ptr_t)(/*_.VALDATA___V488*/ meltfptr[487]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:232:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V488*/ meltfptr[487]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V491*/ meltfptr[490]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V491*/ meltfptr[490])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V491*/ meltfptr[490]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V488*/ meltfptr[487]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V491*/ meltfptr[490]); MELT_LOCATION("warmelt-base.melt:232:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V486*/ meltfptr[485])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V486*/ meltfptr[485])))); ((meltobject_ptr_t)(/*_.VALDATA___V486*/ meltfptr[485]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V491*/ meltfptr[490]); MELT_LOCATION("warmelt-base.melt:232:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V486*/ meltfptr[485])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V486*/ meltfptr[485])))); ((meltobject_ptr_t)(/*_.VALDATA___V486*/ meltfptr[485]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V494*/ meltfptr[493]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V494*/ meltfptr[493])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V494*/ meltfptr[493]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V492*/ meltfptr[491]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V494*/ meltfptr[493]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V494*/ meltfptr[493])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V494*/ meltfptr[493]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V489*/ meltfptr[488]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V494*/ meltfptr[493]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V494*/ meltfptr[493])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V494*/ meltfptr[493]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V493*/ meltfptr[492]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V494*/ meltfptr[493]); MELT_LOCATION("warmelt-base.melt:232:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V486*/ meltfptr[485])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V486*/ meltfptr[485])))); ((meltobject_ptr_t)(/*_.VALDATA___V486*/ meltfptr[485]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V494*/ meltfptr[493]); MELT_LOCATION("warmelt-base.melt:232:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V486*/ meltfptr[485]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V495*/ meltfptr[494])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V495*/ meltfptr[494])))); ((meltobject_ptr_t)(/*_.VALDATA___V495*/ meltfptr[494]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V496*/ meltfptr[495]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V495*/ meltfptr[494]); MELT_LOCATION("warmelt-base.melt:235:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V497*/ meltfptr[496])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V497*/ meltfptr[496])))); ((meltobject_ptr_t)(/*_.VALDATA___V497*/ meltfptr[496]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V498*/ meltfptr[497]); MELT_LOCATION("warmelt-base.melt:235:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V499*/ meltfptr[498])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V499*/ meltfptr[498])))); ((meltobject_ptr_t)(/*_.VALDATA___V499*/ meltfptr[498]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V489*/ meltfptr[488]); MELT_LOCATION("warmelt-base.melt:235:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V499*/ meltfptr[498])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V499*/ meltfptr[498])))); ((meltobject_ptr_t)(/*_.VALDATA___V499*/ meltfptr[498]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:235:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V499*/ meltfptr[498]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V500*/ meltfptr[499]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V500*/ meltfptr[499])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V500*/ meltfptr[499]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V499*/ meltfptr[498]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V500*/ meltfptr[499]); MELT_LOCATION("warmelt-base.melt:235:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V497*/ meltfptr[496])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V497*/ meltfptr[496])))); ((meltobject_ptr_t)(/*_.VALDATA___V497*/ meltfptr[496]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V500*/ meltfptr[499]); MELT_LOCATION("warmelt-base.melt:235:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V497*/ meltfptr[496])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V497*/ meltfptr[496])))); ((meltobject_ptr_t)(/*_.VALDATA___V497*/ meltfptr[496]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V503*/ meltfptr[502]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V503*/ meltfptr[502])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V503*/ meltfptr[502]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V501*/ meltfptr[500]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V503*/ meltfptr[502]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V503*/ meltfptr[502])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V503*/ meltfptr[502]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V489*/ meltfptr[488]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V503*/ meltfptr[502]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V503*/ meltfptr[502])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V503*/ meltfptr[502]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V502*/ meltfptr[501]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V503*/ meltfptr[502]); MELT_LOCATION("warmelt-base.melt:235:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V497*/ meltfptr[496])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V497*/ meltfptr[496])))); ((meltobject_ptr_t)(/*_.VALDATA___V497*/ meltfptr[496]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V503*/ meltfptr[502]); MELT_LOCATION("warmelt-base.melt:235:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V497*/ meltfptr[496]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V504*/ meltfptr[503])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V504*/ meltfptr[503])))); ((meltobject_ptr_t)(/*_.VALDATA___V504*/ meltfptr[503]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V505*/ meltfptr[504]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V504*/ meltfptr[503]); MELT_LOCATION("warmelt-base.melt:239:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V506*/ meltfptr[505])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V506*/ meltfptr[505])))); ((meltobject_ptr_t)(/*_.VALDATA___V506*/ meltfptr[505]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V507*/ meltfptr[506]); MELT_LOCATION("warmelt-base.melt:239:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V508*/ meltfptr[507])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V508*/ meltfptr[507])))); ((meltobject_ptr_t)(/*_.VALDATA___V508*/ meltfptr[507]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:239:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V508*/ meltfptr[507])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V508*/ meltfptr[507])))); ((meltobject_ptr_t)(/*_.VALDATA___V508*/ meltfptr[507]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:239:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V508*/ meltfptr[507]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V510*/ meltfptr[509])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V510*/ meltfptr[509])))); ((meltobject_ptr_t)(/*_.VALDATA___V510*/ meltfptr[509]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V511*/ meltfptr[510]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V510*/ meltfptr[509]); MELT_LOCATION("warmelt-base.melt:239:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V509*/ meltfptr[508])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V509*/ meltfptr[508])))); ((meltobject_ptr_t)(/*_.VALDATA___V509*/ meltfptr[508]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V510*/ meltfptr[509]); MELT_LOCATION("warmelt-base.melt:239:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V509*/ meltfptr[508])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V509*/ meltfptr[508])))); ((meltobject_ptr_t)(/*_.VALDATA___V509*/ meltfptr[508]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:239:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V509*/ meltfptr[508]); MELT_LOCATION("warmelt-base.melt:239:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V512*/ meltfptr[511])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V512*/ meltfptr[511])))); ((meltobject_ptr_t)(/*_.VALDATA___V512*/ meltfptr[511]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V489*/ meltfptr[488]); MELT_LOCATION("warmelt-base.melt:239:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V512*/ meltfptr[511])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V512*/ meltfptr[511])))); ((meltobject_ptr_t)(/*_.VALDATA___V512*/ meltfptr[511]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:239:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V512*/ meltfptr[511]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V513*/ meltfptr[512]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V513*/ meltfptr[512])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V513*/ meltfptr[512]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V508*/ meltfptr[507]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V513*/ meltfptr[512]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V513*/ meltfptr[512])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V513*/ meltfptr[512]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V509*/ meltfptr[508]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V513*/ meltfptr[512]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V513*/ meltfptr[512])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V513*/ meltfptr[512]))->tabval[2] = (melt_ptr_t)(/*_.VALDATA___V512*/ meltfptr[511]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V513*/ meltfptr[512]); MELT_LOCATION("warmelt-base.melt:239:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V506*/ meltfptr[505])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V506*/ meltfptr[505])))); ((meltobject_ptr_t)(/*_.VALDATA___V506*/ meltfptr[505]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V513*/ meltfptr[512]); MELT_LOCATION("warmelt-base.melt:239:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V506*/ meltfptr[505])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V506*/ meltfptr[505])))); ((meltobject_ptr_t)(/*_.VALDATA___V506*/ meltfptr[505]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V514*/ meltfptr[513]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V515*/ meltfptr[514]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V510*/ meltfptr[509]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V516*/ meltfptr[515]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V489*/ meltfptr[488]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V518*/ meltfptr[517]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V517*/ meltfptr[516]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V518*/ meltfptr[517]); MELT_LOCATION("warmelt-base.melt:239:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V506*/ meltfptr[505])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V506*/ meltfptr[505])))); ((meltobject_ptr_t)(/*_.VALDATA___V506*/ meltfptr[505]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V518*/ meltfptr[517]); MELT_LOCATION("warmelt-base.melt:239:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V506*/ meltfptr[505]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V519*/ meltfptr[518])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V519*/ meltfptr[518])))); ((meltobject_ptr_t)(/*_.VALDATA___V519*/ meltfptr[518]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V520*/ meltfptr[519]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V519*/ meltfptr[518]); MELT_LOCATION("warmelt-base.melt:246:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V521*/ meltfptr[520])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V521*/ meltfptr[520])))); ((meltobject_ptr_t)(/*_.VALDATA___V521*/ meltfptr[520]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V522*/ meltfptr[521]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V524*/ meltfptr[523])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V524*/ meltfptr[523])))); ((meltobject_ptr_t)(/*_.VALDATA___V524*/ meltfptr[523]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V525*/ meltfptr[524]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V524*/ meltfptr[523]); MELT_LOCATION("warmelt-base.melt:246:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V523*/ meltfptr[522])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V523*/ meltfptr[522])))); ((meltobject_ptr_t)(/*_.VALDATA___V523*/ meltfptr[522]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V524*/ meltfptr[523]); MELT_LOCATION("warmelt-base.melt:246:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V523*/ meltfptr[522])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V523*/ meltfptr[522])))); ((meltobject_ptr_t)(/*_.VALDATA___V523*/ meltfptr[522]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:246:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V523*/ meltfptr[522]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V526*/ meltfptr[525]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V526*/ meltfptr[525])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V526*/ meltfptr[525]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V523*/ meltfptr[522]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V526*/ meltfptr[525]); MELT_LOCATION("warmelt-base.melt:246:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V521*/ meltfptr[520])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V521*/ meltfptr[520])))); ((meltobject_ptr_t)(/*_.VALDATA___V521*/ meltfptr[520]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V526*/ meltfptr[525]); MELT_LOCATION("warmelt-base.melt:246:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V521*/ meltfptr[520])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V521*/ meltfptr[520])))); ((meltobject_ptr_t)(/*_.VALDATA___V521*/ meltfptr[520]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V529*/ meltfptr[528]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V529*/ meltfptr[528])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V529*/ meltfptr[528]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V527*/ meltfptr[526]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V529*/ meltfptr[528]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V529*/ meltfptr[528])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V529*/ meltfptr[528]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V524*/ meltfptr[523]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V529*/ meltfptr[528]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V529*/ meltfptr[528])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V529*/ meltfptr[528]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V528*/ meltfptr[527]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V529*/ meltfptr[528]); MELT_LOCATION("warmelt-base.melt:246:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V521*/ meltfptr[520])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V521*/ meltfptr[520])))); ((meltobject_ptr_t)(/*_.VALDATA___V521*/ meltfptr[520]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V529*/ meltfptr[528]); MELT_LOCATION("warmelt-base.melt:246:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V521*/ meltfptr[520]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V530*/ meltfptr[529])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V530*/ meltfptr[529])))); ((meltobject_ptr_t)(/*_.VALDATA___V530*/ meltfptr[529]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V531*/ meltfptr[530]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V530*/ meltfptr[529]); MELT_LOCATION("warmelt-base.melt:252:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V532*/ meltfptr[531])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V532*/ meltfptr[531])))); ((meltobject_ptr_t)(/*_.VALDATA___V532*/ meltfptr[531]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V533*/ meltfptr[532]); MELT_LOCATION("warmelt-base.melt:252:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V534*/ meltfptr[533])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V534*/ meltfptr[533])))); ((meltobject_ptr_t)(/*_.VALDATA___V534*/ meltfptr[533]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V475*/ meltfptr[474]); MELT_LOCATION("warmelt-base.melt:252:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V534*/ meltfptr[533])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V534*/ meltfptr[533])))); ((meltobject_ptr_t)(/*_.VALDATA___V534*/ meltfptr[533]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:252:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V534*/ meltfptr[533]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V536*/ meltfptr[535])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V536*/ meltfptr[535])))); ((meltobject_ptr_t)(/*_.VALDATA___V536*/ meltfptr[535]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V537*/ meltfptr[536]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V536*/ meltfptr[535]); MELT_LOCATION("warmelt-base.melt:252:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V535*/ meltfptr[534])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V535*/ meltfptr[534])))); ((meltobject_ptr_t)(/*_.VALDATA___V535*/ meltfptr[534]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V536*/ meltfptr[535]); MELT_LOCATION("warmelt-base.melt:252:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V535*/ meltfptr[534])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V535*/ meltfptr[534])))); ((meltobject_ptr_t)(/*_.VALDATA___V535*/ meltfptr[534]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:252:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V535*/ meltfptr[534]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V539*/ meltfptr[538])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V539*/ meltfptr[538])))); ((meltobject_ptr_t)(/*_.VALDATA___V539*/ meltfptr[538]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V540*/ meltfptr[539]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V539*/ meltfptr[538]); MELT_LOCATION("warmelt-base.melt:252:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V538*/ meltfptr[537])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V538*/ meltfptr[537])))); ((meltobject_ptr_t)(/*_.VALDATA___V538*/ meltfptr[537]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V539*/ meltfptr[538]); MELT_LOCATION("warmelt-base.melt:252:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V538*/ meltfptr[537])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V538*/ meltfptr[537])))); ((meltobject_ptr_t)(/*_.VALDATA___V538*/ meltfptr[537]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:252:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V538*/ meltfptr[537]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V541*/ meltfptr[540]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V541*/ meltfptr[540])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V541*/ meltfptr[540]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V534*/ meltfptr[533]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V541*/ meltfptr[540]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V541*/ meltfptr[540])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V541*/ meltfptr[540]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V535*/ meltfptr[534]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V541*/ meltfptr[540]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V541*/ meltfptr[540])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V541*/ meltfptr[540]))->tabval[2] = (melt_ptr_t)(/*_.VALDATA___V538*/ meltfptr[537]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V541*/ meltfptr[540]); MELT_LOCATION("warmelt-base.melt:252:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V532*/ meltfptr[531])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V532*/ meltfptr[531])))); ((meltobject_ptr_t)(/*_.VALDATA___V532*/ meltfptr[531]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V541*/ meltfptr[540]); MELT_LOCATION("warmelt-base.melt:252:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V532*/ meltfptr[531])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V532*/ meltfptr[531])))); ((meltobject_ptr_t)(/*_.VALDATA___V532*/ meltfptr[531]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V542*/ meltfptr[541]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V475*/ meltfptr[474]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V543*/ meltfptr[542]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V536*/ meltfptr[535]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V544*/ meltfptr[543]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V539*/ meltfptr[538]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V546*/ meltfptr[545]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V545*/ meltfptr[544]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V546*/ meltfptr[545]); MELT_LOCATION("warmelt-base.melt:252:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V532*/ meltfptr[531])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V532*/ meltfptr[531])))); ((meltobject_ptr_t)(/*_.VALDATA___V532*/ meltfptr[531]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V546*/ meltfptr[545]); MELT_LOCATION("warmelt-base.melt:252:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V532*/ meltfptr[531]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V547*/ meltfptr[546])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V547*/ meltfptr[546])))); ((meltobject_ptr_t)(/*_.VALDATA___V547*/ meltfptr[546]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V548*/ meltfptr[547]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V547*/ meltfptr[546]); MELT_LOCATION("warmelt-base.melt:258:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V549*/ meltfptr[548])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V549*/ meltfptr[548])))); ((meltobject_ptr_t)(/*_.VALDATA___V549*/ meltfptr[548]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V550*/ meltfptr[549]); MELT_LOCATION("warmelt-base.melt:258:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V551*/ meltfptr[550])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V551*/ meltfptr[550])))); ((meltobject_ptr_t)(/*_.VALDATA___V551*/ meltfptr[550]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V475*/ meltfptr[474]); MELT_LOCATION("warmelt-base.melt:258:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V551*/ meltfptr[550])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V551*/ meltfptr[550])))); ((meltobject_ptr_t)(/*_.VALDATA___V551*/ meltfptr[550]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:258:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V551*/ meltfptr[550]); MELT_LOCATION("warmelt-base.melt:258:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V552*/ meltfptr[551])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V552*/ meltfptr[551])))); ((meltobject_ptr_t)(/*_.VALDATA___V552*/ meltfptr[551]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V536*/ meltfptr[535]); MELT_LOCATION("warmelt-base.melt:258:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V552*/ meltfptr[551])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V552*/ meltfptr[551])))); ((meltobject_ptr_t)(/*_.VALDATA___V552*/ meltfptr[551]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:258:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V552*/ meltfptr[551]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V553*/ meltfptr[552]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V553*/ meltfptr[552])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V553*/ meltfptr[552]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V551*/ meltfptr[550]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V553*/ meltfptr[552]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V553*/ meltfptr[552])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V553*/ meltfptr[552]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V552*/ meltfptr[551]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V553*/ meltfptr[552]); MELT_LOCATION("warmelt-base.melt:258:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V549*/ meltfptr[548])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V549*/ meltfptr[548])))); ((meltobject_ptr_t)(/*_.VALDATA___V549*/ meltfptr[548]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V553*/ meltfptr[552]); MELT_LOCATION("warmelt-base.melt:258:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V549*/ meltfptr[548])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V549*/ meltfptr[548])))); ((meltobject_ptr_t)(/*_.VALDATA___V549*/ meltfptr[548]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V557*/ meltfptr[556]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V557*/ meltfptr[556])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V557*/ meltfptr[556]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V554*/ meltfptr[553]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V557*/ meltfptr[556]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V557*/ meltfptr[556])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V557*/ meltfptr[556]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V475*/ meltfptr[474]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V557*/ meltfptr[556]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V557*/ meltfptr[556])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V557*/ meltfptr[556]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V555*/ meltfptr[554]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V557*/ meltfptr[556]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V557*/ meltfptr[556])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V557*/ meltfptr[556]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V536*/ meltfptr[535]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V557*/ meltfptr[556]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V557*/ meltfptr[556])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V557*/ meltfptr[556]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V556*/ meltfptr[555]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V557*/ meltfptr[556]); MELT_LOCATION("warmelt-base.melt:258:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V549*/ meltfptr[548])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V549*/ meltfptr[548])))); ((meltobject_ptr_t)(/*_.VALDATA___V549*/ meltfptr[548]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V557*/ meltfptr[556]); MELT_LOCATION("warmelt-base.melt:258:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V549*/ meltfptr[548]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V558*/ meltfptr[557])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V558*/ meltfptr[557])))); ((meltobject_ptr_t)(/*_.VALDATA___V558*/ meltfptr[557]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V559*/ meltfptr[558]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V558*/ meltfptr[557]); MELT_LOCATION("warmelt-base.melt:265:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V560*/ meltfptr[559])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V560*/ meltfptr[559])))); ((meltobject_ptr_t)(/*_.VALDATA___V560*/ meltfptr[559]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V561*/ meltfptr[560]); MELT_LOCATION("warmelt-base.melt:265:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V562*/ meltfptr[561])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V562*/ meltfptr[561])))); ((meltobject_ptr_t)(/*_.VALDATA___V562*/ meltfptr[561]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V475*/ meltfptr[474]); MELT_LOCATION("warmelt-base.melt:265:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V562*/ meltfptr[561])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V562*/ meltfptr[561])))); ((meltobject_ptr_t)(/*_.VALDATA___V562*/ meltfptr[561]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:265:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V562*/ meltfptr[561]); MELT_LOCATION("warmelt-base.melt:265:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V563*/ meltfptr[562])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V563*/ meltfptr[562])))); ((meltobject_ptr_t)(/*_.VALDATA___V563*/ meltfptr[562]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V536*/ meltfptr[535]); MELT_LOCATION("warmelt-base.melt:265:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V563*/ meltfptr[562])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V563*/ meltfptr[562])))); ((meltobject_ptr_t)(/*_.VALDATA___V563*/ meltfptr[562]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:265:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V563*/ meltfptr[562]); MELT_LOCATION("warmelt-base.melt:265:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V564*/ meltfptr[563])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V564*/ meltfptr[563])))); ((meltobject_ptr_t)(/*_.VALDATA___V564*/ meltfptr[563]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V539*/ meltfptr[538]); MELT_LOCATION("warmelt-base.melt:265:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V564*/ meltfptr[563])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V564*/ meltfptr[563])))); ((meltobject_ptr_t)(/*_.VALDATA___V564*/ meltfptr[563]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:265:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V564*/ meltfptr[563]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V565*/ meltfptr[564]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V565*/ meltfptr[564])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V565*/ meltfptr[564]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V562*/ meltfptr[561]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V565*/ meltfptr[564]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V565*/ meltfptr[564])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V565*/ meltfptr[564]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V563*/ meltfptr[562]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V565*/ meltfptr[564]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V565*/ meltfptr[564])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V565*/ meltfptr[564]))->tabval[2] = (melt_ptr_t)(/*_.VALDATA___V564*/ meltfptr[563]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V565*/ meltfptr[564]); MELT_LOCATION("warmelt-base.melt:265:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V560*/ meltfptr[559])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V560*/ meltfptr[559])))); ((meltobject_ptr_t)(/*_.VALDATA___V560*/ meltfptr[559]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V565*/ meltfptr[564]); MELT_LOCATION("warmelt-base.melt:265:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V560*/ meltfptr[559])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V560*/ meltfptr[559])))); ((meltobject_ptr_t)(/*_.VALDATA___V560*/ meltfptr[559]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V566*/ meltfptr[565]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V475*/ meltfptr[474]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V567*/ meltfptr[566]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V536*/ meltfptr[535]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V568*/ meltfptr[567]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V539*/ meltfptr[538]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V570*/ meltfptr[569]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V569*/ meltfptr[568]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V570*/ meltfptr[569]); MELT_LOCATION("warmelt-base.melt:265:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V560*/ meltfptr[559])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V560*/ meltfptr[559])))); ((meltobject_ptr_t)(/*_.VALDATA___V560*/ meltfptr[559]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V570*/ meltfptr[569]); MELT_LOCATION("warmelt-base.melt:265:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V560*/ meltfptr[559]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V571*/ meltfptr[570])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V571*/ meltfptr[570])))); ((meltobject_ptr_t)(/*_.VALDATA___V571*/ meltfptr[570]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V572*/ meltfptr[571]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V571*/ meltfptr[570]); MELT_LOCATION("warmelt-base.melt:270:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V573*/ meltfptr[572])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V573*/ meltfptr[572])))); ((meltobject_ptr_t)(/*_.VALDATA___V573*/ meltfptr[572]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V574*/ meltfptr[573]); MELT_LOCATION("warmelt-base.melt:270:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V575*/ meltfptr[574])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V575*/ meltfptr[574])))); ((meltobject_ptr_t)(/*_.VALDATA___V575*/ meltfptr[574]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V475*/ meltfptr[474]); MELT_LOCATION("warmelt-base.melt:270:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V575*/ meltfptr[574])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V575*/ meltfptr[574])))); ((meltobject_ptr_t)(/*_.VALDATA___V575*/ meltfptr[574]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:270:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V575*/ meltfptr[574]); MELT_LOCATION("warmelt-base.melt:270:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V576*/ meltfptr[575])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V576*/ meltfptr[575])))); ((meltobject_ptr_t)(/*_.VALDATA___V576*/ meltfptr[575]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V536*/ meltfptr[535]); #undef meltfram__ } /*end of warmelt_base_initialmeltchunk_3*/ void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_4 (struct frame_start_module_melt_st* meltframptr__, char predefinited[]) { #define meltfram__ (*meltframptr__) #undef meltcallcount #define meltcallcount 0L MELT_LOCATION("warmelt-base.melt:270:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V576*/ meltfptr[575])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V576*/ meltfptr[575])))); ((meltobject_ptr_t)(/*_.VALDATA___V576*/ meltfptr[575]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:270:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V576*/ meltfptr[575]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V577*/ meltfptr[576]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V577*/ meltfptr[576])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V577*/ meltfptr[576]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V575*/ meltfptr[574]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V577*/ meltfptr[576]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V577*/ meltfptr[576])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V577*/ meltfptr[576]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V576*/ meltfptr[575]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V577*/ meltfptr[576]); MELT_LOCATION("warmelt-base.melt:270:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V573*/ meltfptr[572])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V573*/ meltfptr[572])))); ((meltobject_ptr_t)(/*_.VALDATA___V573*/ meltfptr[572]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V577*/ meltfptr[576]); MELT_LOCATION("warmelt-base.melt:270:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V573*/ meltfptr[572])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V573*/ meltfptr[572])))); ((meltobject_ptr_t)(/*_.VALDATA___V573*/ meltfptr[572]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V581*/ meltfptr[580]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V581*/ meltfptr[580])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V581*/ meltfptr[580]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V578*/ meltfptr[577]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V581*/ meltfptr[580]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V581*/ meltfptr[580])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V581*/ meltfptr[580]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V475*/ meltfptr[474]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V581*/ meltfptr[580]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V581*/ meltfptr[580])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V581*/ meltfptr[580]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V579*/ meltfptr[578]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V581*/ meltfptr[580]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V581*/ meltfptr[580])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V581*/ meltfptr[580]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V536*/ meltfptr[535]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V581*/ meltfptr[580]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V581*/ meltfptr[580])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V581*/ meltfptr[580]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V580*/ meltfptr[579]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V581*/ meltfptr[580]); MELT_LOCATION("warmelt-base.melt:270:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V573*/ meltfptr[572])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V573*/ meltfptr[572])))); ((meltobject_ptr_t)(/*_.VALDATA___V573*/ meltfptr[572]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V581*/ meltfptr[580]); MELT_LOCATION("warmelt-base.melt:270:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V573*/ meltfptr[572]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V582*/ meltfptr[581])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V582*/ meltfptr[581])))); ((meltobject_ptr_t)(/*_.VALDATA___V582*/ meltfptr[581]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V583*/ meltfptr[582]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V582*/ meltfptr[581]); MELT_LOCATION("warmelt-base.melt:275:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V584*/ meltfptr[583])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V584*/ meltfptr[583])))); ((meltobject_ptr_t)(/*_.VALDATA___V584*/ meltfptr[583]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V585*/ meltfptr[584]); MELT_LOCATION("warmelt-base.melt:275:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V586*/ meltfptr[585])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V586*/ meltfptr[585])))); ((meltobject_ptr_t)(/*_.VALDATA___V586*/ meltfptr[585]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V536*/ meltfptr[535]); MELT_LOCATION("warmelt-base.melt:275:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V586*/ meltfptr[585])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V586*/ meltfptr[585])))); ((meltobject_ptr_t)(/*_.VALDATA___V586*/ meltfptr[585]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:275:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V586*/ meltfptr[585]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V587*/ meltfptr[586]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V587*/ meltfptr[586])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V587*/ meltfptr[586]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V586*/ meltfptr[585]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V587*/ meltfptr[586]); MELT_LOCATION("warmelt-base.melt:275:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V584*/ meltfptr[583])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V584*/ meltfptr[583])))); ((meltobject_ptr_t)(/*_.VALDATA___V584*/ meltfptr[583]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V587*/ meltfptr[586]); MELT_LOCATION("warmelt-base.melt:275:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V584*/ meltfptr[583])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V584*/ meltfptr[583])))); ((meltobject_ptr_t)(/*_.VALDATA___V584*/ meltfptr[583]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V590*/ meltfptr[589]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V590*/ meltfptr[589])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V590*/ meltfptr[589]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V588*/ meltfptr[587]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V590*/ meltfptr[589]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V590*/ meltfptr[589])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V590*/ meltfptr[589]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V536*/ meltfptr[535]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V590*/ meltfptr[589]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V590*/ meltfptr[589])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V590*/ meltfptr[589]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V589*/ meltfptr[588]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V590*/ meltfptr[589]); MELT_LOCATION("warmelt-base.melt:275:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V584*/ meltfptr[583])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V584*/ meltfptr[583])))); ((meltobject_ptr_t)(/*_.VALDATA___V584*/ meltfptr[583]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V590*/ meltfptr[589]); MELT_LOCATION("warmelt-base.melt:275:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V584*/ meltfptr[583]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V591*/ meltfptr[590])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V591*/ meltfptr[590])))); ((meltobject_ptr_t)(/*_.VALDATA___V591*/ meltfptr[590]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V592*/ meltfptr[591]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V591*/ meltfptr[590]); MELT_LOCATION("warmelt-base.melt:280:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V593*/ meltfptr[592])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V593*/ meltfptr[592])))); ((meltobject_ptr_t)(/*_.VALDATA___V593*/ meltfptr[592]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V594*/ meltfptr[593]); MELT_LOCATION("warmelt-base.melt:280:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V595*/ meltfptr[594])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V595*/ meltfptr[594])))); ((meltobject_ptr_t)(/*_.VALDATA___V595*/ meltfptr[594]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V536*/ meltfptr[535]); MELT_LOCATION("warmelt-base.melt:280:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V595*/ meltfptr[594])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V595*/ meltfptr[594])))); ((meltobject_ptr_t)(/*_.VALDATA___V595*/ meltfptr[594]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:280:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V595*/ meltfptr[594]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V596*/ meltfptr[595]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V596*/ meltfptr[595])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V596*/ meltfptr[595]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V595*/ meltfptr[594]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V596*/ meltfptr[595]); MELT_LOCATION("warmelt-base.melt:280:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V593*/ meltfptr[592])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V593*/ meltfptr[592])))); ((meltobject_ptr_t)(/*_.VALDATA___V593*/ meltfptr[592]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V596*/ meltfptr[595]); MELT_LOCATION("warmelt-base.melt:280:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V593*/ meltfptr[592])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V593*/ meltfptr[592])))); ((meltobject_ptr_t)(/*_.VALDATA___V593*/ meltfptr[592]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V599*/ meltfptr[598]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V599*/ meltfptr[598])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V599*/ meltfptr[598]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V597*/ meltfptr[596]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V599*/ meltfptr[598]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V599*/ meltfptr[598])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V599*/ meltfptr[598]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V536*/ meltfptr[535]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V599*/ meltfptr[598]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V599*/ meltfptr[598])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V599*/ meltfptr[598]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V598*/ meltfptr[597]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V599*/ meltfptr[598]); MELT_LOCATION("warmelt-base.melt:280:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V593*/ meltfptr[592])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V593*/ meltfptr[592])))); ((meltobject_ptr_t)(/*_.VALDATA___V593*/ meltfptr[592]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V599*/ meltfptr[598]); MELT_LOCATION("warmelt-base.melt:280:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V593*/ meltfptr[592]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V600*/ meltfptr[599])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V600*/ meltfptr[599])))); ((meltobject_ptr_t)(/*_.VALDATA___V600*/ meltfptr[599]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V601*/ meltfptr[600]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V600*/ meltfptr[599]); MELT_LOCATION("warmelt-base.melt:287:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V602*/ meltfptr[601])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V602*/ meltfptr[601])))); ((meltobject_ptr_t)(/*_.VALDATA___V602*/ meltfptr[601]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V603*/ meltfptr[602]); MELT_LOCATION("warmelt-base.melt:287:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V604*/ meltfptr[603])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V604*/ meltfptr[603])))); ((meltobject_ptr_t)(/*_.VALDATA___V604*/ meltfptr[603]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V536*/ meltfptr[535]); MELT_LOCATION("warmelt-base.melt:287:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V604*/ meltfptr[603])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V604*/ meltfptr[603])))); ((meltobject_ptr_t)(/*_.VALDATA___V604*/ meltfptr[603]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:287:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V604*/ meltfptr[603]); MELT_LOCATION("warmelt-base.melt:287:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V605*/ meltfptr[604])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V605*/ meltfptr[604])))); ((meltobject_ptr_t)(/*_.VALDATA___V605*/ meltfptr[604]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V539*/ meltfptr[538]); MELT_LOCATION("warmelt-base.melt:287:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V605*/ meltfptr[604])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V605*/ meltfptr[604])))); ((meltobject_ptr_t)(/*_.VALDATA___V605*/ meltfptr[604]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:287:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V605*/ meltfptr[604]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V606*/ meltfptr[605]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V606*/ meltfptr[605])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V606*/ meltfptr[605]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V604*/ meltfptr[603]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V606*/ meltfptr[605]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V606*/ meltfptr[605])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V606*/ meltfptr[605]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V605*/ meltfptr[604]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V606*/ meltfptr[605]); MELT_LOCATION("warmelt-base.melt:287:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V602*/ meltfptr[601])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V602*/ meltfptr[601])))); ((meltobject_ptr_t)(/*_.VALDATA___V602*/ meltfptr[601]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V606*/ meltfptr[605]); MELT_LOCATION("warmelt-base.melt:287:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V602*/ meltfptr[601])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V602*/ meltfptr[601])))); ((meltobject_ptr_t)(/*_.VALDATA___V602*/ meltfptr[601]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V610*/ meltfptr[609]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V610*/ meltfptr[609])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V610*/ meltfptr[609]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V607*/ meltfptr[606]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V610*/ meltfptr[609]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V610*/ meltfptr[609])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V610*/ meltfptr[609]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V536*/ meltfptr[535]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V610*/ meltfptr[609]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V610*/ meltfptr[609])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V610*/ meltfptr[609]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V608*/ meltfptr[607]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V610*/ meltfptr[609]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V610*/ meltfptr[609])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V610*/ meltfptr[609]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V539*/ meltfptr[538]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V610*/ meltfptr[609]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V610*/ meltfptr[609])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V610*/ meltfptr[609]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V609*/ meltfptr[608]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V610*/ meltfptr[609]); MELT_LOCATION("warmelt-base.melt:287:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V602*/ meltfptr[601])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V602*/ meltfptr[601])))); ((meltobject_ptr_t)(/*_.VALDATA___V602*/ meltfptr[601]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V610*/ meltfptr[609]); MELT_LOCATION("warmelt-base.melt:287:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V602*/ meltfptr[601]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V611*/ meltfptr[610])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V611*/ meltfptr[610])))); ((meltobject_ptr_t)(/*_.VALDATA___V611*/ meltfptr[610]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V612*/ meltfptr[611]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V611*/ meltfptr[610]); MELT_LOCATION("warmelt-base.melt:294:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V613*/ meltfptr[612])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V613*/ meltfptr[612])))); ((meltobject_ptr_t)(/*_.VALDATA___V613*/ meltfptr[612]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V614*/ meltfptr[613]); MELT_LOCATION("warmelt-base.melt:294:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V615*/ meltfptr[614])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V615*/ meltfptr[614])))); ((meltobject_ptr_t)(/*_.VALDATA___V615*/ meltfptr[614]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V475*/ meltfptr[474]); MELT_LOCATION("warmelt-base.melt:294:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V615*/ meltfptr[614])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V615*/ meltfptr[614])))); ((meltobject_ptr_t)(/*_.VALDATA___V615*/ meltfptr[614]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:294:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V615*/ meltfptr[614]); MELT_LOCATION("warmelt-base.melt:294:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V616*/ meltfptr[615])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V616*/ meltfptr[615])))); ((meltobject_ptr_t)(/*_.VALDATA___V616*/ meltfptr[615]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V536*/ meltfptr[535]); MELT_LOCATION("warmelt-base.melt:294:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V616*/ meltfptr[615])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V616*/ meltfptr[615])))); ((meltobject_ptr_t)(/*_.VALDATA___V616*/ meltfptr[615]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:294:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V616*/ meltfptr[615]); MELT_LOCATION("warmelt-base.melt:294:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V617*/ meltfptr[616])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V617*/ meltfptr[616])))); ((meltobject_ptr_t)(/*_.VALDATA___V617*/ meltfptr[616]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V539*/ meltfptr[538]); MELT_LOCATION("warmelt-base.melt:294:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V617*/ meltfptr[616])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V617*/ meltfptr[616])))); ((meltobject_ptr_t)(/*_.VALDATA___V617*/ meltfptr[616]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:294:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V617*/ meltfptr[616]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V618*/ meltfptr[617]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V618*/ meltfptr[617])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V618*/ meltfptr[617]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V615*/ meltfptr[614]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V618*/ meltfptr[617]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V618*/ meltfptr[617])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V618*/ meltfptr[617]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V616*/ meltfptr[615]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V618*/ meltfptr[617]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V618*/ meltfptr[617])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V618*/ meltfptr[617]))->tabval[2] = (melt_ptr_t)(/*_.VALDATA___V617*/ meltfptr[616]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V618*/ meltfptr[617]); MELT_LOCATION("warmelt-base.melt:294:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V613*/ meltfptr[612])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V613*/ meltfptr[612])))); ((meltobject_ptr_t)(/*_.VALDATA___V613*/ meltfptr[612]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V618*/ meltfptr[617]); MELT_LOCATION("warmelt-base.melt:294:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V613*/ meltfptr[612])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V613*/ meltfptr[612])))); ((meltobject_ptr_t)(/*_.VALDATA___V613*/ meltfptr[612]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V619*/ meltfptr[618]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V475*/ meltfptr[474]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V620*/ meltfptr[619]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V536*/ meltfptr[535]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V621*/ meltfptr[620]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V539*/ meltfptr[538]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V623*/ meltfptr[622]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V622*/ meltfptr[621]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V623*/ meltfptr[622]); MELT_LOCATION("warmelt-base.melt:294:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V613*/ meltfptr[612])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V613*/ meltfptr[612])))); ((meltobject_ptr_t)(/*_.VALDATA___V613*/ meltfptr[612]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V623*/ meltfptr[622]); MELT_LOCATION("warmelt-base.melt:294:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V613*/ meltfptr[612]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V624*/ meltfptr[623])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V624*/ meltfptr[623])))); ((meltobject_ptr_t)(/*_.VALDATA___V624*/ meltfptr[623]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V625*/ meltfptr[624]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V624*/ meltfptr[623]); MELT_LOCATION("warmelt-base.melt:298:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V626*/ meltfptr[625])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V626*/ meltfptr[625])))); ((meltobject_ptr_t)(/*_.VALDATA___V626*/ meltfptr[625]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V627*/ meltfptr[626]); MELT_LOCATION("warmelt-base.melt:298:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V628*/ meltfptr[627])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V628*/ meltfptr[627])))); ((meltobject_ptr_t)(/*_.VALDATA___V628*/ meltfptr[627]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V475*/ meltfptr[474]); MELT_LOCATION("warmelt-base.melt:298:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V628*/ meltfptr[627])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V628*/ meltfptr[627])))); ((meltobject_ptr_t)(/*_.VALDATA___V628*/ meltfptr[627]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:298:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V628*/ meltfptr[627]); MELT_LOCATION("warmelt-base.melt:298:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V629*/ meltfptr[628])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V629*/ meltfptr[628])))); ((meltobject_ptr_t)(/*_.VALDATA___V629*/ meltfptr[628]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V536*/ meltfptr[535]); MELT_LOCATION("warmelt-base.melt:298:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V629*/ meltfptr[628])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V629*/ meltfptr[628])))); ((meltobject_ptr_t)(/*_.VALDATA___V629*/ meltfptr[628]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:298:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V629*/ meltfptr[628]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V630*/ meltfptr[629]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V630*/ meltfptr[629])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V630*/ meltfptr[629]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V628*/ meltfptr[627]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V630*/ meltfptr[629]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V630*/ meltfptr[629])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V630*/ meltfptr[629]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V629*/ meltfptr[628]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V630*/ meltfptr[629]); MELT_LOCATION("warmelt-base.melt:298:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V626*/ meltfptr[625])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V626*/ meltfptr[625])))); ((meltobject_ptr_t)(/*_.VALDATA___V626*/ meltfptr[625]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V630*/ meltfptr[629]); MELT_LOCATION("warmelt-base.melt:298:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V626*/ meltfptr[625])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V626*/ meltfptr[625])))); ((meltobject_ptr_t)(/*_.VALDATA___V626*/ meltfptr[625]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V634*/ meltfptr[633]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V634*/ meltfptr[633])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V634*/ meltfptr[633]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V631*/ meltfptr[630]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V634*/ meltfptr[633]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V634*/ meltfptr[633])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V634*/ meltfptr[633]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V475*/ meltfptr[474]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V634*/ meltfptr[633]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V634*/ meltfptr[633])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V634*/ meltfptr[633]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V632*/ meltfptr[631]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V634*/ meltfptr[633]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V634*/ meltfptr[633])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V634*/ meltfptr[633]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V536*/ meltfptr[535]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V634*/ meltfptr[633]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V634*/ meltfptr[633])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V634*/ meltfptr[633]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V633*/ meltfptr[632]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V634*/ meltfptr[633]); MELT_LOCATION("warmelt-base.melt:298:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V626*/ meltfptr[625])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V626*/ meltfptr[625])))); ((meltobject_ptr_t)(/*_.VALDATA___V626*/ meltfptr[625]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V634*/ meltfptr[633]); MELT_LOCATION("warmelt-base.melt:298:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V626*/ meltfptr[625]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V635*/ meltfptr[634])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V635*/ meltfptr[634])))); ((meltobject_ptr_t)(/*_.VALDATA___V635*/ meltfptr[634]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V636*/ meltfptr[635]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V635*/ meltfptr[634]); MELT_LOCATION("warmelt-base.melt:303:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V637*/ meltfptr[636])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V637*/ meltfptr[636])))); ((meltobject_ptr_t)(/*_.VALDATA___V637*/ meltfptr[636]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V638*/ meltfptr[637]); MELT_LOCATION("warmelt-base.melt:303:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V639*/ meltfptr[638])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V639*/ meltfptr[638])))); ((meltobject_ptr_t)(/*_.VALDATA___V639*/ meltfptr[638]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V536*/ meltfptr[535]); MELT_LOCATION("warmelt-base.melt:303:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V639*/ meltfptr[638])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V639*/ meltfptr[638])))); ((meltobject_ptr_t)(/*_.VALDATA___V639*/ meltfptr[638]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:303:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V639*/ meltfptr[638]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V640*/ meltfptr[639]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V640*/ meltfptr[639])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V640*/ meltfptr[639]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V639*/ meltfptr[638]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V640*/ meltfptr[639]); MELT_LOCATION("warmelt-base.melt:303:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V637*/ meltfptr[636])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V637*/ meltfptr[636])))); ((meltobject_ptr_t)(/*_.VALDATA___V637*/ meltfptr[636]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V640*/ meltfptr[639]); MELT_LOCATION("warmelt-base.melt:303:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V637*/ meltfptr[636])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V637*/ meltfptr[636])))); ((meltobject_ptr_t)(/*_.VALDATA___V637*/ meltfptr[636]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V643*/ meltfptr[642]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V643*/ meltfptr[642])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V643*/ meltfptr[642]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V641*/ meltfptr[640]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V643*/ meltfptr[642]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V643*/ meltfptr[642])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V643*/ meltfptr[642]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V536*/ meltfptr[535]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V643*/ meltfptr[642]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V643*/ meltfptr[642])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V643*/ meltfptr[642]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V642*/ meltfptr[641]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V643*/ meltfptr[642]); MELT_LOCATION("warmelt-base.melt:303:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V637*/ meltfptr[636])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V637*/ meltfptr[636])))); ((meltobject_ptr_t)(/*_.VALDATA___V637*/ meltfptr[636]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V643*/ meltfptr[642]); MELT_LOCATION("warmelt-base.melt:303:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V637*/ meltfptr[636]); MELT_LOCATION("warmelt-base.melt:309:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643])))); ((meltobject_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V645*/ meltfptr[644]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V647*/ meltfptr[646])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V647*/ meltfptr[646])))); ((meltobject_ptr_t)(/*_.VALDATA___V647*/ meltfptr[646]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V648*/ meltfptr[647]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V647*/ meltfptr[646]); MELT_LOCATION("warmelt-base.melt:309:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V646*/ meltfptr[645])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V646*/ meltfptr[645])))); ((meltobject_ptr_t)(/*_.VALDATA___V646*/ meltfptr[645]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V647*/ meltfptr[646]); MELT_LOCATION("warmelt-base.melt:309:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V646*/ meltfptr[645])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V646*/ meltfptr[645])))); ((meltobject_ptr_t)(/*_.VALDATA___V646*/ meltfptr[645]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:309:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V646*/ meltfptr[645]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V650*/ meltfptr[649])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V650*/ meltfptr[649])))); ((meltobject_ptr_t)(/*_.VALDATA___V650*/ meltfptr[649]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V651*/ meltfptr[650]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V650*/ meltfptr[649]); MELT_LOCATION("warmelt-base.melt:309:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V649*/ meltfptr[648])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V649*/ meltfptr[648])))); ((meltobject_ptr_t)(/*_.VALDATA___V649*/ meltfptr[648]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V650*/ meltfptr[649]); MELT_LOCATION("warmelt-base.melt:309:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V649*/ meltfptr[648])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V649*/ meltfptr[648])))); ((meltobject_ptr_t)(/*_.VALDATA___V649*/ meltfptr[648]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:309:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V649*/ meltfptr[648]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V652*/ meltfptr[651]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V652*/ meltfptr[651])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V652*/ meltfptr[651]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V646*/ meltfptr[645]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V652*/ meltfptr[651]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V652*/ meltfptr[651])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V652*/ meltfptr[651]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V649*/ meltfptr[648]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V652*/ meltfptr[651]); MELT_LOCATION("warmelt-base.melt:309:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643])))); ((meltobject_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V652*/ meltfptr[651]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V653*/ meltfptr[652])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V653*/ meltfptr[652])))); ((meltobject_ptr_t)(/*_.VALDATA___V653*/ meltfptr[652]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V654*/ meltfptr[653]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V653*/ meltfptr[652]); MELT_LOCATION("warmelt-base.melt:309:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643])))); ((meltobject_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643]))->obj_vartab[3] = (melt_ptr_t)( /*_.VALDATA___V653*/ meltfptr[652]); MELT_LOCATION("warmelt-base.melt:309:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V655*/ meltfptr[654])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V655*/ meltfptr[654])))); ((meltobject_ptr_t)(/*_.VALDATA___V655*/ meltfptr[654]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V42*/ meltfptr[41]); MELT_LOCATION("warmelt-base.melt:309:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V655*/ meltfptr[654])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V655*/ meltfptr[654])))); ((meltobject_ptr_t)(/*_.VALDATA___V655*/ meltfptr[654]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:309:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V655*/ meltfptr[654]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V656*/ meltfptr[655]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V656*/ meltfptr[655])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V656*/ meltfptr[655]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V655*/ meltfptr[654]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V656*/ meltfptr[655]); MELT_LOCATION("warmelt-base.melt:309:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643])))); ((meltobject_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V656*/ meltfptr[655]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V657*/ meltfptr[656]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V653*/ meltfptr[652]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V658*/ meltfptr[657]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V653*/ meltfptr[652]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V659*/ meltfptr[658]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V647*/ meltfptr[646]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V660*/ meltfptr[659]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (7>=0 && 7< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[7] = (melt_ptr_t)(/*_.VALDATA___V653*/ meltfptr[652]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (8>=0 && 8< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[8] = (melt_ptr_t)(/*_.VALSTR___V661*/ meltfptr[660]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (9>=0 && 9< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[9] = (melt_ptr_t)(/*_.VALDATA___V650*/ meltfptr[649]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (10>=0 && 10< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[10] = (melt_ptr_t)(/*_.VALSTR___V662*/ meltfptr[661]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (11>=0 && 11< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[11] = (melt_ptr_t)(/*_.VALDATA___V653*/ meltfptr[652]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (12>=0 && 12< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[12] = (melt_ptr_t)(/*_.VALSTR___V663*/ meltfptr[662]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (13>=0 && 13< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[13] = (melt_ptr_t)(/*_.VALDATA___V653*/ meltfptr[652]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (14>=0 && 14< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[14] = (melt_ptr_t)(/*_.VALSTR___V664*/ meltfptr[663]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (15>=0 && 15< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[15] = (melt_ptr_t)(/*_.VALDATA___V653*/ meltfptr[652]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (16>=0 && 16< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[16] = (melt_ptr_t)(/*_.VALSTR___V665*/ meltfptr[664]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (17>=0 && 17< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[17] = (melt_ptr_t)(/*_.VALDATA___V653*/ meltfptr[652]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (18>=0 && 18< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[18] = (melt_ptr_t)(/*_.VALSTR___V666*/ meltfptr[665]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (19>=0 && 19< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[19] = (melt_ptr_t)(/*_.VALDATA___V653*/ meltfptr[652]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (20>=0 && 20< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[20] = (melt_ptr_t)(/*_.VALSTR___V667*/ meltfptr[666]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (21>=0 && 21< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[21] = (melt_ptr_t)(/*_.VALDATA___V653*/ meltfptr[652]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (22>=0 && 22< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[22] = (melt_ptr_t)(/*_.VALSTR___V668*/ meltfptr[667]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (23>=0 && 23< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[23] = (melt_ptr_t)(/*_.VALDATA___V42*/ meltfptr[41]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (24>=0 && 24< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[24] = (melt_ptr_t)(/*_.VALSTR___V669*/ meltfptr[668]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (25>=0 && 25< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[25] = (melt_ptr_t)(/*_.VALDATA___V653*/ meltfptr[652]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (26>=0 && 26< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V671*/ meltfptr[670]))->tabval[26] = (melt_ptr_t)(/*_.VALSTR___V670*/ meltfptr[669]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V671*/ meltfptr[670]); MELT_LOCATION("warmelt-base.melt:309:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (5>=0 && 5< melt_object_length((melt_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643])))); ((meltobject_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643]))->obj_vartab[5] = (melt_ptr_t)( /*_.VALTUP___V671*/ meltfptr[670]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V673*/ meltfptr[672]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V673*/ meltfptr[672])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V673*/ meltfptr[672]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V672*/ meltfptr[671]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V673*/ meltfptr[672]); MELT_LOCATION("warmelt-base.melt:309:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (6>=0 && 6< melt_object_length((melt_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643])))); ((meltobject_ptr_t)(/*_.VALDATA___V644*/ meltfptr[643]))->obj_vartab[6] = (melt_ptr_t)( /*_.VALTUP___V673*/ meltfptr[672]); MELT_LOCATION("warmelt-base.melt:309:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V644*/ meltfptr[643]); MELT_LOCATION("warmelt-base.melt:333:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673])))); ((meltobject_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V675*/ meltfptr[674]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V677*/ meltfptr[676])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V677*/ meltfptr[676])))); ((meltobject_ptr_t)(/*_.VALDATA___V677*/ meltfptr[676]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V678*/ meltfptr[677]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V677*/ meltfptr[676]); MELT_LOCATION("warmelt-base.melt:333:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V676*/ meltfptr[675])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V676*/ meltfptr[675])))); ((meltobject_ptr_t)(/*_.VALDATA___V676*/ meltfptr[675]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V677*/ meltfptr[676]); MELT_LOCATION("warmelt-base.melt:333:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V676*/ meltfptr[675])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V676*/ meltfptr[675])))); ((meltobject_ptr_t)(/*_.VALDATA___V676*/ meltfptr[675]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:333:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V676*/ meltfptr[675]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V679*/ meltfptr[678]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V679*/ meltfptr[678])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V679*/ meltfptr[678]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V676*/ meltfptr[675]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V679*/ meltfptr[678]); MELT_LOCATION("warmelt-base.melt:333:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673])))); ((meltobject_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V679*/ meltfptr[678]); MELT_LOCATION("warmelt-base.melt:333:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V680*/ meltfptr[679])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V680*/ meltfptr[679])))); ((meltobject_ptr_t)(/*_.VALDATA___V680*/ meltfptr[679]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V219*/ meltfptr[218]); MELT_LOCATION("warmelt-base.melt:333:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V680*/ meltfptr[679])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V680*/ meltfptr[679])))); ((meltobject_ptr_t)(/*_.VALDATA___V680*/ meltfptr[679]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:333:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V680*/ meltfptr[679]); MELT_LOCATION("warmelt-base.melt:333:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673])))); ((meltobject_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673]))->obj_vartab[3] = (melt_ptr_t)( /*_.VALDATA___V680*/ meltfptr[679]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V682*/ meltfptr[681])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V682*/ meltfptr[681])))); ((meltobject_ptr_t)(/*_.VALDATA___V682*/ meltfptr[681]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V683*/ meltfptr[682]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V682*/ meltfptr[681]); MELT_LOCATION("warmelt-base.melt:333:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V681*/ meltfptr[680])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V681*/ meltfptr[680])))); ((meltobject_ptr_t)(/*_.VALDATA___V681*/ meltfptr[680]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V682*/ meltfptr[681]); MELT_LOCATION("warmelt-base.melt:333:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V681*/ meltfptr[680])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V681*/ meltfptr[680])))); ((meltobject_ptr_t)(/*_.VALDATA___V681*/ meltfptr[680]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:333:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V681*/ meltfptr[680]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V684*/ meltfptr[683]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V684*/ meltfptr[683])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V684*/ meltfptr[683]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V681*/ meltfptr[680]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V684*/ meltfptr[683]); MELT_LOCATION("warmelt-base.melt:333:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673])))); ((meltobject_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V684*/ meltfptr[683]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V685*/ meltfptr[684])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V685*/ meltfptr[684])))); ((meltobject_ptr_t)(/*_.VALDATA___V685*/ meltfptr[684]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V686*/ meltfptr[685]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V685*/ meltfptr[684]); MELT_LOCATION("warmelt-base.melt:333:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (5>=0 && 5< melt_object_length((melt_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673])))); ((meltobject_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673]))->obj_vartab[5] = (melt_ptr_t)( /*_.VALDATA___V685*/ meltfptr[684]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V687*/ meltfptr[686]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V685*/ meltfptr[684]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V688*/ meltfptr[687]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V677*/ meltfptr[676]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V689*/ meltfptr[688]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V219*/ meltfptr[218]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V690*/ meltfptr[689]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (7>=0 && 7< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))->tabval[7] = (melt_ptr_t)(/*_.VALDATA___V677*/ meltfptr[676]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (8>=0 && 8< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V692*/ meltfptr[691]))->tabval[8] = (melt_ptr_t)(/*_.VALSTR___V691*/ meltfptr[690]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V692*/ meltfptr[691]); MELT_LOCATION("warmelt-base.melt:333:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (6>=0 && 6< melt_object_length((melt_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673])))); ((meltobject_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673]))->obj_vartab[6] = (melt_ptr_t)( /*_.VALTUP___V692*/ meltfptr[691]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V693*/ meltfptr[692]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V685*/ meltfptr[684]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V694*/ meltfptr[693]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V682*/ meltfptr[681]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V695*/ meltfptr[694]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V219*/ meltfptr[218]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V696*/ meltfptr[695]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (7>=0 && 7< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))->tabval[7] = (melt_ptr_t)(/*_.VALDATA___V677*/ meltfptr[676]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (8>=0 && 8< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V698*/ meltfptr[697]))->tabval[8] = (melt_ptr_t)(/*_.VALSTR___V697*/ meltfptr[696]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V698*/ meltfptr[697]); MELT_LOCATION("warmelt-base.melt:333:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (7>=0 && 7< melt_object_length((melt_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673])))); ((meltobject_ptr_t)(/*_.VALDATA___V674*/ meltfptr[673]))->obj_vartab[7] = (melt_ptr_t)( /*_.VALTUP___V698*/ meltfptr[697]); MELT_LOCATION("warmelt-base.melt:333:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V674*/ meltfptr[673]); MELT_LOCATION("warmelt-base.melt:347:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698])))); ((meltobject_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V700*/ meltfptr[699]); MELT_LOCATION("warmelt-base.melt:347:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V701*/ meltfptr[700])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V701*/ meltfptr[700])))); ((meltobject_ptr_t)(/*_.VALDATA___V701*/ meltfptr[700]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V677*/ meltfptr[676]); MELT_LOCATION("warmelt-base.melt:347:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V701*/ meltfptr[700])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V701*/ meltfptr[700])))); ((meltobject_ptr_t)(/*_.VALDATA___V701*/ meltfptr[700]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:347:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V701*/ meltfptr[700]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V702*/ meltfptr[701]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V702*/ meltfptr[701])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V702*/ meltfptr[701]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V701*/ meltfptr[700]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V702*/ meltfptr[701]); MELT_LOCATION("warmelt-base.melt:347:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698])))); ((meltobject_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V702*/ meltfptr[701]); MELT_LOCATION("warmelt-base.melt:347:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V703*/ meltfptr[702])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V703*/ meltfptr[702])))); ((meltobject_ptr_t)(/*_.VALDATA___V703*/ meltfptr[702]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V219*/ meltfptr[218]); MELT_LOCATION("warmelt-base.melt:347:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V703*/ meltfptr[702])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V703*/ meltfptr[702])))); ((meltobject_ptr_t)(/*_.VALDATA___V703*/ meltfptr[702]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:347:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V703*/ meltfptr[702]); MELT_LOCATION("warmelt-base.melt:347:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698])))); ((meltobject_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698]))->obj_vartab[3] = (melt_ptr_t)( /*_.VALDATA___V703*/ meltfptr[702]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V704*/ meltfptr[703]); MELT_LOCATION("warmelt-base.melt:347:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698])))); ((meltobject_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V704*/ meltfptr[703]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V705*/ meltfptr[704])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V705*/ meltfptr[704])))); ((meltobject_ptr_t)(/*_.VALDATA___V705*/ meltfptr[704]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V706*/ meltfptr[705]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V705*/ meltfptr[704]); MELT_LOCATION("warmelt-base.melt:347:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (5>=0 && 5< melt_object_length((melt_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698])))); ((meltobject_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698]))->obj_vartab[5] = (melt_ptr_t)( /*_.VALDATA___V705*/ meltfptr[704]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V707*/ meltfptr[706]); #undef meltfram__ } /*end of warmelt_base_initialmeltchunk_4*/ void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_5 (struct frame_start_module_melt_st* meltframptr__, char predefinited[]) { #define meltfram__ (*meltframptr__) #undef meltcallcount #define meltcallcount 0L /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V705*/ meltfptr[704]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V708*/ meltfptr[707]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V219*/ meltfptr[218]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V709*/ meltfptr[708]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V677*/ meltfptr[676]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V711*/ meltfptr[710]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V710*/ meltfptr[709]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V711*/ meltfptr[710]); MELT_LOCATION("warmelt-base.melt:347:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (6>=0 && 6< melt_object_length((melt_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698])))); ((meltobject_ptr_t)(/*_.VALDATA___V699*/ meltfptr[698]))->obj_vartab[6] = (melt_ptr_t)( /*_.VALTUP___V711*/ meltfptr[710]); MELT_LOCATION("warmelt-base.melt:347:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V699*/ meltfptr[698]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V712*/ meltfptr[711])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V712*/ meltfptr[711])))); ((meltobject_ptr_t)(/*_.VALDATA___V712*/ meltfptr[711]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V713*/ meltfptr[712]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V712*/ meltfptr[711]); MELT_LOCATION("warmelt-base.melt:360:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V714*/ meltfptr[713])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V714*/ meltfptr[713])))); ((meltobject_ptr_t)(/*_.VALDATA___V714*/ meltfptr[713]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V715*/ meltfptr[714]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V716*/ meltfptr[715]); MELT_LOCATION("warmelt-base.melt:360:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V714*/ meltfptr[713])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V714*/ meltfptr[713])))); ((meltobject_ptr_t)(/*_.VALDATA___V714*/ meltfptr[713]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V716*/ meltfptr[715]); MELT_LOCATION("warmelt-base.melt:360:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V714*/ meltfptr[713])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V714*/ meltfptr[713])))); ((meltobject_ptr_t)(/*_.VALDATA___V714*/ meltfptr[713]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V718*/ meltfptr[717]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V718*/ meltfptr[717])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V718*/ meltfptr[717]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V717*/ meltfptr[716]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V718*/ meltfptr[717]); MELT_LOCATION("warmelt-base.melt:360:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V714*/ meltfptr[713])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V714*/ meltfptr[713])))); ((meltobject_ptr_t)(/*_.VALDATA___V714*/ meltfptr[713]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V718*/ meltfptr[717]); MELT_LOCATION("warmelt-base.melt:360:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V714*/ meltfptr[713]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V719*/ meltfptr[718])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V719*/ meltfptr[718])))); ((meltobject_ptr_t)(/*_.VALDATA___V719*/ meltfptr[718]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V720*/ meltfptr[719]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V719*/ meltfptr[718]); MELT_LOCATION("warmelt-base.melt:364:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V721*/ meltfptr[720])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V721*/ meltfptr[720])))); ((meltobject_ptr_t)(/*_.VALDATA___V721*/ meltfptr[720]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V722*/ meltfptr[721]); MELT_LOCATION("warmelt-base.melt:364:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V723*/ meltfptr[722])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V723*/ meltfptr[722])))); ((meltobject_ptr_t)(/*_.VALDATA___V723*/ meltfptr[722]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:364:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V723*/ meltfptr[722])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V723*/ meltfptr[722])))); ((meltobject_ptr_t)(/*_.VALDATA___V723*/ meltfptr[722]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:364:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V723*/ meltfptr[722]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V724*/ meltfptr[723]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V724*/ meltfptr[723])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V724*/ meltfptr[723]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V723*/ meltfptr[722]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V724*/ meltfptr[723]); MELT_LOCATION("warmelt-base.melt:364:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V721*/ meltfptr[720])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V721*/ meltfptr[720])))); ((meltobject_ptr_t)(/*_.VALDATA___V721*/ meltfptr[720]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V724*/ meltfptr[723]); MELT_LOCATION("warmelt-base.melt:364:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V721*/ meltfptr[720])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V721*/ meltfptr[720])))); ((meltobject_ptr_t)(/*_.VALDATA___V721*/ meltfptr[720]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V727*/ meltfptr[726]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V727*/ meltfptr[726])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V727*/ meltfptr[726]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V725*/ meltfptr[724]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V727*/ meltfptr[726]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V727*/ meltfptr[726])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V727*/ meltfptr[726]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V727*/ meltfptr[726]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V727*/ meltfptr[726])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V727*/ meltfptr[726]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V726*/ meltfptr[725]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V727*/ meltfptr[726]); MELT_LOCATION("warmelt-base.melt:364:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V721*/ meltfptr[720])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V721*/ meltfptr[720])))); ((meltobject_ptr_t)(/*_.VALDATA___V721*/ meltfptr[720]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V727*/ meltfptr[726]); MELT_LOCATION("warmelt-base.melt:364:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V721*/ meltfptr[720]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V728*/ meltfptr[727])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V728*/ meltfptr[727])))); ((meltobject_ptr_t)(/*_.VALDATA___V728*/ meltfptr[727]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V729*/ meltfptr[728]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V728*/ meltfptr[727]); MELT_LOCATION("warmelt-base.melt:369:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V730*/ meltfptr[729])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V730*/ meltfptr[729])))); ((meltobject_ptr_t)(/*_.VALDATA___V730*/ meltfptr[729]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V731*/ meltfptr[730]); MELT_LOCATION("warmelt-base.melt:369:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V732*/ meltfptr[731])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V732*/ meltfptr[731])))); ((meltobject_ptr_t)(/*_.VALDATA___V732*/ meltfptr[731]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V107*/ meltfptr[106]); MELT_LOCATION("warmelt-base.melt:369:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V732*/ meltfptr[731])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V732*/ meltfptr[731])))); ((meltobject_ptr_t)(/*_.VALDATA___V732*/ meltfptr[731]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:369:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V732*/ meltfptr[731]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V733*/ meltfptr[732]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V733*/ meltfptr[732])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V733*/ meltfptr[732]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V732*/ meltfptr[731]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V733*/ meltfptr[732]); MELT_LOCATION("warmelt-base.melt:369:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V730*/ meltfptr[729])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V730*/ meltfptr[729])))); ((meltobject_ptr_t)(/*_.VALDATA___V730*/ meltfptr[729]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V733*/ meltfptr[732]); MELT_LOCATION("warmelt-base.melt:369:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V730*/ meltfptr[729])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V730*/ meltfptr[729])))); ((meltobject_ptr_t)(/*_.VALDATA___V730*/ meltfptr[729]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V736*/ meltfptr[735]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V736*/ meltfptr[735])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V736*/ meltfptr[735]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V734*/ meltfptr[733]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V736*/ meltfptr[735]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V736*/ meltfptr[735])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V736*/ meltfptr[735]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V107*/ meltfptr[106]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V736*/ meltfptr[735]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V736*/ meltfptr[735])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V736*/ meltfptr[735]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V735*/ meltfptr[734]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V736*/ meltfptr[735]); MELT_LOCATION("warmelt-base.melt:369:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V730*/ meltfptr[729])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V730*/ meltfptr[729])))); ((meltobject_ptr_t)(/*_.VALDATA___V730*/ meltfptr[729]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V736*/ meltfptr[735]); MELT_LOCATION("warmelt-base.melt:369:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V730*/ meltfptr[729]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V737*/ meltfptr[736])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V737*/ meltfptr[736])))); ((meltobject_ptr_t)(/*_.VALDATA___V737*/ meltfptr[736]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V738*/ meltfptr[737]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V737*/ meltfptr[736]); MELT_LOCATION("warmelt-base.melt:371:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V739*/ meltfptr[738])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V739*/ meltfptr[738])))); ((meltobject_ptr_t)(/*_.VALDATA___V739*/ meltfptr[738]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V740*/ meltfptr[739]); MELT_LOCATION("warmelt-base.melt:371:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V741*/ meltfptr[740])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V741*/ meltfptr[740])))); ((meltobject_ptr_t)(/*_.VALDATA___V741*/ meltfptr[740]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V107*/ meltfptr[106]); MELT_LOCATION("warmelt-base.melt:371:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V741*/ meltfptr[740])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V741*/ meltfptr[740])))); ((meltobject_ptr_t)(/*_.VALDATA___V741*/ meltfptr[740]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:371:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V741*/ meltfptr[740]); MELT_LOCATION("warmelt-base.melt:371:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V742*/ meltfptr[741])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V742*/ meltfptr[741])))); ((meltobject_ptr_t)(/*_.VALDATA___V742*/ meltfptr[741]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V219*/ meltfptr[218]); MELT_LOCATION("warmelt-base.melt:371:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V742*/ meltfptr[741])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V742*/ meltfptr[741])))); ((meltobject_ptr_t)(/*_.VALDATA___V742*/ meltfptr[741]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:371:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V742*/ meltfptr[741]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V743*/ meltfptr[742]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V743*/ meltfptr[742])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V743*/ meltfptr[742]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V741*/ meltfptr[740]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V743*/ meltfptr[742]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V743*/ meltfptr[742])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V743*/ meltfptr[742]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V742*/ meltfptr[741]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V743*/ meltfptr[742]); MELT_LOCATION("warmelt-base.melt:371:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V739*/ meltfptr[738])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V739*/ meltfptr[738])))); ((meltobject_ptr_t)(/*_.VALDATA___V739*/ meltfptr[738]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V743*/ meltfptr[742]); MELT_LOCATION("warmelt-base.melt:371:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V739*/ meltfptr[738])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V739*/ meltfptr[738])))); ((meltobject_ptr_t)(/*_.VALDATA___V739*/ meltfptr[738]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V747*/ meltfptr[746]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V747*/ meltfptr[746])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V747*/ meltfptr[746]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V744*/ meltfptr[743]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V747*/ meltfptr[746]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V747*/ meltfptr[746])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V747*/ meltfptr[746]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V107*/ meltfptr[106]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V747*/ meltfptr[746]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V747*/ meltfptr[746])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V747*/ meltfptr[746]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V745*/ meltfptr[744]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V747*/ meltfptr[746]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V747*/ meltfptr[746])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V747*/ meltfptr[746]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V219*/ meltfptr[218]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V747*/ meltfptr[746]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V747*/ meltfptr[746])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V747*/ meltfptr[746]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V746*/ meltfptr[745]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V747*/ meltfptr[746]); MELT_LOCATION("warmelt-base.melt:371:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V739*/ meltfptr[738])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V739*/ meltfptr[738])))); ((meltobject_ptr_t)(/*_.VALDATA___V739*/ meltfptr[738]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V747*/ meltfptr[746]); MELT_LOCATION("warmelt-base.melt:371:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V739*/ meltfptr[738]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V748*/ meltfptr[747])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V748*/ meltfptr[747])))); ((meltobject_ptr_t)(/*_.VALDATA___V748*/ meltfptr[747]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V749*/ meltfptr[748]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V748*/ meltfptr[747]); MELT_LOCATION("warmelt-base.melt:375:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V750*/ meltfptr[749])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V750*/ meltfptr[749])))); ((meltobject_ptr_t)(/*_.VALDATA___V750*/ meltfptr[749]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V751*/ meltfptr[750]); MELT_LOCATION("warmelt-base.melt:375:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V752*/ meltfptr[751])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V752*/ meltfptr[751])))); ((meltobject_ptr_t)(/*_.VALDATA___V752*/ meltfptr[751]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V107*/ meltfptr[106]); MELT_LOCATION("warmelt-base.melt:375:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V752*/ meltfptr[751])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V752*/ meltfptr[751])))); ((meltobject_ptr_t)(/*_.VALDATA___V752*/ meltfptr[751]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:375:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V752*/ meltfptr[751]); MELT_LOCATION("warmelt-base.melt:375:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V753*/ meltfptr[752])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V753*/ meltfptr[752])))); ((meltobject_ptr_t)(/*_.VALDATA___V753*/ meltfptr[752]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V411*/ meltfptr[410]); MELT_LOCATION("warmelt-base.melt:375:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V753*/ meltfptr[752])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V753*/ meltfptr[752])))); ((meltobject_ptr_t)(/*_.VALDATA___V753*/ meltfptr[752]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:375:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V753*/ meltfptr[752]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V754*/ meltfptr[753]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V754*/ meltfptr[753])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V754*/ meltfptr[753]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V752*/ meltfptr[751]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V754*/ meltfptr[753]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V754*/ meltfptr[753])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V754*/ meltfptr[753]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V753*/ meltfptr[752]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V754*/ meltfptr[753]); MELT_LOCATION("warmelt-base.melt:375:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V750*/ meltfptr[749])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V750*/ meltfptr[749])))); ((meltobject_ptr_t)(/*_.VALDATA___V750*/ meltfptr[749]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V754*/ meltfptr[753]); MELT_LOCATION("warmelt-base.melt:375:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V750*/ meltfptr[749])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V750*/ meltfptr[749])))); ((meltobject_ptr_t)(/*_.VALDATA___V750*/ meltfptr[749]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V758*/ meltfptr[757]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V758*/ meltfptr[757])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V758*/ meltfptr[757]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V755*/ meltfptr[754]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V758*/ meltfptr[757]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V758*/ meltfptr[757])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V758*/ meltfptr[757]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V107*/ meltfptr[106]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V758*/ meltfptr[757]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V758*/ meltfptr[757])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V758*/ meltfptr[757]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V756*/ meltfptr[755]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V758*/ meltfptr[757]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V758*/ meltfptr[757])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V758*/ meltfptr[757]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V411*/ meltfptr[410]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V758*/ meltfptr[757]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V758*/ meltfptr[757])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V758*/ meltfptr[757]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V757*/ meltfptr[756]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V758*/ meltfptr[757]); MELT_LOCATION("warmelt-base.melt:375:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V750*/ meltfptr[749])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V750*/ meltfptr[749])))); ((meltobject_ptr_t)(/*_.VALDATA___V750*/ meltfptr[749]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V758*/ meltfptr[757]); MELT_LOCATION("warmelt-base.melt:375:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V750*/ meltfptr[749]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V759*/ meltfptr[758])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V759*/ meltfptr[758])))); ((meltobject_ptr_t)(/*_.VALDATA___V759*/ meltfptr[758]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V760*/ meltfptr[759]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V759*/ meltfptr[758]); MELT_LOCATION("warmelt-base.melt:379:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V761*/ meltfptr[760])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V761*/ meltfptr[760])))); ((meltobject_ptr_t)(/*_.VALDATA___V761*/ meltfptr[760]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V762*/ meltfptr[761]); MELT_LOCATION("warmelt-base.melt:379:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V763*/ meltfptr[762])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V763*/ meltfptr[762])))); ((meltobject_ptr_t)(/*_.VALDATA___V763*/ meltfptr[762]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V107*/ meltfptr[106]); MELT_LOCATION("warmelt-base.melt:379:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V763*/ meltfptr[762])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V763*/ meltfptr[762])))); ((meltobject_ptr_t)(/*_.VALDATA___V763*/ meltfptr[762]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:379:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V763*/ meltfptr[762]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V765*/ meltfptr[764])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V765*/ meltfptr[764])))); ((meltobject_ptr_t)(/*_.VALDATA___V765*/ meltfptr[764]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V766*/ meltfptr[765]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V765*/ meltfptr[764]); MELT_LOCATION("warmelt-base.melt:379:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V764*/ meltfptr[763])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V764*/ meltfptr[763])))); ((meltobject_ptr_t)(/*_.VALDATA___V764*/ meltfptr[763]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V765*/ meltfptr[764]); MELT_LOCATION("warmelt-base.melt:379:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V764*/ meltfptr[763])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V764*/ meltfptr[763])))); ((meltobject_ptr_t)(/*_.VALDATA___V764*/ meltfptr[763]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:379:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V764*/ meltfptr[763]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V767*/ meltfptr[766]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V767*/ meltfptr[766])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V767*/ meltfptr[766]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V763*/ meltfptr[762]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V767*/ meltfptr[766]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V767*/ meltfptr[766])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V767*/ meltfptr[766]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V764*/ meltfptr[763]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V767*/ meltfptr[766]); MELT_LOCATION("warmelt-base.melt:379:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V761*/ meltfptr[760])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V761*/ meltfptr[760])))); ((meltobject_ptr_t)(/*_.VALDATA___V761*/ meltfptr[760]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V767*/ meltfptr[766]); MELT_LOCATION("warmelt-base.melt:379:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V761*/ meltfptr[760])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V761*/ meltfptr[760])))); ((meltobject_ptr_t)(/*_.VALDATA___V761*/ meltfptr[760]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V770*/ meltfptr[769]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V770*/ meltfptr[769])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V770*/ meltfptr[769]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V768*/ meltfptr[767]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V770*/ meltfptr[769]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V770*/ meltfptr[769])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V770*/ meltfptr[769]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V107*/ meltfptr[106]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V770*/ meltfptr[769]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V770*/ meltfptr[769])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V770*/ meltfptr[769]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V769*/ meltfptr[768]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V770*/ meltfptr[769]); MELT_LOCATION("warmelt-base.melt:379:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V761*/ meltfptr[760])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V761*/ meltfptr[760])))); ((meltobject_ptr_t)(/*_.VALDATA___V761*/ meltfptr[760]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V770*/ meltfptr[769]); MELT_LOCATION("warmelt-base.melt:379:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V761*/ meltfptr[760]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V771*/ meltfptr[770])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V771*/ meltfptr[770])))); ((meltobject_ptr_t)(/*_.VALDATA___V771*/ meltfptr[770]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V772*/ meltfptr[771]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V771*/ meltfptr[770]); MELT_LOCATION("warmelt-base.melt:384:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V773*/ meltfptr[772])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V773*/ meltfptr[772])))); ((meltobject_ptr_t)(/*_.VALDATA___V773*/ meltfptr[772]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V774*/ meltfptr[773]); MELT_LOCATION("warmelt-base.melt:384:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V775*/ meltfptr[774])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V775*/ meltfptr[774])))); ((meltobject_ptr_t)(/*_.VALDATA___V775*/ meltfptr[774]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V411*/ meltfptr[410]); MELT_LOCATION("warmelt-base.melt:384:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V775*/ meltfptr[774])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V775*/ meltfptr[774])))); ((meltobject_ptr_t)(/*_.VALDATA___V775*/ meltfptr[774]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:384:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V775*/ meltfptr[774]); MELT_LOCATION("warmelt-base.melt:384:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V776*/ meltfptr[775])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V776*/ meltfptr[775])))); ((meltobject_ptr_t)(/*_.VALDATA___V776*/ meltfptr[775]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V107*/ meltfptr[106]); MELT_LOCATION("warmelt-base.melt:384:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V776*/ meltfptr[775])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V776*/ meltfptr[775])))); ((meltobject_ptr_t)(/*_.VALDATA___V776*/ meltfptr[775]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:384:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V776*/ meltfptr[775]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V777*/ meltfptr[776]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V777*/ meltfptr[776])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V777*/ meltfptr[776]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V775*/ meltfptr[774]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V777*/ meltfptr[776]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V777*/ meltfptr[776])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V777*/ meltfptr[776]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V776*/ meltfptr[775]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V777*/ meltfptr[776]); MELT_LOCATION("warmelt-base.melt:384:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V773*/ meltfptr[772])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V773*/ meltfptr[772])))); ((meltobject_ptr_t)(/*_.VALDATA___V773*/ meltfptr[772]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V777*/ meltfptr[776]); MELT_LOCATION("warmelt-base.melt:384:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V773*/ meltfptr[772])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V773*/ meltfptr[772])))); ((meltobject_ptr_t)(/*_.VALDATA___V773*/ meltfptr[772]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V781*/ meltfptr[780]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V781*/ meltfptr[780])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V781*/ meltfptr[780]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V778*/ meltfptr[777]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V781*/ meltfptr[780]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V781*/ meltfptr[780])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V781*/ meltfptr[780]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V411*/ meltfptr[410]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V781*/ meltfptr[780]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V781*/ meltfptr[780])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V781*/ meltfptr[780]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V779*/ meltfptr[778]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V781*/ meltfptr[780]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V781*/ meltfptr[780])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V781*/ meltfptr[780]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V107*/ meltfptr[106]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V781*/ meltfptr[780]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V781*/ meltfptr[780])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V781*/ meltfptr[780]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V780*/ meltfptr[779]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V781*/ meltfptr[780]); MELT_LOCATION("warmelt-base.melt:384:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V773*/ meltfptr[772])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V773*/ meltfptr[772])))); ((meltobject_ptr_t)(/*_.VALDATA___V773*/ meltfptr[772]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V781*/ meltfptr[780]); MELT_LOCATION("warmelt-base.melt:384:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V773*/ meltfptr[772]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V782*/ meltfptr[781])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V782*/ meltfptr[781])))); ((meltobject_ptr_t)(/*_.VALDATA___V782*/ meltfptr[781]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V783*/ meltfptr[782]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V782*/ meltfptr[781]); MELT_LOCATION("warmelt-base.melt:388:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V784*/ meltfptr[783])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V784*/ meltfptr[783])))); ((meltobject_ptr_t)(/*_.VALDATA___V784*/ meltfptr[783]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V785*/ meltfptr[784]); MELT_LOCATION("warmelt-base.melt:388:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V786*/ meltfptr[785])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V786*/ meltfptr[785])))); ((meltobject_ptr_t)(/*_.VALDATA___V786*/ meltfptr[785]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V107*/ meltfptr[106]); MELT_LOCATION("warmelt-base.melt:388:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V786*/ meltfptr[785])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V786*/ meltfptr[785])))); ((meltobject_ptr_t)(/*_.VALDATA___V786*/ meltfptr[785]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:388:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V786*/ meltfptr[785]); MELT_LOCATION("warmelt-base.melt:388:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V787*/ meltfptr[786])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V787*/ meltfptr[786])))); ((meltobject_ptr_t)(/*_.VALDATA___V787*/ meltfptr[786]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:388:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V787*/ meltfptr[786])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V787*/ meltfptr[786])))); ((meltobject_ptr_t)(/*_.VALDATA___V787*/ meltfptr[786]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:388:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V787*/ meltfptr[786]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V788*/ meltfptr[787]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V788*/ meltfptr[787])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V788*/ meltfptr[787]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V786*/ meltfptr[785]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V788*/ meltfptr[787]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V788*/ meltfptr[787])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V788*/ meltfptr[787]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V787*/ meltfptr[786]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V788*/ meltfptr[787]); MELT_LOCATION("warmelt-base.melt:388:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V784*/ meltfptr[783])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V784*/ meltfptr[783])))); ((meltobject_ptr_t)(/*_.VALDATA___V784*/ meltfptr[783]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V788*/ meltfptr[787]); MELT_LOCATION("warmelt-base.melt:388:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V784*/ meltfptr[783])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V784*/ meltfptr[783])))); ((meltobject_ptr_t)(/*_.VALDATA___V784*/ meltfptr[783]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V792*/ meltfptr[791]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V792*/ meltfptr[791])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V792*/ meltfptr[791]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V789*/ meltfptr[788]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V792*/ meltfptr[791]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V792*/ meltfptr[791])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V792*/ meltfptr[791]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V107*/ meltfptr[106]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V792*/ meltfptr[791]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V792*/ meltfptr[791])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V792*/ meltfptr[791]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V790*/ meltfptr[789]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V792*/ meltfptr[791]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V792*/ meltfptr[791])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V792*/ meltfptr[791]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V792*/ meltfptr[791]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V792*/ meltfptr[791])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V792*/ meltfptr[791]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V791*/ meltfptr[790]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V792*/ meltfptr[791]); MELT_LOCATION("warmelt-base.melt:388:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V784*/ meltfptr[783])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V784*/ meltfptr[783])))); ((meltobject_ptr_t)(/*_.VALDATA___V784*/ meltfptr[783]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V792*/ meltfptr[791]); MELT_LOCATION("warmelt-base.melt:388:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V784*/ meltfptr[783]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V793*/ meltfptr[792])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V793*/ meltfptr[792])))); ((meltobject_ptr_t)(/*_.VALDATA___V793*/ meltfptr[792]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V794*/ meltfptr[793]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V793*/ meltfptr[792]); MELT_LOCATION("warmelt-base.melt:394:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V795*/ meltfptr[794])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V795*/ meltfptr[794])))); ((meltobject_ptr_t)(/*_.VALDATA___V795*/ meltfptr[794]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V796*/ meltfptr[795]); MELT_LOCATION("warmelt-base.melt:394:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V797*/ meltfptr[796])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V797*/ meltfptr[796])))); ((meltobject_ptr_t)(/*_.VALDATA___V797*/ meltfptr[796]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V371*/ meltfptr[370]); MELT_LOCATION("warmelt-base.melt:394:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V797*/ meltfptr[796])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V797*/ meltfptr[796])))); ((meltobject_ptr_t)(/*_.VALDATA___V797*/ meltfptr[796]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:394:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V797*/ meltfptr[796]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V798*/ meltfptr[797]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V798*/ meltfptr[797])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V798*/ meltfptr[797]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V797*/ meltfptr[796]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V798*/ meltfptr[797]); MELT_LOCATION("warmelt-base.melt:394:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V795*/ meltfptr[794])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V795*/ meltfptr[794])))); ((meltobject_ptr_t)(/*_.VALDATA___V795*/ meltfptr[794]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V798*/ meltfptr[797]); MELT_LOCATION("warmelt-base.melt:394:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V795*/ meltfptr[794])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V795*/ meltfptr[794])))); ((meltobject_ptr_t)(/*_.VALDATA___V795*/ meltfptr[794]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V801*/ meltfptr[800]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V801*/ meltfptr[800])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V801*/ meltfptr[800]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V799*/ meltfptr[798]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V801*/ meltfptr[800]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V801*/ meltfptr[800])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V801*/ meltfptr[800]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V371*/ meltfptr[370]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V801*/ meltfptr[800]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V801*/ meltfptr[800])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V801*/ meltfptr[800]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V800*/ meltfptr[799]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V801*/ meltfptr[800]); MELT_LOCATION("warmelt-base.melt:394:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V795*/ meltfptr[794])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V795*/ meltfptr[794])))); ((meltobject_ptr_t)(/*_.VALDATA___V795*/ meltfptr[794]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V801*/ meltfptr[800]); MELT_LOCATION("warmelt-base.melt:394:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V795*/ meltfptr[794]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V802*/ meltfptr[801])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V802*/ meltfptr[801])))); ((meltobject_ptr_t)(/*_.VALDATA___V802*/ meltfptr[801]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V803*/ meltfptr[802]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V802*/ meltfptr[801]); MELT_LOCATION("warmelt-base.melt:398:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V804*/ meltfptr[803])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V804*/ meltfptr[803])))); ((meltobject_ptr_t)(/*_.VALDATA___V804*/ meltfptr[803]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V805*/ meltfptr[804]); MELT_LOCATION("warmelt-base.melt:398:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V806*/ meltfptr[805])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V806*/ meltfptr[805])))); ((meltobject_ptr_t)(/*_.VALDATA___V806*/ meltfptr[805]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:398:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V806*/ meltfptr[805])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V806*/ meltfptr[805])))); ((meltobject_ptr_t)(/*_.VALDATA___V806*/ meltfptr[805]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:398:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V806*/ meltfptr[805]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V807*/ meltfptr[806]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V807*/ meltfptr[806])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V807*/ meltfptr[806]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V806*/ meltfptr[805]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V807*/ meltfptr[806]); MELT_LOCATION("warmelt-base.melt:398:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V804*/ meltfptr[803])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V804*/ meltfptr[803])))); ((meltobject_ptr_t)(/*_.VALDATA___V804*/ meltfptr[803]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V807*/ meltfptr[806]); MELT_LOCATION("warmelt-base.melt:398:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V804*/ meltfptr[803])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V804*/ meltfptr[803])))); ((meltobject_ptr_t)(/*_.VALDATA___V804*/ meltfptr[803]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V810*/ meltfptr[809]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V810*/ meltfptr[809])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V810*/ meltfptr[809]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V808*/ meltfptr[807]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V810*/ meltfptr[809]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V810*/ meltfptr[809])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V810*/ meltfptr[809]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V810*/ meltfptr[809]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V810*/ meltfptr[809])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V810*/ meltfptr[809]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V809*/ meltfptr[808]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V810*/ meltfptr[809]); MELT_LOCATION("warmelt-base.melt:398:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V804*/ meltfptr[803])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V804*/ meltfptr[803])))); ((meltobject_ptr_t)(/*_.VALDATA___V804*/ meltfptr[803]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V810*/ meltfptr[809]); MELT_LOCATION("warmelt-base.melt:398:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V804*/ meltfptr[803]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V811*/ meltfptr[810])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V811*/ meltfptr[810])))); ((meltobject_ptr_t)(/*_.VALDATA___V811*/ meltfptr[810]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V812*/ meltfptr[811]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V811*/ meltfptr[810]); MELT_LOCATION("warmelt-base.melt:402:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V813*/ meltfptr[812])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V813*/ meltfptr[812])))); ((meltobject_ptr_t)(/*_.VALDATA___V813*/ meltfptr[812]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V814*/ meltfptr[813]); MELT_LOCATION("warmelt-base.melt:402:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V815*/ meltfptr[814])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V815*/ meltfptr[814])))); ((meltobject_ptr_t)(/*_.VALDATA___V815*/ meltfptr[814]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V13*/ meltfptr[12]); MELT_LOCATION("warmelt-base.melt:402:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V815*/ meltfptr[814])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V815*/ meltfptr[814])))); ((meltobject_ptr_t)(/*_.VALDATA___V815*/ meltfptr[814]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:402:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V815*/ meltfptr[814]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V816*/ meltfptr[815]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V816*/ meltfptr[815])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V816*/ meltfptr[815]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V815*/ meltfptr[814]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V816*/ meltfptr[815]); MELT_LOCATION("warmelt-base.melt:402:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V813*/ meltfptr[812])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V813*/ meltfptr[812])))); ((meltobject_ptr_t)(/*_.VALDATA___V813*/ meltfptr[812]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V816*/ meltfptr[815]); MELT_LOCATION("warmelt-base.melt:402:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V813*/ meltfptr[812])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V813*/ meltfptr[812])))); ((meltobject_ptr_t)(/*_.VALDATA___V813*/ meltfptr[812]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V819*/ meltfptr[818]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V819*/ meltfptr[818])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V819*/ meltfptr[818]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V817*/ meltfptr[816]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V819*/ meltfptr[818]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V819*/ meltfptr[818])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V819*/ meltfptr[818]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V13*/ meltfptr[12]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V819*/ meltfptr[818]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V819*/ meltfptr[818])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V819*/ meltfptr[818]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V818*/ meltfptr[817]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V819*/ meltfptr[818]); MELT_LOCATION("warmelt-base.melt:402:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V813*/ meltfptr[812])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V813*/ meltfptr[812])))); ((meltobject_ptr_t)(/*_.VALDATA___V813*/ meltfptr[812]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V819*/ meltfptr[818]); MELT_LOCATION("warmelt-base.melt:402:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V813*/ meltfptr[812]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V820*/ meltfptr[819])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V820*/ meltfptr[819])))); ((meltobject_ptr_t)(/*_.VALDATA___V820*/ meltfptr[819]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V821*/ meltfptr[820]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V820*/ meltfptr[819]); MELT_LOCATION("warmelt-base.melt:407:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V822*/ meltfptr[821])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V822*/ meltfptr[821])))); ((meltobject_ptr_t)(/*_.VALDATA___V822*/ meltfptr[821]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V823*/ meltfptr[822]); MELT_LOCATION("warmelt-base.melt:407:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V824*/ meltfptr[823])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V824*/ meltfptr[823])))); ((meltobject_ptr_t)(/*_.VALDATA___V824*/ meltfptr[823]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V408*/ meltfptr[407]); MELT_LOCATION("warmelt-base.melt:407:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V824*/ meltfptr[823])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V824*/ meltfptr[823])))); ((meltobject_ptr_t)(/*_.VALDATA___V824*/ meltfptr[823]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:407:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V824*/ meltfptr[823]); MELT_LOCATION("warmelt-base.melt:407:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V825*/ meltfptr[824])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V825*/ meltfptr[824])))); ((meltobject_ptr_t)(/*_.VALDATA___V825*/ meltfptr[824]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:407:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V825*/ meltfptr[824])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V825*/ meltfptr[824])))); ((meltobject_ptr_t)(/*_.VALDATA___V825*/ meltfptr[824]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:407:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V825*/ meltfptr[824]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V826*/ meltfptr[825]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V826*/ meltfptr[825])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V826*/ meltfptr[825]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V824*/ meltfptr[823]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V826*/ meltfptr[825]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V826*/ meltfptr[825])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V826*/ meltfptr[825]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V825*/ meltfptr[824]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V826*/ meltfptr[825]); MELT_LOCATION("warmelt-base.melt:407:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V822*/ meltfptr[821])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V822*/ meltfptr[821])))); ((meltobject_ptr_t)(/*_.VALDATA___V822*/ meltfptr[821]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V826*/ meltfptr[825]); MELT_LOCATION("warmelt-base.melt:407:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V822*/ meltfptr[821])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V822*/ meltfptr[821])))); ((meltobject_ptr_t)(/*_.VALDATA___V822*/ meltfptr[821]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V830*/ meltfptr[829]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V830*/ meltfptr[829])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V830*/ meltfptr[829]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V827*/ meltfptr[826]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V830*/ meltfptr[829]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V830*/ meltfptr[829])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V830*/ meltfptr[829]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V408*/ meltfptr[407]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V830*/ meltfptr[829]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V830*/ meltfptr[829])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V830*/ meltfptr[829]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V828*/ meltfptr[827]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V830*/ meltfptr[829]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V830*/ meltfptr[829])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V830*/ meltfptr[829]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V830*/ meltfptr[829]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V830*/ meltfptr[829])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V830*/ meltfptr[829]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V829*/ meltfptr[828]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V830*/ meltfptr[829]); MELT_LOCATION("warmelt-base.melt:407:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V822*/ meltfptr[821])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V822*/ meltfptr[821])))); ((meltobject_ptr_t)(/*_.VALDATA___V822*/ meltfptr[821]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V830*/ meltfptr[829]); MELT_LOCATION("warmelt-base.melt:407:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V822*/ meltfptr[821]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V831*/ meltfptr[830])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V831*/ meltfptr[830])))); ((meltobject_ptr_t)(/*_.VALDATA___V831*/ meltfptr[830]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V832*/ meltfptr[831]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V831*/ meltfptr[830]); MELT_LOCATION("warmelt-base.melt:412:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V833*/ meltfptr[832])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V833*/ meltfptr[832])))); ((meltobject_ptr_t)(/*_.VALDATA___V833*/ meltfptr[832]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V834*/ meltfptr[833]); MELT_LOCATION("warmelt-base.melt:412:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V835*/ meltfptr[834])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V835*/ meltfptr[834])))); ((meltobject_ptr_t)(/*_.VALDATA___V835*/ meltfptr[834]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:412:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V835*/ meltfptr[834])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V835*/ meltfptr[834])))); ((meltobject_ptr_t)(/*_.VALDATA___V835*/ meltfptr[834]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:412:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V835*/ meltfptr[834]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V837*/ meltfptr[836])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V837*/ meltfptr[836])))); ((meltobject_ptr_t)(/*_.VALDATA___V837*/ meltfptr[836]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V838*/ meltfptr[837]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V837*/ meltfptr[836]); MELT_LOCATION("warmelt-base.melt:412:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V836*/ meltfptr[835])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V836*/ meltfptr[835])))); ((meltobject_ptr_t)(/*_.VALDATA___V836*/ meltfptr[835]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V837*/ meltfptr[836]); MELT_LOCATION("warmelt-base.melt:412:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V836*/ meltfptr[835])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V836*/ meltfptr[835])))); ((meltobject_ptr_t)(/*_.VALDATA___V836*/ meltfptr[835]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:412:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V836*/ meltfptr[835]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V839*/ meltfptr[838]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V839*/ meltfptr[838])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V839*/ meltfptr[838]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V835*/ meltfptr[834]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V839*/ meltfptr[838]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V839*/ meltfptr[838])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V839*/ meltfptr[838]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V836*/ meltfptr[835]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V839*/ meltfptr[838]); MELT_LOCATION("warmelt-base.melt:412:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V833*/ meltfptr[832])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V833*/ meltfptr[832])))); ((meltobject_ptr_t)(/*_.VALDATA___V833*/ meltfptr[832]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V839*/ meltfptr[838]); MELT_LOCATION("warmelt-base.melt:412:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V833*/ meltfptr[832])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V833*/ meltfptr[832])))); ((meltobject_ptr_t)(/*_.VALDATA___V833*/ meltfptr[832]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V843*/ meltfptr[842]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V843*/ meltfptr[842])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V843*/ meltfptr[842]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V840*/ meltfptr[839]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V843*/ meltfptr[842]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V843*/ meltfptr[842])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V843*/ meltfptr[842]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V843*/ meltfptr[842]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V843*/ meltfptr[842])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V843*/ meltfptr[842]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V841*/ meltfptr[840]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V843*/ meltfptr[842]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V843*/ meltfptr[842])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V843*/ meltfptr[842]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V837*/ meltfptr[836]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V843*/ meltfptr[842]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V843*/ meltfptr[842])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V843*/ meltfptr[842]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V842*/ meltfptr[841]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V843*/ meltfptr[842]); MELT_LOCATION("warmelt-base.melt:412:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V833*/ meltfptr[832])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V833*/ meltfptr[832])))); ((meltobject_ptr_t)(/*_.VALDATA___V833*/ meltfptr[832]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V843*/ meltfptr[842]); MELT_LOCATION("warmelt-base.melt:412:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V833*/ meltfptr[832]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V844*/ meltfptr[843])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V844*/ meltfptr[843])))); ((meltobject_ptr_t)(/*_.VALDATA___V844*/ meltfptr[843]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V845*/ meltfptr[844]); #undef meltfram__ } /*end of warmelt_base_initialmeltchunk_5*/ void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_6 (struct frame_start_module_melt_st* meltframptr__, char predefinited[]) { #define meltfram__ (*meltframptr__) #undef meltcallcount #define meltcallcount 0L /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V844*/ meltfptr[843]); MELT_LOCATION("warmelt-base.melt:416:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V846*/ meltfptr[845])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V846*/ meltfptr[845])))); ((meltobject_ptr_t)(/*_.VALDATA___V846*/ meltfptr[845]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V847*/ meltfptr[846]); MELT_LOCATION("warmelt-base.melt:416:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V848*/ meltfptr[847])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V848*/ meltfptr[847])))); ((meltobject_ptr_t)(/*_.VALDATA___V848*/ meltfptr[847]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:416:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V848*/ meltfptr[847])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V848*/ meltfptr[847])))); ((meltobject_ptr_t)(/*_.VALDATA___V848*/ meltfptr[847]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:416:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V848*/ meltfptr[847]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V849*/ meltfptr[848]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V849*/ meltfptr[848])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V849*/ meltfptr[848]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V848*/ meltfptr[847]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V849*/ meltfptr[848]); MELT_LOCATION("warmelt-base.melt:416:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V846*/ meltfptr[845])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V846*/ meltfptr[845])))); ((meltobject_ptr_t)(/*_.VALDATA___V846*/ meltfptr[845]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V849*/ meltfptr[848]); MELT_LOCATION("warmelt-base.melt:416:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V846*/ meltfptr[845])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V846*/ meltfptr[845])))); ((meltobject_ptr_t)(/*_.VALDATA___V846*/ meltfptr[845]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V852*/ meltfptr[851]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V852*/ meltfptr[851])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V852*/ meltfptr[851]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V850*/ meltfptr[849]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V852*/ meltfptr[851]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V852*/ meltfptr[851])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V852*/ meltfptr[851]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V852*/ meltfptr[851]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V852*/ meltfptr[851])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V852*/ meltfptr[851]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V851*/ meltfptr[850]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V852*/ meltfptr[851]); MELT_LOCATION("warmelt-base.melt:416:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V846*/ meltfptr[845])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V846*/ meltfptr[845])))); ((meltobject_ptr_t)(/*_.VALDATA___V846*/ meltfptr[845]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V852*/ meltfptr[851]); MELT_LOCATION("warmelt-base.melt:416:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V846*/ meltfptr[845]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V853*/ meltfptr[852])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V853*/ meltfptr[852])))); ((meltobject_ptr_t)(/*_.VALDATA___V853*/ meltfptr[852]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V854*/ meltfptr[853]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V853*/ meltfptr[852]); MELT_LOCATION("warmelt-base.melt:420:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V855*/ meltfptr[854])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V855*/ meltfptr[854])))); ((meltobject_ptr_t)(/*_.VALDATA___V855*/ meltfptr[854]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V856*/ meltfptr[855]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V858*/ meltfptr[857])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V858*/ meltfptr[857])))); ((meltobject_ptr_t)(/*_.VALDATA___V858*/ meltfptr[857]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V859*/ meltfptr[858]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V858*/ meltfptr[857]); MELT_LOCATION("warmelt-base.melt:420:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V857*/ meltfptr[856])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V857*/ meltfptr[856])))); ((meltobject_ptr_t)(/*_.VALDATA___V857*/ meltfptr[856]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V858*/ meltfptr[857]); MELT_LOCATION("warmelt-base.melt:420:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V857*/ meltfptr[856])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V857*/ meltfptr[856])))); ((meltobject_ptr_t)(/*_.VALDATA___V857*/ meltfptr[856]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:420:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V857*/ meltfptr[856]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V861*/ meltfptr[860])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V861*/ meltfptr[860])))); ((meltobject_ptr_t)(/*_.VALDATA___V861*/ meltfptr[860]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V862*/ meltfptr[861]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V861*/ meltfptr[860]); MELT_LOCATION("warmelt-base.melt:420:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V860*/ meltfptr[859])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V860*/ meltfptr[859])))); ((meltobject_ptr_t)(/*_.VALDATA___V860*/ meltfptr[859]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V861*/ meltfptr[860]); MELT_LOCATION("warmelt-base.melt:420:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V860*/ meltfptr[859])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V860*/ meltfptr[859])))); ((meltobject_ptr_t)(/*_.VALDATA___V860*/ meltfptr[859]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:420:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V860*/ meltfptr[859]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V863*/ meltfptr[862]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V863*/ meltfptr[862])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V863*/ meltfptr[862]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V857*/ meltfptr[856]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V863*/ meltfptr[862]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V863*/ meltfptr[862])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V863*/ meltfptr[862]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V860*/ meltfptr[859]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V863*/ meltfptr[862]); MELT_LOCATION("warmelt-base.melt:420:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V855*/ meltfptr[854])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V855*/ meltfptr[854])))); ((meltobject_ptr_t)(/*_.VALDATA___V855*/ meltfptr[854]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V863*/ meltfptr[862]); MELT_LOCATION("warmelt-base.melt:420:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V855*/ meltfptr[854])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V855*/ meltfptr[854])))); ((meltobject_ptr_t)(/*_.VALDATA___V855*/ meltfptr[854]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V867*/ meltfptr[866]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V867*/ meltfptr[866])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V867*/ meltfptr[866]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V864*/ meltfptr[863]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V867*/ meltfptr[866]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V867*/ meltfptr[866])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V867*/ meltfptr[866]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V858*/ meltfptr[857]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V867*/ meltfptr[866]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V867*/ meltfptr[866])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V867*/ meltfptr[866]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V865*/ meltfptr[864]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V867*/ meltfptr[866]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V867*/ meltfptr[866])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V867*/ meltfptr[866]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V861*/ meltfptr[860]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V867*/ meltfptr[866]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V867*/ meltfptr[866])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V867*/ meltfptr[866]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V866*/ meltfptr[865]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V867*/ meltfptr[866]); MELT_LOCATION("warmelt-base.melt:420:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V855*/ meltfptr[854])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V855*/ meltfptr[854])))); ((meltobject_ptr_t)(/*_.VALDATA___V855*/ meltfptr[854]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V867*/ meltfptr[866]); MELT_LOCATION("warmelt-base.melt:420:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V855*/ meltfptr[854]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V868*/ meltfptr[867])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V868*/ meltfptr[867])))); ((meltobject_ptr_t)(/*_.VALDATA___V868*/ meltfptr[867]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V869*/ meltfptr[868]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V868*/ meltfptr[867]); MELT_LOCATION("warmelt-base.melt:425:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V870*/ meltfptr[869])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V870*/ meltfptr[869])))); ((meltobject_ptr_t)(/*_.VALDATA___V870*/ meltfptr[869]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V871*/ meltfptr[870]); MELT_LOCATION("warmelt-base.melt:425:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V872*/ meltfptr[871])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V872*/ meltfptr[871])))); ((meltobject_ptr_t)(/*_.VALDATA___V872*/ meltfptr[871]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V408*/ meltfptr[407]); MELT_LOCATION("warmelt-base.melt:425:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V872*/ meltfptr[871])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V872*/ meltfptr[871])))); ((meltobject_ptr_t)(/*_.VALDATA___V872*/ meltfptr[871]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:425:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V872*/ meltfptr[871]); MELT_LOCATION("warmelt-base.melt:425:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V873*/ meltfptr[872])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V873*/ meltfptr[872])))); ((meltobject_ptr_t)(/*_.VALDATA___V873*/ meltfptr[872]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V837*/ meltfptr[836]); MELT_LOCATION("warmelt-base.melt:425:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V873*/ meltfptr[872])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V873*/ meltfptr[872])))); ((meltobject_ptr_t)(/*_.VALDATA___V873*/ meltfptr[872]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:425:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V873*/ meltfptr[872]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V874*/ meltfptr[873]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V874*/ meltfptr[873])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V874*/ meltfptr[873]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V872*/ meltfptr[871]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V874*/ meltfptr[873]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V874*/ meltfptr[873])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V874*/ meltfptr[873]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V873*/ meltfptr[872]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V874*/ meltfptr[873]); MELT_LOCATION("warmelt-base.melt:425:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V870*/ meltfptr[869])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V870*/ meltfptr[869])))); ((meltobject_ptr_t)(/*_.VALDATA___V870*/ meltfptr[869]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V874*/ meltfptr[873]); MELT_LOCATION("warmelt-base.melt:425:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V870*/ meltfptr[869])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V870*/ meltfptr[869])))); ((meltobject_ptr_t)(/*_.VALDATA___V870*/ meltfptr[869]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V878*/ meltfptr[877]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V878*/ meltfptr[877])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V878*/ meltfptr[877]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V875*/ meltfptr[874]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V878*/ meltfptr[877]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V878*/ meltfptr[877])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V878*/ meltfptr[877]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V837*/ meltfptr[836]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V878*/ meltfptr[877]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V878*/ meltfptr[877])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V878*/ meltfptr[877]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V876*/ meltfptr[875]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V878*/ meltfptr[877]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V878*/ meltfptr[877])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V878*/ meltfptr[877]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V408*/ meltfptr[407]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V878*/ meltfptr[877]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V878*/ meltfptr[877])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V878*/ meltfptr[877]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V877*/ meltfptr[876]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V878*/ meltfptr[877]); MELT_LOCATION("warmelt-base.melt:425:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V870*/ meltfptr[869])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V870*/ meltfptr[869])))); ((meltobject_ptr_t)(/*_.VALDATA___V870*/ meltfptr[869]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V878*/ meltfptr[877]); MELT_LOCATION("warmelt-base.melt:425:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V870*/ meltfptr[869]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V879*/ meltfptr[878])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V879*/ meltfptr[878])))); ((meltobject_ptr_t)(/*_.VALDATA___V879*/ meltfptr[878]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V880*/ meltfptr[879]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V879*/ meltfptr[878]); MELT_LOCATION("warmelt-base.melt:430:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V881*/ meltfptr[880])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V881*/ meltfptr[880])))); ((meltobject_ptr_t)(/*_.VALDATA___V881*/ meltfptr[880]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V882*/ meltfptr[881]); MELT_LOCATION("warmelt-base.melt:430:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V883*/ meltfptr[882])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V883*/ meltfptr[882])))); ((meltobject_ptr_t)(/*_.VALDATA___V883*/ meltfptr[882]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V408*/ meltfptr[407]); MELT_LOCATION("warmelt-base.melt:430:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V883*/ meltfptr[882])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V883*/ meltfptr[882])))); ((meltobject_ptr_t)(/*_.VALDATA___V883*/ meltfptr[882]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:430:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V883*/ meltfptr[882]); MELT_LOCATION("warmelt-base.melt:430:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V884*/ meltfptr[883])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V884*/ meltfptr[883])))); ((meltobject_ptr_t)(/*_.VALDATA___V884*/ meltfptr[883]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V837*/ meltfptr[836]); MELT_LOCATION("warmelt-base.melt:430:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V884*/ meltfptr[883])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V884*/ meltfptr[883])))); ((meltobject_ptr_t)(/*_.VALDATA___V884*/ meltfptr[883]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:430:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V884*/ meltfptr[883]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V885*/ meltfptr[884]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V885*/ meltfptr[884])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V885*/ meltfptr[884]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V883*/ meltfptr[882]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V885*/ meltfptr[884]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V885*/ meltfptr[884])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V885*/ meltfptr[884]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V884*/ meltfptr[883]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V885*/ meltfptr[884]); MELT_LOCATION("warmelt-base.melt:430:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V881*/ meltfptr[880])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V881*/ meltfptr[880])))); ((meltobject_ptr_t)(/*_.VALDATA___V881*/ meltfptr[880]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V885*/ meltfptr[884]); MELT_LOCATION("warmelt-base.melt:430:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V881*/ meltfptr[880])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V881*/ meltfptr[880])))); ((meltobject_ptr_t)(/*_.VALDATA___V881*/ meltfptr[880]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V889*/ meltfptr[888]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V889*/ meltfptr[888])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V889*/ meltfptr[888]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V886*/ meltfptr[885]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V889*/ meltfptr[888]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V889*/ meltfptr[888])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V889*/ meltfptr[888]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V837*/ meltfptr[836]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V889*/ meltfptr[888]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V889*/ meltfptr[888])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V889*/ meltfptr[888]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V887*/ meltfptr[886]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V889*/ meltfptr[888]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V889*/ meltfptr[888])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V889*/ meltfptr[888]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V408*/ meltfptr[407]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V889*/ meltfptr[888]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V889*/ meltfptr[888])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V889*/ meltfptr[888]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V888*/ meltfptr[887]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V889*/ meltfptr[888]); MELT_LOCATION("warmelt-base.melt:430:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V881*/ meltfptr[880])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V881*/ meltfptr[880])))); ((meltobject_ptr_t)(/*_.VALDATA___V881*/ meltfptr[880]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V889*/ meltfptr[888]); MELT_LOCATION("warmelt-base.melt:430:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V881*/ meltfptr[880]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V890*/ meltfptr[889])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V890*/ meltfptr[889])))); ((meltobject_ptr_t)(/*_.VALDATA___V890*/ meltfptr[889]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V891*/ meltfptr[890]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V890*/ meltfptr[889]); MELT_LOCATION("warmelt-base.melt:435:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V892*/ meltfptr[891])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V892*/ meltfptr[891])))); ((meltobject_ptr_t)(/*_.VALDATA___V892*/ meltfptr[891]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V893*/ meltfptr[892]); MELT_LOCATION("warmelt-base.melt:435:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V894*/ meltfptr[893])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V894*/ meltfptr[893])))); ((meltobject_ptr_t)(/*_.VALDATA___V894*/ meltfptr[893]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V408*/ meltfptr[407]); MELT_LOCATION("warmelt-base.melt:435:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V894*/ meltfptr[893])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V894*/ meltfptr[893])))); ((meltobject_ptr_t)(/*_.VALDATA___V894*/ meltfptr[893]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:435:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V894*/ meltfptr[893]); MELT_LOCATION("warmelt-base.melt:435:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V895*/ meltfptr[894])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V895*/ meltfptr[894])))); ((meltobject_ptr_t)(/*_.VALDATA___V895*/ meltfptr[894]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V837*/ meltfptr[836]); MELT_LOCATION("warmelt-base.melt:435:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V895*/ meltfptr[894])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V895*/ meltfptr[894])))); ((meltobject_ptr_t)(/*_.VALDATA___V895*/ meltfptr[894]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:435:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V895*/ meltfptr[894]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V896*/ meltfptr[895]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V896*/ meltfptr[895])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V896*/ meltfptr[895]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V894*/ meltfptr[893]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V896*/ meltfptr[895]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V896*/ meltfptr[895])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V896*/ meltfptr[895]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V895*/ meltfptr[894]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V896*/ meltfptr[895]); MELT_LOCATION("warmelt-base.melt:435:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V892*/ meltfptr[891])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V892*/ meltfptr[891])))); ((meltobject_ptr_t)(/*_.VALDATA___V892*/ meltfptr[891]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V896*/ meltfptr[895]); MELT_LOCATION("warmelt-base.melt:435:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V892*/ meltfptr[891])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V892*/ meltfptr[891])))); ((meltobject_ptr_t)(/*_.VALDATA___V892*/ meltfptr[891]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V900*/ meltfptr[899]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V900*/ meltfptr[899])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V900*/ meltfptr[899]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V897*/ meltfptr[896]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V900*/ meltfptr[899]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V900*/ meltfptr[899])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V900*/ meltfptr[899]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V837*/ meltfptr[836]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V900*/ meltfptr[899]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V900*/ meltfptr[899])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V900*/ meltfptr[899]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V898*/ meltfptr[897]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V900*/ meltfptr[899]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V900*/ meltfptr[899])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V900*/ meltfptr[899]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V408*/ meltfptr[407]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V900*/ meltfptr[899]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V900*/ meltfptr[899])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V900*/ meltfptr[899]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V899*/ meltfptr[898]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V900*/ meltfptr[899]); MELT_LOCATION("warmelt-base.melt:435:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V892*/ meltfptr[891])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V892*/ meltfptr[891])))); ((meltobject_ptr_t)(/*_.VALDATA___V892*/ meltfptr[891]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V900*/ meltfptr[899]); MELT_LOCATION("warmelt-base.melt:435:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V892*/ meltfptr[891]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V901*/ meltfptr[900])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V901*/ meltfptr[900])))); ((meltobject_ptr_t)(/*_.VALDATA___V901*/ meltfptr[900]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V902*/ meltfptr[901]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V901*/ meltfptr[900]); MELT_LOCATION("warmelt-base.melt:441:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V903*/ meltfptr[902])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V903*/ meltfptr[902])))); ((meltobject_ptr_t)(/*_.VALDATA___V903*/ meltfptr[902]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V904*/ meltfptr[903]); MELT_LOCATION("warmelt-base.melt:441:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V905*/ meltfptr[904])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V905*/ meltfptr[904])))); ((meltobject_ptr_t)(/*_.VALDATA___V905*/ meltfptr[904]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V408*/ meltfptr[407]); MELT_LOCATION("warmelt-base.melt:441:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V905*/ meltfptr[904])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V905*/ meltfptr[904])))); ((meltobject_ptr_t)(/*_.VALDATA___V905*/ meltfptr[904]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:441:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V905*/ meltfptr[904]); MELT_LOCATION("warmelt-base.melt:441:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V906*/ meltfptr[905])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V906*/ meltfptr[905])))); ((meltobject_ptr_t)(/*_.VALDATA___V906*/ meltfptr[905]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:441:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V906*/ meltfptr[905])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V906*/ meltfptr[905])))); ((meltobject_ptr_t)(/*_.VALDATA___V906*/ meltfptr[905]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:441:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V906*/ meltfptr[905]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V907*/ meltfptr[906]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V907*/ meltfptr[906])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V907*/ meltfptr[906]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V905*/ meltfptr[904]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V907*/ meltfptr[906]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V907*/ meltfptr[906])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V907*/ meltfptr[906]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V906*/ meltfptr[905]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V907*/ meltfptr[906]); MELT_LOCATION("warmelt-base.melt:441:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V903*/ meltfptr[902])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V903*/ meltfptr[902])))); ((meltobject_ptr_t)(/*_.VALDATA___V903*/ meltfptr[902]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V907*/ meltfptr[906]); MELT_LOCATION("warmelt-base.melt:441:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V903*/ meltfptr[902])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V903*/ meltfptr[902])))); ((meltobject_ptr_t)(/*_.VALDATA___V903*/ meltfptr[902]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V911*/ meltfptr[910]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V911*/ meltfptr[910])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V911*/ meltfptr[910]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V908*/ meltfptr[907]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V911*/ meltfptr[910]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V911*/ meltfptr[910])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V911*/ meltfptr[910]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V408*/ meltfptr[407]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V911*/ meltfptr[910]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V911*/ meltfptr[910])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V911*/ meltfptr[910]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V909*/ meltfptr[908]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V911*/ meltfptr[910]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V911*/ meltfptr[910])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V911*/ meltfptr[910]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V911*/ meltfptr[910]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V911*/ meltfptr[910])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V911*/ meltfptr[910]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V910*/ meltfptr[909]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V911*/ meltfptr[910]); MELT_LOCATION("warmelt-base.melt:441:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V903*/ meltfptr[902])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V903*/ meltfptr[902])))); ((meltobject_ptr_t)(/*_.VALDATA___V903*/ meltfptr[902]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V911*/ meltfptr[910]); MELT_LOCATION("warmelt-base.melt:441:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V903*/ meltfptr[902]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V912*/ meltfptr[911])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V912*/ meltfptr[911])))); ((meltobject_ptr_t)(/*_.VALDATA___V912*/ meltfptr[911]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V913*/ meltfptr[912]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V912*/ meltfptr[911]); MELT_LOCATION("warmelt-base.melt:446:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V914*/ meltfptr[913])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V914*/ meltfptr[913])))); ((meltobject_ptr_t)(/*_.VALDATA___V914*/ meltfptr[913]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V915*/ meltfptr[914]); MELT_LOCATION("warmelt-base.melt:446:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V916*/ meltfptr[915])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V916*/ meltfptr[915])))); ((meltobject_ptr_t)(/*_.VALDATA___V916*/ meltfptr[915]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V408*/ meltfptr[407]); MELT_LOCATION("warmelt-base.melt:446:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V916*/ meltfptr[915])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V916*/ meltfptr[915])))); ((meltobject_ptr_t)(/*_.VALDATA___V916*/ meltfptr[915]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:446:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V916*/ meltfptr[915]); MELT_LOCATION("warmelt-base.melt:446:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V917*/ meltfptr[916])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V917*/ meltfptr[916])))); ((meltobject_ptr_t)(/*_.VALDATA___V917*/ meltfptr[916]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:446:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V917*/ meltfptr[916])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V917*/ meltfptr[916])))); ((meltobject_ptr_t)(/*_.VALDATA___V917*/ meltfptr[916]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:446:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V917*/ meltfptr[916]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V918*/ meltfptr[917]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V918*/ meltfptr[917])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V918*/ meltfptr[917]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V916*/ meltfptr[915]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V918*/ meltfptr[917]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V918*/ meltfptr[917])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V918*/ meltfptr[917]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V917*/ meltfptr[916]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V918*/ meltfptr[917]); MELT_LOCATION("warmelt-base.melt:446:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V914*/ meltfptr[913])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V914*/ meltfptr[913])))); ((meltobject_ptr_t)(/*_.VALDATA___V914*/ meltfptr[913]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V918*/ meltfptr[917]); MELT_LOCATION("warmelt-base.melt:446:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V914*/ meltfptr[913])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V914*/ meltfptr[913])))); ((meltobject_ptr_t)(/*_.VALDATA___V914*/ meltfptr[913]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V922*/ meltfptr[921]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V922*/ meltfptr[921])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V922*/ meltfptr[921]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V919*/ meltfptr[918]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V922*/ meltfptr[921]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V922*/ meltfptr[921])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V922*/ meltfptr[921]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V408*/ meltfptr[407]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V922*/ meltfptr[921]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V922*/ meltfptr[921])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V922*/ meltfptr[921]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V920*/ meltfptr[919]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V922*/ meltfptr[921]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V922*/ meltfptr[921])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V922*/ meltfptr[921]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V922*/ meltfptr[921]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V922*/ meltfptr[921])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V922*/ meltfptr[921]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V921*/ meltfptr[920]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V922*/ meltfptr[921]); MELT_LOCATION("warmelt-base.melt:446:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V914*/ meltfptr[913])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V914*/ meltfptr[913])))); ((meltobject_ptr_t)(/*_.VALDATA___V914*/ meltfptr[913]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V922*/ meltfptr[921]); MELT_LOCATION("warmelt-base.melt:446:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V914*/ meltfptr[913]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V923*/ meltfptr[922])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V923*/ meltfptr[922])))); ((meltobject_ptr_t)(/*_.VALDATA___V923*/ meltfptr[922]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V924*/ meltfptr[923]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V923*/ meltfptr[922]); MELT_LOCATION("warmelt-base.melt:451:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V925*/ meltfptr[924])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V925*/ meltfptr[924])))); ((meltobject_ptr_t)(/*_.VALDATA___V925*/ meltfptr[924]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V926*/ meltfptr[925]); MELT_LOCATION("warmelt-base.melt:451:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V927*/ meltfptr[926])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V927*/ meltfptr[926])))); ((meltobject_ptr_t)(/*_.VALDATA___V927*/ meltfptr[926]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V408*/ meltfptr[407]); MELT_LOCATION("warmelt-base.melt:451:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V927*/ meltfptr[926])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V927*/ meltfptr[926])))); ((meltobject_ptr_t)(/*_.VALDATA___V927*/ meltfptr[926]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:451:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V927*/ meltfptr[926]); MELT_LOCATION("warmelt-base.melt:451:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V928*/ meltfptr[927])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V928*/ meltfptr[927])))); ((meltobject_ptr_t)(/*_.VALDATA___V928*/ meltfptr[927]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:451:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V928*/ meltfptr[927])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V928*/ meltfptr[927])))); ((meltobject_ptr_t)(/*_.VALDATA___V928*/ meltfptr[927]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:451:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V928*/ meltfptr[927]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V930*/ meltfptr[929])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V930*/ meltfptr[929])))); ((meltobject_ptr_t)(/*_.VALDATA___V930*/ meltfptr[929]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V931*/ meltfptr[930]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V930*/ meltfptr[929]); MELT_LOCATION("warmelt-base.melt:451:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V929*/ meltfptr[928])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V929*/ meltfptr[928])))); ((meltobject_ptr_t)(/*_.VALDATA___V929*/ meltfptr[928]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V930*/ meltfptr[929]); MELT_LOCATION("warmelt-base.melt:451:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V929*/ meltfptr[928])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V929*/ meltfptr[928])))); ((meltobject_ptr_t)(/*_.VALDATA___V929*/ meltfptr[928]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:451:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V929*/ meltfptr[928]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V932*/ meltfptr[931]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V932*/ meltfptr[931])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V932*/ meltfptr[931]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V927*/ meltfptr[926]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V932*/ meltfptr[931]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V932*/ meltfptr[931])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V932*/ meltfptr[931]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V928*/ meltfptr[927]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V932*/ meltfptr[931]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V932*/ meltfptr[931])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V932*/ meltfptr[931]))->tabval[2] = (melt_ptr_t)(/*_.VALDATA___V929*/ meltfptr[928]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V932*/ meltfptr[931]); MELT_LOCATION("warmelt-base.melt:451:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V925*/ meltfptr[924])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V925*/ meltfptr[924])))); ((meltobject_ptr_t)(/*_.VALDATA___V925*/ meltfptr[924]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V932*/ meltfptr[931]); MELT_LOCATION("warmelt-base.melt:451:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V925*/ meltfptr[924])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V925*/ meltfptr[924])))); ((meltobject_ptr_t)(/*_.VALDATA___V925*/ meltfptr[924]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V933*/ meltfptr[932]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V408*/ meltfptr[407]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V934*/ meltfptr[933]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V935*/ meltfptr[934]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V930*/ meltfptr[929]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V937*/ meltfptr[936]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V936*/ meltfptr[935]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V937*/ meltfptr[936]); MELT_LOCATION("warmelt-base.melt:451:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V925*/ meltfptr[924])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V925*/ meltfptr[924])))); ((meltobject_ptr_t)(/*_.VALDATA___V925*/ meltfptr[924]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V937*/ meltfptr[936]); MELT_LOCATION("warmelt-base.melt:451:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V925*/ meltfptr[924]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V938*/ meltfptr[937])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V938*/ meltfptr[937])))); ((meltobject_ptr_t)(/*_.VALDATA___V938*/ meltfptr[937]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V939*/ meltfptr[938]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V938*/ meltfptr[937]); MELT_LOCATION("warmelt-base.melt:461:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V940*/ meltfptr[939])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V940*/ meltfptr[939])))); ((meltobject_ptr_t)(/*_.VALDATA___V940*/ meltfptr[939]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V941*/ meltfptr[940]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V943*/ meltfptr[942])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V943*/ meltfptr[942])))); ((meltobject_ptr_t)(/*_.VALDATA___V943*/ meltfptr[942]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V944*/ meltfptr[943]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V943*/ meltfptr[942]); MELT_LOCATION("warmelt-base.melt:461:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V942*/ meltfptr[941])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V942*/ meltfptr[941])))); ((meltobject_ptr_t)(/*_.VALDATA___V942*/ meltfptr[941]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V943*/ meltfptr[942]); MELT_LOCATION("warmelt-base.melt:461:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V942*/ meltfptr[941])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V942*/ meltfptr[941])))); ((meltobject_ptr_t)(/*_.VALDATA___V942*/ meltfptr[941]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:461:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V942*/ meltfptr[941]); MELT_LOCATION("warmelt-base.melt:461:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V945*/ meltfptr[944])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V945*/ meltfptr[944])))); ((meltobject_ptr_t)(/*_.VALDATA___V945*/ meltfptr[944]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:461:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V945*/ meltfptr[944])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V945*/ meltfptr[944])))); ((meltobject_ptr_t)(/*_.VALDATA___V945*/ meltfptr[944]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:461:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V945*/ meltfptr[944]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V946*/ meltfptr[945]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V946*/ meltfptr[945])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V946*/ meltfptr[945]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V942*/ meltfptr[941]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V946*/ meltfptr[945]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V946*/ meltfptr[945])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V946*/ meltfptr[945]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V945*/ meltfptr[944]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V946*/ meltfptr[945]); MELT_LOCATION("warmelt-base.melt:461:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V940*/ meltfptr[939])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V940*/ meltfptr[939])))); ((meltobject_ptr_t)(/*_.VALDATA___V940*/ meltfptr[939]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V946*/ meltfptr[945]); MELT_LOCATION("warmelt-base.melt:461:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V940*/ meltfptr[939])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V940*/ meltfptr[939])))); ((meltobject_ptr_t)(/*_.VALDATA___V940*/ meltfptr[939]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V950*/ meltfptr[949]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V950*/ meltfptr[949])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V950*/ meltfptr[949]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V947*/ meltfptr[946]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V950*/ meltfptr[949]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V950*/ meltfptr[949])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V950*/ meltfptr[949]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V943*/ meltfptr[942]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V950*/ meltfptr[949]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V950*/ meltfptr[949])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V950*/ meltfptr[949]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V948*/ meltfptr[947]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V950*/ meltfptr[949]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V950*/ meltfptr[949])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V950*/ meltfptr[949]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V950*/ meltfptr[949]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V950*/ meltfptr[949])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V950*/ meltfptr[949]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V949*/ meltfptr[948]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V950*/ meltfptr[949]); MELT_LOCATION("warmelt-base.melt:461:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V940*/ meltfptr[939])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V940*/ meltfptr[939])))); ((meltobject_ptr_t)(/*_.VALDATA___V940*/ meltfptr[939]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V950*/ meltfptr[949]); MELT_LOCATION("warmelt-base.melt:461:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V940*/ meltfptr[939]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V951*/ meltfptr[950])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V951*/ meltfptr[950])))); ((meltobject_ptr_t)(/*_.VALDATA___V951*/ meltfptr[950]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V952*/ meltfptr[951]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V951*/ meltfptr[950]); MELT_LOCATION("warmelt-base.melt:469:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V953*/ meltfptr[952])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V953*/ meltfptr[952])))); ((meltobject_ptr_t)(/*_.VALDATA___V953*/ meltfptr[952]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V954*/ meltfptr[953]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V956*/ meltfptr[955])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V956*/ meltfptr[955])))); ((meltobject_ptr_t)(/*_.VALDATA___V956*/ meltfptr[955]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V957*/ meltfptr[956]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V956*/ meltfptr[955]); MELT_LOCATION("warmelt-base.melt:469:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V955*/ meltfptr[954])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V955*/ meltfptr[954])))); ((meltobject_ptr_t)(/*_.VALDATA___V955*/ meltfptr[954]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V956*/ meltfptr[955]); MELT_LOCATION("warmelt-base.melt:469:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V955*/ meltfptr[954])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V955*/ meltfptr[954])))); ((meltobject_ptr_t)(/*_.VALDATA___V955*/ meltfptr[954]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:469:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V955*/ meltfptr[954]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V959*/ meltfptr[958])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V959*/ meltfptr[958])))); ((meltobject_ptr_t)(/*_.VALDATA___V959*/ meltfptr[958]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V960*/ meltfptr[959]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V959*/ meltfptr[958]); MELT_LOCATION("warmelt-base.melt:469:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V958*/ meltfptr[957])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V958*/ meltfptr[957])))); ((meltobject_ptr_t)(/*_.VALDATA___V958*/ meltfptr[957]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V959*/ meltfptr[958]); MELT_LOCATION("warmelt-base.melt:469:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V958*/ meltfptr[957])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V958*/ meltfptr[957])))); ((meltobject_ptr_t)(/*_.VALDATA___V958*/ meltfptr[957]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:469:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V958*/ meltfptr[957]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V961*/ meltfptr[960]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V961*/ meltfptr[960])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V961*/ meltfptr[960]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V955*/ meltfptr[954]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V961*/ meltfptr[960]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V961*/ meltfptr[960])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V961*/ meltfptr[960]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V958*/ meltfptr[957]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V961*/ meltfptr[960]); MELT_LOCATION("warmelt-base.melt:469:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V953*/ meltfptr[952])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V953*/ meltfptr[952])))); ((meltobject_ptr_t)(/*_.VALDATA___V953*/ meltfptr[952]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V961*/ meltfptr[960]); MELT_LOCATION("warmelt-base.melt:469:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V953*/ meltfptr[952])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V953*/ meltfptr[952])))); ((meltobject_ptr_t)(/*_.VALDATA___V953*/ meltfptr[952]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V965*/ meltfptr[964]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V965*/ meltfptr[964])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V965*/ meltfptr[964]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V962*/ meltfptr[961]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V965*/ meltfptr[964]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V965*/ meltfptr[964])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V965*/ meltfptr[964]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V956*/ meltfptr[955]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V965*/ meltfptr[964]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V965*/ meltfptr[964])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V965*/ meltfptr[964]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V963*/ meltfptr[962]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V965*/ meltfptr[964]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V965*/ meltfptr[964])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V965*/ meltfptr[964]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V959*/ meltfptr[958]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V965*/ meltfptr[964]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V965*/ meltfptr[964])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V965*/ meltfptr[964]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V964*/ meltfptr[963]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V965*/ meltfptr[964]); MELT_LOCATION("warmelt-base.melt:469:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V953*/ meltfptr[952])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V953*/ meltfptr[952])))); ((meltobject_ptr_t)(/*_.VALDATA___V953*/ meltfptr[952]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V965*/ meltfptr[964]); MELT_LOCATION("warmelt-base.melt:469:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V953*/ meltfptr[952]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V966*/ meltfptr[965])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V966*/ meltfptr[965])))); ((meltobject_ptr_t)(/*_.VALDATA___V966*/ meltfptr[965]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V967*/ meltfptr[966]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V966*/ meltfptr[965]); MELT_LOCATION("warmelt-base.melt:477:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V968*/ meltfptr[967])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V968*/ meltfptr[967])))); ((meltobject_ptr_t)(/*_.VALDATA___V968*/ meltfptr[967]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V969*/ meltfptr[968]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V971*/ meltfptr[970])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V971*/ meltfptr[970])))); ((meltobject_ptr_t)(/*_.VALDATA___V971*/ meltfptr[970]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V972*/ meltfptr[971]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V971*/ meltfptr[970]); MELT_LOCATION("warmelt-base.melt:477:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V970*/ meltfptr[969])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V970*/ meltfptr[969])))); ((meltobject_ptr_t)(/*_.VALDATA___V970*/ meltfptr[969]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V971*/ meltfptr[970]); MELT_LOCATION("warmelt-base.melt:477:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V970*/ meltfptr[969])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V970*/ meltfptr[969])))); ((meltobject_ptr_t)(/*_.VALDATA___V970*/ meltfptr[969]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:477:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V970*/ meltfptr[969]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V973*/ meltfptr[972]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V973*/ meltfptr[972])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V973*/ meltfptr[972]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V970*/ meltfptr[969]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V973*/ meltfptr[972]); MELT_LOCATION("warmelt-base.melt:477:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V968*/ meltfptr[967])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V968*/ meltfptr[967])))); ((meltobject_ptr_t)(/*_.VALDATA___V968*/ meltfptr[967]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V973*/ meltfptr[972]); MELT_LOCATION("warmelt-base.melt:477:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V968*/ meltfptr[967])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V968*/ meltfptr[967])))); ((meltobject_ptr_t)(/*_.VALDATA___V968*/ meltfptr[967]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V976*/ meltfptr[975]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V976*/ meltfptr[975])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V976*/ meltfptr[975]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V974*/ meltfptr[973]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V976*/ meltfptr[975]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V976*/ meltfptr[975])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V976*/ meltfptr[975]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V971*/ meltfptr[970]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V976*/ meltfptr[975]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V976*/ meltfptr[975])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V976*/ meltfptr[975]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V975*/ meltfptr[974]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V976*/ meltfptr[975]); MELT_LOCATION("warmelt-base.melt:477:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V968*/ meltfptr[967])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V968*/ meltfptr[967])))); ((meltobject_ptr_t)(/*_.VALDATA___V968*/ meltfptr[967]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V976*/ meltfptr[975]); MELT_LOCATION("warmelt-base.melt:477:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V968*/ meltfptr[967]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V977*/ meltfptr[976])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V977*/ meltfptr[976])))); ((meltobject_ptr_t)(/*_.VALDATA___V977*/ meltfptr[976]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V978*/ meltfptr[977]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V977*/ meltfptr[976]); MELT_LOCATION("warmelt-base.melt:481:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V979*/ meltfptr[978])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V979*/ meltfptr[978])))); ((meltobject_ptr_t)(/*_.VALDATA___V979*/ meltfptr[978]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V980*/ meltfptr[979]); MELT_LOCATION("warmelt-base.melt:481:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V981*/ meltfptr[980])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V981*/ meltfptr[980])))); ((meltobject_ptr_t)(/*_.VALDATA___V981*/ meltfptr[980]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V971*/ meltfptr[970]); MELT_LOCATION("warmelt-base.melt:481:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V981*/ meltfptr[980])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V981*/ meltfptr[980])))); ((meltobject_ptr_t)(/*_.VALDATA___V981*/ meltfptr[980]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:481:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V981*/ meltfptr[980]); MELT_LOCATION("warmelt-base.melt:481:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V982*/ meltfptr[981])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V982*/ meltfptr[981])))); ((meltobject_ptr_t)(/*_.VALDATA___V982*/ meltfptr[981]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V677*/ meltfptr[676]); #undef meltfram__ } /*end of warmelt_base_initialmeltchunk_6*/ void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_7 (struct frame_start_module_melt_st* meltframptr__, char predefinited[]) { #define meltfram__ (*meltframptr__) #undef meltcallcount #define meltcallcount 0L MELT_LOCATION("warmelt-base.melt:481:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V982*/ meltfptr[981])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V982*/ meltfptr[981])))); ((meltobject_ptr_t)(/*_.VALDATA___V982*/ meltfptr[981]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:481:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V982*/ meltfptr[981]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V983*/ meltfptr[982]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V983*/ meltfptr[982])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V983*/ meltfptr[982]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V981*/ meltfptr[980]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V983*/ meltfptr[982]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V983*/ meltfptr[982])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V983*/ meltfptr[982]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V982*/ meltfptr[981]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V983*/ meltfptr[982]); MELT_LOCATION("warmelt-base.melt:481:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V979*/ meltfptr[978])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V979*/ meltfptr[978])))); ((meltobject_ptr_t)(/*_.VALDATA___V979*/ meltfptr[978]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V983*/ meltfptr[982]); MELT_LOCATION("warmelt-base.melt:481:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V979*/ meltfptr[978])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V979*/ meltfptr[978])))); ((meltobject_ptr_t)(/*_.VALDATA___V979*/ meltfptr[978]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V987*/ meltfptr[986]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V987*/ meltfptr[986])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V987*/ meltfptr[986]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V984*/ meltfptr[983]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V987*/ meltfptr[986]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V987*/ meltfptr[986])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V987*/ meltfptr[986]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V971*/ meltfptr[970]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V987*/ meltfptr[986]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V987*/ meltfptr[986])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V987*/ meltfptr[986]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V985*/ meltfptr[984]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V987*/ meltfptr[986]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V987*/ meltfptr[986])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V987*/ meltfptr[986]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V677*/ meltfptr[676]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V987*/ meltfptr[986]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V987*/ meltfptr[986])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V987*/ meltfptr[986]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V986*/ meltfptr[985]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V987*/ meltfptr[986]); MELT_LOCATION("warmelt-base.melt:481:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V979*/ meltfptr[978])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V979*/ meltfptr[978])))); ((meltobject_ptr_t)(/*_.VALDATA___V979*/ meltfptr[978]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V987*/ meltfptr[986]); MELT_LOCATION("warmelt-base.melt:481:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V979*/ meltfptr[978]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V988*/ meltfptr[987])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V988*/ meltfptr[987])))); ((meltobject_ptr_t)(/*_.VALDATA___V988*/ meltfptr[987]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V989*/ meltfptr[988]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V988*/ meltfptr[987]); MELT_LOCATION("warmelt-base.melt:485:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V990*/ meltfptr[989])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V990*/ meltfptr[989])))); ((meltobject_ptr_t)(/*_.VALDATA___V990*/ meltfptr[989]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V991*/ meltfptr[990]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V993*/ meltfptr[992])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V993*/ meltfptr[992])))); ((meltobject_ptr_t)(/*_.VALDATA___V993*/ meltfptr[992]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V994*/ meltfptr[993]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V993*/ meltfptr[992]); MELT_LOCATION("warmelt-base.melt:485:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V992*/ meltfptr[991])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V992*/ meltfptr[991])))); ((meltobject_ptr_t)(/*_.VALDATA___V992*/ meltfptr[991]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V993*/ meltfptr[992]); MELT_LOCATION("warmelt-base.melt:485:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V992*/ meltfptr[991])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V992*/ meltfptr[991])))); ((meltobject_ptr_t)(/*_.VALDATA___V992*/ meltfptr[991]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:485:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V992*/ meltfptr[991]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V996*/ meltfptr[995])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V996*/ meltfptr[995])))); ((meltobject_ptr_t)(/*_.VALDATA___V996*/ meltfptr[995]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V997*/ meltfptr[996]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V996*/ meltfptr[995]); MELT_LOCATION("warmelt-base.melt:485:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V995*/ meltfptr[994])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V995*/ meltfptr[994])))); ((meltobject_ptr_t)(/*_.VALDATA___V995*/ meltfptr[994]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V996*/ meltfptr[995]); MELT_LOCATION("warmelt-base.melt:485:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V995*/ meltfptr[994])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V995*/ meltfptr[994])))); ((meltobject_ptr_t)(/*_.VALDATA___V995*/ meltfptr[994]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:485:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V995*/ meltfptr[994]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V998*/ meltfptr[997]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V998*/ meltfptr[997])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V998*/ meltfptr[997]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V992*/ meltfptr[991]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V998*/ meltfptr[997]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V998*/ meltfptr[997])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V998*/ meltfptr[997]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V995*/ meltfptr[994]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V998*/ meltfptr[997]); MELT_LOCATION("warmelt-base.melt:485:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V990*/ meltfptr[989])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V990*/ meltfptr[989])))); ((meltobject_ptr_t)(/*_.VALDATA___V990*/ meltfptr[989]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V998*/ meltfptr[997]); MELT_LOCATION("warmelt-base.melt:485:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V990*/ meltfptr[989])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V990*/ meltfptr[989])))); ((meltobject_ptr_t)(/*_.VALDATA___V990*/ meltfptr[989]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1002*/ meltfptr[1001]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1002*/ meltfptr[1001])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1002*/ meltfptr[1001]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V999*/ meltfptr[998]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1002*/ meltfptr[1001]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1002*/ meltfptr[1001])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1002*/ meltfptr[1001]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V993*/ meltfptr[992]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1002*/ meltfptr[1001]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1002*/ meltfptr[1001])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1002*/ meltfptr[1001]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1000*/ meltfptr[999]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1002*/ meltfptr[1001]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1002*/ meltfptr[1001])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1002*/ meltfptr[1001]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V996*/ meltfptr[995]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1002*/ meltfptr[1001]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1002*/ meltfptr[1001])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1002*/ meltfptr[1001]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1001*/ meltfptr[1000]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1002*/ meltfptr[1001]); MELT_LOCATION("warmelt-base.melt:485:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V990*/ meltfptr[989])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V990*/ meltfptr[989])))); ((meltobject_ptr_t)(/*_.VALDATA___V990*/ meltfptr[989]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1002*/ meltfptr[1001]); MELT_LOCATION("warmelt-base.melt:485:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V990*/ meltfptr[989]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1003*/ meltfptr[1002])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1003*/ meltfptr[1002])))); ((meltobject_ptr_t)(/*_.VALDATA___V1003*/ meltfptr[1002]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1004*/ meltfptr[1003]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1003*/ meltfptr[1002]); MELT_LOCATION("warmelt-base.melt:488:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1005*/ meltfptr[1004])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1005*/ meltfptr[1004])))); ((meltobject_ptr_t)(/*_.VALDATA___V1005*/ meltfptr[1004]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1006*/ meltfptr[1005]); MELT_LOCATION("warmelt-base.melt:488:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1007*/ meltfptr[1006])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1007*/ meltfptr[1006])))); ((meltobject_ptr_t)(/*_.VALDATA___V1007*/ meltfptr[1006]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V993*/ meltfptr[992]); MELT_LOCATION("warmelt-base.melt:488:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1007*/ meltfptr[1006])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1007*/ meltfptr[1006])))); ((meltobject_ptr_t)(/*_.VALDATA___V1007*/ meltfptr[1006]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:488:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1007*/ meltfptr[1006]); MELT_LOCATION("warmelt-base.melt:488:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1008*/ meltfptr[1007])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1008*/ meltfptr[1007])))); ((meltobject_ptr_t)(/*_.VALDATA___V1008*/ meltfptr[1007]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V996*/ meltfptr[995]); MELT_LOCATION("warmelt-base.melt:488:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1008*/ meltfptr[1007])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1008*/ meltfptr[1007])))); ((meltobject_ptr_t)(/*_.VALDATA___V1008*/ meltfptr[1007]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:488:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1008*/ meltfptr[1007]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1009*/ meltfptr[1008]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1009*/ meltfptr[1008])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1009*/ meltfptr[1008]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1007*/ meltfptr[1006]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1009*/ meltfptr[1008]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1009*/ meltfptr[1008])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1009*/ meltfptr[1008]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1008*/ meltfptr[1007]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1009*/ meltfptr[1008]); MELT_LOCATION("warmelt-base.melt:488:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1005*/ meltfptr[1004])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1005*/ meltfptr[1004])))); ((meltobject_ptr_t)(/*_.VALDATA___V1005*/ meltfptr[1004]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1009*/ meltfptr[1008]); MELT_LOCATION("warmelt-base.melt:488:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1005*/ meltfptr[1004])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1005*/ meltfptr[1004])))); ((meltobject_ptr_t)(/*_.VALDATA___V1005*/ meltfptr[1004]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1010*/ meltfptr[1009]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V993*/ meltfptr[992]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1011*/ meltfptr[1010]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V996*/ meltfptr[995]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1012*/ meltfptr[1011]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V993*/ meltfptr[992]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V1013*/ meltfptr[1012]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (7>=0 && 7< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))->tabval[7] = (melt_ptr_t)(/*_.VALDATA___V996*/ meltfptr[995]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (8>=0 && 8< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1015*/ meltfptr[1014]))->tabval[8] = (melt_ptr_t)(/*_.VALSTR___V1014*/ meltfptr[1013]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1015*/ meltfptr[1014]); MELT_LOCATION("warmelt-base.melt:488:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1005*/ meltfptr[1004])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1005*/ meltfptr[1004])))); ((meltobject_ptr_t)(/*_.VALDATA___V1005*/ meltfptr[1004]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1015*/ meltfptr[1014]); MELT_LOCATION("warmelt-base.melt:488:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1005*/ meltfptr[1004]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1016*/ meltfptr[1015])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1016*/ meltfptr[1015])))); ((meltobject_ptr_t)(/*_.VALDATA___V1016*/ meltfptr[1015]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1017*/ meltfptr[1016]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1016*/ meltfptr[1015]); MELT_LOCATION("warmelt-base.melt:492:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1018*/ meltfptr[1017])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1018*/ meltfptr[1017])))); ((meltobject_ptr_t)(/*_.VALDATA___V1018*/ meltfptr[1017]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1019*/ meltfptr[1018]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1021*/ meltfptr[1020])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1021*/ meltfptr[1020])))); ((meltobject_ptr_t)(/*_.VALDATA___V1021*/ meltfptr[1020]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1022*/ meltfptr[1021]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1021*/ meltfptr[1020]); MELT_LOCATION("warmelt-base.melt:492:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1020*/ meltfptr[1019])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1020*/ meltfptr[1019])))); ((meltobject_ptr_t)(/*_.VALDATA___V1020*/ meltfptr[1019]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1021*/ meltfptr[1020]); MELT_LOCATION("warmelt-base.melt:492:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1020*/ meltfptr[1019])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1020*/ meltfptr[1019])))); ((meltobject_ptr_t)(/*_.VALDATA___V1020*/ meltfptr[1019]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:492:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1020*/ meltfptr[1019]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1023*/ meltfptr[1022]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1023*/ meltfptr[1022])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1023*/ meltfptr[1022]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1020*/ meltfptr[1019]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1023*/ meltfptr[1022]); MELT_LOCATION("warmelt-base.melt:492:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1018*/ meltfptr[1017])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1018*/ meltfptr[1017])))); ((meltobject_ptr_t)(/*_.VALDATA___V1018*/ meltfptr[1017]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1023*/ meltfptr[1022]); MELT_LOCATION("warmelt-base.melt:492:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1018*/ meltfptr[1017])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1018*/ meltfptr[1017])))); ((meltobject_ptr_t)(/*_.VALDATA___V1018*/ meltfptr[1017]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1027*/ meltfptr[1026]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1027*/ meltfptr[1026])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1027*/ meltfptr[1026]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1024*/ meltfptr[1023]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1027*/ meltfptr[1026]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1027*/ meltfptr[1026])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1027*/ meltfptr[1026]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1021*/ meltfptr[1020]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1027*/ meltfptr[1026]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1027*/ meltfptr[1026])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1027*/ meltfptr[1026]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1025*/ meltfptr[1024]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1027*/ meltfptr[1026]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1027*/ meltfptr[1026])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1027*/ meltfptr[1026]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1021*/ meltfptr[1020]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1027*/ meltfptr[1026]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1027*/ meltfptr[1026])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1027*/ meltfptr[1026]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1026*/ meltfptr[1025]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1027*/ meltfptr[1026]); MELT_LOCATION("warmelt-base.melt:492:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1018*/ meltfptr[1017])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1018*/ meltfptr[1017])))); ((meltobject_ptr_t)(/*_.VALDATA___V1018*/ meltfptr[1017]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1027*/ meltfptr[1026]); MELT_LOCATION("warmelt-base.melt:492:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1018*/ meltfptr[1017]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1028*/ meltfptr[1027])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1028*/ meltfptr[1027])))); ((meltobject_ptr_t)(/*_.VALDATA___V1028*/ meltfptr[1027]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1029*/ meltfptr[1028]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1028*/ meltfptr[1027]); MELT_LOCATION("warmelt-base.melt:496:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1030*/ meltfptr[1029])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1030*/ meltfptr[1029])))); ((meltobject_ptr_t)(/*_.VALDATA___V1030*/ meltfptr[1029]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1031*/ meltfptr[1030]); MELT_LOCATION("warmelt-base.melt:496:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1032*/ meltfptr[1031])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1032*/ meltfptr[1031])))); ((meltobject_ptr_t)(/*_.VALDATA___V1032*/ meltfptr[1031]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1021*/ meltfptr[1020]); MELT_LOCATION("warmelt-base.melt:496:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1032*/ meltfptr[1031])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1032*/ meltfptr[1031])))); ((meltobject_ptr_t)(/*_.VALDATA___V1032*/ meltfptr[1031]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:496:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1032*/ meltfptr[1031]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1034*/ meltfptr[1033])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1034*/ meltfptr[1033])))); ((meltobject_ptr_t)(/*_.VALDATA___V1034*/ meltfptr[1033]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1035*/ meltfptr[1034]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1034*/ meltfptr[1033]); MELT_LOCATION("warmelt-base.melt:496:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1033*/ meltfptr[1032])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1033*/ meltfptr[1032])))); ((meltobject_ptr_t)(/*_.VALDATA___V1033*/ meltfptr[1032]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1034*/ meltfptr[1033]); MELT_LOCATION("warmelt-base.melt:496:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1033*/ meltfptr[1032])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1033*/ meltfptr[1032])))); ((meltobject_ptr_t)(/*_.VALDATA___V1033*/ meltfptr[1032]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:496:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1033*/ meltfptr[1032]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1037*/ meltfptr[1036])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1037*/ meltfptr[1036])))); ((meltobject_ptr_t)(/*_.VALDATA___V1037*/ meltfptr[1036]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1038*/ meltfptr[1037]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1037*/ meltfptr[1036]); MELT_LOCATION("warmelt-base.melt:496:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1036*/ meltfptr[1035])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1036*/ meltfptr[1035])))); ((meltobject_ptr_t)(/*_.VALDATA___V1036*/ meltfptr[1035]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1037*/ meltfptr[1036]); MELT_LOCATION("warmelt-base.melt:496:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1036*/ meltfptr[1035])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1036*/ meltfptr[1035])))); ((meltobject_ptr_t)(/*_.VALDATA___V1036*/ meltfptr[1035]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:496:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1036*/ meltfptr[1035]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1039*/ meltfptr[1038]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1039*/ meltfptr[1038])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1039*/ meltfptr[1038]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1032*/ meltfptr[1031]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1039*/ meltfptr[1038]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1039*/ meltfptr[1038])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1039*/ meltfptr[1038]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1033*/ meltfptr[1032]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1039*/ meltfptr[1038]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1039*/ meltfptr[1038])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1039*/ meltfptr[1038]))->tabval[2] = (melt_ptr_t)(/*_.VALDATA___V1036*/ meltfptr[1035]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1039*/ meltfptr[1038]); MELT_LOCATION("warmelt-base.melt:496:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1030*/ meltfptr[1029])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1030*/ meltfptr[1029])))); ((meltobject_ptr_t)(/*_.VALDATA___V1030*/ meltfptr[1029]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1039*/ meltfptr[1038]); MELT_LOCATION("warmelt-base.melt:496:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1030*/ meltfptr[1029])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1030*/ meltfptr[1029])))); ((meltobject_ptr_t)(/*_.VALDATA___V1030*/ meltfptr[1029]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1040*/ meltfptr[1039]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1021*/ meltfptr[1020]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1041*/ meltfptr[1040]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1034*/ meltfptr[1033]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1042*/ meltfptr[1041]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V1037*/ meltfptr[1036]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1044*/ meltfptr[1043]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V1043*/ meltfptr[1042]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1044*/ meltfptr[1043]); MELT_LOCATION("warmelt-base.melt:496:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1030*/ meltfptr[1029])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1030*/ meltfptr[1029])))); ((meltobject_ptr_t)(/*_.VALDATA___V1030*/ meltfptr[1029]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1044*/ meltfptr[1043]); MELT_LOCATION("warmelt-base.melt:496:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1030*/ meltfptr[1029]); MELT_LOCATION("warmelt-base.melt:505:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044])))); ((meltobject_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1046*/ meltfptr[1045]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1048*/ meltfptr[1047])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1048*/ meltfptr[1047])))); ((meltobject_ptr_t)(/*_.VALDATA___V1048*/ meltfptr[1047]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1049*/ meltfptr[1048]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1048*/ meltfptr[1047]); MELT_LOCATION("warmelt-base.melt:505:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1047*/ meltfptr[1046])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1047*/ meltfptr[1046])))); ((meltobject_ptr_t)(/*_.VALDATA___V1047*/ meltfptr[1046]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1048*/ meltfptr[1047]); MELT_LOCATION("warmelt-base.melt:505:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1047*/ meltfptr[1046])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1047*/ meltfptr[1046])))); ((meltobject_ptr_t)(/*_.VALDATA___V1047*/ meltfptr[1046]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:505:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1047*/ meltfptr[1046]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1050*/ meltfptr[1049]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1050*/ meltfptr[1049])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1050*/ meltfptr[1049]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1047*/ meltfptr[1046]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1050*/ meltfptr[1049]); MELT_LOCATION("warmelt-base.melt:505:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044])))); ((meltobject_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1050*/ meltfptr[1049]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1052*/ meltfptr[1051])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1052*/ meltfptr[1051])))); ((meltobject_ptr_t)(/*_.VALDATA___V1052*/ meltfptr[1051]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1053*/ meltfptr[1052]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1052*/ meltfptr[1051]); MELT_LOCATION("warmelt-base.melt:505:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1051*/ meltfptr[1050])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1051*/ meltfptr[1050])))); ((meltobject_ptr_t)(/*_.VALDATA___V1051*/ meltfptr[1050]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1052*/ meltfptr[1051]); MELT_LOCATION("warmelt-base.melt:505:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1051*/ meltfptr[1050])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1051*/ meltfptr[1050])))); ((meltobject_ptr_t)(/*_.VALDATA___V1051*/ meltfptr[1050]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:505:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1051*/ meltfptr[1050]); MELT_LOCATION("warmelt-base.melt:505:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044])))); ((meltobject_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044]))->obj_vartab[3] = (melt_ptr_t)( /*_.VALDATA___V1051*/ meltfptr[1050]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1055*/ meltfptr[1054])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1055*/ meltfptr[1054])))); ((meltobject_ptr_t)(/*_.VALDATA___V1055*/ meltfptr[1054]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1056*/ meltfptr[1055]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1055*/ meltfptr[1054]); MELT_LOCATION("warmelt-base.melt:505:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1054*/ meltfptr[1053])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1054*/ meltfptr[1053])))); ((meltobject_ptr_t)(/*_.VALDATA___V1054*/ meltfptr[1053]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1055*/ meltfptr[1054]); MELT_LOCATION("warmelt-base.melt:505:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1054*/ meltfptr[1053])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1054*/ meltfptr[1053])))); ((meltobject_ptr_t)(/*_.VALDATA___V1054*/ meltfptr[1053]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:505:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1054*/ meltfptr[1053]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1057*/ meltfptr[1056]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1057*/ meltfptr[1056])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1057*/ meltfptr[1056]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1054*/ meltfptr[1053]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1057*/ meltfptr[1056]); MELT_LOCATION("warmelt-base.melt:505:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044])))); ((meltobject_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1057*/ meltfptr[1056]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1058*/ meltfptr[1057])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1058*/ meltfptr[1057])))); ((meltobject_ptr_t)(/*_.VALDATA___V1058*/ meltfptr[1057]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1059*/ meltfptr[1058]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1058*/ meltfptr[1057]); MELT_LOCATION("warmelt-base.melt:505:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (5>=0 && 5< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044])))); ((meltobject_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044]))->obj_vartab[5] = (melt_ptr_t)( /*_.VALDATA___V1058*/ meltfptr[1057]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1060*/ meltfptr[1059]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1058*/ meltfptr[1057]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1061*/ meltfptr[1060]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1052*/ meltfptr[1051]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1062*/ meltfptr[1061]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V1048*/ meltfptr[1047]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1064*/ meltfptr[1063]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V1063*/ meltfptr[1062]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1064*/ meltfptr[1063]); MELT_LOCATION("warmelt-base.melt:505:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (6>=0 && 6< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044])))); ((meltobject_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044]))->obj_vartab[6] = (melt_ptr_t)( /*_.VALTUP___V1064*/ meltfptr[1063]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1065*/ meltfptr[1064]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1058*/ meltfptr[1057]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1066*/ meltfptr[1065]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1055*/ meltfptr[1054]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1067*/ meltfptr[1066]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V1052*/ meltfptr[1051]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V1068*/ meltfptr[1067]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (7>=0 && 7< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))->tabval[7] = (melt_ptr_t)(/*_.VALDATA___V1048*/ meltfptr[1047]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (8>=0 && 8< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1070*/ meltfptr[1069]))->tabval[8] = (melt_ptr_t)(/*_.VALSTR___V1069*/ meltfptr[1068]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1070*/ meltfptr[1069]); MELT_LOCATION("warmelt-base.melt:505:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (7>=0 && 7< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044])))); ((meltobject_ptr_t)(/*_.VALDATA___V1045*/ meltfptr[1044]))->obj_vartab[7] = (melt_ptr_t)( /*_.VALTUP___V1070*/ meltfptr[1069]); MELT_LOCATION("warmelt-base.melt:505:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1045*/ meltfptr[1044]); MELT_LOCATION("warmelt-base.melt:522:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070])))); ((meltobject_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1072*/ meltfptr[1071]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1074*/ meltfptr[1073])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1074*/ meltfptr[1073])))); ((meltobject_ptr_t)(/*_.VALDATA___V1074*/ meltfptr[1073]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1075*/ meltfptr[1074]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1074*/ meltfptr[1073]); MELT_LOCATION("warmelt-base.melt:522:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1073*/ meltfptr[1072])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1073*/ meltfptr[1072])))); ((meltobject_ptr_t)(/*_.VALDATA___V1073*/ meltfptr[1072]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1074*/ meltfptr[1073]); MELT_LOCATION("warmelt-base.melt:522:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1073*/ meltfptr[1072])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1073*/ meltfptr[1072])))); ((meltobject_ptr_t)(/*_.VALDATA___V1073*/ meltfptr[1072]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:522:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1073*/ meltfptr[1072]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1076*/ meltfptr[1075]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1076*/ meltfptr[1075])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1076*/ meltfptr[1075]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1073*/ meltfptr[1072]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1076*/ meltfptr[1075]); MELT_LOCATION("warmelt-base.melt:522:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070])))); ((meltobject_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1076*/ meltfptr[1075]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1078*/ meltfptr[1077])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1078*/ meltfptr[1077])))); ((meltobject_ptr_t)(/*_.VALDATA___V1078*/ meltfptr[1077]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1079*/ meltfptr[1078]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1078*/ meltfptr[1077]); MELT_LOCATION("warmelt-base.melt:522:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1077*/ meltfptr[1076])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1077*/ meltfptr[1076])))); ((meltobject_ptr_t)(/*_.VALDATA___V1077*/ meltfptr[1076]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1078*/ meltfptr[1077]); MELT_LOCATION("warmelt-base.melt:522:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1077*/ meltfptr[1076])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1077*/ meltfptr[1076])))); ((meltobject_ptr_t)(/*_.VALDATA___V1077*/ meltfptr[1076]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:522:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1077*/ meltfptr[1076]); MELT_LOCATION("warmelt-base.melt:522:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070])))); ((meltobject_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070]))->obj_vartab[3] = (melt_ptr_t)( /*_.VALDATA___V1077*/ meltfptr[1076]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1080*/ meltfptr[1079]); MELT_LOCATION("warmelt-base.melt:522:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070])))); ((meltobject_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1080*/ meltfptr[1079]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1081*/ meltfptr[1080])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1081*/ meltfptr[1080])))); ((meltobject_ptr_t)(/*_.VALDATA___V1081*/ meltfptr[1080]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1082*/ meltfptr[1081]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1081*/ meltfptr[1080]); MELT_LOCATION("warmelt-base.melt:522:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (5>=0 && 5< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070])))); ((meltobject_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070]))->obj_vartab[5] = (melt_ptr_t)( /*_.VALDATA___V1081*/ meltfptr[1080]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1086*/ meltfptr[1085]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1086*/ meltfptr[1085])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1086*/ meltfptr[1085]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1083*/ meltfptr[1082]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1086*/ meltfptr[1085]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1086*/ meltfptr[1085])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1086*/ meltfptr[1085]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1078*/ meltfptr[1077]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1086*/ meltfptr[1085]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1086*/ meltfptr[1085])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1086*/ meltfptr[1085]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1084*/ meltfptr[1083]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1086*/ meltfptr[1085]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1086*/ meltfptr[1085])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1086*/ meltfptr[1085]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1074*/ meltfptr[1073]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1086*/ meltfptr[1085]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1086*/ meltfptr[1085])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1086*/ meltfptr[1085]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1085*/ meltfptr[1084]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1086*/ meltfptr[1085]); MELT_LOCATION("warmelt-base.melt:522:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (6>=0 && 6< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070])))); ((meltobject_ptr_t)(/*_.VALDATA___V1071*/ meltfptr[1070]))->obj_vartab[6] = (melt_ptr_t)( /*_.VALTUP___V1086*/ meltfptr[1085]); MELT_LOCATION("warmelt-base.melt:522:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1071*/ meltfptr[1070]); MELT_LOCATION("warmelt-base.melt:535:/ initchunk"); /*^putroutconst*/ /*putroutconst*/ melt_assertmsg("putroutconst checkrout", melt_magic_discr((melt_ptr_t)(/*_.VALROUT___V1087*/ meltfptr[1086])) == OBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg("putroutconst constnull.drout_1080__COMPARE_NAMED_ALPHA#0", NULL != (/*_.VALBXINT___V1088*/ meltfptr[1087])); ((meltroutine_ptr_t)/*_.VALROUT___V1087*/ meltfptr[1086])->tabval[0] = (melt_ptr_t)(/*_.VALBXINT___V1088*/ meltfptr[1087]); MELT_LOCATION("warmelt-base.melt:535:/ initchunk"); /*^putroutconst*/ /*putroutconst*/ melt_assertmsg("putroutconst checkrout", melt_magic_discr((melt_ptr_t)(/*_.VALROUT___V1087*/ meltfptr[1086])) == OBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg("putroutconst constnull.drout_1080__COMPARE_NAMED_ALPHA#1", NULL != (/*_.CLASS_NAMED__V7*/ meltfptr[6])); ((meltroutine_ptr_t)/*_.VALROUT___V1087*/ meltfptr[1086])->tabval[1] = (melt_ptr_t)(/*_.CLASS_NAMED__V7*/ meltfptr[6]); MELT_LOCATION("warmelt-base.melt:535:/ initchunk"); /*^putroutconst*/ /*putroutconst*/ melt_assertmsg("putroutconst checkrout", melt_magic_discr((melt_ptr_t)(/*_.VALROUT___V1087*/ meltfptr[1086])) == OBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg("putroutconst constnull.drout_1080__COMPARE_NAMED_ALPHA#2", NULL != (/*_.VALBXINT___V1089*/ meltfptr[1088])); ((meltroutine_ptr_t)/*_.VALROUT___V1087*/ meltfptr[1086])->tabval[2] = (melt_ptr_t)(/*_.VALBXINT___V1089*/ meltfptr[1088]); MELT_LOCATION("warmelt-base.melt:535:/ initchunk"); /*^putroutconst*/ /*putroutconst*/ melt_assertmsg("putroutconst checkrout", melt_magic_discr((melt_ptr_t)(/*_.VALROUT___V1087*/ meltfptr[1086])) == OBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg("putroutconst constnull.drout_1080__COMPARE_NAMED_ALPHA#3", NULL != (/*_.VALBXINT___V1090*/ meltfptr[1089])); ((meltroutine_ptr_t)/*_.VALROUT___V1087*/ meltfptr[1086])->tabval[3] = (melt_ptr_t)(/*_.VALBXINT___V1090*/ meltfptr[1089]); MELT_LOCATION("warmelt-base.melt:535:/ initchunk"); /*^putroutconst*/ /*putroutconst*/ melt_assertmsg("putroutconst checkrout", melt_magic_discr((melt_ptr_t)(/*_.VALROUT___V1087*/ meltfptr[1086])) == OBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg("putroutconst constnull.drout_1080__COMPARE_NAMED_ALPHA#4", NULL != (/*_.VALBXINT___V1091*/ meltfptr[1090])); ((meltroutine_ptr_t)/*_.VALROUT___V1087*/ meltfptr[1086])->tabval[4] = (melt_ptr_t)(/*_.VALBXINT___V1091*/ meltfptr[1090]); MELT_LOCATION("warmelt-base.melt:535:/ initchunk"); /*^putroutconst*/ /*putroutconst*/ melt_assertmsg("putroutconst checkrout", melt_magic_discr((melt_ptr_t)(/*_.VALROUT___V1087*/ meltfptr[1086])) == OBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg("putroutconst constnull.drout_1080__COMPARE_NAMED_ALPHA#5", NULL != (/*_.VALBXINT___V1092*/ meltfptr[1091])); ((meltroutine_ptr_t)/*_.VALROUT___V1087*/ meltfptr[1086])->tabval[5] = (melt_ptr_t)(/*_.VALBXINT___V1092*/ meltfptr[1091]); MELT_LOCATION("warmelt-base.melt:535:/ initchunk"); /*^putroutconst*/ /*putroutconst*/ melt_assertmsg("putroutconst checkrout", melt_magic_discr((melt_ptr_t)(/*_.VALROUT___V1087*/ meltfptr[1086])) == OBMAG_ROUTINE); if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg("putroutconst constnull.drout_1080__COMPARE_NAMED_ALPHA#6", NULL != (/*_.VALBXINT___V1093*/ meltfptr[1092])); ((meltroutine_ptr_t)/*_.VALROUT___V1087*/ meltfptr[1086])->tabval[6] = (melt_ptr_t)(/*_.VALBXINT___V1093*/ meltfptr[1092]); MELT_LOCATION("warmelt-base.melt:535:/ initchunk"); /*^touch*/ /*touch:IROUTVAL_*/ meltgc_touch(/*_.VALROUT___V1087*/ meltfptr[1086]); /*putclosurout*/ melt_assertmsg("putclosrout checkclo", melt_magic_discr((melt_ptr_t)(/*_.VALCLO___V1094*/ meltfptr[1093])) == OBMAG_CLOSURE); melt_assertmsg("putclosrout checkrout", melt_magic_discr((melt_ptr_t)(/*_.VALROUT___V1087*/ meltfptr[1086])) == OBMAG_ROUTINE); ((meltclosure_ptr_t)/*_.VALCLO___V1094*/ meltfptr[1093])->rout = (meltroutine_ptr_t) (/*_.VALROUT___V1087*/ meltfptr[1086]); /*touch:DATACLOSURE_*/ meltgc_touch(/*_.VALCLO___V1094*/ meltfptr[1093]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1095*/ meltfptr[1094])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1095*/ meltfptr[1094])))); ((meltobject_ptr_t)(/*_.VALDATA___V1095*/ meltfptr[1094]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1096*/ meltfptr[1095]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1095*/ meltfptr[1094]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1097*/ meltfptr[1096])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1097*/ meltfptr[1096])))); ((meltobject_ptr_t)(/*_.VALDATA___V1097*/ meltfptr[1096]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1098*/ meltfptr[1097]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1097*/ meltfptr[1096]); MELT_LOCATION("warmelt-base.melt:557:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1099*/ meltfptr[1098])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1099*/ meltfptr[1098])))); ((meltobject_ptr_t)(/*_.VALDATA___V1099*/ meltfptr[1098]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1100*/ meltfptr[1099]); MELT_LOCATION("warmelt-base.melt:557:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1101*/ meltfptr[1100])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1101*/ meltfptr[1100])))); ((meltobject_ptr_t)(/*_.VALDATA___V1101*/ meltfptr[1100]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V13*/ meltfptr[12]); MELT_LOCATION("warmelt-base.melt:557:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1101*/ meltfptr[1100])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1101*/ meltfptr[1100])))); ((meltobject_ptr_t)(/*_.VALDATA___V1101*/ meltfptr[1100]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:557:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1101*/ meltfptr[1100]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1102*/ meltfptr[1101]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1102*/ meltfptr[1101])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1102*/ meltfptr[1101]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1101*/ meltfptr[1100]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1102*/ meltfptr[1101]); MELT_LOCATION("warmelt-base.melt:557:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1099*/ meltfptr[1098])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1099*/ meltfptr[1098])))); ((meltobject_ptr_t)(/*_.VALDATA___V1099*/ meltfptr[1098]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1102*/ meltfptr[1101]); MELT_LOCATION("warmelt-base.melt:557:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1099*/ meltfptr[1098])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1099*/ meltfptr[1098])))); ((meltobject_ptr_t)(/*_.VALDATA___V1099*/ meltfptr[1098]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1105*/ meltfptr[1104]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1105*/ meltfptr[1104])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1105*/ meltfptr[1104]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1103*/ meltfptr[1102]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1105*/ meltfptr[1104]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1105*/ meltfptr[1104])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1105*/ meltfptr[1104]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V13*/ meltfptr[12]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1105*/ meltfptr[1104]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1105*/ meltfptr[1104])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1105*/ meltfptr[1104]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1104*/ meltfptr[1103]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1105*/ meltfptr[1104]); MELT_LOCATION("warmelt-base.melt:557:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1099*/ meltfptr[1098])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1099*/ meltfptr[1098])))); ((meltobject_ptr_t)(/*_.VALDATA___V1099*/ meltfptr[1098]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1105*/ meltfptr[1104]); MELT_LOCATION("warmelt-base.melt:557:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1099*/ meltfptr[1098]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1106*/ meltfptr[1105])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1106*/ meltfptr[1105])))); ((meltobject_ptr_t)(/*_.VALDATA___V1106*/ meltfptr[1105]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1107*/ meltfptr[1106]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1106*/ meltfptr[1105]); MELT_LOCATION("warmelt-base.melt:561:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1108*/ meltfptr[1107])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1108*/ meltfptr[1107])))); ((meltobject_ptr_t)(/*_.VALDATA___V1108*/ meltfptr[1107]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1109*/ meltfptr[1108]); MELT_LOCATION("warmelt-base.melt:561:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1110*/ meltfptr[1109])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1110*/ meltfptr[1109])))); ((meltobject_ptr_t)(/*_.VALDATA___V1110*/ meltfptr[1109]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:561:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1110*/ meltfptr[1109])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1110*/ meltfptr[1109])))); ((meltobject_ptr_t)(/*_.VALDATA___V1110*/ meltfptr[1109]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:561:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1110*/ meltfptr[1109]); MELT_LOCATION("warmelt-base.melt:561:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1111*/ meltfptr[1110])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1111*/ meltfptr[1110])))); ((meltobject_ptr_t)(/*_.VALDATA___V1111*/ meltfptr[1110]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:561:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1111*/ meltfptr[1110])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1111*/ meltfptr[1110])))); ((meltobject_ptr_t)(/*_.VALDATA___V1111*/ meltfptr[1110]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:561:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1111*/ meltfptr[1110]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1112*/ meltfptr[1111]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1112*/ meltfptr[1111])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1112*/ meltfptr[1111]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1110*/ meltfptr[1109]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1112*/ meltfptr[1111]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1112*/ meltfptr[1111])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1112*/ meltfptr[1111]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1111*/ meltfptr[1110]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1112*/ meltfptr[1111]); MELT_LOCATION("warmelt-base.melt:561:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1108*/ meltfptr[1107])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1108*/ meltfptr[1107])))); ((meltobject_ptr_t)(/*_.VALDATA___V1108*/ meltfptr[1107]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1112*/ meltfptr[1111]); MELT_LOCATION("warmelt-base.melt:561:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1108*/ meltfptr[1107])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1108*/ meltfptr[1107])))); ((meltobject_ptr_t)(/*_.VALDATA___V1108*/ meltfptr[1107]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1116*/ meltfptr[1115]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1116*/ meltfptr[1115])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1116*/ meltfptr[1115]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1113*/ meltfptr[1112]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1116*/ meltfptr[1115]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1116*/ meltfptr[1115])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1116*/ meltfptr[1115]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1116*/ meltfptr[1115]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1116*/ meltfptr[1115])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1116*/ meltfptr[1115]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1114*/ meltfptr[1113]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1116*/ meltfptr[1115]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1116*/ meltfptr[1115])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1116*/ meltfptr[1115]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1116*/ meltfptr[1115]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1116*/ meltfptr[1115])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1116*/ meltfptr[1115]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1115*/ meltfptr[1114]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1116*/ meltfptr[1115]); MELT_LOCATION("warmelt-base.melt:561:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1108*/ meltfptr[1107])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1108*/ meltfptr[1107])))); ((meltobject_ptr_t)(/*_.VALDATA___V1108*/ meltfptr[1107]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1116*/ meltfptr[1115]); MELT_LOCATION("warmelt-base.melt:561:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1108*/ meltfptr[1107]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1117*/ meltfptr[1116])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1117*/ meltfptr[1116])))); ((meltobject_ptr_t)(/*_.VALDATA___V1117*/ meltfptr[1116]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1118*/ meltfptr[1117]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1117*/ meltfptr[1116]); MELT_LOCATION("warmelt-base.melt:566:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1119*/ meltfptr[1118])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1119*/ meltfptr[1118])))); ((meltobject_ptr_t)(/*_.VALDATA___V1119*/ meltfptr[1118]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1120*/ meltfptr[1119]); MELT_LOCATION("warmelt-base.melt:566:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1121*/ meltfptr[1120])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1121*/ meltfptr[1120])))); ((meltobject_ptr_t)(/*_.VALDATA___V1121*/ meltfptr[1120]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:566:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1121*/ meltfptr[1120])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1121*/ meltfptr[1120])))); ((meltobject_ptr_t)(/*_.VALDATA___V1121*/ meltfptr[1120]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:566:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1121*/ meltfptr[1120]); MELT_LOCATION("warmelt-base.melt:566:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1122*/ meltfptr[1121])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1122*/ meltfptr[1121])))); ((meltobject_ptr_t)(/*_.VALDATA___V1122*/ meltfptr[1121]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:566:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1122*/ meltfptr[1121])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1122*/ meltfptr[1121])))); ((meltobject_ptr_t)(/*_.VALDATA___V1122*/ meltfptr[1121]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:566:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1122*/ meltfptr[1121]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1123*/ meltfptr[1122]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1123*/ meltfptr[1122])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1123*/ meltfptr[1122]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1121*/ meltfptr[1120]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1123*/ meltfptr[1122]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1123*/ meltfptr[1122])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1123*/ meltfptr[1122]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1122*/ meltfptr[1121]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1123*/ meltfptr[1122]); #undef meltfram__ } /*end of warmelt_base_initialmeltchunk_7*/ void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_8 (struct frame_start_module_melt_st* meltframptr__, char predefinited[]) { #define meltfram__ (*meltframptr__) #undef meltcallcount #define meltcallcount 0L MELT_LOCATION("warmelt-base.melt:566:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1119*/ meltfptr[1118])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1119*/ meltfptr[1118])))); ((meltobject_ptr_t)(/*_.VALDATA___V1119*/ meltfptr[1118]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1123*/ meltfptr[1122]); MELT_LOCATION("warmelt-base.melt:566:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1119*/ meltfptr[1118])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1119*/ meltfptr[1118])))); ((meltobject_ptr_t)(/*_.VALDATA___V1119*/ meltfptr[1118]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1127*/ meltfptr[1126]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1127*/ meltfptr[1126])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1127*/ meltfptr[1126]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1124*/ meltfptr[1123]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1127*/ meltfptr[1126]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1127*/ meltfptr[1126])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1127*/ meltfptr[1126]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1127*/ meltfptr[1126]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1127*/ meltfptr[1126])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1127*/ meltfptr[1126]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1125*/ meltfptr[1124]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1127*/ meltfptr[1126]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1127*/ meltfptr[1126])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1127*/ meltfptr[1126]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1127*/ meltfptr[1126]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1127*/ meltfptr[1126])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1127*/ meltfptr[1126]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1126*/ meltfptr[1125]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1127*/ meltfptr[1126]); MELT_LOCATION("warmelt-base.melt:566:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1119*/ meltfptr[1118])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1119*/ meltfptr[1118])))); ((meltobject_ptr_t)(/*_.VALDATA___V1119*/ meltfptr[1118]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1127*/ meltfptr[1126]); MELT_LOCATION("warmelt-base.melt:566:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1119*/ meltfptr[1118]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1128*/ meltfptr[1127])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1128*/ meltfptr[1127])))); ((meltobject_ptr_t)(/*_.VALDATA___V1128*/ meltfptr[1127]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1129*/ meltfptr[1128]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1128*/ meltfptr[1127]); MELT_LOCATION("warmelt-base.melt:572:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1130*/ meltfptr[1129])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1130*/ meltfptr[1129])))); ((meltobject_ptr_t)(/*_.VALDATA___V1130*/ meltfptr[1129]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1131*/ meltfptr[1130]); MELT_LOCATION("warmelt-base.melt:572:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1132*/ meltfptr[1131])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1132*/ meltfptr[1131])))); ((meltobject_ptr_t)(/*_.VALDATA___V1132*/ meltfptr[1131]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:572:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1132*/ meltfptr[1131])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1132*/ meltfptr[1131])))); ((meltobject_ptr_t)(/*_.VALDATA___V1132*/ meltfptr[1131]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:572:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1132*/ meltfptr[1131]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1134*/ meltfptr[1133])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1134*/ meltfptr[1133])))); ((meltobject_ptr_t)(/*_.VALDATA___V1134*/ meltfptr[1133]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1135*/ meltfptr[1134]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1134*/ meltfptr[1133]); MELT_LOCATION("warmelt-base.melt:572:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1133*/ meltfptr[1132])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1133*/ meltfptr[1132])))); ((meltobject_ptr_t)(/*_.VALDATA___V1133*/ meltfptr[1132]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1134*/ meltfptr[1133]); MELT_LOCATION("warmelt-base.melt:572:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1133*/ meltfptr[1132])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1133*/ meltfptr[1132])))); ((meltobject_ptr_t)(/*_.VALDATA___V1133*/ meltfptr[1132]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:572:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1133*/ meltfptr[1132]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1136*/ meltfptr[1135]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1136*/ meltfptr[1135])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1136*/ meltfptr[1135]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1132*/ meltfptr[1131]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1136*/ meltfptr[1135]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1136*/ meltfptr[1135])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1136*/ meltfptr[1135]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1133*/ meltfptr[1132]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1136*/ meltfptr[1135]); MELT_LOCATION("warmelt-base.melt:572:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1130*/ meltfptr[1129])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1130*/ meltfptr[1129])))); ((meltobject_ptr_t)(/*_.VALDATA___V1130*/ meltfptr[1129]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1136*/ meltfptr[1135]); MELT_LOCATION("warmelt-base.melt:572:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1130*/ meltfptr[1129])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1130*/ meltfptr[1129])))); ((meltobject_ptr_t)(/*_.VALDATA___V1130*/ meltfptr[1129]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1137*/ meltfptr[1136]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1134*/ meltfptr[1133]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1138*/ meltfptr[1137]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1134*/ meltfptr[1133]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1139*/ meltfptr[1138]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1141*/ meltfptr[1140]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V1140*/ meltfptr[1139]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1141*/ meltfptr[1140]); MELT_LOCATION("warmelt-base.melt:572:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1130*/ meltfptr[1129])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1130*/ meltfptr[1129])))); ((meltobject_ptr_t)(/*_.VALDATA___V1130*/ meltfptr[1129]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1141*/ meltfptr[1140]); MELT_LOCATION("warmelt-base.melt:572:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1130*/ meltfptr[1129]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1142*/ meltfptr[1141])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1142*/ meltfptr[1141])))); ((meltobject_ptr_t)(/*_.VALDATA___V1142*/ meltfptr[1141]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1143*/ meltfptr[1142]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1142*/ meltfptr[1141]); MELT_LOCATION("warmelt-base.melt:584:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1144*/ meltfptr[1143])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1144*/ meltfptr[1143])))); ((meltobject_ptr_t)(/*_.VALDATA___V1144*/ meltfptr[1143]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1145*/ meltfptr[1144]); MELT_LOCATION("warmelt-base.melt:584:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1146*/ meltfptr[1145])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1146*/ meltfptr[1145])))); ((meltobject_ptr_t)(/*_.VALDATA___V1146*/ meltfptr[1145]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:584:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1146*/ meltfptr[1145])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1146*/ meltfptr[1145])))); ((meltobject_ptr_t)(/*_.VALDATA___V1146*/ meltfptr[1145]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:584:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1146*/ meltfptr[1145]); MELT_LOCATION("warmelt-base.melt:584:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1147*/ meltfptr[1146])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1147*/ meltfptr[1146])))); ((meltobject_ptr_t)(/*_.VALDATA___V1147*/ meltfptr[1146]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1134*/ meltfptr[1133]); MELT_LOCATION("warmelt-base.melt:584:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1147*/ meltfptr[1146])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1147*/ meltfptr[1146])))); ((meltobject_ptr_t)(/*_.VALDATA___V1147*/ meltfptr[1146]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:584:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1147*/ meltfptr[1146]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1148*/ meltfptr[1147]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1148*/ meltfptr[1147])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1148*/ meltfptr[1147]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1146*/ meltfptr[1145]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1148*/ meltfptr[1147]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1148*/ meltfptr[1147])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1148*/ meltfptr[1147]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1147*/ meltfptr[1146]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1148*/ meltfptr[1147]); MELT_LOCATION("warmelt-base.melt:584:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1144*/ meltfptr[1143])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1144*/ meltfptr[1143])))); ((meltobject_ptr_t)(/*_.VALDATA___V1144*/ meltfptr[1143]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1148*/ meltfptr[1147]); MELT_LOCATION("warmelt-base.melt:584:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1144*/ meltfptr[1143])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1144*/ meltfptr[1143])))); ((meltobject_ptr_t)(/*_.VALDATA___V1144*/ meltfptr[1143]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1149*/ meltfptr[1148]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1134*/ meltfptr[1133]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1150*/ meltfptr[1149]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1134*/ meltfptr[1133]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1151*/ meltfptr[1150]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1153*/ meltfptr[1152]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V1152*/ meltfptr[1151]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1153*/ meltfptr[1152]); MELT_LOCATION("warmelt-base.melt:584:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1144*/ meltfptr[1143])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1144*/ meltfptr[1143])))); ((meltobject_ptr_t)(/*_.VALDATA___V1144*/ meltfptr[1143]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1153*/ meltfptr[1152]); MELT_LOCATION("warmelt-base.melt:584:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1144*/ meltfptr[1143]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1154*/ meltfptr[1153])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1154*/ meltfptr[1153])))); ((meltobject_ptr_t)(/*_.VALDATA___V1154*/ meltfptr[1153]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1155*/ meltfptr[1154]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1154*/ meltfptr[1153]); MELT_LOCATION("warmelt-base.melt:593:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1156*/ meltfptr[1155])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1156*/ meltfptr[1155])))); ((meltobject_ptr_t)(/*_.VALDATA___V1156*/ meltfptr[1155]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1157*/ meltfptr[1156]); MELT_LOCATION("warmelt-base.melt:593:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1158*/ meltfptr[1157])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1158*/ meltfptr[1157])))); ((meltobject_ptr_t)(/*_.VALDATA___V1158*/ meltfptr[1157]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:593:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1158*/ meltfptr[1157])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1158*/ meltfptr[1157])))); ((meltobject_ptr_t)(/*_.VALDATA___V1158*/ meltfptr[1157]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:593:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1158*/ meltfptr[1157]); MELT_LOCATION("warmelt-base.melt:593:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1159*/ meltfptr[1158])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1159*/ meltfptr[1158])))); ((meltobject_ptr_t)(/*_.VALDATA___V1159*/ meltfptr[1158]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1134*/ meltfptr[1133]); MELT_LOCATION("warmelt-base.melt:593:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1159*/ meltfptr[1158])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1159*/ meltfptr[1158])))); ((meltobject_ptr_t)(/*_.VALDATA___V1159*/ meltfptr[1158]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:593:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1159*/ meltfptr[1158]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1160*/ meltfptr[1159]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1160*/ meltfptr[1159])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1160*/ meltfptr[1159]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1158*/ meltfptr[1157]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1160*/ meltfptr[1159]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1160*/ meltfptr[1159])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1160*/ meltfptr[1159]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1159*/ meltfptr[1158]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1160*/ meltfptr[1159]); MELT_LOCATION("warmelt-base.melt:593:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1156*/ meltfptr[1155])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1156*/ meltfptr[1155])))); ((meltobject_ptr_t)(/*_.VALDATA___V1156*/ meltfptr[1155]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1160*/ meltfptr[1159]); MELT_LOCATION("warmelt-base.melt:593:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1156*/ meltfptr[1155])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1156*/ meltfptr[1155])))); ((meltobject_ptr_t)(/*_.VALDATA___V1156*/ meltfptr[1155]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1161*/ meltfptr[1160]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1134*/ meltfptr[1133]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1162*/ meltfptr[1161]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1134*/ meltfptr[1133]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1163*/ meltfptr[1162]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1165*/ meltfptr[1164]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V1164*/ meltfptr[1163]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1165*/ meltfptr[1164]); MELT_LOCATION("warmelt-base.melt:593:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1156*/ meltfptr[1155])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1156*/ meltfptr[1155])))); ((meltobject_ptr_t)(/*_.VALDATA___V1156*/ meltfptr[1155]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1165*/ meltfptr[1164]); MELT_LOCATION("warmelt-base.melt:593:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1156*/ meltfptr[1155]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1166*/ meltfptr[1165])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1166*/ meltfptr[1165])))); ((meltobject_ptr_t)(/*_.VALDATA___V1166*/ meltfptr[1165]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1167*/ meltfptr[1166]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1166*/ meltfptr[1165]); MELT_LOCATION("warmelt-base.melt:603:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1168*/ meltfptr[1167])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1168*/ meltfptr[1167])))); ((meltobject_ptr_t)(/*_.VALDATA___V1168*/ meltfptr[1167]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1169*/ meltfptr[1168]); MELT_LOCATION("warmelt-base.melt:603:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1170*/ meltfptr[1169])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1170*/ meltfptr[1169])))); ((meltobject_ptr_t)(/*_.VALDATA___V1170*/ meltfptr[1169]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:603:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1170*/ meltfptr[1169])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1170*/ meltfptr[1169])))); ((meltobject_ptr_t)(/*_.VALDATA___V1170*/ meltfptr[1169]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:603:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1170*/ meltfptr[1169]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1172*/ meltfptr[1171])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1172*/ meltfptr[1171])))); ((meltobject_ptr_t)(/*_.VALDATA___V1172*/ meltfptr[1171]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1173*/ meltfptr[1172]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1172*/ meltfptr[1171]); MELT_LOCATION("warmelt-base.melt:603:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1171*/ meltfptr[1170])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1171*/ meltfptr[1170])))); ((meltobject_ptr_t)(/*_.VALDATA___V1171*/ meltfptr[1170]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1172*/ meltfptr[1171]); MELT_LOCATION("warmelt-base.melt:603:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1171*/ meltfptr[1170])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1171*/ meltfptr[1170])))); ((meltobject_ptr_t)(/*_.VALDATA___V1171*/ meltfptr[1170]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:603:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1171*/ meltfptr[1170]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1174*/ meltfptr[1173]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1174*/ meltfptr[1173])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1174*/ meltfptr[1173]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1170*/ meltfptr[1169]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1174*/ meltfptr[1173]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1174*/ meltfptr[1173])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1174*/ meltfptr[1173]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1171*/ meltfptr[1170]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1174*/ meltfptr[1173]); MELT_LOCATION("warmelt-base.melt:603:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1168*/ meltfptr[1167])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1168*/ meltfptr[1167])))); ((meltobject_ptr_t)(/*_.VALDATA___V1168*/ meltfptr[1167]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1174*/ meltfptr[1173]); MELT_LOCATION("warmelt-base.melt:603:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1168*/ meltfptr[1167])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1168*/ meltfptr[1167])))); ((meltobject_ptr_t)(/*_.VALDATA___V1168*/ meltfptr[1167]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1178*/ meltfptr[1177]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1178*/ meltfptr[1177])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1178*/ meltfptr[1177]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1175*/ meltfptr[1174]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1178*/ meltfptr[1177]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1178*/ meltfptr[1177])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1178*/ meltfptr[1177]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1178*/ meltfptr[1177]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1178*/ meltfptr[1177])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1178*/ meltfptr[1177]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1176*/ meltfptr[1175]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1178*/ meltfptr[1177]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1178*/ meltfptr[1177])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1178*/ meltfptr[1177]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1172*/ meltfptr[1171]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1178*/ meltfptr[1177]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1178*/ meltfptr[1177])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1178*/ meltfptr[1177]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1177*/ meltfptr[1176]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1178*/ meltfptr[1177]); MELT_LOCATION("warmelt-base.melt:603:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1168*/ meltfptr[1167])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1168*/ meltfptr[1167])))); ((meltobject_ptr_t)(/*_.VALDATA___V1168*/ meltfptr[1167]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1178*/ meltfptr[1177]); MELT_LOCATION("warmelt-base.melt:603:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1168*/ meltfptr[1167]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1179*/ meltfptr[1178])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1179*/ meltfptr[1178])))); ((meltobject_ptr_t)(/*_.VALDATA___V1179*/ meltfptr[1178]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1180*/ meltfptr[1179]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1179*/ meltfptr[1178]); MELT_LOCATION("warmelt-base.melt:609:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1181*/ meltfptr[1180])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1181*/ meltfptr[1180])))); ((meltobject_ptr_t)(/*_.VALDATA___V1181*/ meltfptr[1180]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1182*/ meltfptr[1181]); MELT_LOCATION("warmelt-base.melt:609:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1183*/ meltfptr[1182])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1183*/ meltfptr[1182])))); ((meltobject_ptr_t)(/*_.VALDATA___V1183*/ meltfptr[1182]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:609:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1183*/ meltfptr[1182])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1183*/ meltfptr[1182])))); ((meltobject_ptr_t)(/*_.VALDATA___V1183*/ meltfptr[1182]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:609:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1183*/ meltfptr[1182]); MELT_LOCATION("warmelt-base.melt:609:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1184*/ meltfptr[1183])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1184*/ meltfptr[1183])))); ((meltobject_ptr_t)(/*_.VALDATA___V1184*/ meltfptr[1183]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1172*/ meltfptr[1171]); MELT_LOCATION("warmelt-base.melt:609:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1184*/ meltfptr[1183])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1184*/ meltfptr[1183])))); ((meltobject_ptr_t)(/*_.VALDATA___V1184*/ meltfptr[1183]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:609:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1184*/ meltfptr[1183]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1185*/ meltfptr[1184]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1185*/ meltfptr[1184])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1185*/ meltfptr[1184]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1183*/ meltfptr[1182]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1185*/ meltfptr[1184]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1185*/ meltfptr[1184])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1185*/ meltfptr[1184]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1184*/ meltfptr[1183]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1185*/ meltfptr[1184]); MELT_LOCATION("warmelt-base.melt:609:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1181*/ meltfptr[1180])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1181*/ meltfptr[1180])))); ((meltobject_ptr_t)(/*_.VALDATA___V1181*/ meltfptr[1180]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1185*/ meltfptr[1184]); MELT_LOCATION("warmelt-base.melt:609:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1181*/ meltfptr[1180])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1181*/ meltfptr[1180])))); ((meltobject_ptr_t)(/*_.VALDATA___V1181*/ meltfptr[1180]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1189*/ meltfptr[1188]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1189*/ meltfptr[1188])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1189*/ meltfptr[1188]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1186*/ meltfptr[1185]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1189*/ meltfptr[1188]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1189*/ meltfptr[1188])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1189*/ meltfptr[1188]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1189*/ meltfptr[1188]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1189*/ meltfptr[1188])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1189*/ meltfptr[1188]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1187*/ meltfptr[1186]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1189*/ meltfptr[1188]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1189*/ meltfptr[1188])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1189*/ meltfptr[1188]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1172*/ meltfptr[1171]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1189*/ meltfptr[1188]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1189*/ meltfptr[1188])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1189*/ meltfptr[1188]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1188*/ meltfptr[1187]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1189*/ meltfptr[1188]); MELT_LOCATION("warmelt-base.melt:609:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1181*/ meltfptr[1180])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1181*/ meltfptr[1180])))); ((meltobject_ptr_t)(/*_.VALDATA___V1181*/ meltfptr[1180]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1189*/ meltfptr[1188]); MELT_LOCATION("warmelt-base.melt:609:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1181*/ meltfptr[1180]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1190*/ meltfptr[1189])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1190*/ meltfptr[1189])))); ((meltobject_ptr_t)(/*_.VALDATA___V1190*/ meltfptr[1189]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1191*/ meltfptr[1190]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1190*/ meltfptr[1189]); MELT_LOCATION("warmelt-base.melt:615:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1192*/ meltfptr[1191])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1192*/ meltfptr[1191])))); ((meltobject_ptr_t)(/*_.VALDATA___V1192*/ meltfptr[1191]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1193*/ meltfptr[1192]); MELT_LOCATION("warmelt-base.melt:615:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1194*/ meltfptr[1193])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1194*/ meltfptr[1193])))); ((meltobject_ptr_t)(/*_.VALDATA___V1194*/ meltfptr[1193]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:615:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1194*/ meltfptr[1193])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1194*/ meltfptr[1193])))); ((meltobject_ptr_t)(/*_.VALDATA___V1194*/ meltfptr[1193]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:615:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1194*/ meltfptr[1193]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1196*/ meltfptr[1195])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1196*/ meltfptr[1195])))); ((meltobject_ptr_t)(/*_.VALDATA___V1196*/ meltfptr[1195]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1197*/ meltfptr[1196]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1196*/ meltfptr[1195]); MELT_LOCATION("warmelt-base.melt:615:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1195*/ meltfptr[1194])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1195*/ meltfptr[1194])))); ((meltobject_ptr_t)(/*_.VALDATA___V1195*/ meltfptr[1194]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1196*/ meltfptr[1195]); MELT_LOCATION("warmelt-base.melt:615:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1195*/ meltfptr[1194])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1195*/ meltfptr[1194])))); ((meltobject_ptr_t)(/*_.VALDATA___V1195*/ meltfptr[1194]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:615:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1195*/ meltfptr[1194]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1198*/ meltfptr[1197]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1198*/ meltfptr[1197])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1198*/ meltfptr[1197]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1194*/ meltfptr[1193]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1198*/ meltfptr[1197]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1198*/ meltfptr[1197])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1198*/ meltfptr[1197]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1195*/ meltfptr[1194]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1198*/ meltfptr[1197]); MELT_LOCATION("warmelt-base.melt:615:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1192*/ meltfptr[1191])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1192*/ meltfptr[1191])))); ((meltobject_ptr_t)(/*_.VALDATA___V1192*/ meltfptr[1191]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1198*/ meltfptr[1197]); MELT_LOCATION("warmelt-base.melt:615:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1192*/ meltfptr[1191])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1192*/ meltfptr[1191])))); ((meltobject_ptr_t)(/*_.VALDATA___V1192*/ meltfptr[1191]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1202*/ meltfptr[1201]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1202*/ meltfptr[1201])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1202*/ meltfptr[1201]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1199*/ meltfptr[1198]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1202*/ meltfptr[1201]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1202*/ meltfptr[1201])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1202*/ meltfptr[1201]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1202*/ meltfptr[1201]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1202*/ meltfptr[1201])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1202*/ meltfptr[1201]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1200*/ meltfptr[1199]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1202*/ meltfptr[1201]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1202*/ meltfptr[1201])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1202*/ meltfptr[1201]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1196*/ meltfptr[1195]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1202*/ meltfptr[1201]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1202*/ meltfptr[1201])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1202*/ meltfptr[1201]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1201*/ meltfptr[1200]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1202*/ meltfptr[1201]); MELT_LOCATION("warmelt-base.melt:615:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1192*/ meltfptr[1191])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1192*/ meltfptr[1191])))); ((meltobject_ptr_t)(/*_.VALDATA___V1192*/ meltfptr[1191]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1202*/ meltfptr[1201]); MELT_LOCATION("warmelt-base.melt:615:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1192*/ meltfptr[1191]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1203*/ meltfptr[1202])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1203*/ meltfptr[1202])))); ((meltobject_ptr_t)(/*_.VALDATA___V1203*/ meltfptr[1202]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1204*/ meltfptr[1203]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1203*/ meltfptr[1202]); MELT_LOCATION("warmelt-base.melt:620:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1205*/ meltfptr[1204])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1205*/ meltfptr[1204])))); ((meltobject_ptr_t)(/*_.VALDATA___V1205*/ meltfptr[1204]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1206*/ meltfptr[1205]); MELT_LOCATION("warmelt-base.melt:620:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1207*/ meltfptr[1206])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1207*/ meltfptr[1206])))); ((meltobject_ptr_t)(/*_.VALDATA___V1207*/ meltfptr[1206]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:620:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1207*/ meltfptr[1206])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1207*/ meltfptr[1206])))); ((meltobject_ptr_t)(/*_.VALDATA___V1207*/ meltfptr[1206]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:620:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1207*/ meltfptr[1206]); MELT_LOCATION("warmelt-base.melt:620:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1208*/ meltfptr[1207])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1208*/ meltfptr[1207])))); ((meltobject_ptr_t)(/*_.VALDATA___V1208*/ meltfptr[1207]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:620:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1208*/ meltfptr[1207])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1208*/ meltfptr[1207])))); ((meltobject_ptr_t)(/*_.VALDATA___V1208*/ meltfptr[1207]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:620:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1208*/ meltfptr[1207]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1209*/ meltfptr[1208]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1209*/ meltfptr[1208])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1209*/ meltfptr[1208]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1207*/ meltfptr[1206]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1209*/ meltfptr[1208]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1209*/ meltfptr[1208])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1209*/ meltfptr[1208]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1208*/ meltfptr[1207]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1209*/ meltfptr[1208]); MELT_LOCATION("warmelt-base.melt:620:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1205*/ meltfptr[1204])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1205*/ meltfptr[1204])))); ((meltobject_ptr_t)(/*_.VALDATA___V1205*/ meltfptr[1204]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1209*/ meltfptr[1208]); MELT_LOCATION("warmelt-base.melt:620:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1205*/ meltfptr[1204])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1205*/ meltfptr[1204])))); ((meltobject_ptr_t)(/*_.VALDATA___V1205*/ meltfptr[1204]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1213*/ meltfptr[1212]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1213*/ meltfptr[1212])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1213*/ meltfptr[1212]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1210*/ meltfptr[1209]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1213*/ meltfptr[1212]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1213*/ meltfptr[1212])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1213*/ meltfptr[1212]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1213*/ meltfptr[1212]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1213*/ meltfptr[1212])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1213*/ meltfptr[1212]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1211*/ meltfptr[1210]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1213*/ meltfptr[1212]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1213*/ meltfptr[1212])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1213*/ meltfptr[1212]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1213*/ meltfptr[1212]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1213*/ meltfptr[1212])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1213*/ meltfptr[1212]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1212*/ meltfptr[1211]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1213*/ meltfptr[1212]); MELT_LOCATION("warmelt-base.melt:620:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1205*/ meltfptr[1204])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1205*/ meltfptr[1204])))); ((meltobject_ptr_t)(/*_.VALDATA___V1205*/ meltfptr[1204]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1213*/ meltfptr[1212]); MELT_LOCATION("warmelt-base.melt:620:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1205*/ meltfptr[1204]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1214*/ meltfptr[1213])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1214*/ meltfptr[1213])))); ((meltobject_ptr_t)(/*_.VALDATA___V1214*/ meltfptr[1213]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1215*/ meltfptr[1214]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1214*/ meltfptr[1213]); MELT_LOCATION("warmelt-base.melt:625:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1216*/ meltfptr[1215])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1216*/ meltfptr[1215])))); ((meltobject_ptr_t)(/*_.VALDATA___V1216*/ meltfptr[1215]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1217*/ meltfptr[1216]); MELT_LOCATION("warmelt-base.melt:625:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1218*/ meltfptr[1217])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1218*/ meltfptr[1217])))); ((meltobject_ptr_t)(/*_.VALDATA___V1218*/ meltfptr[1217]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:625:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1218*/ meltfptr[1217])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1218*/ meltfptr[1217])))); ((meltobject_ptr_t)(/*_.VALDATA___V1218*/ meltfptr[1217]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:625:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1218*/ meltfptr[1217]); MELT_LOCATION("warmelt-base.melt:625:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1219*/ meltfptr[1218])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1219*/ meltfptr[1218])))); ((meltobject_ptr_t)(/*_.VALDATA___V1219*/ meltfptr[1218]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1196*/ meltfptr[1195]); MELT_LOCATION("warmelt-base.melt:625:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1219*/ meltfptr[1218])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1219*/ meltfptr[1218])))); ((meltobject_ptr_t)(/*_.VALDATA___V1219*/ meltfptr[1218]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:625:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1219*/ meltfptr[1218]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1220*/ meltfptr[1219]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1220*/ meltfptr[1219])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1220*/ meltfptr[1219]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1218*/ meltfptr[1217]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1220*/ meltfptr[1219]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1220*/ meltfptr[1219])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1220*/ meltfptr[1219]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1219*/ meltfptr[1218]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1220*/ meltfptr[1219]); MELT_LOCATION("warmelt-base.melt:625:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1216*/ meltfptr[1215])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1216*/ meltfptr[1215])))); ((meltobject_ptr_t)(/*_.VALDATA___V1216*/ meltfptr[1215]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1220*/ meltfptr[1219]); MELT_LOCATION("warmelt-base.melt:625:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1216*/ meltfptr[1215])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1216*/ meltfptr[1215])))); ((meltobject_ptr_t)(/*_.VALDATA___V1216*/ meltfptr[1215]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1224*/ meltfptr[1223]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1224*/ meltfptr[1223])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1224*/ meltfptr[1223]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1221*/ meltfptr[1220]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1224*/ meltfptr[1223]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1224*/ meltfptr[1223])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1224*/ meltfptr[1223]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1224*/ meltfptr[1223]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1224*/ meltfptr[1223])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1224*/ meltfptr[1223]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1222*/ meltfptr[1221]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1224*/ meltfptr[1223]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1224*/ meltfptr[1223])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1224*/ meltfptr[1223]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1196*/ meltfptr[1195]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1224*/ meltfptr[1223]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1224*/ meltfptr[1223])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1224*/ meltfptr[1223]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1223*/ meltfptr[1222]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1224*/ meltfptr[1223]); MELT_LOCATION("warmelt-base.melt:625:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1216*/ meltfptr[1215])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1216*/ meltfptr[1215])))); ((meltobject_ptr_t)(/*_.VALDATA___V1216*/ meltfptr[1215]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1224*/ meltfptr[1223]); MELT_LOCATION("warmelt-base.melt:625:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1216*/ meltfptr[1215]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1225*/ meltfptr[1224])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1225*/ meltfptr[1224])))); ((meltobject_ptr_t)(/*_.VALDATA___V1225*/ meltfptr[1224]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1226*/ meltfptr[1225]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1225*/ meltfptr[1224]); MELT_LOCATION("warmelt-base.melt:630:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1227*/ meltfptr[1226])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1227*/ meltfptr[1226])))); ((meltobject_ptr_t)(/*_.VALDATA___V1227*/ meltfptr[1226]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1228*/ meltfptr[1227]); MELT_LOCATION("warmelt-base.melt:630:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1229*/ meltfptr[1228])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1229*/ meltfptr[1228])))); ((meltobject_ptr_t)(/*_.VALDATA___V1229*/ meltfptr[1228]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:630:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1229*/ meltfptr[1228])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1229*/ meltfptr[1228])))); ((meltobject_ptr_t)(/*_.VALDATA___V1229*/ meltfptr[1228]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:630:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1229*/ meltfptr[1228]); MELT_LOCATION("warmelt-base.melt:630:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1230*/ meltfptr[1229])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1230*/ meltfptr[1229])))); ((meltobject_ptr_t)(/*_.VALDATA___V1230*/ meltfptr[1229]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:630:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1230*/ meltfptr[1229])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1230*/ meltfptr[1229])))); ((meltobject_ptr_t)(/*_.VALDATA___V1230*/ meltfptr[1229]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:630:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1230*/ meltfptr[1229]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1231*/ meltfptr[1230]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1231*/ meltfptr[1230])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1231*/ meltfptr[1230]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1229*/ meltfptr[1228]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1231*/ meltfptr[1230]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1231*/ meltfptr[1230])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1231*/ meltfptr[1230]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1230*/ meltfptr[1229]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1231*/ meltfptr[1230]); MELT_LOCATION("warmelt-base.melt:630:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1227*/ meltfptr[1226])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1227*/ meltfptr[1226])))); ((meltobject_ptr_t)(/*_.VALDATA___V1227*/ meltfptr[1226]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1231*/ meltfptr[1230]); MELT_LOCATION("warmelt-base.melt:630:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1227*/ meltfptr[1226])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1227*/ meltfptr[1226])))); ((meltobject_ptr_t)(/*_.VALDATA___V1227*/ meltfptr[1226]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1235*/ meltfptr[1234]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1235*/ meltfptr[1234])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1235*/ meltfptr[1234]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1232*/ meltfptr[1231]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1235*/ meltfptr[1234]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1235*/ meltfptr[1234])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1235*/ meltfptr[1234]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1235*/ meltfptr[1234]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1235*/ meltfptr[1234])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1235*/ meltfptr[1234]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1233*/ meltfptr[1232]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1235*/ meltfptr[1234]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1235*/ meltfptr[1234])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1235*/ meltfptr[1234]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1235*/ meltfptr[1234]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1235*/ meltfptr[1234])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1235*/ meltfptr[1234]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1234*/ meltfptr[1233]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1235*/ meltfptr[1234]); MELT_LOCATION("warmelt-base.melt:630:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1227*/ meltfptr[1226])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1227*/ meltfptr[1226])))); ((meltobject_ptr_t)(/*_.VALDATA___V1227*/ meltfptr[1226]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1235*/ meltfptr[1234]); MELT_LOCATION("warmelt-base.melt:630:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1227*/ meltfptr[1226]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1236*/ meltfptr[1235])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1236*/ meltfptr[1235])))); ((meltobject_ptr_t)(/*_.VALDATA___V1236*/ meltfptr[1235]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1237*/ meltfptr[1236]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1236*/ meltfptr[1235]); MELT_LOCATION("warmelt-base.melt:635:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1238*/ meltfptr[1237])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1238*/ meltfptr[1237])))); ((meltobject_ptr_t)(/*_.VALDATA___V1238*/ meltfptr[1237]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1239*/ meltfptr[1238]); MELT_LOCATION("warmelt-base.melt:635:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1240*/ meltfptr[1239])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1240*/ meltfptr[1239])))); ((meltobject_ptr_t)(/*_.VALDATA___V1240*/ meltfptr[1239]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:635:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1240*/ meltfptr[1239])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1240*/ meltfptr[1239])))); ((meltobject_ptr_t)(/*_.VALDATA___V1240*/ meltfptr[1239]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:635:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1240*/ meltfptr[1239]); MELT_LOCATION("warmelt-base.melt:635:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1241*/ meltfptr[1240])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1241*/ meltfptr[1240])))); ((meltobject_ptr_t)(/*_.VALDATA___V1241*/ meltfptr[1240]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1196*/ meltfptr[1195]); MELT_LOCATION("warmelt-base.melt:635:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1241*/ meltfptr[1240])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1241*/ meltfptr[1240])))); ((meltobject_ptr_t)(/*_.VALDATA___V1241*/ meltfptr[1240]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:635:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1241*/ meltfptr[1240]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1242*/ meltfptr[1241]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1242*/ meltfptr[1241])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1242*/ meltfptr[1241]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1240*/ meltfptr[1239]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1242*/ meltfptr[1241]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1242*/ meltfptr[1241])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1242*/ meltfptr[1241]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1241*/ meltfptr[1240]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1242*/ meltfptr[1241]); MELT_LOCATION("warmelt-base.melt:635:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1238*/ meltfptr[1237])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1238*/ meltfptr[1237])))); ((meltobject_ptr_t)(/*_.VALDATA___V1238*/ meltfptr[1237]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1242*/ meltfptr[1241]); MELT_LOCATION("warmelt-base.melt:635:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1238*/ meltfptr[1237])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1238*/ meltfptr[1237])))); ((meltobject_ptr_t)(/*_.VALDATA___V1238*/ meltfptr[1237]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1246*/ meltfptr[1245]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1246*/ meltfptr[1245])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1246*/ meltfptr[1245]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1243*/ meltfptr[1242]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1246*/ meltfptr[1245]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1246*/ meltfptr[1245])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1246*/ meltfptr[1245]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1246*/ meltfptr[1245]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1246*/ meltfptr[1245])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1246*/ meltfptr[1245]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1244*/ meltfptr[1243]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1246*/ meltfptr[1245]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1246*/ meltfptr[1245])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1246*/ meltfptr[1245]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1196*/ meltfptr[1195]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1246*/ meltfptr[1245]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1246*/ meltfptr[1245])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1246*/ meltfptr[1245]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1245*/ meltfptr[1244]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1246*/ meltfptr[1245]); MELT_LOCATION("warmelt-base.melt:635:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1238*/ meltfptr[1237])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1238*/ meltfptr[1237])))); ((meltobject_ptr_t)(/*_.VALDATA___V1238*/ meltfptr[1237]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1246*/ meltfptr[1245]); MELT_LOCATION("warmelt-base.melt:635:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1238*/ meltfptr[1237]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1247*/ meltfptr[1246])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1247*/ meltfptr[1246])))); ((meltobject_ptr_t)(/*_.VALDATA___V1247*/ meltfptr[1246]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1248*/ meltfptr[1247]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1247*/ meltfptr[1246]); MELT_LOCATION("warmelt-base.melt:641:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1249*/ meltfptr[1248])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1249*/ meltfptr[1248])))); ((meltobject_ptr_t)(/*_.VALDATA___V1249*/ meltfptr[1248]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1250*/ meltfptr[1249]); MELT_LOCATION("warmelt-base.melt:641:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1251*/ meltfptr[1250])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1251*/ meltfptr[1250])))); ((meltobject_ptr_t)(/*_.VALDATA___V1251*/ meltfptr[1250]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:641:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1251*/ meltfptr[1250])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1251*/ meltfptr[1250])))); ((meltobject_ptr_t)(/*_.VALDATA___V1251*/ meltfptr[1250]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:641:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1251*/ meltfptr[1250]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1253*/ meltfptr[1252])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1253*/ meltfptr[1252])))); ((meltobject_ptr_t)(/*_.VALDATA___V1253*/ meltfptr[1252]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1254*/ meltfptr[1253]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1253*/ meltfptr[1252]); MELT_LOCATION("warmelt-base.melt:641:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1252*/ meltfptr[1251])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1252*/ meltfptr[1251])))); ((meltobject_ptr_t)(/*_.VALDATA___V1252*/ meltfptr[1251]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1253*/ meltfptr[1252]); MELT_LOCATION("warmelt-base.melt:641:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1252*/ meltfptr[1251])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1252*/ meltfptr[1251])))); ((meltobject_ptr_t)(/*_.VALDATA___V1252*/ meltfptr[1251]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:641:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1252*/ meltfptr[1251]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1255*/ meltfptr[1254]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1255*/ meltfptr[1254])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1255*/ meltfptr[1254]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1251*/ meltfptr[1250]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1255*/ meltfptr[1254]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1255*/ meltfptr[1254])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1255*/ meltfptr[1254]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1252*/ meltfptr[1251]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1255*/ meltfptr[1254]); #undef meltfram__ } /*end of warmelt_base_initialmeltchunk_8*/ void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_9 (struct frame_start_module_melt_st* meltframptr__, char predefinited[]) { #define meltfram__ (*meltframptr__) #undef meltcallcount #define meltcallcount 0L MELT_LOCATION("warmelt-base.melt:641:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1249*/ meltfptr[1248])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1249*/ meltfptr[1248])))); ((meltobject_ptr_t)(/*_.VALDATA___V1249*/ meltfptr[1248]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1255*/ meltfptr[1254]); MELT_LOCATION("warmelt-base.melt:641:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1249*/ meltfptr[1248])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1249*/ meltfptr[1248])))); ((meltobject_ptr_t)(/*_.VALDATA___V1249*/ meltfptr[1248]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1259*/ meltfptr[1258]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1259*/ meltfptr[1258])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1259*/ meltfptr[1258]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1256*/ meltfptr[1255]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1259*/ meltfptr[1258]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1259*/ meltfptr[1258])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1259*/ meltfptr[1258]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1259*/ meltfptr[1258]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1259*/ meltfptr[1258])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1259*/ meltfptr[1258]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1257*/ meltfptr[1256]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1259*/ meltfptr[1258]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1259*/ meltfptr[1258])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1259*/ meltfptr[1258]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1253*/ meltfptr[1252]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1259*/ meltfptr[1258]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1259*/ meltfptr[1258])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1259*/ meltfptr[1258]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1258*/ meltfptr[1257]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1259*/ meltfptr[1258]); MELT_LOCATION("warmelt-base.melt:641:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1249*/ meltfptr[1248])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1249*/ meltfptr[1248])))); ((meltobject_ptr_t)(/*_.VALDATA___V1249*/ meltfptr[1248]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1259*/ meltfptr[1258]); MELT_LOCATION("warmelt-base.melt:641:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1249*/ meltfptr[1248]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1260*/ meltfptr[1259])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1260*/ meltfptr[1259])))); ((meltobject_ptr_t)(/*_.VALDATA___V1260*/ meltfptr[1259]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1261*/ meltfptr[1260]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1260*/ meltfptr[1259]); MELT_LOCATION("warmelt-base.melt:648:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1262*/ meltfptr[1261])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1262*/ meltfptr[1261])))); ((meltobject_ptr_t)(/*_.VALDATA___V1262*/ meltfptr[1261]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1263*/ meltfptr[1262]); MELT_LOCATION("warmelt-base.melt:648:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1264*/ meltfptr[1263])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1264*/ meltfptr[1263])))); ((meltobject_ptr_t)(/*_.VALDATA___V1264*/ meltfptr[1263]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:648:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1264*/ meltfptr[1263])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1264*/ meltfptr[1263])))); ((meltobject_ptr_t)(/*_.VALDATA___V1264*/ meltfptr[1263]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:648:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1264*/ meltfptr[1263]); MELT_LOCATION("warmelt-base.melt:648:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1265*/ meltfptr[1264])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1265*/ meltfptr[1264])))); ((meltobject_ptr_t)(/*_.VALDATA___V1265*/ meltfptr[1264]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:648:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1265*/ meltfptr[1264])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1265*/ meltfptr[1264])))); ((meltobject_ptr_t)(/*_.VALDATA___V1265*/ meltfptr[1264]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:648:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1265*/ meltfptr[1264]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1266*/ meltfptr[1265]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1266*/ meltfptr[1265])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1266*/ meltfptr[1265]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1264*/ meltfptr[1263]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1266*/ meltfptr[1265]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1266*/ meltfptr[1265])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1266*/ meltfptr[1265]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1265*/ meltfptr[1264]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1266*/ meltfptr[1265]); MELT_LOCATION("warmelt-base.melt:648:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1262*/ meltfptr[1261])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1262*/ meltfptr[1261])))); ((meltobject_ptr_t)(/*_.VALDATA___V1262*/ meltfptr[1261]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1266*/ meltfptr[1265]); MELT_LOCATION("warmelt-base.melt:648:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1262*/ meltfptr[1261])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1262*/ meltfptr[1261])))); ((meltobject_ptr_t)(/*_.VALDATA___V1262*/ meltfptr[1261]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1270*/ meltfptr[1269]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1270*/ meltfptr[1269])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1270*/ meltfptr[1269]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1267*/ meltfptr[1266]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1270*/ meltfptr[1269]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1270*/ meltfptr[1269])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1270*/ meltfptr[1269]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1270*/ meltfptr[1269]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1270*/ meltfptr[1269])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1270*/ meltfptr[1269]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1268*/ meltfptr[1267]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1270*/ meltfptr[1269]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1270*/ meltfptr[1269])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1270*/ meltfptr[1269]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1270*/ meltfptr[1269]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1270*/ meltfptr[1269])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1270*/ meltfptr[1269]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1269*/ meltfptr[1268]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1270*/ meltfptr[1269]); MELT_LOCATION("warmelt-base.melt:648:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1262*/ meltfptr[1261])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1262*/ meltfptr[1261])))); ((meltobject_ptr_t)(/*_.VALDATA___V1262*/ meltfptr[1261]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1270*/ meltfptr[1269]); MELT_LOCATION("warmelt-base.melt:648:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1262*/ meltfptr[1261]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1271*/ meltfptr[1270])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1271*/ meltfptr[1270])))); ((meltobject_ptr_t)(/*_.VALDATA___V1271*/ meltfptr[1270]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1272*/ meltfptr[1271]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1271*/ meltfptr[1270]); MELT_LOCATION("warmelt-base.melt:656:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1273*/ meltfptr[1272])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1273*/ meltfptr[1272])))); ((meltobject_ptr_t)(/*_.VALDATA___V1273*/ meltfptr[1272]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1274*/ meltfptr[1273]); MELT_LOCATION("warmelt-base.melt:656:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1275*/ meltfptr[1274])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1275*/ meltfptr[1274])))); ((meltobject_ptr_t)(/*_.VALDATA___V1275*/ meltfptr[1274]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:656:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1275*/ meltfptr[1274])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1275*/ meltfptr[1274])))); ((meltobject_ptr_t)(/*_.VALDATA___V1275*/ meltfptr[1274]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:656:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1275*/ meltfptr[1274]); MELT_LOCATION("warmelt-base.melt:656:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1276*/ meltfptr[1275])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1276*/ meltfptr[1275])))); ((meltobject_ptr_t)(/*_.VALDATA___V1276*/ meltfptr[1275]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:656:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1276*/ meltfptr[1275])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1276*/ meltfptr[1275])))); ((meltobject_ptr_t)(/*_.VALDATA___V1276*/ meltfptr[1275]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:656:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1276*/ meltfptr[1275]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1278*/ meltfptr[1277])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1278*/ meltfptr[1277])))); ((meltobject_ptr_t)(/*_.VALDATA___V1278*/ meltfptr[1277]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1279*/ meltfptr[1278]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1278*/ meltfptr[1277]); MELT_LOCATION("warmelt-base.melt:656:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1277*/ meltfptr[1276])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1277*/ meltfptr[1276])))); ((meltobject_ptr_t)(/*_.VALDATA___V1277*/ meltfptr[1276]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1278*/ meltfptr[1277]); MELT_LOCATION("warmelt-base.melt:656:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1277*/ meltfptr[1276])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1277*/ meltfptr[1276])))); ((meltobject_ptr_t)(/*_.VALDATA___V1277*/ meltfptr[1276]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:656:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1277*/ meltfptr[1276]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1280*/ meltfptr[1279]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1280*/ meltfptr[1279])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1280*/ meltfptr[1279]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1275*/ meltfptr[1274]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1280*/ meltfptr[1279]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1280*/ meltfptr[1279])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1280*/ meltfptr[1279]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1276*/ meltfptr[1275]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1280*/ meltfptr[1279]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1280*/ meltfptr[1279])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1280*/ meltfptr[1279]))->tabval[2] = (melt_ptr_t)(/*_.VALDATA___V1277*/ meltfptr[1276]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1280*/ meltfptr[1279]); MELT_LOCATION("warmelt-base.melt:656:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1273*/ meltfptr[1272])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1273*/ meltfptr[1272])))); ((meltobject_ptr_t)(/*_.VALDATA___V1273*/ meltfptr[1272]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1280*/ meltfptr[1279]); MELT_LOCATION("warmelt-base.melt:656:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1273*/ meltfptr[1272])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1273*/ meltfptr[1272])))); ((meltobject_ptr_t)(/*_.VALDATA___V1273*/ meltfptr[1272]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1281*/ meltfptr[1280]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1282*/ meltfptr[1281]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1283*/ meltfptr[1282]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V1278*/ meltfptr[1277]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1285*/ meltfptr[1284]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V1284*/ meltfptr[1283]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1285*/ meltfptr[1284]); MELT_LOCATION("warmelt-base.melt:656:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1273*/ meltfptr[1272])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1273*/ meltfptr[1272])))); ((meltobject_ptr_t)(/*_.VALDATA___V1273*/ meltfptr[1272]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1285*/ meltfptr[1284]); MELT_LOCATION("warmelt-base.melt:656:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1273*/ meltfptr[1272]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1286*/ meltfptr[1285])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1286*/ meltfptr[1285])))); ((meltobject_ptr_t)(/*_.VALDATA___V1286*/ meltfptr[1285]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1287*/ meltfptr[1286]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1286*/ meltfptr[1285]); MELT_LOCATION("warmelt-base.melt:662:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1288*/ meltfptr[1287])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1288*/ meltfptr[1287])))); ((meltobject_ptr_t)(/*_.VALDATA___V1288*/ meltfptr[1287]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1289*/ meltfptr[1288]); MELT_LOCATION("warmelt-base.melt:662:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1290*/ meltfptr[1289])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1290*/ meltfptr[1289])))); ((meltobject_ptr_t)(/*_.VALDATA___V1290*/ meltfptr[1289]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:662:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1290*/ meltfptr[1289])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1290*/ meltfptr[1289])))); ((meltobject_ptr_t)(/*_.VALDATA___V1290*/ meltfptr[1289]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:662:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1290*/ meltfptr[1289]); MELT_LOCATION("warmelt-base.melt:662:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1291*/ meltfptr[1290])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1291*/ meltfptr[1290])))); ((meltobject_ptr_t)(/*_.VALDATA___V1291*/ meltfptr[1290]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V414*/ meltfptr[413]); MELT_LOCATION("warmelt-base.melt:662:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1291*/ meltfptr[1290])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1291*/ meltfptr[1290])))); ((meltobject_ptr_t)(/*_.VALDATA___V1291*/ meltfptr[1290]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:662:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1291*/ meltfptr[1290]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1292*/ meltfptr[1291]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1292*/ meltfptr[1291])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1292*/ meltfptr[1291]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1290*/ meltfptr[1289]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1292*/ meltfptr[1291]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1292*/ meltfptr[1291])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1292*/ meltfptr[1291]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1291*/ meltfptr[1290]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1292*/ meltfptr[1291]); MELT_LOCATION("warmelt-base.melt:662:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1288*/ meltfptr[1287])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1288*/ meltfptr[1287])))); ((meltobject_ptr_t)(/*_.VALDATA___V1288*/ meltfptr[1287]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1292*/ meltfptr[1291]); MELT_LOCATION("warmelt-base.melt:662:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1288*/ meltfptr[1287])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1288*/ meltfptr[1287])))); ((meltobject_ptr_t)(/*_.VALDATA___V1288*/ meltfptr[1287]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1296*/ meltfptr[1295]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1296*/ meltfptr[1295])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1296*/ meltfptr[1295]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1293*/ meltfptr[1292]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1296*/ meltfptr[1295]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1296*/ meltfptr[1295])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1296*/ meltfptr[1295]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1296*/ meltfptr[1295]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1296*/ meltfptr[1295])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1296*/ meltfptr[1295]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1294*/ meltfptr[1293]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1296*/ meltfptr[1295]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1296*/ meltfptr[1295])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1296*/ meltfptr[1295]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V414*/ meltfptr[413]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1296*/ meltfptr[1295]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1296*/ meltfptr[1295])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1296*/ meltfptr[1295]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1295*/ meltfptr[1294]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1296*/ meltfptr[1295]); MELT_LOCATION("warmelt-base.melt:662:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1288*/ meltfptr[1287])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1288*/ meltfptr[1287])))); ((meltobject_ptr_t)(/*_.VALDATA___V1288*/ meltfptr[1287]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1296*/ meltfptr[1295]); MELT_LOCATION("warmelt-base.melt:662:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1288*/ meltfptr[1287]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1297*/ meltfptr[1296])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1297*/ meltfptr[1296])))); ((meltobject_ptr_t)(/*_.VALDATA___V1297*/ meltfptr[1296]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1298*/ meltfptr[1297]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1297*/ meltfptr[1296]); MELT_LOCATION("warmelt-base.melt:667:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1299*/ meltfptr[1298])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1299*/ meltfptr[1298])))); ((meltobject_ptr_t)(/*_.VALDATA___V1299*/ meltfptr[1298]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1300*/ meltfptr[1299]); MELT_LOCATION("warmelt-base.melt:667:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1301*/ meltfptr[1300])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1301*/ meltfptr[1300])))); ((meltobject_ptr_t)(/*_.VALDATA___V1301*/ meltfptr[1300]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:667:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1301*/ meltfptr[1300])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1301*/ meltfptr[1300])))); ((meltobject_ptr_t)(/*_.VALDATA___V1301*/ meltfptr[1300]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:667:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1301*/ meltfptr[1300]); MELT_LOCATION("warmelt-base.melt:667:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1302*/ meltfptr[1301])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1302*/ meltfptr[1301])))); ((meltobject_ptr_t)(/*_.VALDATA___V1302*/ meltfptr[1301]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V414*/ meltfptr[413]); MELT_LOCATION("warmelt-base.melt:667:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1302*/ meltfptr[1301])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1302*/ meltfptr[1301])))); ((meltobject_ptr_t)(/*_.VALDATA___V1302*/ meltfptr[1301]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:667:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1302*/ meltfptr[1301]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1303*/ meltfptr[1302]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1303*/ meltfptr[1302])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1303*/ meltfptr[1302]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1301*/ meltfptr[1300]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1303*/ meltfptr[1302]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1303*/ meltfptr[1302])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1303*/ meltfptr[1302]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1302*/ meltfptr[1301]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1303*/ meltfptr[1302]); MELT_LOCATION("warmelt-base.melt:667:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1299*/ meltfptr[1298])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1299*/ meltfptr[1298])))); ((meltobject_ptr_t)(/*_.VALDATA___V1299*/ meltfptr[1298]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1303*/ meltfptr[1302]); MELT_LOCATION("warmelt-base.melt:667:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1299*/ meltfptr[1298])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1299*/ meltfptr[1298])))); ((meltobject_ptr_t)(/*_.VALDATA___V1299*/ meltfptr[1298]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1307*/ meltfptr[1306]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1307*/ meltfptr[1306])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1307*/ meltfptr[1306]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1304*/ meltfptr[1303]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1307*/ meltfptr[1306]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1307*/ meltfptr[1306])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1307*/ meltfptr[1306]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1307*/ meltfptr[1306]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1307*/ meltfptr[1306])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1307*/ meltfptr[1306]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1305*/ meltfptr[1304]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1307*/ meltfptr[1306]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1307*/ meltfptr[1306])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1307*/ meltfptr[1306]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V414*/ meltfptr[413]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1307*/ meltfptr[1306]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1307*/ meltfptr[1306])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1307*/ meltfptr[1306]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1306*/ meltfptr[1305]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1307*/ meltfptr[1306]); MELT_LOCATION("warmelt-base.melt:667:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1299*/ meltfptr[1298])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1299*/ meltfptr[1298])))); ((meltobject_ptr_t)(/*_.VALDATA___V1299*/ meltfptr[1298]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1307*/ meltfptr[1306]); MELT_LOCATION("warmelt-base.melt:667:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1299*/ meltfptr[1298]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1308*/ meltfptr[1307])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1308*/ meltfptr[1307])))); ((meltobject_ptr_t)(/*_.VALDATA___V1308*/ meltfptr[1307]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1309*/ meltfptr[1308]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1308*/ meltfptr[1307]); MELT_LOCATION("warmelt-base.melt:672:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1310*/ meltfptr[1309])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1310*/ meltfptr[1309])))); ((meltobject_ptr_t)(/*_.VALDATA___V1310*/ meltfptr[1309]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1311*/ meltfptr[1310]); MELT_LOCATION("warmelt-base.melt:672:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1312*/ meltfptr[1311])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1312*/ meltfptr[1311])))); ((meltobject_ptr_t)(/*_.VALDATA___V1312*/ meltfptr[1311]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:672:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1312*/ meltfptr[1311])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1312*/ meltfptr[1311])))); ((meltobject_ptr_t)(/*_.VALDATA___V1312*/ meltfptr[1311]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:672:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1312*/ meltfptr[1311]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1314*/ meltfptr[1313])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1314*/ meltfptr[1313])))); ((meltobject_ptr_t)(/*_.VALDATA___V1314*/ meltfptr[1313]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1315*/ meltfptr[1314]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1314*/ meltfptr[1313]); MELT_LOCATION("warmelt-base.melt:672:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1313*/ meltfptr[1312])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1313*/ meltfptr[1312])))); ((meltobject_ptr_t)(/*_.VALDATA___V1313*/ meltfptr[1312]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1314*/ meltfptr[1313]); MELT_LOCATION("warmelt-base.melt:672:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1313*/ meltfptr[1312])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1313*/ meltfptr[1312])))); ((meltobject_ptr_t)(/*_.VALDATA___V1313*/ meltfptr[1312]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:672:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1313*/ meltfptr[1312]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1316*/ meltfptr[1315]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1316*/ meltfptr[1315])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1316*/ meltfptr[1315]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1312*/ meltfptr[1311]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1316*/ meltfptr[1315]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1316*/ meltfptr[1315])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1316*/ meltfptr[1315]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1313*/ meltfptr[1312]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1316*/ meltfptr[1315]); MELT_LOCATION("warmelt-base.melt:672:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1310*/ meltfptr[1309])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1310*/ meltfptr[1309])))); ((meltobject_ptr_t)(/*_.VALDATA___V1310*/ meltfptr[1309]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1316*/ meltfptr[1315]); MELT_LOCATION("warmelt-base.melt:672:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1310*/ meltfptr[1309])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1310*/ meltfptr[1309])))); ((meltobject_ptr_t)(/*_.VALDATA___V1310*/ meltfptr[1309]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1320*/ meltfptr[1319]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1320*/ meltfptr[1319])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1320*/ meltfptr[1319]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1317*/ meltfptr[1316]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1320*/ meltfptr[1319]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1320*/ meltfptr[1319])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1320*/ meltfptr[1319]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1320*/ meltfptr[1319]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1320*/ meltfptr[1319])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1320*/ meltfptr[1319]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1318*/ meltfptr[1317]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1320*/ meltfptr[1319]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1320*/ meltfptr[1319])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1320*/ meltfptr[1319]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1314*/ meltfptr[1313]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1320*/ meltfptr[1319]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1320*/ meltfptr[1319])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1320*/ meltfptr[1319]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1319*/ meltfptr[1318]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1320*/ meltfptr[1319]); MELT_LOCATION("warmelt-base.melt:672:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1310*/ meltfptr[1309])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1310*/ meltfptr[1309])))); ((meltobject_ptr_t)(/*_.VALDATA___V1310*/ meltfptr[1309]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1320*/ meltfptr[1319]); MELT_LOCATION("warmelt-base.melt:672:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1310*/ meltfptr[1309]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1321*/ meltfptr[1320])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1321*/ meltfptr[1320])))); ((meltobject_ptr_t)(/*_.VALDATA___V1321*/ meltfptr[1320]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1322*/ meltfptr[1321]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1321*/ meltfptr[1320]); MELT_LOCATION("warmelt-base.melt:678:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1323*/ meltfptr[1322])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1323*/ meltfptr[1322])))); ((meltobject_ptr_t)(/*_.VALDATA___V1323*/ meltfptr[1322]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1324*/ meltfptr[1323]); MELT_LOCATION("warmelt-base.melt:678:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1325*/ meltfptr[1324])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1325*/ meltfptr[1324])))); ((meltobject_ptr_t)(/*_.VALDATA___V1325*/ meltfptr[1324]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:678:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1325*/ meltfptr[1324])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1325*/ meltfptr[1324])))); ((meltobject_ptr_t)(/*_.VALDATA___V1325*/ meltfptr[1324]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:678:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1325*/ meltfptr[1324]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1327*/ meltfptr[1326])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1327*/ meltfptr[1326])))); ((meltobject_ptr_t)(/*_.VALDATA___V1327*/ meltfptr[1326]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1328*/ meltfptr[1327]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1327*/ meltfptr[1326]); MELT_LOCATION("warmelt-base.melt:678:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1326*/ meltfptr[1325])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1326*/ meltfptr[1325])))); ((meltobject_ptr_t)(/*_.VALDATA___V1326*/ meltfptr[1325]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1327*/ meltfptr[1326]); MELT_LOCATION("warmelt-base.melt:678:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1326*/ meltfptr[1325])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1326*/ meltfptr[1325])))); ((meltobject_ptr_t)(/*_.VALDATA___V1326*/ meltfptr[1325]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:678:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1326*/ meltfptr[1325]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1329*/ meltfptr[1328]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1329*/ meltfptr[1328])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1329*/ meltfptr[1328]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1325*/ meltfptr[1324]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1329*/ meltfptr[1328]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1329*/ meltfptr[1328])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1329*/ meltfptr[1328]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1326*/ meltfptr[1325]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1329*/ meltfptr[1328]); MELT_LOCATION("warmelt-base.melt:678:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1323*/ meltfptr[1322])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1323*/ meltfptr[1322])))); ((meltobject_ptr_t)(/*_.VALDATA___V1323*/ meltfptr[1322]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1329*/ meltfptr[1328]); MELT_LOCATION("warmelt-base.melt:678:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1323*/ meltfptr[1322])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1323*/ meltfptr[1322])))); ((meltobject_ptr_t)(/*_.VALDATA___V1323*/ meltfptr[1322]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1333*/ meltfptr[1332]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1333*/ meltfptr[1332])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1333*/ meltfptr[1332]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1330*/ meltfptr[1329]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1333*/ meltfptr[1332]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1333*/ meltfptr[1332])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1333*/ meltfptr[1332]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1333*/ meltfptr[1332]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1333*/ meltfptr[1332])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1333*/ meltfptr[1332]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1331*/ meltfptr[1330]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1333*/ meltfptr[1332]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1333*/ meltfptr[1332])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1333*/ meltfptr[1332]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1327*/ meltfptr[1326]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1333*/ meltfptr[1332]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1333*/ meltfptr[1332])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1333*/ meltfptr[1332]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1332*/ meltfptr[1331]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1333*/ meltfptr[1332]); MELT_LOCATION("warmelt-base.melt:678:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1323*/ meltfptr[1322])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1323*/ meltfptr[1322])))); ((meltobject_ptr_t)(/*_.VALDATA___V1323*/ meltfptr[1322]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1333*/ meltfptr[1332]); MELT_LOCATION("warmelt-base.melt:678:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1323*/ meltfptr[1322]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1334*/ meltfptr[1333])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1334*/ meltfptr[1333])))); ((meltobject_ptr_t)(/*_.VALDATA___V1334*/ meltfptr[1333]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1335*/ meltfptr[1334]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1334*/ meltfptr[1333]); MELT_LOCATION("warmelt-base.melt:682:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1336*/ meltfptr[1335])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1336*/ meltfptr[1335])))); ((meltobject_ptr_t)(/*_.VALDATA___V1336*/ meltfptr[1335]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1337*/ meltfptr[1336]); MELT_LOCATION("warmelt-base.melt:682:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1338*/ meltfptr[1337])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1338*/ meltfptr[1337])))); ((meltobject_ptr_t)(/*_.VALDATA___V1338*/ meltfptr[1337]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V298*/ meltfptr[297]); MELT_LOCATION("warmelt-base.melt:682:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1338*/ meltfptr[1337])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1338*/ meltfptr[1337])))); ((meltobject_ptr_t)(/*_.VALDATA___V1338*/ meltfptr[1337]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:682:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1338*/ meltfptr[1337]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1340*/ meltfptr[1339])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1340*/ meltfptr[1339])))); ((meltobject_ptr_t)(/*_.VALDATA___V1340*/ meltfptr[1339]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1341*/ meltfptr[1340]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1340*/ meltfptr[1339]); MELT_LOCATION("warmelt-base.melt:682:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1339*/ meltfptr[1338])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1339*/ meltfptr[1338])))); ((meltobject_ptr_t)(/*_.VALDATA___V1339*/ meltfptr[1338]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1340*/ meltfptr[1339]); MELT_LOCATION("warmelt-base.melt:682:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1339*/ meltfptr[1338])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1339*/ meltfptr[1338])))); ((meltobject_ptr_t)(/*_.VALDATA___V1339*/ meltfptr[1338]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:682:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1339*/ meltfptr[1338]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1342*/ meltfptr[1341]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1342*/ meltfptr[1341])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1342*/ meltfptr[1341]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1338*/ meltfptr[1337]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1342*/ meltfptr[1341]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1342*/ meltfptr[1341])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1342*/ meltfptr[1341]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1339*/ meltfptr[1338]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1342*/ meltfptr[1341]); MELT_LOCATION("warmelt-base.melt:682:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1336*/ meltfptr[1335])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1336*/ meltfptr[1335])))); ((meltobject_ptr_t)(/*_.VALDATA___V1336*/ meltfptr[1335]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1342*/ meltfptr[1341]); MELT_LOCATION("warmelt-base.melt:682:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1336*/ meltfptr[1335])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1336*/ meltfptr[1335])))); ((meltobject_ptr_t)(/*_.VALDATA___V1336*/ meltfptr[1335]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1346*/ meltfptr[1345]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1346*/ meltfptr[1345])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1346*/ meltfptr[1345]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1343*/ meltfptr[1342]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1346*/ meltfptr[1345]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1346*/ meltfptr[1345])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1346*/ meltfptr[1345]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1346*/ meltfptr[1345]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1346*/ meltfptr[1345])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1346*/ meltfptr[1345]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1344*/ meltfptr[1343]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1346*/ meltfptr[1345]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1346*/ meltfptr[1345])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1346*/ meltfptr[1345]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1340*/ meltfptr[1339]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1346*/ meltfptr[1345]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1346*/ meltfptr[1345])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1346*/ meltfptr[1345]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1345*/ meltfptr[1344]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1346*/ meltfptr[1345]); MELT_LOCATION("warmelt-base.melt:682:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1336*/ meltfptr[1335])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1336*/ meltfptr[1335])))); ((meltobject_ptr_t)(/*_.VALDATA___V1336*/ meltfptr[1335]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1346*/ meltfptr[1345]); MELT_LOCATION("warmelt-base.melt:682:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1336*/ meltfptr[1335]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1347*/ meltfptr[1346])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1347*/ meltfptr[1346])))); ((meltobject_ptr_t)(/*_.VALDATA___V1347*/ meltfptr[1346]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1348*/ meltfptr[1347]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1347*/ meltfptr[1346]); MELT_LOCATION("warmelt-base.melt:690:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1349*/ meltfptr[1348])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1349*/ meltfptr[1348])))); ((meltobject_ptr_t)(/*_.VALDATA___V1349*/ meltfptr[1348]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1350*/ meltfptr[1349]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351])))); ((meltobject_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1353*/ meltfptr[1352]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1352*/ meltfptr[1351]); MELT_LOCATION("warmelt-base.melt:690:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1351*/ meltfptr[1350])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1351*/ meltfptr[1350])))); ((meltobject_ptr_t)(/*_.VALDATA___V1351*/ meltfptr[1350]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1352*/ meltfptr[1351]); MELT_LOCATION("warmelt-base.melt:690:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1351*/ meltfptr[1350])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1351*/ meltfptr[1350])))); ((meltobject_ptr_t)(/*_.VALDATA___V1351*/ meltfptr[1350]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:690:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1351*/ meltfptr[1350]); MELT_LOCATION("warmelt-base.melt:690:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1354*/ meltfptr[1353])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1354*/ meltfptr[1353])))); ((meltobject_ptr_t)(/*_.VALDATA___V1354*/ meltfptr[1353]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:690:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1354*/ meltfptr[1353])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1354*/ meltfptr[1353])))); ((meltobject_ptr_t)(/*_.VALDATA___V1354*/ meltfptr[1353]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:690:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1354*/ meltfptr[1353]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1355*/ meltfptr[1354]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1355*/ meltfptr[1354])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1355*/ meltfptr[1354]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1351*/ meltfptr[1350]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1355*/ meltfptr[1354]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1355*/ meltfptr[1354])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1355*/ meltfptr[1354]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1354*/ meltfptr[1353]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1355*/ meltfptr[1354]); MELT_LOCATION("warmelt-base.melt:690:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1349*/ meltfptr[1348])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1349*/ meltfptr[1348])))); ((meltobject_ptr_t)(/*_.VALDATA___V1349*/ meltfptr[1348]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1355*/ meltfptr[1354]); MELT_LOCATION("warmelt-base.melt:690:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1349*/ meltfptr[1348])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1349*/ meltfptr[1348])))); ((meltobject_ptr_t)(/*_.VALDATA___V1349*/ meltfptr[1348]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1359*/ meltfptr[1358]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1359*/ meltfptr[1358])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1359*/ meltfptr[1358]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1356*/ meltfptr[1355]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1359*/ meltfptr[1358]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1359*/ meltfptr[1358])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1359*/ meltfptr[1358]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1359*/ meltfptr[1358]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1359*/ meltfptr[1358])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1359*/ meltfptr[1358]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1357*/ meltfptr[1356]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1359*/ meltfptr[1358]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1359*/ meltfptr[1358])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1359*/ meltfptr[1358]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1359*/ meltfptr[1358]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1359*/ meltfptr[1358])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1359*/ meltfptr[1358]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1358*/ meltfptr[1357]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1359*/ meltfptr[1358]); MELT_LOCATION("warmelt-base.melt:690:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1349*/ meltfptr[1348])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1349*/ meltfptr[1348])))); ((meltobject_ptr_t)(/*_.VALDATA___V1349*/ meltfptr[1348]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1359*/ meltfptr[1358]); MELT_LOCATION("warmelt-base.melt:690:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1349*/ meltfptr[1348]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1360*/ meltfptr[1359])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1360*/ meltfptr[1359])))); ((meltobject_ptr_t)(/*_.VALDATA___V1360*/ meltfptr[1359]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1361*/ meltfptr[1360]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1360*/ meltfptr[1359]); MELT_LOCATION("warmelt-base.melt:694:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1362*/ meltfptr[1361])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1362*/ meltfptr[1361])))); ((meltobject_ptr_t)(/*_.VALDATA___V1362*/ meltfptr[1361]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1363*/ meltfptr[1362]); MELT_LOCATION("warmelt-base.melt:694:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1364*/ meltfptr[1363])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1364*/ meltfptr[1363])))); ((meltobject_ptr_t)(/*_.VALDATA___V1364*/ meltfptr[1363]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1352*/ meltfptr[1351]); MELT_LOCATION("warmelt-base.melt:694:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1364*/ meltfptr[1363])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1364*/ meltfptr[1363])))); ((meltobject_ptr_t)(/*_.VALDATA___V1364*/ meltfptr[1363]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:694:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1364*/ meltfptr[1363]); MELT_LOCATION("warmelt-base.melt:694:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1365*/ meltfptr[1364])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1365*/ meltfptr[1364])))); ((meltobject_ptr_t)(/*_.VALDATA___V1365*/ meltfptr[1364]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:694:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1365*/ meltfptr[1364])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1365*/ meltfptr[1364])))); ((meltobject_ptr_t)(/*_.VALDATA___V1365*/ meltfptr[1364]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:694:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1365*/ meltfptr[1364]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1366*/ meltfptr[1365]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1366*/ meltfptr[1365])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1366*/ meltfptr[1365]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1364*/ meltfptr[1363]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1366*/ meltfptr[1365]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1366*/ meltfptr[1365])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1366*/ meltfptr[1365]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1365*/ meltfptr[1364]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1366*/ meltfptr[1365]); MELT_LOCATION("warmelt-base.melt:694:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1362*/ meltfptr[1361])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1362*/ meltfptr[1361])))); ((meltobject_ptr_t)(/*_.VALDATA___V1362*/ meltfptr[1361]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1366*/ meltfptr[1365]); MELT_LOCATION("warmelt-base.melt:694:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1362*/ meltfptr[1361])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1362*/ meltfptr[1361])))); ((meltobject_ptr_t)(/*_.VALDATA___V1362*/ meltfptr[1361]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1370*/ meltfptr[1369]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1370*/ meltfptr[1369])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1370*/ meltfptr[1369]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1367*/ meltfptr[1366]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1370*/ meltfptr[1369]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1370*/ meltfptr[1369])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1370*/ meltfptr[1369]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1370*/ meltfptr[1369]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1370*/ meltfptr[1369])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1370*/ meltfptr[1369]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1368*/ meltfptr[1367]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1370*/ meltfptr[1369]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1370*/ meltfptr[1369])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1370*/ meltfptr[1369]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1370*/ meltfptr[1369]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1370*/ meltfptr[1369])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1370*/ meltfptr[1369]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1369*/ meltfptr[1368]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1370*/ meltfptr[1369]); MELT_LOCATION("warmelt-base.melt:694:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1362*/ meltfptr[1361])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1362*/ meltfptr[1361])))); ((meltobject_ptr_t)(/*_.VALDATA___V1362*/ meltfptr[1361]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1370*/ meltfptr[1369]); MELT_LOCATION("warmelt-base.melt:694:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1362*/ meltfptr[1361]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1371*/ meltfptr[1370])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1371*/ meltfptr[1370])))); ((meltobject_ptr_t)(/*_.VALDATA___V1371*/ meltfptr[1370]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1372*/ meltfptr[1371]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1371*/ meltfptr[1370]); MELT_LOCATION("warmelt-base.melt:699:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1373*/ meltfptr[1372])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1373*/ meltfptr[1372])))); ((meltobject_ptr_t)(/*_.VALDATA___V1373*/ meltfptr[1372]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1374*/ meltfptr[1373]); MELT_LOCATION("warmelt-base.melt:699:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1375*/ meltfptr[1374])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1375*/ meltfptr[1374])))); ((meltobject_ptr_t)(/*_.VALDATA___V1375*/ meltfptr[1374]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1352*/ meltfptr[1351]); MELT_LOCATION("warmelt-base.melt:699:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1375*/ meltfptr[1374])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1375*/ meltfptr[1374])))); ((meltobject_ptr_t)(/*_.VALDATA___V1375*/ meltfptr[1374]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:699:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1375*/ meltfptr[1374]); MELT_LOCATION("warmelt-base.melt:699:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1376*/ meltfptr[1375])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1376*/ meltfptr[1375])))); ((meltobject_ptr_t)(/*_.VALDATA___V1376*/ meltfptr[1375]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1134*/ meltfptr[1133]); MELT_LOCATION("warmelt-base.melt:699:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1376*/ meltfptr[1375])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1376*/ meltfptr[1375])))); ((meltobject_ptr_t)(/*_.VALDATA___V1376*/ meltfptr[1375]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:699:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1376*/ meltfptr[1375]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1377*/ meltfptr[1376]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1377*/ meltfptr[1376])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1377*/ meltfptr[1376]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1375*/ meltfptr[1374]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1377*/ meltfptr[1376]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1377*/ meltfptr[1376])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1377*/ meltfptr[1376]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1376*/ meltfptr[1375]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1377*/ meltfptr[1376]); MELT_LOCATION("warmelt-base.melt:699:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1373*/ meltfptr[1372])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1373*/ meltfptr[1372])))); ((meltobject_ptr_t)(/*_.VALDATA___V1373*/ meltfptr[1372]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1377*/ meltfptr[1376]); MELT_LOCATION("warmelt-base.melt:699:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1373*/ meltfptr[1372])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1373*/ meltfptr[1372])))); ((meltobject_ptr_t)(/*_.VALDATA___V1373*/ meltfptr[1372]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1378*/ meltfptr[1377]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1134*/ meltfptr[1133]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1379*/ meltfptr[1378]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1134*/ meltfptr[1133]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1380*/ meltfptr[1379]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1382*/ meltfptr[1381]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V1381*/ meltfptr[1380]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1382*/ meltfptr[1381]); MELT_LOCATION("warmelt-base.melt:699:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1373*/ meltfptr[1372])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1373*/ meltfptr[1372])))); ((meltobject_ptr_t)(/*_.VALDATA___V1373*/ meltfptr[1372]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1382*/ meltfptr[1381]); MELT_LOCATION("warmelt-base.melt:699:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1373*/ meltfptr[1372]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1383*/ meltfptr[1382])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1383*/ meltfptr[1382])))); ((meltobject_ptr_t)(/*_.VALDATA___V1383*/ meltfptr[1382]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1384*/ meltfptr[1383]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1383*/ meltfptr[1382]); MELT_LOCATION("warmelt-base.melt:714:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1385*/ meltfptr[1384])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1385*/ meltfptr[1384])))); ((meltobject_ptr_t)(/*_.VALDATA___V1385*/ meltfptr[1384]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1386*/ meltfptr[1385]); MELT_LOCATION("warmelt-base.melt:714:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1387*/ meltfptr[1386])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1387*/ meltfptr[1386])))); ((meltobject_ptr_t)(/*_.VALDATA___V1387*/ meltfptr[1386]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1352*/ meltfptr[1351]); MELT_LOCATION("warmelt-base.melt:714:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1387*/ meltfptr[1386])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1387*/ meltfptr[1386])))); ((meltobject_ptr_t)(/*_.VALDATA___V1387*/ meltfptr[1386]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:714:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1387*/ meltfptr[1386]); MELT_LOCATION("warmelt-base.melt:714:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1388*/ meltfptr[1387])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1388*/ meltfptr[1387])))); ((meltobject_ptr_t)(/*_.VALDATA___V1388*/ meltfptr[1387]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1172*/ meltfptr[1171]); MELT_LOCATION("warmelt-base.melt:714:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1388*/ meltfptr[1387])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1388*/ meltfptr[1387])))); ((meltobject_ptr_t)(/*_.VALDATA___V1388*/ meltfptr[1387]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); #undef meltfram__ } /*end of warmelt_base_initialmeltchunk_9*/ void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_10 (struct frame_start_module_melt_st* meltframptr__, char predefinited[]) { #define meltfram__ (*meltframptr__) #undef meltcallcount #define meltcallcount 0L MELT_LOCATION("warmelt-base.melt:714:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1388*/ meltfptr[1387]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1389*/ meltfptr[1388]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1389*/ meltfptr[1388])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1389*/ meltfptr[1388]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1387*/ meltfptr[1386]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1389*/ meltfptr[1388]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1389*/ meltfptr[1388])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1389*/ meltfptr[1388]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1388*/ meltfptr[1387]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1389*/ meltfptr[1388]); MELT_LOCATION("warmelt-base.melt:714:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1385*/ meltfptr[1384])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1385*/ meltfptr[1384])))); ((meltobject_ptr_t)(/*_.VALDATA___V1385*/ meltfptr[1384]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1389*/ meltfptr[1388]); MELT_LOCATION("warmelt-base.melt:714:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1385*/ meltfptr[1384])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1385*/ meltfptr[1384])))); ((meltobject_ptr_t)(/*_.VALDATA___V1385*/ meltfptr[1384]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1393*/ meltfptr[1392]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1393*/ meltfptr[1392])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1393*/ meltfptr[1392]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1390*/ meltfptr[1389]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1393*/ meltfptr[1392]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1393*/ meltfptr[1392])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1393*/ meltfptr[1392]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1393*/ meltfptr[1392]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1393*/ meltfptr[1392])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1393*/ meltfptr[1392]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1391*/ meltfptr[1390]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1393*/ meltfptr[1392]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1393*/ meltfptr[1392])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1393*/ meltfptr[1392]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1172*/ meltfptr[1171]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1393*/ meltfptr[1392]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1393*/ meltfptr[1392])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1393*/ meltfptr[1392]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1392*/ meltfptr[1391]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1393*/ meltfptr[1392]); MELT_LOCATION("warmelt-base.melt:714:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1385*/ meltfptr[1384])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1385*/ meltfptr[1384])))); ((meltobject_ptr_t)(/*_.VALDATA___V1385*/ meltfptr[1384]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1393*/ meltfptr[1392]); MELT_LOCATION("warmelt-base.melt:714:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1385*/ meltfptr[1384]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1394*/ meltfptr[1393])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1394*/ meltfptr[1393])))); ((meltobject_ptr_t)(/*_.VALDATA___V1394*/ meltfptr[1393]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1395*/ meltfptr[1394]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1394*/ meltfptr[1393]); MELT_LOCATION("warmelt-base.melt:720:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1396*/ meltfptr[1395])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1396*/ meltfptr[1395])))); ((meltobject_ptr_t)(/*_.VALDATA___V1396*/ meltfptr[1395]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1397*/ meltfptr[1396]); MELT_LOCATION("warmelt-base.melt:720:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1398*/ meltfptr[1397])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1398*/ meltfptr[1397])))); ((meltobject_ptr_t)(/*_.VALDATA___V1398*/ meltfptr[1397]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1352*/ meltfptr[1351]); MELT_LOCATION("warmelt-base.melt:720:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1398*/ meltfptr[1397])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1398*/ meltfptr[1397])))); ((meltobject_ptr_t)(/*_.VALDATA___V1398*/ meltfptr[1397]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:720:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1398*/ meltfptr[1397]); MELT_LOCATION("warmelt-base.melt:720:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1399*/ meltfptr[1398])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1399*/ meltfptr[1398])))); ((meltobject_ptr_t)(/*_.VALDATA___V1399*/ meltfptr[1398]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1172*/ meltfptr[1171]); MELT_LOCATION("warmelt-base.melt:720:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1399*/ meltfptr[1398])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1399*/ meltfptr[1398])))); ((meltobject_ptr_t)(/*_.VALDATA___V1399*/ meltfptr[1398]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:720:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1399*/ meltfptr[1398]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1400*/ meltfptr[1399]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1400*/ meltfptr[1399])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1400*/ meltfptr[1399]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1398*/ meltfptr[1397]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1400*/ meltfptr[1399]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1400*/ meltfptr[1399])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1400*/ meltfptr[1399]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1399*/ meltfptr[1398]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1400*/ meltfptr[1399]); MELT_LOCATION("warmelt-base.melt:720:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1396*/ meltfptr[1395])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1396*/ meltfptr[1395])))); ((meltobject_ptr_t)(/*_.VALDATA___V1396*/ meltfptr[1395]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1400*/ meltfptr[1399]); MELT_LOCATION("warmelt-base.melt:720:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1396*/ meltfptr[1395])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1396*/ meltfptr[1395])))); ((meltobject_ptr_t)(/*_.VALDATA___V1396*/ meltfptr[1395]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1404*/ meltfptr[1403]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1404*/ meltfptr[1403])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1404*/ meltfptr[1403]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1401*/ meltfptr[1400]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1404*/ meltfptr[1403]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1404*/ meltfptr[1403])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1404*/ meltfptr[1403]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1404*/ meltfptr[1403]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1404*/ meltfptr[1403])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1404*/ meltfptr[1403]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1402*/ meltfptr[1401]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1404*/ meltfptr[1403]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1404*/ meltfptr[1403])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1404*/ meltfptr[1403]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1172*/ meltfptr[1171]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1404*/ meltfptr[1403]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1404*/ meltfptr[1403])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1404*/ meltfptr[1403]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1403*/ meltfptr[1402]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1404*/ meltfptr[1403]); MELT_LOCATION("warmelt-base.melt:720:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1396*/ meltfptr[1395])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1396*/ meltfptr[1395])))); ((meltobject_ptr_t)(/*_.VALDATA___V1396*/ meltfptr[1395]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1404*/ meltfptr[1403]); MELT_LOCATION("warmelt-base.melt:720:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1396*/ meltfptr[1395]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1405*/ meltfptr[1404])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1405*/ meltfptr[1404])))); ((meltobject_ptr_t)(/*_.VALDATA___V1405*/ meltfptr[1404]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1406*/ meltfptr[1405]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1405*/ meltfptr[1404]); MELT_LOCATION("warmelt-base.melt:726:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1407*/ meltfptr[1406])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1407*/ meltfptr[1406])))); ((meltobject_ptr_t)(/*_.VALDATA___V1407*/ meltfptr[1406]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1408*/ meltfptr[1407]); MELT_LOCATION("warmelt-base.melt:726:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1409*/ meltfptr[1408])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1409*/ meltfptr[1408])))); ((meltobject_ptr_t)(/*_.VALDATA___V1409*/ meltfptr[1408]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1352*/ meltfptr[1351]); MELT_LOCATION("warmelt-base.melt:726:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1409*/ meltfptr[1408])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1409*/ meltfptr[1408])))); ((meltobject_ptr_t)(/*_.VALDATA___V1409*/ meltfptr[1408]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:726:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1409*/ meltfptr[1408]); MELT_LOCATION("warmelt-base.melt:726:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1410*/ meltfptr[1409])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1410*/ meltfptr[1409])))); ((meltobject_ptr_t)(/*_.VALDATA___V1410*/ meltfptr[1409]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1196*/ meltfptr[1195]); MELT_LOCATION("warmelt-base.melt:726:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1410*/ meltfptr[1409])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1410*/ meltfptr[1409])))); ((meltobject_ptr_t)(/*_.VALDATA___V1410*/ meltfptr[1409]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:726:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1410*/ meltfptr[1409]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1411*/ meltfptr[1410]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1411*/ meltfptr[1410])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1411*/ meltfptr[1410]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1409*/ meltfptr[1408]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1411*/ meltfptr[1410]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1411*/ meltfptr[1410])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1411*/ meltfptr[1410]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1410*/ meltfptr[1409]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1411*/ meltfptr[1410]); MELT_LOCATION("warmelt-base.melt:726:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1407*/ meltfptr[1406])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1407*/ meltfptr[1406])))); ((meltobject_ptr_t)(/*_.VALDATA___V1407*/ meltfptr[1406]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1411*/ meltfptr[1410]); MELT_LOCATION("warmelt-base.melt:726:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1407*/ meltfptr[1406])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1407*/ meltfptr[1406])))); ((meltobject_ptr_t)(/*_.VALDATA___V1407*/ meltfptr[1406]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1415*/ meltfptr[1414]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1415*/ meltfptr[1414])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1415*/ meltfptr[1414]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1412*/ meltfptr[1411]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1415*/ meltfptr[1414]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1415*/ meltfptr[1414])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1415*/ meltfptr[1414]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1415*/ meltfptr[1414]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1415*/ meltfptr[1414])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1415*/ meltfptr[1414]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1413*/ meltfptr[1412]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1415*/ meltfptr[1414]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1415*/ meltfptr[1414])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1415*/ meltfptr[1414]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1196*/ meltfptr[1195]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1415*/ meltfptr[1414]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1415*/ meltfptr[1414])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1415*/ meltfptr[1414]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1414*/ meltfptr[1413]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1415*/ meltfptr[1414]); MELT_LOCATION("warmelt-base.melt:726:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1407*/ meltfptr[1406])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1407*/ meltfptr[1406])))); ((meltobject_ptr_t)(/*_.VALDATA___V1407*/ meltfptr[1406]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1415*/ meltfptr[1414]); MELT_LOCATION("warmelt-base.melt:726:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1407*/ meltfptr[1406]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1416*/ meltfptr[1415])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1416*/ meltfptr[1415])))); ((meltobject_ptr_t)(/*_.VALDATA___V1416*/ meltfptr[1415]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1417*/ meltfptr[1416]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1416*/ meltfptr[1415]); MELT_LOCATION("warmelt-base.melt:731:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1418*/ meltfptr[1417])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1418*/ meltfptr[1417])))); ((meltobject_ptr_t)(/*_.VALDATA___V1418*/ meltfptr[1417]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1419*/ meltfptr[1418]); MELT_LOCATION("warmelt-base.melt:731:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1420*/ meltfptr[1419])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1420*/ meltfptr[1419])))); ((meltobject_ptr_t)(/*_.VALDATA___V1420*/ meltfptr[1419]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1352*/ meltfptr[1351]); MELT_LOCATION("warmelt-base.melt:731:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1420*/ meltfptr[1419])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1420*/ meltfptr[1419])))); ((meltobject_ptr_t)(/*_.VALDATA___V1420*/ meltfptr[1419]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:731:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1420*/ meltfptr[1419]); MELT_LOCATION("warmelt-base.melt:731:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1421*/ meltfptr[1420])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1421*/ meltfptr[1420])))); ((meltobject_ptr_t)(/*_.VALDATA___V1421*/ meltfptr[1420]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:731:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1421*/ meltfptr[1420])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1421*/ meltfptr[1420])))); ((meltobject_ptr_t)(/*_.VALDATA___V1421*/ meltfptr[1420]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:731:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1421*/ meltfptr[1420]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1422*/ meltfptr[1421]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1422*/ meltfptr[1421])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1422*/ meltfptr[1421]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1420*/ meltfptr[1419]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1422*/ meltfptr[1421]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1422*/ meltfptr[1421])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1422*/ meltfptr[1421]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1421*/ meltfptr[1420]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1422*/ meltfptr[1421]); MELT_LOCATION("warmelt-base.melt:731:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1418*/ meltfptr[1417])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1418*/ meltfptr[1417])))); ((meltobject_ptr_t)(/*_.VALDATA___V1418*/ meltfptr[1417]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1422*/ meltfptr[1421]); MELT_LOCATION("warmelt-base.melt:731:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1418*/ meltfptr[1417])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1418*/ meltfptr[1417])))); ((meltobject_ptr_t)(/*_.VALDATA___V1418*/ meltfptr[1417]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1426*/ meltfptr[1425]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1426*/ meltfptr[1425])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1426*/ meltfptr[1425]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1423*/ meltfptr[1422]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1426*/ meltfptr[1425]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1426*/ meltfptr[1425])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1426*/ meltfptr[1425]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1426*/ meltfptr[1425]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1426*/ meltfptr[1425])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1426*/ meltfptr[1425]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1424*/ meltfptr[1423]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1426*/ meltfptr[1425]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1426*/ meltfptr[1425])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1426*/ meltfptr[1425]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1426*/ meltfptr[1425]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1426*/ meltfptr[1425])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1426*/ meltfptr[1425]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1425*/ meltfptr[1424]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1426*/ meltfptr[1425]); MELT_LOCATION("warmelt-base.melt:731:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1418*/ meltfptr[1417])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1418*/ meltfptr[1417])))); ((meltobject_ptr_t)(/*_.VALDATA___V1418*/ meltfptr[1417]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1426*/ meltfptr[1425]); MELT_LOCATION("warmelt-base.melt:731:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1418*/ meltfptr[1417]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1427*/ meltfptr[1426])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1427*/ meltfptr[1426])))); ((meltobject_ptr_t)(/*_.VALDATA___V1427*/ meltfptr[1426]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1428*/ meltfptr[1427]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1427*/ meltfptr[1426]); MELT_LOCATION("warmelt-base.melt:736:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1429*/ meltfptr[1428])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1429*/ meltfptr[1428])))); ((meltobject_ptr_t)(/*_.VALDATA___V1429*/ meltfptr[1428]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1430*/ meltfptr[1429]); MELT_LOCATION("warmelt-base.melt:736:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1431*/ meltfptr[1430])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1431*/ meltfptr[1430])))); ((meltobject_ptr_t)(/*_.VALDATA___V1431*/ meltfptr[1430]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1352*/ meltfptr[1351]); MELT_LOCATION("warmelt-base.melt:736:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1431*/ meltfptr[1430])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1431*/ meltfptr[1430])))); ((meltobject_ptr_t)(/*_.VALDATA___V1431*/ meltfptr[1430]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:736:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1431*/ meltfptr[1430]); MELT_LOCATION("warmelt-base.melt:736:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1432*/ meltfptr[1431])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1432*/ meltfptr[1431])))); ((meltobject_ptr_t)(/*_.VALDATA___V1432*/ meltfptr[1431]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1196*/ meltfptr[1195]); MELT_LOCATION("warmelt-base.melt:736:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1432*/ meltfptr[1431])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1432*/ meltfptr[1431])))); ((meltobject_ptr_t)(/*_.VALDATA___V1432*/ meltfptr[1431]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:736:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1432*/ meltfptr[1431]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1433*/ meltfptr[1432]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1433*/ meltfptr[1432])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1433*/ meltfptr[1432]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1431*/ meltfptr[1430]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1433*/ meltfptr[1432]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1433*/ meltfptr[1432])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1433*/ meltfptr[1432]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1432*/ meltfptr[1431]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1433*/ meltfptr[1432]); MELT_LOCATION("warmelt-base.melt:736:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1429*/ meltfptr[1428])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1429*/ meltfptr[1428])))); ((meltobject_ptr_t)(/*_.VALDATA___V1429*/ meltfptr[1428]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1433*/ meltfptr[1432]); MELT_LOCATION("warmelt-base.melt:736:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1429*/ meltfptr[1428])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1429*/ meltfptr[1428])))); ((meltobject_ptr_t)(/*_.VALDATA___V1429*/ meltfptr[1428]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1437*/ meltfptr[1436]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1437*/ meltfptr[1436])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1437*/ meltfptr[1436]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1434*/ meltfptr[1433]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1437*/ meltfptr[1436]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1437*/ meltfptr[1436])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1437*/ meltfptr[1436]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1437*/ meltfptr[1436]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1437*/ meltfptr[1436])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1437*/ meltfptr[1436]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1435*/ meltfptr[1434]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1437*/ meltfptr[1436]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1437*/ meltfptr[1436])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1437*/ meltfptr[1436]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1196*/ meltfptr[1195]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1437*/ meltfptr[1436]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1437*/ meltfptr[1436])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1437*/ meltfptr[1436]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1436*/ meltfptr[1435]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1437*/ meltfptr[1436]); MELT_LOCATION("warmelt-base.melt:736:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1429*/ meltfptr[1428])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1429*/ meltfptr[1428])))); ((meltobject_ptr_t)(/*_.VALDATA___V1429*/ meltfptr[1428]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1437*/ meltfptr[1436]); MELT_LOCATION("warmelt-base.melt:736:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1429*/ meltfptr[1428]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1438*/ meltfptr[1437])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1438*/ meltfptr[1437])))); ((meltobject_ptr_t)(/*_.VALDATA___V1438*/ meltfptr[1437]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1439*/ meltfptr[1438]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1438*/ meltfptr[1437]); MELT_LOCATION("warmelt-base.melt:741:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1440*/ meltfptr[1439])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1440*/ meltfptr[1439])))); ((meltobject_ptr_t)(/*_.VALDATA___V1440*/ meltfptr[1439]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1441*/ meltfptr[1440]); MELT_LOCATION("warmelt-base.melt:741:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1442*/ meltfptr[1441])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1442*/ meltfptr[1441])))); ((meltobject_ptr_t)(/*_.VALDATA___V1442*/ meltfptr[1441]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1352*/ meltfptr[1351]); MELT_LOCATION("warmelt-base.melt:741:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1442*/ meltfptr[1441])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1442*/ meltfptr[1441])))); ((meltobject_ptr_t)(/*_.VALDATA___V1442*/ meltfptr[1441]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:741:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1442*/ meltfptr[1441]); MELT_LOCATION("warmelt-base.melt:741:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1443*/ meltfptr[1442])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1443*/ meltfptr[1442])))); ((meltobject_ptr_t)(/*_.VALDATA___V1443*/ meltfptr[1442]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:741:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1443*/ meltfptr[1442])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1443*/ meltfptr[1442])))); ((meltobject_ptr_t)(/*_.VALDATA___V1443*/ meltfptr[1442]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:741:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1443*/ meltfptr[1442]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1444*/ meltfptr[1443]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1444*/ meltfptr[1443])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1444*/ meltfptr[1443]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1442*/ meltfptr[1441]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1444*/ meltfptr[1443]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1444*/ meltfptr[1443])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1444*/ meltfptr[1443]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1443*/ meltfptr[1442]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1444*/ meltfptr[1443]); MELT_LOCATION("warmelt-base.melt:741:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1440*/ meltfptr[1439])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1440*/ meltfptr[1439])))); ((meltobject_ptr_t)(/*_.VALDATA___V1440*/ meltfptr[1439]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1444*/ meltfptr[1443]); MELT_LOCATION("warmelt-base.melt:741:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1440*/ meltfptr[1439])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1440*/ meltfptr[1439])))); ((meltobject_ptr_t)(/*_.VALDATA___V1440*/ meltfptr[1439]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1448*/ meltfptr[1447]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1448*/ meltfptr[1447])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1448*/ meltfptr[1447]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1445*/ meltfptr[1444]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1448*/ meltfptr[1447]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1448*/ meltfptr[1447])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1448*/ meltfptr[1447]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1448*/ meltfptr[1447]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1448*/ meltfptr[1447])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1448*/ meltfptr[1447]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1446*/ meltfptr[1445]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1448*/ meltfptr[1447]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1448*/ meltfptr[1447])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1448*/ meltfptr[1447]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1448*/ meltfptr[1447]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1448*/ meltfptr[1447])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1448*/ meltfptr[1447]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1447*/ meltfptr[1446]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1448*/ meltfptr[1447]); MELT_LOCATION("warmelt-base.melt:741:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1440*/ meltfptr[1439])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1440*/ meltfptr[1439])))); ((meltobject_ptr_t)(/*_.VALDATA___V1440*/ meltfptr[1439]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1448*/ meltfptr[1447]); MELT_LOCATION("warmelt-base.melt:741:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1440*/ meltfptr[1439]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1449*/ meltfptr[1448])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1449*/ meltfptr[1448])))); ((meltobject_ptr_t)(/*_.VALDATA___V1449*/ meltfptr[1448]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1450*/ meltfptr[1449]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1449*/ meltfptr[1448]); MELT_LOCATION("warmelt-base.melt:746:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1451*/ meltfptr[1450])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1451*/ meltfptr[1450])))); ((meltobject_ptr_t)(/*_.VALDATA___V1451*/ meltfptr[1450]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1452*/ meltfptr[1451]); MELT_LOCATION("warmelt-base.melt:746:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1453*/ meltfptr[1452])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1453*/ meltfptr[1452])))); ((meltobject_ptr_t)(/*_.VALDATA___V1453*/ meltfptr[1452]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1352*/ meltfptr[1351]); MELT_LOCATION("warmelt-base.melt:746:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1453*/ meltfptr[1452])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1453*/ meltfptr[1452])))); ((meltobject_ptr_t)(/*_.VALDATA___V1453*/ meltfptr[1452]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:746:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1453*/ meltfptr[1452]); MELT_LOCATION("warmelt-base.melt:746:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1454*/ meltfptr[1453])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1454*/ meltfptr[1453])))); ((meltobject_ptr_t)(/*_.VALDATA___V1454*/ meltfptr[1453]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1196*/ meltfptr[1195]); MELT_LOCATION("warmelt-base.melt:746:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1454*/ meltfptr[1453])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1454*/ meltfptr[1453])))); ((meltobject_ptr_t)(/*_.VALDATA___V1454*/ meltfptr[1453]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:746:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1454*/ meltfptr[1453]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1455*/ meltfptr[1454]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1455*/ meltfptr[1454])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1455*/ meltfptr[1454]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1453*/ meltfptr[1452]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1455*/ meltfptr[1454]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1455*/ meltfptr[1454])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1455*/ meltfptr[1454]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1454*/ meltfptr[1453]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1455*/ meltfptr[1454]); MELT_LOCATION("warmelt-base.melt:746:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1451*/ meltfptr[1450])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1451*/ meltfptr[1450])))); ((meltobject_ptr_t)(/*_.VALDATA___V1451*/ meltfptr[1450]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1455*/ meltfptr[1454]); MELT_LOCATION("warmelt-base.melt:746:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1451*/ meltfptr[1450])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1451*/ meltfptr[1450])))); ((meltobject_ptr_t)(/*_.VALDATA___V1451*/ meltfptr[1450]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1459*/ meltfptr[1458]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1459*/ meltfptr[1458])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1459*/ meltfptr[1458]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1456*/ meltfptr[1455]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1459*/ meltfptr[1458]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1459*/ meltfptr[1458])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1459*/ meltfptr[1458]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1459*/ meltfptr[1458]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1459*/ meltfptr[1458])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1459*/ meltfptr[1458]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1457*/ meltfptr[1456]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1459*/ meltfptr[1458]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1459*/ meltfptr[1458])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1459*/ meltfptr[1458]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1196*/ meltfptr[1195]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1459*/ meltfptr[1458]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1459*/ meltfptr[1458])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1459*/ meltfptr[1458]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1458*/ meltfptr[1457]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1459*/ meltfptr[1458]); MELT_LOCATION("warmelt-base.melt:746:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1451*/ meltfptr[1450])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1451*/ meltfptr[1450])))); ((meltobject_ptr_t)(/*_.VALDATA___V1451*/ meltfptr[1450]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1459*/ meltfptr[1458]); MELT_LOCATION("warmelt-base.melt:746:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1451*/ meltfptr[1450]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1460*/ meltfptr[1459])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1460*/ meltfptr[1459])))); ((meltobject_ptr_t)(/*_.VALDATA___V1460*/ meltfptr[1459]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1461*/ meltfptr[1460]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1460*/ meltfptr[1459]); MELT_LOCATION("warmelt-base.melt:751:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1462*/ meltfptr[1461])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1462*/ meltfptr[1461])))); ((meltobject_ptr_t)(/*_.VALDATA___V1462*/ meltfptr[1461]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1463*/ meltfptr[1462]); MELT_LOCATION("warmelt-base.melt:751:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1464*/ meltfptr[1463])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1464*/ meltfptr[1463])))); ((meltobject_ptr_t)(/*_.VALDATA___V1464*/ meltfptr[1463]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1352*/ meltfptr[1351]); MELT_LOCATION("warmelt-base.melt:751:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1464*/ meltfptr[1463])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1464*/ meltfptr[1463])))); ((meltobject_ptr_t)(/*_.VALDATA___V1464*/ meltfptr[1463]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:751:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1464*/ meltfptr[1463]); MELT_LOCATION("warmelt-base.melt:751:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1465*/ meltfptr[1464])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1465*/ meltfptr[1464])))); ((meltobject_ptr_t)(/*_.VALDATA___V1465*/ meltfptr[1464]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1253*/ meltfptr[1252]); MELT_LOCATION("warmelt-base.melt:751:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1465*/ meltfptr[1464])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1465*/ meltfptr[1464])))); ((meltobject_ptr_t)(/*_.VALDATA___V1465*/ meltfptr[1464]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:751:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1465*/ meltfptr[1464]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1466*/ meltfptr[1465]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1466*/ meltfptr[1465])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1466*/ meltfptr[1465]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1464*/ meltfptr[1463]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1466*/ meltfptr[1465]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1466*/ meltfptr[1465])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1466*/ meltfptr[1465]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1465*/ meltfptr[1464]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1466*/ meltfptr[1465]); MELT_LOCATION("warmelt-base.melt:751:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1462*/ meltfptr[1461])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1462*/ meltfptr[1461])))); ((meltobject_ptr_t)(/*_.VALDATA___V1462*/ meltfptr[1461]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1466*/ meltfptr[1465]); MELT_LOCATION("warmelt-base.melt:751:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1462*/ meltfptr[1461])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1462*/ meltfptr[1461])))); ((meltobject_ptr_t)(/*_.VALDATA___V1462*/ meltfptr[1461]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1470*/ meltfptr[1469]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1470*/ meltfptr[1469])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1470*/ meltfptr[1469]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1467*/ meltfptr[1466]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1470*/ meltfptr[1469]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1470*/ meltfptr[1469])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1470*/ meltfptr[1469]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1470*/ meltfptr[1469]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1470*/ meltfptr[1469])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1470*/ meltfptr[1469]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1468*/ meltfptr[1467]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1470*/ meltfptr[1469]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1470*/ meltfptr[1469])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1470*/ meltfptr[1469]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1253*/ meltfptr[1252]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1470*/ meltfptr[1469]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1470*/ meltfptr[1469])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1470*/ meltfptr[1469]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1469*/ meltfptr[1468]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1470*/ meltfptr[1469]); MELT_LOCATION("warmelt-base.melt:751:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1462*/ meltfptr[1461])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1462*/ meltfptr[1461])))); ((meltobject_ptr_t)(/*_.VALDATA___V1462*/ meltfptr[1461]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1470*/ meltfptr[1469]); MELT_LOCATION("warmelt-base.melt:751:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1462*/ meltfptr[1461]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1471*/ meltfptr[1470])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1471*/ meltfptr[1470])))); ((meltobject_ptr_t)(/*_.VALDATA___V1471*/ meltfptr[1470]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1472*/ meltfptr[1471]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1471*/ meltfptr[1470]); MELT_LOCATION("warmelt-base.melt:757:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1473*/ meltfptr[1472])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1473*/ meltfptr[1472])))); ((meltobject_ptr_t)(/*_.VALDATA___V1473*/ meltfptr[1472]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1474*/ meltfptr[1473]); MELT_LOCATION("warmelt-base.melt:757:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1475*/ meltfptr[1474])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1475*/ meltfptr[1474])))); ((meltobject_ptr_t)(/*_.VALDATA___V1475*/ meltfptr[1474]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1352*/ meltfptr[1351]); MELT_LOCATION("warmelt-base.melt:757:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1475*/ meltfptr[1474])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1475*/ meltfptr[1474])))); ((meltobject_ptr_t)(/*_.VALDATA___V1475*/ meltfptr[1474]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:757:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1475*/ meltfptr[1474]); MELT_LOCATION("warmelt-base.melt:757:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1476*/ meltfptr[1475])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1476*/ meltfptr[1475])))); ((meltobject_ptr_t)(/*_.VALDATA___V1476*/ meltfptr[1475]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:757:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1476*/ meltfptr[1475])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1476*/ meltfptr[1475])))); ((meltobject_ptr_t)(/*_.VALDATA___V1476*/ meltfptr[1475]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:757:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1476*/ meltfptr[1475]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1477*/ meltfptr[1476]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1477*/ meltfptr[1476])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1477*/ meltfptr[1476]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1475*/ meltfptr[1474]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1477*/ meltfptr[1476]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1477*/ meltfptr[1476])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1477*/ meltfptr[1476]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1476*/ meltfptr[1475]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1477*/ meltfptr[1476]); MELT_LOCATION("warmelt-base.melt:757:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1473*/ meltfptr[1472])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1473*/ meltfptr[1472])))); ((meltobject_ptr_t)(/*_.VALDATA___V1473*/ meltfptr[1472]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1477*/ meltfptr[1476]); MELT_LOCATION("warmelt-base.melt:757:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1473*/ meltfptr[1472])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1473*/ meltfptr[1472])))); ((meltobject_ptr_t)(/*_.VALDATA___V1473*/ meltfptr[1472]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1481*/ meltfptr[1480]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1481*/ meltfptr[1480])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1481*/ meltfptr[1480]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1478*/ meltfptr[1477]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1481*/ meltfptr[1480]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1481*/ meltfptr[1480])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1481*/ meltfptr[1480]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1481*/ meltfptr[1480]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1481*/ meltfptr[1480])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1481*/ meltfptr[1480]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1479*/ meltfptr[1478]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1481*/ meltfptr[1480]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1481*/ meltfptr[1480])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1481*/ meltfptr[1480]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1481*/ meltfptr[1480]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1481*/ meltfptr[1480])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1481*/ meltfptr[1480]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1480*/ meltfptr[1479]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1481*/ meltfptr[1480]); MELT_LOCATION("warmelt-base.melt:757:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1473*/ meltfptr[1472])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1473*/ meltfptr[1472])))); ((meltobject_ptr_t)(/*_.VALDATA___V1473*/ meltfptr[1472]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1481*/ meltfptr[1480]); MELT_LOCATION("warmelt-base.melt:757:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1473*/ meltfptr[1472]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1482*/ meltfptr[1481])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1482*/ meltfptr[1481])))); ((meltobject_ptr_t)(/*_.VALDATA___V1482*/ meltfptr[1481]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1483*/ meltfptr[1482]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1482*/ meltfptr[1481]); MELT_LOCATION("warmelt-base.melt:765:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1484*/ meltfptr[1483])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1484*/ meltfptr[1483])))); ((meltobject_ptr_t)(/*_.VALDATA___V1484*/ meltfptr[1483]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1485*/ meltfptr[1484]); MELT_LOCATION("warmelt-base.melt:765:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1486*/ meltfptr[1485])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1486*/ meltfptr[1485])))); ((meltobject_ptr_t)(/*_.VALDATA___V1486*/ meltfptr[1485]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1352*/ meltfptr[1351]); MELT_LOCATION("warmelt-base.melt:765:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1486*/ meltfptr[1485])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1486*/ meltfptr[1485])))); ((meltobject_ptr_t)(/*_.VALDATA___V1486*/ meltfptr[1485]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:765:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1486*/ meltfptr[1485]); MELT_LOCATION("warmelt-base.melt:765:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1487*/ meltfptr[1486])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1487*/ meltfptr[1486])))); ((meltobject_ptr_t)(/*_.VALDATA___V1487*/ meltfptr[1486]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:765:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1487*/ meltfptr[1486])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1487*/ meltfptr[1486])))); ((meltobject_ptr_t)(/*_.VALDATA___V1487*/ meltfptr[1486]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:765:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1487*/ meltfptr[1486]); MELT_LOCATION("warmelt-base.melt:765:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1488*/ meltfptr[1487])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1488*/ meltfptr[1487])))); ((meltobject_ptr_t)(/*_.VALDATA___V1488*/ meltfptr[1487]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1278*/ meltfptr[1277]); MELT_LOCATION("warmelt-base.melt:765:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1488*/ meltfptr[1487])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1488*/ meltfptr[1487])))); ((meltobject_ptr_t)(/*_.VALDATA___V1488*/ meltfptr[1487]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:765:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1488*/ meltfptr[1487]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1489*/ meltfptr[1488]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1489*/ meltfptr[1488])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1489*/ meltfptr[1488]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1486*/ meltfptr[1485]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1489*/ meltfptr[1488]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1489*/ meltfptr[1488])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1489*/ meltfptr[1488]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1487*/ meltfptr[1486]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1489*/ meltfptr[1488]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1489*/ meltfptr[1488])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1489*/ meltfptr[1488]))->tabval[2] = (melt_ptr_t)(/*_.VALDATA___V1488*/ meltfptr[1487]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1489*/ meltfptr[1488]); MELT_LOCATION("warmelt-base.melt:765:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1484*/ meltfptr[1483])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1484*/ meltfptr[1483])))); ((meltobject_ptr_t)(/*_.VALDATA___V1484*/ meltfptr[1483]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1489*/ meltfptr[1488]); MELT_LOCATION("warmelt-base.melt:765:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1484*/ meltfptr[1483])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1484*/ meltfptr[1483])))); ((meltobject_ptr_t)(/*_.VALDATA___V1484*/ meltfptr[1483]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1490*/ meltfptr[1489]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1491*/ meltfptr[1490]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1492*/ meltfptr[1491]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V1278*/ meltfptr[1277]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1494*/ meltfptr[1493]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V1493*/ meltfptr[1492]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1494*/ meltfptr[1493]); MELT_LOCATION("warmelt-base.melt:765:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1484*/ meltfptr[1483])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1484*/ meltfptr[1483])))); ((meltobject_ptr_t)(/*_.VALDATA___V1484*/ meltfptr[1483]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1494*/ meltfptr[1493]); MELT_LOCATION("warmelt-base.melt:765:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1484*/ meltfptr[1483]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1495*/ meltfptr[1494])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1495*/ meltfptr[1494])))); ((meltobject_ptr_t)(/*_.VALDATA___V1495*/ meltfptr[1494]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1496*/ meltfptr[1495]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1495*/ meltfptr[1494]); MELT_LOCATION("warmelt-base.melt:773:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1497*/ meltfptr[1496])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1497*/ meltfptr[1496])))); ((meltobject_ptr_t)(/*_.VALDATA___V1497*/ meltfptr[1496]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1498*/ meltfptr[1497]); MELT_LOCATION("warmelt-base.melt:773:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1499*/ meltfptr[1498])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1499*/ meltfptr[1498])))); ((meltobject_ptr_t)(/*_.VALDATA___V1499*/ meltfptr[1498]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1352*/ meltfptr[1351]); MELT_LOCATION("warmelt-base.melt:773:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1499*/ meltfptr[1498])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1499*/ meltfptr[1498])))); ((meltobject_ptr_t)(/*_.VALDATA___V1499*/ meltfptr[1498]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:773:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1499*/ meltfptr[1498]); MELT_LOCATION("warmelt-base.melt:773:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1500*/ meltfptr[1499])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1500*/ meltfptr[1499])))); ((meltobject_ptr_t)(/*_.VALDATA___V1500*/ meltfptr[1499]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V414*/ meltfptr[413]); MELT_LOCATION("warmelt-base.melt:773:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1500*/ meltfptr[1499])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1500*/ meltfptr[1499])))); ((meltobject_ptr_t)(/*_.VALDATA___V1500*/ meltfptr[1499]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:773:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1500*/ meltfptr[1499]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1501*/ meltfptr[1500]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1501*/ meltfptr[1500])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1501*/ meltfptr[1500]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1499*/ meltfptr[1498]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1501*/ meltfptr[1500]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1501*/ meltfptr[1500])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1501*/ meltfptr[1500]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1500*/ meltfptr[1499]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1501*/ meltfptr[1500]); MELT_LOCATION("warmelt-base.melt:773:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1497*/ meltfptr[1496])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1497*/ meltfptr[1496])))); ((meltobject_ptr_t)(/*_.VALDATA___V1497*/ meltfptr[1496]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1501*/ meltfptr[1500]); MELT_LOCATION("warmelt-base.melt:773:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1497*/ meltfptr[1496])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1497*/ meltfptr[1496])))); ((meltobject_ptr_t)(/*_.VALDATA___V1497*/ meltfptr[1496]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1505*/ meltfptr[1504]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1505*/ meltfptr[1504])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1505*/ meltfptr[1504]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1502*/ meltfptr[1501]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1505*/ meltfptr[1504]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1505*/ meltfptr[1504])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1505*/ meltfptr[1504]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1505*/ meltfptr[1504]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1505*/ meltfptr[1504])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1505*/ meltfptr[1504]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1503*/ meltfptr[1502]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1505*/ meltfptr[1504]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1505*/ meltfptr[1504])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1505*/ meltfptr[1504]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V414*/ meltfptr[413]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1505*/ meltfptr[1504]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1505*/ meltfptr[1504])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1505*/ meltfptr[1504]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1504*/ meltfptr[1503]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1505*/ meltfptr[1504]); MELT_LOCATION("warmelt-base.melt:773:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1497*/ meltfptr[1496])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1497*/ meltfptr[1496])))); ((meltobject_ptr_t)(/*_.VALDATA___V1497*/ meltfptr[1496]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1505*/ meltfptr[1504]); MELT_LOCATION("warmelt-base.melt:773:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1497*/ meltfptr[1496]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1506*/ meltfptr[1505])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1506*/ meltfptr[1505])))); ((meltobject_ptr_t)(/*_.VALDATA___V1506*/ meltfptr[1505]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1507*/ meltfptr[1506]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1506*/ meltfptr[1505]); MELT_LOCATION("warmelt-base.melt:778:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1508*/ meltfptr[1507])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1508*/ meltfptr[1507])))); ((meltobject_ptr_t)(/*_.VALDATA___V1508*/ meltfptr[1507]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1509*/ meltfptr[1508]); MELT_LOCATION("warmelt-base.melt:778:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1510*/ meltfptr[1509])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1510*/ meltfptr[1509])))); ((meltobject_ptr_t)(/*_.VALDATA___V1510*/ meltfptr[1509]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1352*/ meltfptr[1351]); MELT_LOCATION("warmelt-base.melt:778:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1510*/ meltfptr[1509])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1510*/ meltfptr[1509])))); ((meltobject_ptr_t)(/*_.VALDATA___V1510*/ meltfptr[1509]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:778:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1510*/ meltfptr[1509]); MELT_LOCATION("warmelt-base.melt:778:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1511*/ meltfptr[1510])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1511*/ meltfptr[1510])))); ((meltobject_ptr_t)(/*_.VALDATA___V1511*/ meltfptr[1510]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V414*/ meltfptr[413]); MELT_LOCATION("warmelt-base.melt:778:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1511*/ meltfptr[1510])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1511*/ meltfptr[1510])))); ((meltobject_ptr_t)(/*_.VALDATA___V1511*/ meltfptr[1510]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); MELT_LOCATION("warmelt-base.melt:778:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1511*/ meltfptr[1510]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1512*/ meltfptr[1511]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1512*/ meltfptr[1511])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1512*/ meltfptr[1511]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1510*/ meltfptr[1509]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1512*/ meltfptr[1511]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1512*/ meltfptr[1511])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1512*/ meltfptr[1511]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1511*/ meltfptr[1510]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1512*/ meltfptr[1511]); MELT_LOCATION("warmelt-base.melt:778:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1508*/ meltfptr[1507])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1508*/ meltfptr[1507])))); ((meltobject_ptr_t)(/*_.VALDATA___V1508*/ meltfptr[1507]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1512*/ meltfptr[1511]); MELT_LOCATION("warmelt-base.melt:778:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1508*/ meltfptr[1507])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1508*/ meltfptr[1507])))); ((meltobject_ptr_t)(/*_.VALDATA___V1508*/ meltfptr[1507]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1516*/ meltfptr[1515]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1516*/ meltfptr[1515])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1516*/ meltfptr[1515]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1513*/ meltfptr[1512]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1516*/ meltfptr[1515]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1516*/ meltfptr[1515])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1516*/ meltfptr[1515]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351]); #undef meltfram__ } /*end of warmelt_base_initialmeltchunk_10*/ void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_11 (struct frame_start_module_melt_st* meltframptr__, char predefinited[]) { #define meltfram__ (*meltframptr__) #undef meltcallcount #define meltcallcount 0L /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1516*/ meltfptr[1515]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1516*/ meltfptr[1515])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1516*/ meltfptr[1515]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1514*/ meltfptr[1513]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1516*/ meltfptr[1515]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1516*/ meltfptr[1515])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1516*/ meltfptr[1515]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V414*/ meltfptr[413]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1516*/ meltfptr[1515]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1516*/ meltfptr[1515])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1516*/ meltfptr[1515]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1515*/ meltfptr[1514]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1516*/ meltfptr[1515]); MELT_LOCATION("warmelt-base.melt:778:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1508*/ meltfptr[1507])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1508*/ meltfptr[1507])))); ((meltobject_ptr_t)(/*_.VALDATA___V1508*/ meltfptr[1507]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1516*/ meltfptr[1515]); MELT_LOCATION("warmelt-base.melt:778:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1508*/ meltfptr[1507]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1517*/ meltfptr[1516])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1517*/ meltfptr[1516])))); ((meltobject_ptr_t)(/*_.VALDATA___V1517*/ meltfptr[1516]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1518*/ meltfptr[1517]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1517*/ meltfptr[1516]); MELT_LOCATION("warmelt-base.melt:783:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1519*/ meltfptr[1518])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1519*/ meltfptr[1518])))); ((meltobject_ptr_t)(/*_.VALDATA___V1519*/ meltfptr[1518]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1520*/ meltfptr[1519]); MELT_LOCATION("warmelt-base.melt:783:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1521*/ meltfptr[1520])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1521*/ meltfptr[1520])))); ((meltobject_ptr_t)(/*_.VALDATA___V1521*/ meltfptr[1520]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1352*/ meltfptr[1351]); MELT_LOCATION("warmelt-base.melt:783:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1521*/ meltfptr[1520])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1521*/ meltfptr[1520])))); ((meltobject_ptr_t)(/*_.VALDATA___V1521*/ meltfptr[1520]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:783:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1521*/ meltfptr[1520]); MELT_LOCATION("warmelt-base.melt:783:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1522*/ meltfptr[1521])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1522*/ meltfptr[1521])))); ((meltobject_ptr_t)(/*_.VALDATA___V1522*/ meltfptr[1521]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1314*/ meltfptr[1313]); MELT_LOCATION("warmelt-base.melt:783:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1522*/ meltfptr[1521])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1522*/ meltfptr[1521])))); ((meltobject_ptr_t)(/*_.VALDATA___V1522*/ meltfptr[1521]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:783:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1522*/ meltfptr[1521]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1523*/ meltfptr[1522]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1523*/ meltfptr[1522])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1523*/ meltfptr[1522]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1521*/ meltfptr[1520]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1523*/ meltfptr[1522]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1523*/ meltfptr[1522])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1523*/ meltfptr[1522]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1522*/ meltfptr[1521]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1523*/ meltfptr[1522]); MELT_LOCATION("warmelt-base.melt:783:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1519*/ meltfptr[1518])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1519*/ meltfptr[1518])))); ((meltobject_ptr_t)(/*_.VALDATA___V1519*/ meltfptr[1518]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1523*/ meltfptr[1522]); MELT_LOCATION("warmelt-base.melt:783:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1519*/ meltfptr[1518])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1519*/ meltfptr[1518])))); ((meltobject_ptr_t)(/*_.VALDATA___V1519*/ meltfptr[1518]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1527*/ meltfptr[1526]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1527*/ meltfptr[1526])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1527*/ meltfptr[1526]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1524*/ meltfptr[1523]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1527*/ meltfptr[1526]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1527*/ meltfptr[1526])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1527*/ meltfptr[1526]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1527*/ meltfptr[1526]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1527*/ meltfptr[1526])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1527*/ meltfptr[1526]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1525*/ meltfptr[1524]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1527*/ meltfptr[1526]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1527*/ meltfptr[1526])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1527*/ meltfptr[1526]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1314*/ meltfptr[1313]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1527*/ meltfptr[1526]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1527*/ meltfptr[1526])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1527*/ meltfptr[1526]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1526*/ meltfptr[1525]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1527*/ meltfptr[1526]); MELT_LOCATION("warmelt-base.melt:783:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1519*/ meltfptr[1518])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1519*/ meltfptr[1518])))); ((meltobject_ptr_t)(/*_.VALDATA___V1519*/ meltfptr[1518]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1527*/ meltfptr[1526]); MELT_LOCATION("warmelt-base.melt:783:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1519*/ meltfptr[1518]); MELT_LOCATION("warmelt-base.melt:790:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527])))); ((meltobject_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1529*/ meltfptr[1528]); MELT_LOCATION("warmelt-base.melt:790:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1530*/ meltfptr[1529])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1530*/ meltfptr[1529])))); ((meltobject_ptr_t)(/*_.VALDATA___V1530*/ meltfptr[1529]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1253*/ meltfptr[1252]); MELT_LOCATION("warmelt-base.melt:790:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1530*/ meltfptr[1529])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1530*/ meltfptr[1529])))); ((meltobject_ptr_t)(/*_.VALDATA___V1530*/ meltfptr[1529]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:790:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1530*/ meltfptr[1529]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1531*/ meltfptr[1530]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1531*/ meltfptr[1530])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1531*/ meltfptr[1530]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1530*/ meltfptr[1529]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1531*/ meltfptr[1530]); MELT_LOCATION("warmelt-base.melt:790:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527])))); ((meltobject_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1531*/ meltfptr[1530]); MELT_LOCATION("warmelt-base.melt:790:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1532*/ meltfptr[1531])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1532*/ meltfptr[1531])))); ((meltobject_ptr_t)(/*_.VALDATA___V1532*/ meltfptr[1531]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V287*/ meltfptr[286]); MELT_LOCATION("warmelt-base.melt:790:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1532*/ meltfptr[1531])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1532*/ meltfptr[1531])))); ((meltobject_ptr_t)(/*_.VALDATA___V1532*/ meltfptr[1531]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:790:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1532*/ meltfptr[1531]); MELT_LOCATION("warmelt-base.melt:790:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527])))); ((meltobject_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527]))->obj_vartab[3] = (melt_ptr_t)( /*_.VALDATA___V1532*/ meltfptr[1531]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1533*/ meltfptr[1532]); MELT_LOCATION("warmelt-base.melt:790:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527])))); ((meltobject_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1533*/ meltfptr[1532]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1534*/ meltfptr[1533])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1534*/ meltfptr[1533])))); ((meltobject_ptr_t)(/*_.VALDATA___V1534*/ meltfptr[1533]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1535*/ meltfptr[1534]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1534*/ meltfptr[1533]); MELT_LOCATION("warmelt-base.melt:790:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (5>=0 && 5< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527])))); ((meltobject_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527]))->obj_vartab[5] = (melt_ptr_t)( /*_.VALDATA___V1534*/ meltfptr[1533]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1536*/ meltfptr[1535]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1534*/ meltfptr[1533]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1537*/ meltfptr[1536]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1538*/ meltfptr[1537]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V1253*/ meltfptr[1252]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V1539*/ meltfptr[1538]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (7>=0 && 7< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))->tabval[7] = (melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (8>=0 && 8< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))->tabval[8] = (melt_ptr_t)(/*_.VALSTR___V1540*/ meltfptr[1539]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (9>=0 && 9< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))->tabval[9] = (melt_ptr_t)(/*_.VALDATA___V1253*/ meltfptr[1252]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (10>=0 && 10< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1542*/ meltfptr[1541]))->tabval[10] = (melt_ptr_t)(/*_.VALSTR___V1541*/ meltfptr[1540]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1542*/ meltfptr[1541]); MELT_LOCATION("warmelt-base.melt:790:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (6>=0 && 6< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527])))); ((meltobject_ptr_t)(/*_.VALDATA___V1528*/ meltfptr[1527]))->obj_vartab[6] = (melt_ptr_t)( /*_.VALTUP___V1542*/ meltfptr[1541]); MELT_LOCATION("warmelt-base.melt:790:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1528*/ meltfptr[1527]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1543*/ meltfptr[1542])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1543*/ meltfptr[1542])))); ((meltobject_ptr_t)(/*_.VALDATA___V1543*/ meltfptr[1542]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1544*/ meltfptr[1543]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1543*/ meltfptr[1542]); MELT_LOCATION("warmelt-base.melt:803:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1545*/ meltfptr[1544])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1545*/ meltfptr[1544])))); ((meltobject_ptr_t)(/*_.VALDATA___V1545*/ meltfptr[1544]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1546*/ meltfptr[1545]); MELT_LOCATION("warmelt-base.melt:803:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1547*/ meltfptr[1546])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1547*/ meltfptr[1546])))); ((meltobject_ptr_t)(/*_.VALDATA___V1547*/ meltfptr[1546]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1253*/ meltfptr[1252]); MELT_LOCATION("warmelt-base.melt:803:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1547*/ meltfptr[1546])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1547*/ meltfptr[1546])))); ((meltobject_ptr_t)(/*_.VALDATA___V1547*/ meltfptr[1546]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:803:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1547*/ meltfptr[1546]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1548*/ meltfptr[1547]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1548*/ meltfptr[1547])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1548*/ meltfptr[1547]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1547*/ meltfptr[1546]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1548*/ meltfptr[1547]); MELT_LOCATION("warmelt-base.melt:803:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1545*/ meltfptr[1544])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1545*/ meltfptr[1544])))); ((meltobject_ptr_t)(/*_.VALDATA___V1545*/ meltfptr[1544]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1548*/ meltfptr[1547]); MELT_LOCATION("warmelt-base.melt:803:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1545*/ meltfptr[1544])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1545*/ meltfptr[1544])))); ((meltobject_ptr_t)(/*_.VALDATA___V1545*/ meltfptr[1544]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1552*/ meltfptr[1551]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1552*/ meltfptr[1551])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1552*/ meltfptr[1551]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1549*/ meltfptr[1548]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1552*/ meltfptr[1551]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1552*/ meltfptr[1551])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1552*/ meltfptr[1551]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1253*/ meltfptr[1252]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1552*/ meltfptr[1551]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1552*/ meltfptr[1551])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1552*/ meltfptr[1551]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1550*/ meltfptr[1549]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1552*/ meltfptr[1551]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1552*/ meltfptr[1551])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1552*/ meltfptr[1551]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1253*/ meltfptr[1252]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1552*/ meltfptr[1551]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1552*/ meltfptr[1551])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1552*/ meltfptr[1551]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1551*/ meltfptr[1550]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1552*/ meltfptr[1551]); MELT_LOCATION("warmelt-base.melt:803:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1545*/ meltfptr[1544])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1545*/ meltfptr[1544])))); ((meltobject_ptr_t)(/*_.VALDATA___V1545*/ meltfptr[1544]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1552*/ meltfptr[1551]); MELT_LOCATION("warmelt-base.melt:803:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1545*/ meltfptr[1544]); /*putclosurout*/ melt_assertmsg("putclosrout checkclo", melt_magic_discr((melt_ptr_t)(/*_.VALCLO___V1554*/ meltfptr[1553])) == OBMAG_CLOSURE); melt_assertmsg("putclosrout checkrout", melt_magic_discr((melt_ptr_t)(/*_.VALROUT___V1553*/ meltfptr[1552])) == OBMAG_ROUTINE); ((meltclosure_ptr_t)/*_.VALCLO___V1554*/ meltfptr[1553])->rout = (meltroutine_ptr_t) (/*_.VALROUT___V1553*/ meltfptr[1552]); /*touch:DATACLOSURE_*/ meltgc_touch(/*_.VALCLO___V1554*/ meltfptr[1553]); /*putclosurout*/ melt_assertmsg("putclosrout checkclo", melt_magic_discr((melt_ptr_t)(/*_.VALCLO___V1556*/ meltfptr[1555])) == OBMAG_CLOSURE); melt_assertmsg("putclosrout checkrout", melt_magic_discr((melt_ptr_t)(/*_.VALROUT___V1555*/ meltfptr[1554])) == OBMAG_ROUTINE); ((meltclosure_ptr_t)/*_.VALCLO___V1556*/ meltfptr[1555])->rout = (meltroutine_ptr_t) (/*_.VALROUT___V1555*/ meltfptr[1554]); /*touch:DATACLOSURE_*/ meltgc_touch(/*_.VALCLO___V1556*/ meltfptr[1555]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1557*/ meltfptr[1556])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1557*/ meltfptr[1556])))); ((meltobject_ptr_t)(/*_.VALDATA___V1557*/ meltfptr[1556]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1558*/ meltfptr[1557]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1557*/ meltfptr[1556]); MELT_LOCATION("warmelt-base.melt:847:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1559*/ meltfptr[1558])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1559*/ meltfptr[1558])))); ((meltobject_ptr_t)(/*_.VALDATA___V1559*/ meltfptr[1558]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1560*/ meltfptr[1559]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1562*/ meltfptr[1561])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1562*/ meltfptr[1561])))); ((meltobject_ptr_t)(/*_.VALDATA___V1562*/ meltfptr[1561]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1563*/ meltfptr[1562]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1562*/ meltfptr[1561]); MELT_LOCATION("warmelt-base.melt:847:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1561*/ meltfptr[1560])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1561*/ meltfptr[1560])))); ((meltobject_ptr_t)(/*_.VALDATA___V1561*/ meltfptr[1560]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1562*/ meltfptr[1561]); MELT_LOCATION("warmelt-base.melt:847:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1561*/ meltfptr[1560])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1561*/ meltfptr[1560])))); ((meltobject_ptr_t)(/*_.VALDATA___V1561*/ meltfptr[1560]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:847:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1561*/ meltfptr[1560]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1564*/ meltfptr[1563]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1564*/ meltfptr[1563])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1564*/ meltfptr[1563]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1561*/ meltfptr[1560]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1564*/ meltfptr[1563]); MELT_LOCATION("warmelt-base.melt:847:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1559*/ meltfptr[1558])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1559*/ meltfptr[1558])))); ((meltobject_ptr_t)(/*_.VALDATA___V1559*/ meltfptr[1558]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1564*/ meltfptr[1563]); MELT_LOCATION("warmelt-base.melt:847:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1559*/ meltfptr[1558])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1559*/ meltfptr[1558])))); ((meltobject_ptr_t)(/*_.VALDATA___V1559*/ meltfptr[1558]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1567*/ meltfptr[1566]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1567*/ meltfptr[1566])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1567*/ meltfptr[1566]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1565*/ meltfptr[1564]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1567*/ meltfptr[1566]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1567*/ meltfptr[1566])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1567*/ meltfptr[1566]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1562*/ meltfptr[1561]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1567*/ meltfptr[1566]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1567*/ meltfptr[1566])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1567*/ meltfptr[1566]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1566*/ meltfptr[1565]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1567*/ meltfptr[1566]); MELT_LOCATION("warmelt-base.melt:847:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1559*/ meltfptr[1558])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1559*/ meltfptr[1558])))); ((meltobject_ptr_t)(/*_.VALDATA___V1559*/ meltfptr[1558]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1567*/ meltfptr[1566]); MELT_LOCATION("warmelt-base.melt:847:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1559*/ meltfptr[1558]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1568*/ meltfptr[1567])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1568*/ meltfptr[1567])))); ((meltobject_ptr_t)(/*_.VALDATA___V1568*/ meltfptr[1567]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1569*/ meltfptr[1568]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1568*/ meltfptr[1567]); MELT_LOCATION("warmelt-base.melt:852:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1570*/ meltfptr[1569])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1570*/ meltfptr[1569])))); ((meltobject_ptr_t)(/*_.VALDATA___V1570*/ meltfptr[1569]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1571*/ meltfptr[1570]); MELT_LOCATION("warmelt-base.melt:852:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1572*/ meltfptr[1571])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1572*/ meltfptr[1571])))); ((meltobject_ptr_t)(/*_.VALDATA___V1572*/ meltfptr[1571]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1562*/ meltfptr[1561]); MELT_LOCATION("warmelt-base.melt:852:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1572*/ meltfptr[1571])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1572*/ meltfptr[1571])))); ((meltobject_ptr_t)(/*_.VALDATA___V1572*/ meltfptr[1571]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:852:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1572*/ meltfptr[1571]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1573*/ meltfptr[1572]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1573*/ meltfptr[1572])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1573*/ meltfptr[1572]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1572*/ meltfptr[1571]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1573*/ meltfptr[1572]); MELT_LOCATION("warmelt-base.melt:852:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1570*/ meltfptr[1569])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1570*/ meltfptr[1569])))); ((meltobject_ptr_t)(/*_.VALDATA___V1570*/ meltfptr[1569]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1573*/ meltfptr[1572]); MELT_LOCATION("warmelt-base.melt:852:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1570*/ meltfptr[1569])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1570*/ meltfptr[1569])))); ((meltobject_ptr_t)(/*_.VALDATA___V1570*/ meltfptr[1569]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_LONG)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1576*/ meltfptr[1575]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1576*/ meltfptr[1575])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1576*/ meltfptr[1575]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1574*/ meltfptr[1573]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1576*/ meltfptr[1575]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1576*/ meltfptr[1575])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1576*/ meltfptr[1575]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1562*/ meltfptr[1561]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1576*/ meltfptr[1575]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1576*/ meltfptr[1575])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1576*/ meltfptr[1575]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1575*/ meltfptr[1574]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1576*/ meltfptr[1575]); MELT_LOCATION("warmelt-base.melt:852:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1570*/ meltfptr[1569])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1570*/ meltfptr[1569])))); ((meltobject_ptr_t)(/*_.VALDATA___V1570*/ meltfptr[1569]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1576*/ meltfptr[1575]); MELT_LOCATION("warmelt-base.melt:852:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1570*/ meltfptr[1569]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1577*/ meltfptr[1576])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1577*/ meltfptr[1576])))); ((meltobject_ptr_t)(/*_.VALDATA___V1577*/ meltfptr[1576]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1578*/ meltfptr[1577]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1577*/ meltfptr[1576]); MELT_LOCATION("warmelt-base.melt:858:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1579*/ meltfptr[1578])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1579*/ meltfptr[1578])))); ((meltobject_ptr_t)(/*_.VALDATA___V1579*/ meltfptr[1578]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1580*/ meltfptr[1579]); MELT_LOCATION("warmelt-base.melt:858:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1581*/ meltfptr[1580])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1581*/ meltfptr[1580])))); ((meltobject_ptr_t)(/*_.VALDATA___V1581*/ meltfptr[1580]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1562*/ meltfptr[1561]); MELT_LOCATION("warmelt-base.melt:858:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1581*/ meltfptr[1580])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1581*/ meltfptr[1580])))); ((meltobject_ptr_t)(/*_.VALDATA___V1581*/ meltfptr[1580]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:858:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1581*/ meltfptr[1580]); MELT_LOCATION("warmelt-base.melt:858:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1582*/ meltfptr[1581])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1582*/ meltfptr[1581])))); ((meltobject_ptr_t)(/*_.VALDATA___V1582*/ meltfptr[1581]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1253*/ meltfptr[1252]); MELT_LOCATION("warmelt-base.melt:858:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1582*/ meltfptr[1581])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1582*/ meltfptr[1581])))); ((meltobject_ptr_t)(/*_.VALDATA___V1582*/ meltfptr[1581]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:858:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1582*/ meltfptr[1581]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1583*/ meltfptr[1582]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1583*/ meltfptr[1582])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1583*/ meltfptr[1582]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1581*/ meltfptr[1580]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1583*/ meltfptr[1582]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1583*/ meltfptr[1582])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1583*/ meltfptr[1582]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1582*/ meltfptr[1581]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1583*/ meltfptr[1582]); MELT_LOCATION("warmelt-base.melt:858:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1579*/ meltfptr[1578])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1579*/ meltfptr[1578])))); ((meltobject_ptr_t)(/*_.VALDATA___V1579*/ meltfptr[1578]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1583*/ meltfptr[1582]); MELT_LOCATION("warmelt-base.melt:858:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1579*/ meltfptr[1578])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1579*/ meltfptr[1578])))); ((meltobject_ptr_t)(/*_.VALDATA___V1579*/ meltfptr[1578]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1587*/ meltfptr[1586]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1587*/ meltfptr[1586])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1587*/ meltfptr[1586]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1584*/ meltfptr[1583]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1587*/ meltfptr[1586]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1587*/ meltfptr[1586])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1587*/ meltfptr[1586]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1562*/ meltfptr[1561]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1587*/ meltfptr[1586]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1587*/ meltfptr[1586])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1587*/ meltfptr[1586]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1585*/ meltfptr[1584]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1587*/ meltfptr[1586]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1587*/ meltfptr[1586])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1587*/ meltfptr[1586]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1253*/ meltfptr[1252]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1587*/ meltfptr[1586]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1587*/ meltfptr[1586])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1587*/ meltfptr[1586]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1586*/ meltfptr[1585]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1587*/ meltfptr[1586]); MELT_LOCATION("warmelt-base.melt:858:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1579*/ meltfptr[1578])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1579*/ meltfptr[1578])))); ((meltobject_ptr_t)(/*_.VALDATA___V1579*/ meltfptr[1578]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1587*/ meltfptr[1586]); MELT_LOCATION("warmelt-base.melt:858:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1579*/ meltfptr[1578]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1588*/ meltfptr[1587])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1588*/ meltfptr[1587])))); ((meltobject_ptr_t)(/*_.VALDATA___V1588*/ meltfptr[1587]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1589*/ meltfptr[1588]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1588*/ meltfptr[1587]); MELT_LOCATION("warmelt-base.melt:863:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1590*/ meltfptr[1589])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1590*/ meltfptr[1589])))); ((meltobject_ptr_t)(/*_.VALDATA___V1590*/ meltfptr[1589]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1591*/ meltfptr[1590]); MELT_LOCATION("warmelt-base.melt:863:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1592*/ meltfptr[1591])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1592*/ meltfptr[1591])))); ((meltobject_ptr_t)(/*_.VALDATA___V1592*/ meltfptr[1591]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1562*/ meltfptr[1561]); MELT_LOCATION("warmelt-base.melt:863:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1592*/ meltfptr[1591])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1592*/ meltfptr[1591])))); ((meltobject_ptr_t)(/*_.VALDATA___V1592*/ meltfptr[1591]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:863:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1592*/ meltfptr[1591]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1594*/ meltfptr[1593])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1594*/ meltfptr[1593])))); ((meltobject_ptr_t)(/*_.VALDATA___V1594*/ meltfptr[1593]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1595*/ meltfptr[1594]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1594*/ meltfptr[1593]); MELT_LOCATION("warmelt-base.melt:863:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1593*/ meltfptr[1592])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1593*/ meltfptr[1592])))); ((meltobject_ptr_t)(/*_.VALDATA___V1593*/ meltfptr[1592]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1594*/ meltfptr[1593]); MELT_LOCATION("warmelt-base.melt:863:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1593*/ meltfptr[1592])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1593*/ meltfptr[1592])))); ((meltobject_ptr_t)(/*_.VALDATA___V1593*/ meltfptr[1592]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:863:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1593*/ meltfptr[1592]); MELT_LOCATION("warmelt-base.melt:863:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1596*/ meltfptr[1595])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1596*/ meltfptr[1595])))); ((meltobject_ptr_t)(/*_.VALDATA___V1596*/ meltfptr[1595]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V411*/ meltfptr[410]); MELT_LOCATION("warmelt-base.melt:863:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1596*/ meltfptr[1595])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1596*/ meltfptr[1595])))); ((meltobject_ptr_t)(/*_.VALDATA___V1596*/ meltfptr[1595]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:863:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1596*/ meltfptr[1595]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1597*/ meltfptr[1596]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1597*/ meltfptr[1596])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1597*/ meltfptr[1596]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1592*/ meltfptr[1591]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1597*/ meltfptr[1596]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1597*/ meltfptr[1596])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1597*/ meltfptr[1596]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1593*/ meltfptr[1592]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1597*/ meltfptr[1596]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1597*/ meltfptr[1596])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1597*/ meltfptr[1596]))->tabval[2] = (melt_ptr_t)(/*_.VALDATA___V1596*/ meltfptr[1595]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1597*/ meltfptr[1596]); MELT_LOCATION("warmelt-base.melt:863:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1590*/ meltfptr[1589])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1590*/ meltfptr[1589])))); ((meltobject_ptr_t)(/*_.VALDATA___V1590*/ meltfptr[1589]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1597*/ meltfptr[1596]); MELT_LOCATION("warmelt-base.melt:863:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1590*/ meltfptr[1589])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1590*/ meltfptr[1589])))); ((meltobject_ptr_t)(/*_.VALDATA___V1590*/ meltfptr[1589]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1598*/ meltfptr[1597]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1562*/ meltfptr[1561]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1599*/ meltfptr[1598]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1594*/ meltfptr[1593]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1600*/ meltfptr[1599]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (5>=0 && 5< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601]))->tabval[5] = (melt_ptr_t)(/*_.VALDATA___V411*/ meltfptr[410]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (6>=0 && 6< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1602*/ meltfptr[1601]))->tabval[6] = (melt_ptr_t)(/*_.VALSTR___V1601*/ meltfptr[1600]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1602*/ meltfptr[1601]); MELT_LOCATION("warmelt-base.melt:863:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1590*/ meltfptr[1589])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1590*/ meltfptr[1589])))); ((meltobject_ptr_t)(/*_.VALDATA___V1590*/ meltfptr[1589]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1602*/ meltfptr[1601]); MELT_LOCATION("warmelt-base.melt:863:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1590*/ meltfptr[1589]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1603*/ meltfptr[1602])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1603*/ meltfptr[1602])))); ((meltobject_ptr_t)(/*_.VALDATA___V1603*/ meltfptr[1602]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1604*/ meltfptr[1603]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1603*/ meltfptr[1602]); MELT_LOCATION("warmelt-base.melt:868:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1605*/ meltfptr[1604])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1605*/ meltfptr[1604])))); ((meltobject_ptr_t)(/*_.VALDATA___V1605*/ meltfptr[1604]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1606*/ meltfptr[1605]); MELT_LOCATION("warmelt-base.melt:868:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1607*/ meltfptr[1606])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1607*/ meltfptr[1606])))); ((meltobject_ptr_t)(/*_.VALDATA___V1607*/ meltfptr[1606]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1562*/ meltfptr[1561]); MELT_LOCATION("warmelt-base.melt:868:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1607*/ meltfptr[1606])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1607*/ meltfptr[1606])))); ((meltobject_ptr_t)(/*_.VALDATA___V1607*/ meltfptr[1606]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VALUE)))); MELT_LOCATION("warmelt-base.melt:868:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1607*/ meltfptr[1606]); MELT_LOCATION("warmelt-base.melt:868:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1608*/ meltfptr[1607])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (0>=0 && 0< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1608*/ meltfptr[1607])))); ((meltobject_ptr_t)(/*_.VALDATA___V1608*/ meltfptr[1607]))->obj_vartab[0] = (melt_ptr_t)( /*_.VALDATA___V1594*/ meltfptr[1593]); MELT_LOCATION("warmelt-base.melt:868:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1608*/ meltfptr[1607])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1608*/ meltfptr[1607])))); ((meltobject_ptr_t)(/*_.VALDATA___V1608*/ meltfptr[1607]))->obj_vartab[1] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_CSTRING)))); MELT_LOCATION("warmelt-base.melt:868:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1608*/ meltfptr[1607]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1609*/ meltfptr[1608]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1609*/ meltfptr[1608])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1609*/ meltfptr[1608]))->tabval[0] = (melt_ptr_t)(/*_.VALDATA___V1607*/ meltfptr[1606]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1609*/ meltfptr[1608]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1609*/ meltfptr[1608])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1609*/ meltfptr[1608]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1608*/ meltfptr[1607]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1609*/ meltfptr[1608]); MELT_LOCATION("warmelt-base.melt:868:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1605*/ meltfptr[1604])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (2>=0 && 2< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1605*/ meltfptr[1604])))); ((meltobject_ptr_t)(/*_.VALDATA___V1605*/ meltfptr[1604]))->obj_vartab[2] = (melt_ptr_t)( /*_.VALTUP___V1609*/ meltfptr[1608]); MELT_LOCATION("warmelt-base.melt:868:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1605*/ meltfptr[1604])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (3>=0 && 3< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1605*/ meltfptr[1604])))); ((meltobject_ptr_t)(/*_.VALDATA___V1605*/ meltfptr[1604]))->obj_vartab[3] = (melt_ptr_t)( ((void*)(MELT_PREDEF(CTYPE_VOID)))); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1613*/ meltfptr[1612]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (0>=0 && 0< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1613*/ meltfptr[1612])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1613*/ meltfptr[1612]))->tabval[0] = (melt_ptr_t)(/*_.VALSTR___V1610*/ meltfptr[1609]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1613*/ meltfptr[1612]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (1>=0 && 1< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1613*/ meltfptr[1612])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1613*/ meltfptr[1612]))->tabval[1] = (melt_ptr_t)(/*_.VALDATA___V1562*/ meltfptr[1561]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1613*/ meltfptr[1612]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (2>=0 && 2< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1613*/ meltfptr[1612])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1613*/ meltfptr[1612]))->tabval[2] = (melt_ptr_t)(/*_.VALSTR___V1611*/ meltfptr[1610]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1613*/ meltfptr[1612]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (3>=0 && 3< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1613*/ meltfptr[1612])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1613*/ meltfptr[1612]))->tabval[3] = (melt_ptr_t)(/*_.VALDATA___V1594*/ meltfptr[1593]); /*putupl*/ melt_assertmsg("putupl checktup", melt_magic_discr((melt_ptr_t)(/*_.VALTUP___V1613*/ meltfptr[1612]))== OBMAG_MULTIPLE); melt_assertmsg("putupl checkoff", (4>=0 && 4< melt_multiple_length((melt_ptr_t)(/*_.VALTUP___V1613*/ meltfptr[1612])))); ((meltmultiple_ptr_t)(/*_.VALTUP___V1613*/ meltfptr[1612]))->tabval[4] = (melt_ptr_t)(/*_.VALSTR___V1612*/ meltfptr[1611]); /*touch:INITUP_*/ meltgc_touch(/*_.VALTUP___V1613*/ meltfptr[1612]); MELT_LOCATION("warmelt-base.melt:868:/ initchunk"); /*^putslot*/ /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1605*/ meltfptr[1604])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (4>=0 && 4< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1605*/ meltfptr[1604])))); ((meltobject_ptr_t)(/*_.VALDATA___V1605*/ meltfptr[1604]))->obj_vartab[4] = (melt_ptr_t)( /*_.VALTUP___V1613*/ meltfptr[1612]); MELT_LOCATION("warmelt-base.melt:868:/ initchunk"); /*^touch*/ /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1605*/ meltfptr[1604]); /*putclosurout*/ melt_assertmsg("putclosrout checkclo", melt_magic_discr((melt_ptr_t)(/*_.VALCLO___V1615*/ meltfptr[1614])) == OBMAG_CLOSURE); melt_assertmsg("putclosrout checkrout", melt_magic_discr((melt_ptr_t)(/*_.VALROUT___V1614*/ meltfptr[1613])) == OBMAG_ROUTINE); ((meltclosure_ptr_t)/*_.VALCLO___V1615*/ meltfptr[1614])->rout = (meltroutine_ptr_t) (/*_.VALROUT___V1614*/ meltfptr[1613]); /*touch:DATACLOSURE_*/ meltgc_touch(/*_.VALCLO___V1615*/ meltfptr[1614]); /*putclosurout*/ melt_assertmsg("putclosrout checkclo", melt_magic_discr((melt_ptr_t)(/*_.VALCLO___V1617*/ meltfptr[1616])) == OBMAG_CLOSURE); melt_assertmsg("putclosrout checkrout", melt_magic_discr((melt_ptr_t)(/*_.VALROUT___V1616*/ meltfptr[1615])) == OBMAG_ROUTINE); ((meltclosure_ptr_t)/*_.VALCLO___V1617*/ meltfptr[1616])->rout = (meltroutine_ptr_t) (/*_.VALROUT___V1616*/ meltfptr[1615]); /*touch:DATACLOSURE_*/ meltgc_touch(/*_.VALCLO___V1617*/ meltfptr[1616]); /*putclosurout*/ melt_assertmsg("putclosrout checkclo", melt_magic_discr((melt_ptr_t)(/*_.VALCLO___V1619*/ meltfptr[1618])) == OBMAG_CLOSURE); melt_assertmsg("putclosrout checkrout", melt_magic_discr((melt_ptr_t)(/*_.VALROUT___V1618*/ meltfptr[1617])) == OBMAG_ROUTINE); ((meltclosure_ptr_t)/*_.VALCLO___V1619*/ meltfptr[1618])->rout = (meltroutine_ptr_t) (/*_.VALROUT___V1618*/ meltfptr[1617]); /*touch:DATACLOSURE_*/ meltgc_touch(/*_.VALCLO___V1619*/ meltfptr[1618]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1620*/ meltfptr[1619])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1620*/ meltfptr[1619])))); ((meltobject_ptr_t)(/*_.VALDATA___V1620*/ meltfptr[1619]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1621*/ meltfptr[1620]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1620*/ meltfptr[1619]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1622*/ meltfptr[1621])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1622*/ meltfptr[1621])))); ((meltobject_ptr_t)(/*_.VALDATA___V1622*/ meltfptr[1621]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1623*/ meltfptr[1622]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1622*/ meltfptr[1621]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1624*/ meltfptr[1623])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1624*/ meltfptr[1623])))); ((meltobject_ptr_t)(/*_.VALDATA___V1624*/ meltfptr[1623]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1625*/ meltfptr[1624]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1624*/ meltfptr[1623]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1626*/ meltfptr[1625])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1626*/ meltfptr[1625])))); ((meltobject_ptr_t)(/*_.VALDATA___V1626*/ meltfptr[1625]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1627*/ meltfptr[1626]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1626*/ meltfptr[1625]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1628*/ meltfptr[1627])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1628*/ meltfptr[1627])))); ((meltobject_ptr_t)(/*_.VALDATA___V1628*/ meltfptr[1627]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1629*/ meltfptr[1628]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1628*/ meltfptr[1627]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1630*/ meltfptr[1629])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1630*/ meltfptr[1629])))); ((meltobject_ptr_t)(/*_.VALDATA___V1630*/ meltfptr[1629]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1631*/ meltfptr[1630]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1630*/ meltfptr[1629]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1632*/ meltfptr[1631])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1632*/ meltfptr[1631])))); ((meltobject_ptr_t)(/*_.VALDATA___V1632*/ meltfptr[1631]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1633*/ meltfptr[1632]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1632*/ meltfptr[1631]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1634*/ meltfptr[1633])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1634*/ meltfptr[1633])))); ((meltobject_ptr_t)(/*_.VALDATA___V1634*/ meltfptr[1633]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1635*/ meltfptr[1634]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1634*/ meltfptr[1633]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1636*/ meltfptr[1635])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1636*/ meltfptr[1635])))); ((meltobject_ptr_t)(/*_.VALDATA___V1636*/ meltfptr[1635]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1637*/ meltfptr[1636]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1636*/ meltfptr[1635]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1638*/ meltfptr[1637])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1638*/ meltfptr[1637])))); ((meltobject_ptr_t)(/*_.VALDATA___V1638*/ meltfptr[1637]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1639*/ meltfptr[1638]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1638*/ meltfptr[1637]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1640*/ meltfptr[1639])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1640*/ meltfptr[1639])))); ((meltobject_ptr_t)(/*_.VALDATA___V1640*/ meltfptr[1639]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1641*/ meltfptr[1640]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1640*/ meltfptr[1639]); /*putslot*/ melt_assertmsg("putslot checkobj", melt_magic_discr((melt_ptr_t)(/*_.VALDATA___V1642*/ meltfptr[1641])) == OBMAG_OBJECT); melt_assertmsg("putslot checkoff", (1>=0 && 1< melt_object_length((melt_ptr_t)(/*_.VALDATA___V1642*/ meltfptr[1641])))); ((meltobject_ptr_t)(/*_.VALDATA___V1642*/ meltfptr[1641]))->obj_vartab[1] = (melt_ptr_t)( /*_.VALSTR___V1643*/ meltfptr[1642]); /*touch:VALUEDATA_*/ meltgc_touch(/*_.VALDATA___V1642*/ meltfptr[1641]); /**COMMENT: before toplevel body **/; MELT_LOCATION("warmelt-base.melt:4:/ initchunk"); /*^block*/ /*anyblock*/{ /*^cond*/ /*cond*/ if ( /*quasi.cur.mod.env.cont cur.mod.env.cont : at very start*/ /*_.CONTENV___V2*/ meltfptr[1]) /*then*/ { /*^cond.then*/ /*_.OR___V1644*/ meltfptr[1643] = /*quasi.cur.mod.env.cont cur.mod.env.cont : at very start*/ /*_.CONTENV___V2*/ meltfptr[1];; } else {MELT_LOCATION("warmelt-base.melt:4:/ cond.else"); /*^block*/ /*anyblock*/{ /*^getslot*/ { melt_ptr_t slot=0; melt_object_get_field(slot,(melt_ptr_t)(((void*)(MELT_PREDEF(INITIAL_SYSTEM_DATA)))), 3, "SYSDATA_CONT_FRESH_ENV");/*_.SYSDATA_CONT_FRESH_ENV__V1645*/ meltfptr[1644] = slot; }; ; /*^apply*/ /*apply*/{ union meltparam_un argtab[1]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_cstring = "warmelt-base"; /*_.FUN___V1646*/ meltfptr[1645] = melt_apply ((meltclosure_ptr_t)(/*_.SYSDATA_CONT_FRESH_ENV__V1645*/ meltfptr[1644]), (melt_ptr_t)(/*_.PREVENV___V4*/ meltfptr[3]), (BPARSTR_CSTRING ""), argtab, "", (union meltparam_un*)0); } ; /*_.OR___V1644*/ meltfptr[1643] = /*_.FUN___V1646*/ meltfptr[1645];; /*epilog*/ MELT_LOCATION("warmelt-base.melt:4:/ clear"); /*clear*/ /*_.SYSDATA_CONT_FRESH_ENV__V1645*/ meltfptr[1644] = 0 ; /*^clear*/ /*clear*/ /*_.FUN___V1646*/ meltfptr[1645] = 0 ;} ; } ; /*^block*/ /*com.block:upd.cur.mod.env.cont : at very start*/{ }/*com.end block:upd.cur.mod.env.cont : at very start*/ ; /*epilog*/ /*^clear*/ /*clear*/ /*_.OR___V1644*/ meltfptr[1643] = 0 ;} MELT_LOCATION("warmelt-base.melt:914:/ initchunk"); /*^block*/ /*anyblock*/{ /*^getslot*/ { melt_ptr_t slot=0; melt_object_get_field(slot,(melt_ptr_t)(((void*)(MELT_PREDEF(INITIAL_SYSTEM_DATA)))), 4, "SYSDATA_VALUE_EXPORTER");/*_.VALUEXPORTER___V1647*/ meltfptr[1644] = slot; }; ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V10*/ meltfptr[9]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : IGNORE*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V8*/ meltfptr[7]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V21*/ meltfptr[20]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : VOID*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V19*/ meltfptr[18]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V28*/ meltfptr[27]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : IS_NOT_OBJECT*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V26*/ meltfptr[25]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V39*/ meltfptr[38]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : GET_GLOBPREDEF*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V37*/ meltfptr[36]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V50*/ meltfptr[49]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : OBJ_HASH*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V48*/ meltfptr[47]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V59*/ meltfptr[58]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : OBJ_LEN*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V57*/ meltfptr[56]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V68*/ meltfptr[67]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : OBJ_NUM*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V66*/ meltfptr[65]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V77*/ meltfptr[76]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : NONZERO_HASH*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V75*/ meltfptr[74]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V84*/ meltfptr[83]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MINOR_GARBCOLL*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V82*/ meltfptr[81]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V95*/ meltfptr[94]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : FULL_GARBCOLL*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V93*/ meltfptr[92]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V104*/ meltfptr[103]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : CHECKCALLSTACK_MSG*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V102*/ meltfptr[101]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V115*/ meltfptr[114]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : CBREAK_MSG*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V113*/ meltfptr[112]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V124*/ meltfptr[123]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : <=I*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V122*/ meltfptr[121]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V139*/ meltfptr[138]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ==I*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V137*/ meltfptr[136]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V150*/ meltfptr[149]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : !=I*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V148*/ meltfptr[147]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V161*/ meltfptr[160]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : -I*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V159*/ meltfptr[158]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V172*/ meltfptr[171]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : *I*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V170*/ meltfptr[169]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V183*/ meltfptr[182]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ANDI*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V181*/ meltfptr[180]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V194*/ meltfptr[193]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ORI*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V192*/ meltfptr[191]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V205*/ meltfptr[204]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : XORI*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V203*/ meltfptr[202]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V216*/ meltfptr[215]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : NEGI*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V214*/ meltfptr[213]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V227*/ meltfptr[226]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : NOTI*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V225*/ meltfptr[224]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V236*/ meltfptr[235]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : NOTNULL*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V234*/ meltfptr[233]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V245*/ meltfptr[244]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ZEROP*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V243*/ meltfptr[242]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V254*/ meltfptr[253]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : OUTCSTRING_DBG*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V252*/ meltfptr[251]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V265*/ meltfptr[264]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : OUTNUM_DBG*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V263*/ meltfptr[262]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V284*/ meltfptr[283]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : OUTSTR_DBG*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V282*/ meltfptr[281]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V295*/ meltfptr[294]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : OUTSTRBUF_DBG*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V293*/ meltfptr[292]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V306*/ meltfptr[305]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : OUTNEWLINE_DBG*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V304*/ meltfptr[303]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V313*/ meltfptr[312]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : OUTNUM_ERR*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V311*/ meltfptr[310]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V326*/ meltfptr[325]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : OUTCSTRING_ERR*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V324*/ meltfptr[323]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V335*/ meltfptr[334]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : OUTSTRBUF_ERR*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V333*/ meltfptr[332]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V344*/ meltfptr[343]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : PAIR_SET_HEAD*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V342*/ meltfptr[341]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V359*/ meltfptr[358]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : PAIR_LISTLENGTH*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V357*/ meltfptr[356]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V368*/ meltfptr[367]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MAKE_PAIR*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V366*/ meltfptr[365]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V385*/ meltfptr[384]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : IS_MIXINT*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V383*/ meltfptr[382]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V396*/ meltfptr[395]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MIXINT_VAL*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V394*/ meltfptr[393]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V405*/ meltfptr[404]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MAKE_MIXINT*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V403*/ meltfptr[402]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V424*/ meltfptr[423]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : IS_MIXLOC*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V422*/ meltfptr[421]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V433*/ meltfptr[432]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MIXLOC_VAL*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V431*/ meltfptr[430]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V442*/ meltfptr[441]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MIXLOC_LOCATION*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V440*/ meltfptr[439]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V451*/ meltfptr[450]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MIXLOC_LOCLINE*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V449*/ meltfptr[448]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V460*/ meltfptr[459]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MIXLOC_LOCFILE*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V458*/ meltfptr[457]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V469*/ meltfptr[468]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MAKE_MIXLOC*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V467*/ meltfptr[466]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V486*/ meltfptr[485]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : IS_MIXBIGINT*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V484*/ meltfptr[483]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V497*/ meltfptr[496]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MIXBIGINT_VAL*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V495*/ meltfptr[494]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V506*/ meltfptr[505]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : PPSTRBUF_MIXBIGINT*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V504*/ meltfptr[503]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V521*/ meltfptr[520]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : READ_FILE*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V519*/ meltfptr[518]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V532*/ meltfptr[531]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ERROR_STRV*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V530*/ meltfptr[529]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V549*/ meltfptr[548]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ERROR_PLAIN*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V547*/ meltfptr[546]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V560*/ meltfptr[559]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : WARNING_STRV*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V558*/ meltfptr[557]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V573*/ meltfptr[572]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : WARNING_PLAIN*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V571*/ meltfptr[570]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V584*/ meltfptr[583]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : WARNINGMSG_PLAIN*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V582*/ meltfptr[581]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V593*/ meltfptr[592]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ERRORMSG_PLAIN*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V591*/ meltfptr[590]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V602*/ meltfptr[601]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ERRORMSG_STRV*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V600*/ meltfptr[599]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V613*/ meltfptr[612]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : INFORM_STRV*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V611*/ meltfptr[610]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V626*/ meltfptr[625]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : INFORM_PLAIN*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V624*/ meltfptr[623]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V637*/ meltfptr[636]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : INFORMSG_PLAIN*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V635*/ meltfptr[634]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V644*/ meltfptr[643]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : FOREACH_LONG_UPTO*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1620*/ meltfptr[1619]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V674*/ meltfptr[673]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : SOME_INTEGER_MULTIPLE*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1622*/ meltfptr[1621]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V699*/ meltfptr[698]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : SOME_INTEGER_GREATER_THAN*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1624*/ meltfptr[1623]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V714*/ meltfptr[713]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : OUTNEWLINE_ERR*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V712*/ meltfptr[711]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V721*/ meltfptr[720]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : OUTSTR_ERR*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V719*/ meltfptr[718]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V730*/ meltfptr[729]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MESSAGE_DBG*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V728*/ meltfptr[727]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V739*/ meltfptr[738]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MESSAGENUM_DBG*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V737*/ meltfptr[736]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V750*/ meltfptr[749]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MESSAGEVAL_DBG*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V748*/ meltfptr[747]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V761*/ meltfptr[760]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : LONGBACKTRACE_DBG*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V759*/ meltfptr[758]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V773*/ meltfptr[772]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : CHECKVAL_DBG*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V771*/ meltfptr[770]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V784*/ meltfptr[783]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : DEBUGCSTRING*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V782*/ meltfptr[781]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V795*/ meltfptr[794]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MAKE_STRBUF*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V793*/ meltfptr[792]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V804*/ meltfptr[803]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : STRBUF_USEDLENGTH*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V802*/ meltfptr[801]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V813*/ meltfptr[812]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : IS_STRBUF*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V811*/ meltfptr[810]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V822*/ meltfptr[821]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MAKE_STRING*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V820*/ meltfptr[819]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V833*/ meltfptr[832]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : IS_STRINGCONST*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V831*/ meltfptr[830]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V846*/ meltfptr[845]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : STRING_LENGTH*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V844*/ meltfptr[843]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V855*/ meltfptr[854]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : STRING=*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V853*/ meltfptr[852]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V870*/ meltfptr[869]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : SPLIT_STRING_SPACE*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V868*/ meltfptr[867]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V881*/ meltfptr[880]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : SPLIT_STRING_COMMA*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V879*/ meltfptr[878]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V892*/ meltfptr[891]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : SPLIT_STRING_COLON*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V890*/ meltfptr[889]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V903*/ meltfptr[902]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : STRBUF2STRING*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V901*/ meltfptr[900]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V914*/ meltfptr[913]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MAKE_STRING_NAKEDBASENAME*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V912*/ meltfptr[911]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V925*/ meltfptr[924]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MAKE_STRING_TEMPNAME_SUFFIXED*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V923*/ meltfptr[922]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V940*/ meltfptr[939]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : LOAD_MELT_MODULE*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V938*/ meltfptr[937]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V953*/ meltfptr[952]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : GENERATE_MELT_MODULE*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V951*/ meltfptr[950]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V968*/ meltfptr[967]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : OBJECT_LENGTH*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V966*/ meltfptr[965]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V979*/ meltfptr[978]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : OBJECT_NTH_FIELD*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V977*/ meltfptr[976]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V990*/ meltfptr[989]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : SUBCLASS_OF*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V988*/ meltfptr[987]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1005*/ meltfptr[1004]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : SUBCLASS_OR_EQ*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1003*/ meltfptr[1002]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1018*/ meltfptr[1017]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : IS_MULTIPLE_OR_NULL*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1016*/ meltfptr[1015]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1030*/ meltfptr[1029]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : SUBSEQ_MULTIPLE*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1028*/ meltfptr[1027]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALCLO___V1094*/ meltfptr[1093]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : COMPARE_NAMED_ALPHA*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1626*/ meltfptr[1625]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1099*/ meltfptr[1098]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : IS_OUT*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1097*/ meltfptr[1096]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1249*/ meltfptr[1248]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_CCOMCONST*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1247*/ meltfptr[1246]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1238*/ meltfptr[1237]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_CCOMSTRBUF*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1236*/ meltfptr[1235]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1227*/ meltfptr[1226]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_CCOMSTRING*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1225*/ meltfptr[1224]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1216*/ meltfptr[1215]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_CENCSTRBUF*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1214*/ meltfptr[1213]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1205*/ meltfptr[1204]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_CENCSTRING*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1203*/ meltfptr[1202]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1262*/ meltfptr[1261]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_CIDENT*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1260*/ meltfptr[1259]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1273*/ meltfptr[1272]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_CIDENTPREFIX*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1271*/ meltfptr[1270]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1168*/ meltfptr[1167]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_INDENT*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1166*/ meltfptr[1165]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1181*/ meltfptr[1180]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_INDENTNL*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1179*/ meltfptr[1178]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1288*/ meltfptr[1287]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_LONGDEC*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1286*/ meltfptr[1285]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1299*/ meltfptr[1298]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_LONGHEX*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1297*/ meltfptr[1296]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1130*/ meltfptr[1129]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_MIXLOC*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1128*/ meltfptr[1127]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1310*/ meltfptr[1309]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_ROUTINEDESCR*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1308*/ meltfptr[1307]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1192*/ meltfptr[1191]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_SBUF*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1190*/ meltfptr[1189]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1144*/ meltfptr[1143]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_SHORT_MIXLOC*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1142*/ meltfptr[1141]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1108*/ meltfptr[1107]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_STRCONST*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1106*/ meltfptr[1105]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1119*/ meltfptr[1118]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_STRING*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1117*/ meltfptr[1116]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1156*/ meltfptr[1155]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2SBUF_TEXI_MIXLOC*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1154*/ meltfptr[1153]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1323*/ meltfptr[1322]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : OUTPUT_SBUF_STRCONST*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1321*/ meltfptr[1320]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1336*/ meltfptr[1335]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : OUTPUT_SBUF_STRVAL*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1334*/ meltfptr[1333]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1462*/ meltfptr[1461]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_CCOMCONST*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1460*/ meltfptr[1459]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1451*/ meltfptr[1450]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_CCOMSTRBUF*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1449*/ meltfptr[1448]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1440*/ meltfptr[1439]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_CCOMSTRING*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1438*/ meltfptr[1437]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1429*/ meltfptr[1428]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_CENCSTRBUF*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1427*/ meltfptr[1426]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1418*/ meltfptr[1417]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_CENCSTRING*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1416*/ meltfptr[1415]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1473*/ meltfptr[1472]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_CIDENT*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1471*/ meltfptr[1470]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1484*/ meltfptr[1483]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_CIDENTPREFIX*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1482*/ meltfptr[1481]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1385*/ meltfptr[1384]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_INDENT*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1383*/ meltfptr[1382]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1396*/ meltfptr[1395]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_INDENTNL*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1394*/ meltfptr[1393]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1497*/ meltfptr[1496]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_LONGDEC*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1495*/ meltfptr[1494]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1508*/ meltfptr[1507]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_LONGHEX*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1506*/ meltfptr[1505]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1373*/ meltfptr[1372]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_MIXLOC*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1371*/ meltfptr[1370]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1519*/ meltfptr[1518]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_ROUTINEDESCR*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1517*/ meltfptr[1516]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1407*/ meltfptr[1406]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_SBUF*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1405*/ meltfptr[1404]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1349*/ meltfptr[1348]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_STRCONST*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1347*/ meltfptr[1346]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1362*/ meltfptr[1361]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : ADD2OUT_STRING*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1360*/ meltfptr[1359]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1045*/ meltfptr[1044]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : TUPLE_NTH*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1628*/ meltfptr[1627]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1071*/ meltfptr[1070]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : TUPLE_SIZED*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1630*/ meltfptr[1629]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1528*/ meltfptr[1527]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : CSTRING_SAME*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1632*/ meltfptr[1631]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1545*/ meltfptr[1544]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : CSTRING_LENGTH*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1543*/ meltfptr[1542]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALCLO___V1554*/ meltfptr[1553]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MAPSTRING_EVERY*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1634*/ meltfptr[1633]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALCLO___V1556*/ meltfptr[1555]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MAPSTRING_ITERATE_TEST*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1636*/ meltfptr[1635]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1570*/ meltfptr[1569]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MAPSTRING_COUNT*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1568*/ meltfptr[1567]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1559*/ meltfptr[1558]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MAPSTRING_SIZE*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1557*/ meltfptr[1556]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1579*/ meltfptr[1578]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MAPSTRING_RAWGET*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1577*/ meltfptr[1576]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1590*/ meltfptr[1589]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MAPSTRING_RAWPUT*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1588*/ meltfptr[1587]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALDATA___V1605*/ meltfptr[1604]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MAPSTRING_RAWREMOVE*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1603*/ meltfptr[1602]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALCLO___V1619*/ meltfptr[1618]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MULTIPLE_EVERY_BOTH*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1638*/ meltfptr[1637]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALCLO___V1615*/ meltfptr[1614]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MULTIPLE_EVERY*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1640*/ meltfptr[1639]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*^apply*/ /*apply*/{ union meltparam_un argtab[2]; memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].bp_aptr = (melt_ptr_t*) &/*_.VALCLO___V1617*/ meltfptr[1616]; /*^apply.arg*/ argtab[1].bp_aptr = (melt_ptr_t*) & /*quasi.cur.mod.env.cont norm.exp.val : MULTIPLE_BACKWARD_EVERY*/ /*_.CONTENV___V2*/ meltfptr[1]; melt_apply ((meltclosure_ptr_t)(/*_.VALUEXPORTER___V1647*/ meltfptr[1644]), (melt_ptr_t)(/*_.VALDATA___V1642*/ meltfptr[1641]), (BPARSTR_PTR BPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ /*clear*/ /*_.VALUEXPORTER___V1647*/ meltfptr[1644] = 0 ;} /**COMMENT: after toplevel body **/; /**COMMENT: compute boxloc again **/; /*cond*/ if (/*_.CONTENV___V2*/ meltfptr[1] || melt_object_length((melt_ptr_t) MELT_PREDEF (INITIAL_SYSTEM_DATA))", /*_.FRESHENV___V3*/ meltfptr[2], __FILE__, __LINE__);;; /*^apply*/ /*apply*/{ /*_.CONTENV___V2*/ meltfptr[1] = melt_apply ((meltclosure_ptr_t)(/*_.FRESHENV___V3*/ meltfptr[2]), (melt_ptr_t)(/*_.PREVENV___V4*/ meltfptr[3]), (""), (union meltparam_un*)0, "", (union meltparam_un*)0); } ;}/*com.end block:compute fresh module environment*/ ; } /**COMMENT: intern symbols **/; /*internsym:IGNORE*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V8*/ meltfptr[7])); /*internsym:V*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V13*/ meltfptr[12])); /*internsym:VOID*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V19*/ meltfptr[18])); /*internsym:IS_NOT_OBJECT*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V26*/ meltfptr[25])); /*internsym:OBJ*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V31*/ meltfptr[30])); /*internsym:GET_GLOBPREDEF*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V37*/ meltfptr[36])); /*internsym:IX*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V42*/ meltfptr[41])); /*internsym:OBJ_HASH*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V48*/ meltfptr[47])); /*internsym:OBJ_LEN*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V57*/ meltfptr[56])); /*internsym:OBJ_NUM*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V66*/ meltfptr[65])); /*internsym:NONZERO_HASH*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V75*/ meltfptr[74])); /*internsym:MINOR_GARBCOLL*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V82*/ meltfptr[81])); /*internsym:SIZ*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V87*/ meltfptr[86])); /*internsym:FULL_GARBCOLL*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V93*/ meltfptr[92])); /*internsym:CHECKCALLSTACK_MSG*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V102*/ meltfptr[101])); /*internsym:MSG*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V107*/ meltfptr[106])); /*internsym:CBREAK_MSG*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V113*/ meltfptr[112])); /*internsym:<=I*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V122*/ meltfptr[121])); /*internsym:A*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V127*/ meltfptr[126])); /*internsym:B*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V130*/ meltfptr[129])); /*internsym:==I*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V137*/ meltfptr[136])); /*internsym:!=I*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V148*/ meltfptr[147])); /*internsym:-I*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V159*/ meltfptr[158])); /*internsym:*I*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V170*/ meltfptr[169])); /*internsym:ANDI*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V181*/ meltfptr[180])); /*internsym:ORI*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V192*/ meltfptr[191])); /*internsym:XORI*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V203*/ meltfptr[202])); /*internsym:NEGI*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V214*/ meltfptr[213])); /*internsym:I*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V219*/ meltfptr[218])); /*internsym:NOTI*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V225*/ meltfptr[224])); /*internsym:NOTNULL*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V234*/ meltfptr[233])); #undef meltfram__ } /*end of warmelt_base_initialmeltchunk_11*/ void MELT_MODULE_VISIBILITY warmelt_base_initialmeltchunk_12 (struct frame_start_module_melt_st* meltframptr__, char predefinited[]) { #define meltfram__ (*meltframptr__) #undef meltcallcount #define meltcallcount 0L /*internsym:ZEROP*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V243*/ meltfptr[242])); /*internsym:OUTCSTRING_DBG*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V252*/ meltfptr[251])); /*internsym:S*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V257*/ meltfptr[256])); /*internsym:OUTNUM_DBG*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V263*/ meltfptr[262])); /*internsym:PREF*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V268*/ meltfptr[267])); /*internsym:L*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V271*/ meltfptr[270])); /*internsym:SUF*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V274*/ meltfptr[273])); /*internsym:OUTSTR_DBG*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V282*/ meltfptr[281])); /*internsym:STR*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V287*/ meltfptr[286])); /*internsym:OUTSTRBUF_DBG*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V293*/ meltfptr[292])); /*internsym:SBUF*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V298*/ meltfptr[297])); /*internsym:OUTNEWLINE_DBG*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V304*/ meltfptr[303])); /*internsym:OUTNUM_ERR*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V311*/ meltfptr[310])); /*internsym:OUTCSTRING_ERR*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V324*/ meltfptr[323])); /*internsym:OUTSTRBUF_ERR*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V333*/ meltfptr[332])); /*internsym:PAIR_SET_HEAD*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V342*/ meltfptr[341])); /*internsym:PA*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V347*/ meltfptr[346])); /*internsym:HD*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V350*/ meltfptr[349])); /*internsym:PAIR_LISTLENGTH*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V357*/ meltfptr[356])); /*internsym:MAKE_PAIR*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V366*/ meltfptr[365])); /*internsym:DISCR*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V371*/ meltfptr[370])); /*internsym:TL*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V375*/ meltfptr[374])); /*internsym:IS_MIXINT*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V383*/ meltfptr[382])); /*internsym:MI*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V388*/ meltfptr[387])); /*internsym:MIXINT_VAL*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V394*/ meltfptr[393])); /*internsym:MAKE_MIXINT*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V403*/ meltfptr[402])); /*internsym:DIS*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V408*/ meltfptr[407])); /*internsym:VAL*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V411*/ meltfptr[410])); /*internsym:NUM*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V414*/ meltfptr[413])); /*internsym:IS_MIXLOC*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V422*/ meltfptr[421])); /*internsym:MIXLOC_VAL*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V431*/ meltfptr[430])); /*internsym:MIXLOC_LOCATION*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V440*/ meltfptr[439])); /*internsym:MIXLOC_LOCLINE*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V449*/ meltfptr[448])); /*internsym:MIXLOC_LOCFILE*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V458*/ meltfptr[457])); /*internsym:MAKE_MIXLOC*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V467*/ meltfptr[466])); /*internsym:LOC*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V475*/ meltfptr[474])); /*internsym:IS_MIXBIGINT*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V484*/ meltfptr[483])); /*internsym:MB*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V489*/ meltfptr[488])); /*internsym:MIXBIGINT_VAL*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V495*/ meltfptr[494])); /*internsym:PPSTRBUF_MIXBIGINT*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V504*/ meltfptr[503])); /*internsym:INDENT*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V510*/ meltfptr[509])); /*internsym:READ_FILE*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V519*/ meltfptr[518])); /*internsym:FILNAM*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V524*/ meltfptr[523])); /*internsym:ERROR_STRV*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V530*/ meltfptr[529])); /*internsym:CMSG*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V536*/ meltfptr[535])); /*internsym:STRV*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V539*/ meltfptr[538])); /*internsym:ERROR_PLAIN*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V547*/ meltfptr[546])); /*internsym:WARNING_STRV*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V558*/ meltfptr[557])); /*internsym:WARNING_PLAIN*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V571*/ meltfptr[570])); /*internsym:WARNINGMSG_PLAIN*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V582*/ meltfptr[581])); /*internsym:ERRORMSG_PLAIN*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V591*/ meltfptr[590])); /*internsym:ERRORMSG_STRV*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V600*/ meltfptr[599])); /*internsym:INFORM_STRV*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V611*/ meltfptr[610])); /*internsym:INFORM_PLAIN*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V624*/ meltfptr[623])); /*internsym:INFORMSG_PLAIN*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V635*/ meltfptr[634])); /*internsym:IMIN*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V647*/ meltfptr[646])); /*internsym:IMAX*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V650*/ meltfptr[649])); /*internsym:EACHLONG*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V653*/ meltfptr[652])); /*internsym:N*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V677*/ meltfptr[676])); /*internsym:Q*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V682*/ meltfptr[681])); /*internsym:INTMULT*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V685*/ meltfptr[684])); /*internsym:INTGREATHAN*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V705*/ meltfptr[704])); /*internsym:OUTNEWLINE_ERR*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V712*/ meltfptr[711])); /*internsym:OUTSTR_ERR*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V719*/ meltfptr[718])); /*internsym:MESSAGE_DBG*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V728*/ meltfptr[727])); /*internsym:MESSAGENUM_DBG*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V737*/ meltfptr[736])); /*internsym:MESSAGEVAL_DBG*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V748*/ meltfptr[747])); /*internsym:LONGBACKTRACE_DBG*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V759*/ meltfptr[758])); /*internsym:MAXDEPTH*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V765*/ meltfptr[764])); /*internsym:CHECKVAL_DBG*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V771*/ meltfptr[770])); /*internsym:DEBUGCSTRING*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V782*/ meltfptr[781])); /*internsym:MAKE_STRBUF*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V793*/ meltfptr[792])); /*internsym:STRBUF_USEDLENGTH*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V802*/ meltfptr[801])); /*internsym:IS_STRBUF*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V811*/ meltfptr[810])); /*internsym:MAKE_STRING*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V820*/ meltfptr[819])); /*internsym:IS_STRINGCONST*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V831*/ meltfptr[830])); /*internsym:CS*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V837*/ meltfptr[836])); /*internsym:STRING_LENGTH*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V844*/ meltfptr[843])); /*internsym:STRING=*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V853*/ meltfptr[852])); /*internsym:S1*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V858*/ meltfptr[857])); /*internsym:S2*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V861*/ meltfptr[860])); /*internsym:SPLIT_STRING_SPACE*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V868*/ meltfptr[867])); /*internsym:SPLIT_STRING_COMMA*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V879*/ meltfptr[878])); /*internsym:SPLIT_STRING_COLON*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V890*/ meltfptr[889])); /*internsym:STRBUF2STRING*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V901*/ meltfptr[900])); /*internsym:MAKE_STRING_NAKEDBASENAME*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V912*/ meltfptr[911])); /*internsym:MAKE_STRING_TEMPNAME_SUFFIXED*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V923*/ meltfptr[922])); /*internsym:SUFF*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V930*/ meltfptr[929])); /*internsym:LOAD_MELT_MODULE*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V938*/ meltfptr[937])); /*internsym:ENV*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V943*/ meltfptr[942])); /*internsym:GENERATE_MELT_MODULE*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V951*/ meltfptr[950])); /*internsym:SRC*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V956*/ meltfptr[955])); /*internsym:OUTNAM*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V959*/ meltfptr[958])); /*internsym:OBJECT_LENGTH*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V966*/ meltfptr[965])); /*internsym:OB*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V971*/ meltfptr[970])); /*internsym:OBJECT_NTH_FIELD*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V977*/ meltfptr[976])); /*internsym:SUBCLASS_OF*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V988*/ meltfptr[987])); /*internsym:CL1*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V993*/ meltfptr[992])); /*internsym:CL2*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V996*/ meltfptr[995])); /*internsym:SUBCLASS_OR_EQ*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1003*/ meltfptr[1002])); /*internsym:IS_MULTIPLE_OR_NULL*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1016*/ meltfptr[1015])); /*internsym:MUL*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1021*/ meltfptr[1020])); /*internsym:SUBSEQ_MULTIPLE*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1028*/ meltfptr[1027])); /*internsym:STARTIX*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1034*/ meltfptr[1033])); /*internsym:ENDIX*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1037*/ meltfptr[1036])); /*internsym:MATCHEDRK*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1048*/ meltfptr[1047])); /*internsym:MATCHEDTUP*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1052*/ meltfptr[1051])); /*internsym:OUTCOMP*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1055*/ meltfptr[1054])); /*internsym:TUPNTH*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1058*/ meltfptr[1057])); /*internsym:LN*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1074*/ meltfptr[1073])); /*internsym:TUP*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1078*/ meltfptr[1077])); /*internsym:TUPSIZ*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1081*/ meltfptr[1080])); /*internsym:CLASS_NAMED*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1095*/ meltfptr[1094])); /*internsym:IS_OUT*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1097*/ meltfptr[1096])); /*internsym:ADD2SBUF_STRCONST*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1106*/ meltfptr[1105])); /*internsym:ADD2SBUF_STRING*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1117*/ meltfptr[1116])); /*internsym:ADD2SBUF_MIXLOC*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1128*/ meltfptr[1127])); /*internsym:MIXL*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1134*/ meltfptr[1133])); /*internsym:ADD2SBUF_SHORT_MIXLOC*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1142*/ meltfptr[1141])); /*internsym:ADD2SBUF_TEXI_MIXLOC*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1154*/ meltfptr[1153])); /*internsym:ADD2SBUF_INDENT*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1166*/ meltfptr[1165])); /*internsym:DEPTH*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1172*/ meltfptr[1171])); /*internsym:ADD2SBUF_INDENTNL*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1179*/ meltfptr[1178])); /*internsym:ADD2SBUF_SBUF*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1190*/ meltfptr[1189])); /*internsym:ASBUF*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1196*/ meltfptr[1195])); /*internsym:ADD2SBUF_CENCSTRING*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1203*/ meltfptr[1202])); /*internsym:ADD2SBUF_CENCSTRBUF*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1214*/ meltfptr[1213])); /*internsym:ADD2SBUF_CCOMSTRING*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1225*/ meltfptr[1224])); /*internsym:ADD2SBUF_CCOMSTRBUF*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1236*/ meltfptr[1235])); /*internsym:ADD2SBUF_CCOMCONST*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1247*/ meltfptr[1246])); /*internsym:CSTR*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1253*/ meltfptr[1252])); /*internsym:ADD2SBUF_CIDENT*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1260*/ meltfptr[1259])); /*internsym:ADD2SBUF_CIDENTPREFIX*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1271*/ meltfptr[1270])); /*internsym:PREFLEN*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1278*/ meltfptr[1277])); /*internsym:ADD2SBUF_LONGDEC*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1286*/ meltfptr[1285])); /*internsym:ADD2SBUF_LONGHEX*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1297*/ meltfptr[1296])); /*internsym:ADD2SBUF_ROUTINEDESCR*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1308*/ meltfptr[1307])); /*internsym:ROUT*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1314*/ meltfptr[1313])); /*internsym:OUTPUT_SBUF_STRCONST*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1321*/ meltfptr[1320])); /*internsym:NAM*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1327*/ meltfptr[1326])); /*internsym:OUTPUT_SBUF_STRVAL*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1334*/ meltfptr[1333])); /*internsym:VNAM*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1340*/ meltfptr[1339])); /*internsym:ADD2OUT_STRCONST*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1347*/ meltfptr[1346])); /*internsym:OUT*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1352*/ meltfptr[1351])); /*internsym:ADD2OUT_STRING*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1360*/ meltfptr[1359])); /*internsym:ADD2OUT_MIXLOC*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1371*/ meltfptr[1370])); /*internsym:ADD2OUT_INDENT*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1383*/ meltfptr[1382])); /*internsym:ADD2OUT_INDENTNL*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1394*/ meltfptr[1393])); /*internsym:ADD2OUT_SBUF*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1405*/ meltfptr[1404])); /*internsym:ADD2OUT_CENCSTRING*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1416*/ meltfptr[1415])); /*internsym:ADD2OUT_CENCSTRBUF*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1427*/ meltfptr[1426])); /*internsym:ADD2OUT_CCOMSTRING*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1438*/ meltfptr[1437])); /*internsym:ADD2OUT_CCOMSTRBUF*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1449*/ meltfptr[1448])); /*internsym:ADD2OUT_CCOMCONST*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1460*/ meltfptr[1459])); /*internsym:ADD2OUT_CIDENT*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1471*/ meltfptr[1470])); /*internsym:ADD2OUT_CIDENTPREFIX*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1482*/ meltfptr[1481])); /*internsym:ADD2OUT_LONGDEC*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1495*/ meltfptr[1494])); /*internsym:ADD2OUT_LONGHEX*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1506*/ meltfptr[1505])); /*internsym:ADD2OUT_ROUTINEDESCR*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1517*/ meltfptr[1516])); /*internsym:STRSAM*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1534*/ meltfptr[1533])); /*internsym:CSTRING_LENGTH*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1543*/ meltfptr[1542])); /*internsym:MAPSTRING_SIZE*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1557*/ meltfptr[1556])); /*internsym:MAP*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1562*/ meltfptr[1561])); /*internsym:MAPSTRING_COUNT*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1568*/ meltfptr[1567])); /*internsym:MAPSTRING_RAWGET*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1577*/ meltfptr[1576])); /*internsym:MAPSTRING_RAWPUT*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1588*/ meltfptr[1587])); /*internsym:KEY*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1594*/ meltfptr[1593])); /*internsym:MAPSTRING_RAWREMOVE*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1603*/ meltfptr[1602])); /*internsym:FOREACH_LONG_UPTO*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1620*/ meltfptr[1619])); /*internsym:SOME_INTEGER_MULTIPLE*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1622*/ meltfptr[1621])); /*internsym:SOME_INTEGER_GREATER_THAN*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1624*/ meltfptr[1623])); /*internsym:COMPARE_NAMED_ALPHA*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1626*/ meltfptr[1625])); /*internsym:TUPLE_NTH*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1628*/ meltfptr[1627])); /*internsym:TUPLE_SIZED*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1630*/ meltfptr[1629])); /*internsym:CSTRING_SAME*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1632*/ meltfptr[1631])); /*internsym:MAPSTRING_EVERY*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1634*/ meltfptr[1633])); /*internsym:MAPSTRING_ITERATE_TEST*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1636*/ meltfptr[1635])); /*internsym:MULTIPLE_EVERY_BOTH*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1638*/ meltfptr[1637])); /*internsym:MULTIPLE_EVERY*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1640*/ meltfptr[1639])); /*internsym:MULTIPLE_BACKWARD_EVERY*/ (void) meltgc_intern_symbol((melt_ptr_t)(/*_.VALDATA___V1642*/ meltfptr[1641])); /**COMMENT: set retinit from boxloc **/; /*_.RETINIT___V1*/ meltfptr[0] = /*final freshenv get*/ melt_container_value((melt_ptr_t)(/*_.CONTENV___V2*/ meltfptr[1])); /**COMMENT: end the initproc **/; #undef meltfram__ } /*end of warmelt_base_initialmeltchunk_12*/ void mark_module_melt(void*fp) { int ix=0; initial_frame_st* framptr_= (initial_frame_st*)fp; for(ix=0; ix<1647; ix++) if (framptr_->varptr[ix]) gt_ggc_mx_melt_un (framptr_->varptr[ix]); } /* end mark_module_melt */ /* exported field offsets */ /* exported class lengths */ /**** end of warmelt-base.0.c ****/