diff options
Diffstat (limited to 'gcc/melt/generated/warmelt-outobj+05.cc')
| -rw-r--r-- | gcc/melt/generated/warmelt-outobj+05.cc | 2046 |
1 files changed, 1023 insertions, 1023 deletions
diff --git a/gcc/melt/generated/warmelt-outobj+05.cc b/gcc/melt/generated/warmelt-outobj+05.cc index 0587b152332..854797aaefc 100644 --- a/gcc/melt/generated/warmelt-outobj+05.cc +++ b/gcc/melt/generated/warmelt-outobj+05.cc @@ -39,8 +39,8 @@ MELT_EXTERN const char meltrun_used_md5_melt_f5[] = MELT_RUN_HASHMD5 /* from mel -class Melt_InitialClassyFrame_WARMELTmiOUTOBJ_h897178690; // forward declaration fromline 6691 -typedef Melt_InitialClassyFrame_WARMELTmiOUTOBJ_h897178690 Melt_InitialFrame; +class Melt_InitialClassyFrame_WARMELTmiOUTOBJ_h966467420; // forward declaration fromline 6697 +typedef Melt_InitialClassyFrame_WARMELTmiOUTOBJ_h966467420 Melt_InitialFrame; /*** 1 MELT module variables declarations ****/ MELT_EXTERN void melt_forwarding_module_data (void); MELT_EXTERN void melt_marking_module_data (void); @@ -832,7 +832,7 @@ MELT_EXTERN const char melt_module_is_gpl_compatible[]; /*declare opaque initial frame: */ -typedef Melt_InitialClassyFrame_WARMELTmiOUTOBJ_h897178690 /*opaqueinitialclassy*/ meltinitial_frame_t; +typedef Melt_InitialClassyFrame_WARMELTmiOUTOBJ_h966467420 /*opaqueinitialclassy*/ meltinitial_frame_t; /* define different names when debugging or not */ @@ -962,12 +962,12 @@ meltrout_93_WARMELTmiOUTOBJ_OUTPUCOD_OBJRAWALLOCOBJ(meltclosure_ptr_t meltclosp_ /* end of frame for routine meltrout_93_WARMELTmiOUTOBJ_OUTPUCOD_OBJRAWALLOCOBJ fromline 1756 */ /* classy proc frame meltrout_93_WARMELTmiOUTOBJ_OUTPUCOD_OBJRAWALLOCOBJ */ MeltFrame_meltrout_93_WARMELTmiOUTOBJ_OUTPUCOD_OBJRAWALLOCOBJ - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_93_WARMELTmiOUTOBJ_OUTPUCOD_OBJRAWALLOCOBJ fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_93_WARMELTmiOUTOBJ_OUTPUCOD_OBJRAWALLOCOBJ fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -983,7 +983,7 @@ meltrout_93_WARMELTmiOUTOBJ_OUTPUCOD_OBJRAWALLOCOBJ(meltclosure_ptr_t meltclosp_ /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:4423:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:4429:/ getarg"); /*_.ORALOB__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -1015,7 +1015,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4424:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4430:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -1025,7 +1025,7 @@ meltlab_endgetargs: ; /*_#IS_A__L2*/ meltfnum[1] = melt_is_instance_of((melt_ptr_t)(/*_.ORALOB__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJRAWALLOCOBJ*/ meltfrout->tabval[0])));; - MELT_LOCATION("warmelt-outobj.melt:4424:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4430:/ cond"); /*cond*/ if (/*_#IS_A__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -1033,7 +1033,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4424:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4430:/ cond.else"); /*^block*/ /*anyblock*/ @@ -1052,7 +1052,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4424; + argtab[2].meltbp_long = 4430; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.ORALOB__V2*/ meltfptr[1]; /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -1061,7 +1061,7 @@ meltlab_endgetargs: /*_._IFELSE___V6*/ meltfptr[5] = /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4424:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4430:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = 0 ; } ; @@ -1070,7 +1070,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = /*_._IFELSE___V6*/ meltfptr[5];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4424:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4430:/ clear"); /*clear*/ /*_#IS_A__L2*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V6*/ meltfptr[5] = 0 ; @@ -1081,7 +1081,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = (/*nil*/NULL); #endif /*MELT_HAVE_DEBUG>0*/ ; - MELT_LOCATION("warmelt-outobj.melt:4425:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4431:/ quasiblock"); /*^getslot*/ @@ -1092,7 +1092,7 @@ meltlab_endgetargs: /*_.ILOC__V8*/ meltfptr[6] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4426:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4432:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.ORALOB__V2*/ meltfptr[1]) /*=obj*/; @@ -1100,7 +1100,7 @@ meltlab_endgetargs: /*_.ICLASS__V9*/ meltfptr[5] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4427:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4433:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.ORALOB__V2*/ meltfptr[1]) /*=obj*/; @@ -1108,7 +1108,7 @@ meltlab_endgetargs: /*_.ICLANAME__V10*/ meltfptr[9] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4428:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4434:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.ORALOB__V2*/ meltfptr[1]) /*=obj*/; @@ -1116,7 +1116,7 @@ meltlab_endgetargs: /*_.ILEN__V11*/ meltfptr[10] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4429:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4435:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.ORALOB__V2*/ meltfptr[1]) /*=obj*/; @@ -1131,7 +1131,7 @@ meltlab_endgetargs: (meltgc_new_int((meltobject_ptr_t)((/*!DISCR_INTEGER*/ meltfrout->tabval[2])), (/*_#plI__L3*/ meltfnum[1])));; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4432:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4438:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -1141,7 +1141,7 @@ meltlab_endgetargs: ; /*_#IS_A__L4*/ meltfnum[3] = melt_is_instance_of((melt_ptr_t)(/*_.ICLASS__V9*/ meltfptr[5]), (melt_ptr_t)((/*!CLASS_OBJVALUE*/ meltfrout->tabval[3])));; - MELT_LOCATION("warmelt-outobj.melt:4432:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4438:/ cond"); /*cond*/ if (/*_#IS_A__L4*/ meltfnum[3]) /*then*/ { /*^cond.then*/ @@ -1149,7 +1149,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4432:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4438:/ cond.else"); /*^block*/ /*anyblock*/ @@ -1168,14 +1168,14 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4432; + argtab[2].meltbp_long = 4438; /*_.MELT_ASSERT_FAILURE_FUN__V16*/ meltfptr[15] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG ""), argtab, "", (union meltparam_un*)0); } ; /*_._IFELSE___V15*/ meltfptr[14] = /*_.MELT_ASSERT_FAILURE_FUN__V16*/ meltfptr[15];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4432:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4438:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V16*/ meltfptr[15] = 0 ; } ; @@ -1184,7 +1184,7 @@ meltlab_endgetargs: /*_.IFCPP___V14*/ meltfptr[13] = /*_._IFELSE___V15*/ meltfptr[14];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4432:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4438:/ clear"); /*clear*/ /*_#IS_A__L4*/ meltfnum[3] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V15*/ meltfptr[14] = 0 ; @@ -1198,7 +1198,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4433:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4439:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -1252,7 +1252,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4435:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4441:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "/*rawallocobj*/ { melt_ptr_t newobj = 0;")); } ; @@ -1260,13 +1260,13 @@ meltlab_endgetargs: ((/*_#DEPTH__L1*/ meltfnum[0]) + (1));; { - MELT_LOCATION("warmelt-outobj.melt:4436:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4442:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#plI__L5*/ meltfnum[3]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4437:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4443:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_raw_object_create(newobj,(melt_ptr_t)(")); } ; @@ -1275,7 +1275,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4438:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4444:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -1291,7 +1291,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4439:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4445:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "), (")); } ; @@ -1300,7 +1300,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4440:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4446:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -1316,20 +1316,20 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4441:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4447:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "), \"")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4442:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4448:/ locexp"); meltgc_add_strbuf_cstr ((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t)(/*_.ICLANAME__V10*/ meltfptr[9]))); } ; { - MELT_LOCATION("warmelt-outobj.melt:4443:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4449:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "\");")); } ; @@ -1347,7 +1347,7 @@ meltlab_endgetargs: ((/*_#DEPTH__L1*/ meltfnum[0]) + (1));; { - MELT_LOCATION("warmelt-outobj.melt:4447:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4453:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#plI__L8*/ meltfnum[7]), 0); } ; @@ -1356,7 +1356,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4448:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4454:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -1372,7 +1372,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4449:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4455:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -1382,7 +1382,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L10*/ meltfnum[9] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:4450:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4456:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[7])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[8]))) @@ -1410,7 +1410,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L12*/ meltfnum[11] = ((/*_#STRBUF_USEDLENGTH__L10*/ meltfnum[9]) < (/*_#GET_INT__L11*/ meltfnum[10]));; - MELT_LOCATION("warmelt-outobj.melt:4449:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4455:/ cond"); /*cond*/ if (/*_#ltI__L12*/ meltfnum[11]) /*then*/ { /*^cond.then*/ @@ -1418,7 +1418,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4449:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4455:/ cond.else"); /*^block*/ /*anyblock*/ @@ -1437,7 +1437,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4449; + argtab[2].meltbp_long = 4455; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V28*/ meltfptr[27] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -1446,7 +1446,7 @@ meltlab_endgetargs: /*_._IFELSE___V27*/ meltfptr[26] = /*_.MELT_ASSERT_FAILURE_FUN__V28*/ meltfptr[27];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4449:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4455:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V28*/ meltfptr[27] = 0 ; } ; @@ -1455,7 +1455,7 @@ meltlab_endgetargs: /*_.IFCPP___V25*/ meltfptr[24] = /*_._IFELSE___V27*/ meltfptr[26];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4449:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4455:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L10*/ meltfnum[9] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V26*/ meltfptr[25] = 0 ; @@ -1474,7 +1474,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4451:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4457:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( " =")); } ; @@ -1485,7 +1485,7 @@ meltlab_endgetargs: /*citerepilog*/ - MELT_LOCATION("warmelt-outobj.melt:4444:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4450:/ clear"); /*clear*/ /*_.DSTPAIR__V22*/ meltfptr[21] = 0 ; /*^clear*/ /*clear*/ /*_.DST__V23*/ meltfptr[22] = 0 ; @@ -1500,7 +1500,7 @@ meltlab_endgetargs: } /*endciterblock FOREACH_PAIR_COMPONENT_IN_LIST*/ ; - MELT_LOCATION("warmelt-outobj.melt:4425:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4431:/ clear"); /*clear*/ /*_.ILOC__V8*/ meltfptr[6] = 0 ; /*^clear*/ /*clear*/ /*_.ICLASS__V9*/ meltfptr[5] = 0 ; @@ -1534,25 +1534,25 @@ meltlab_endgetargs: ((/*_#DEPTH__L1*/ meltfnum[0]) + (1));; { - MELT_LOCATION("warmelt-outobj.melt:4452:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4458:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#plI__L13*/ meltfnum[9]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4453:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4459:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "newobj; };")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4454:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4460:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4455:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4461:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -1562,7 +1562,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L14*/ meltfnum[10] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:4456:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4462:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[7])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[8]))) @@ -1590,7 +1590,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L16*/ meltfnum[1] = ((/*_#STRBUF_USEDLENGTH__L14*/ meltfnum[10]) < (/*_#GET_INT__L15*/ meltfnum[11]));; - MELT_LOCATION("warmelt-outobj.melt:4455:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4461:/ cond"); /*cond*/ if (/*_#ltI__L16*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -1598,7 +1598,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4455:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4461:/ cond.else"); /*^block*/ /*anyblock*/ @@ -1617,7 +1617,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4455; + argtab[2].meltbp_long = 4461; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V32*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -1626,7 +1626,7 @@ meltlab_endgetargs: /*_._IFELSE___V31*/ meltfptr[26] = /*_.MELT_ASSERT_FAILURE_FUN__V32*/ meltfptr[6];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4455:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4461:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V32*/ meltfptr[6] = 0 ; } ; @@ -1635,7 +1635,7 @@ meltlab_endgetargs: /*_.IFCPP___V29*/ meltfptr[27] = /*_._IFELSE___V31*/ meltfptr[26];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4455:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4461:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L14*/ meltfnum[10] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V30*/ meltfptr[25] = 0 ; @@ -1655,13 +1655,13 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4423:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4429:/ quasiblock"); /*_._RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V29*/ meltfptr[27];; { - MELT_LOCATION("warmelt-outobj.melt:4423:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4429:/ locexp"); /*ochecknores compilobj_nrep_return*/ #if MELT_HAVE_DEBUG > 0 if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) @@ -1764,12 +1764,12 @@ meltrout_94_WARMELTmiOUTOBJ_OUTPUCOD_OBJNEWCLOSURE(meltclosure_ptr_t meltclosp_, /* end of frame for routine meltrout_94_WARMELTmiOUTOBJ_OUTPUCOD_OBJNEWCLOSURE fromline 1756 */ /* classy proc frame meltrout_94_WARMELTmiOUTOBJ_OUTPUCOD_OBJNEWCLOSURE */ MeltFrame_meltrout_94_WARMELTmiOUTOBJ_OUTPUCOD_OBJNEWCLOSURE - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_94_WARMELTmiOUTOBJ_OUTPUCOD_OBJNEWCLOSURE fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_94_WARMELTmiOUTOBJ_OUTPUCOD_OBJNEWCLOSURE fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -1785,7 +1785,7 @@ meltrout_94_WARMELTmiOUTOBJ_OUTPUCOD_OBJNEWCLOSURE(meltclosure_ptr_t meltclosp_, /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:4462:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:4468:/ getarg"); /*_.OBNCLO__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -1817,7 +1817,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4463:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4469:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -1827,7 +1827,7 @@ meltlab_endgetargs: ; /*_#IS_A__L2*/ meltfnum[1] = melt_is_instance_of((melt_ptr_t)(/*_.OBNCLO__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJNEWCLOSURE*/ meltfrout->tabval[0])));; - MELT_LOCATION("warmelt-outobj.melt:4463:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4469:/ cond"); /*cond*/ if (/*_#IS_A__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -1835,7 +1835,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4463:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4469:/ cond.else"); /*^block*/ /*anyblock*/ @@ -1854,7 +1854,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4463; + argtab[2].meltbp_long = 4469; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OBNCLO__V2*/ meltfptr[1]; /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -1863,7 +1863,7 @@ meltlab_endgetargs: /*_._IFELSE___V6*/ meltfptr[5] = /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4463:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4469:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = 0 ; } ; @@ -1872,7 +1872,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = /*_._IFELSE___V6*/ meltfptr[5];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4463:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4469:/ clear"); /*clear*/ /*_#IS_A__L2*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V6*/ meltfptr[5] = 0 ; @@ -1883,7 +1883,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = (/*nil*/NULL); #endif /*MELT_HAVE_DEBUG>0*/ ; - MELT_LOCATION("warmelt-outobj.melt:4464:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4470:/ quasiblock"); /*^getslot*/ @@ -1894,7 +1894,7 @@ meltlab_endgetargs: /*_.ILOC__V9*/ meltfptr[5] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4465:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4471:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OBNCLO__V2*/ meltfptr[1]) /*=obj*/; @@ -1902,7 +1902,7 @@ meltlab_endgetargs: /*_.ODISCR__V10*/ meltfptr[9] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4466:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4472:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OBNCLO__V2*/ meltfptr[1]) /*=obj*/; @@ -1910,7 +1910,7 @@ meltlab_endgetargs: /*_.OROUT__V11*/ meltfptr[10] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4467:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4473:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OBNCLO__V2*/ meltfptr[1]) /*=obj*/; @@ -1918,7 +1918,7 @@ meltlab_endgetargs: /*_.OLEN__V12*/ meltfptr[11] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4468:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4474:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OBNCLO__V2*/ meltfptr[1]) /*=obj*/; @@ -1934,7 +1934,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4471:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4477:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -1988,7 +1988,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4473:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4479:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( " /*newclosure*/ ")); } ; @@ -2007,7 +2007,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4477:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4483:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -2023,7 +2023,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4478:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4484:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -2033,7 +2033,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[4] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:4479:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4485:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[6])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[7]))) @@ -2061,7 +2061,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L7*/ meltfnum[6] = ((/*_#STRBUF_USEDLENGTH__L5*/ meltfnum[4]) < (/*_#GET_INT__L6*/ meltfnum[5]));; - MELT_LOCATION("warmelt-outobj.melt:4478:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4484:/ cond"); /*cond*/ if (/*_#ltI__L7*/ meltfnum[6]) /*then*/ { /*^cond.then*/ @@ -2069,7 +2069,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4478:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4484:/ cond.else"); /*^block*/ /*anyblock*/ @@ -2088,7 +2088,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4478; + argtab[2].meltbp_long = 4484; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V24*/ meltfptr[23] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -2097,7 +2097,7 @@ meltlab_endgetargs: /*_._IFELSE___V23*/ meltfptr[22] = /*_.MELT_ASSERT_FAILURE_FUN__V24*/ meltfptr[23];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4478:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4484:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V24*/ meltfptr[23] = 0 ; } ; @@ -2106,7 +2106,7 @@ meltlab_endgetargs: /*_.IFCPP___V21*/ meltfptr[20] = /*_._IFELSE___V23*/ meltfptr[22];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4478:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4484:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[4] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V22*/ meltfptr[21] = 0 ; @@ -2125,7 +2125,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4480:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4486:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( " =")); } ; @@ -2136,7 +2136,7 @@ meltlab_endgetargs: /*citerepilog*/ - MELT_LOCATION("warmelt-outobj.melt:4474:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4480:/ clear"); /*clear*/ /*_.CURPAIR__V18*/ meltfptr[16] = 0 ; /*^clear*/ /*clear*/ /*_.DST__V19*/ meltfptr[18] = 0 ; @@ -2152,13 +2152,13 @@ meltlab_endgetargs: ((/*_#DEPTH__L1*/ meltfnum[0]) + (1));; { - MELT_LOCATION("warmelt-outobj.melt:4481:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4487:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#plI__L8*/ meltfnum[4]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4482:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4488:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "(melt_ptr_t) meltgc_new_closure((meltobject_ptr_t)(")); } ; @@ -2167,7 +2167,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4483:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4489:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -2183,7 +2183,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4484:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4490:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "), (meltroutine_ptr_t)(")); } ; @@ -2192,7 +2192,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4485:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4491:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -2208,7 +2208,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4486:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4492:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "), (")); } ; @@ -2217,7 +2217,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4487:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4493:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -2233,19 +2233,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4488:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4494:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "));")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4489:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4495:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4490:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4496:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -2255,7 +2255,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L12*/ meltfnum[11] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:4491:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4497:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[6])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[7]))) @@ -2283,7 +2283,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L14*/ meltfnum[13] = ((/*_#STRBUF_USEDLENGTH__L12*/ meltfnum[11]) < (/*_#GET_INT__L13*/ meltfnum[12]));; - MELT_LOCATION("warmelt-outobj.melt:4490:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4496:/ cond"); /*cond*/ if (/*_#ltI__L14*/ meltfnum[13]) /*then*/ { /*^cond.then*/ @@ -2291,7 +2291,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4490:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4496:/ cond.else"); /*^block*/ /*anyblock*/ @@ -2310,7 +2310,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4490; + argtab[2].meltbp_long = 4496; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V31*/ meltfptr[30] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -2319,7 +2319,7 @@ meltlab_endgetargs: /*_._IFELSE___V30*/ meltfptr[29] = /*_.MELT_ASSERT_FAILURE_FUN__V31*/ meltfptr[30];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4490:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4496:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V31*/ meltfptr[30] = 0 ; } ; @@ -2328,7 +2328,7 @@ meltlab_endgetargs: /*_.IFCPP___V28*/ meltfptr[27] = /*_._IFELSE___V30*/ meltfptr[29];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4490:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4496:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L12*/ meltfnum[11] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V29*/ meltfptr[28] = 0 ; @@ -2348,7 +2348,7 @@ meltlab_endgetargs: /*^compute*/ /*_.LET___V8*/ meltfptr[6] = /*_.IFCPP___V28*/ meltfptr[27];; - MELT_LOCATION("warmelt-outobj.melt:4464:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4470:/ clear"); /*clear*/ /*_.ILOC__V9*/ meltfptr[5] = 0 ; /*^clear*/ /*clear*/ /*_.ODISCR__V10*/ meltfptr[9] = 0 ; @@ -2385,13 +2385,13 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4462:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4468:/ quasiblock"); /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; { - MELT_LOCATION("warmelt-outobj.melt:4462:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4468:/ locexp"); /*ochecknores compilobj_nrep_return*/ #if MELT_HAVE_DEBUG > 0 if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) @@ -2492,12 +2492,12 @@ meltrout_95_WARMELTmiOUTOBJ_OUTPUCOD_OBJTOUCH(meltclosure_ptr_t meltclosp_, melt /* end of frame for routine meltrout_95_WARMELTmiOUTOBJ_OUTPUCOD_OBJTOUCH fromline 1756 */ /* classy proc frame meltrout_95_WARMELTmiOUTOBJ_OUTPUCOD_OBJTOUCH */ MeltFrame_meltrout_95_WARMELTmiOUTOBJ_OUTPUCOD_OBJTOUCH - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_95_WARMELTmiOUTOBJ_OUTPUCOD_OBJTOUCH fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_95_WARMELTmiOUTOBJ_OUTPUCOD_OBJTOUCH fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -2513,7 +2513,7 @@ meltrout_95_WARMELTmiOUTOBJ_OUTPUCOD_OBJTOUCH(meltclosure_ptr_t meltclosp_, melt /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:4496:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:4502:/ getarg"); /*_.OTOUCH__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -2545,7 +2545,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4497:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4503:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -2555,7 +2555,7 @@ meltlab_endgetargs: ; /*_#IS_A__L2*/ meltfnum[1] = melt_is_instance_of((melt_ptr_t)(/*_.OTOUCH__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJTOUCH*/ meltfrout->tabval[0])));; - MELT_LOCATION("warmelt-outobj.melt:4497:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4503:/ cond"); /*cond*/ if (/*_#IS_A__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -2563,7 +2563,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4497:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4503:/ cond.else"); /*^block*/ /*anyblock*/ @@ -2582,14 +2582,14 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4497; + argtab[2].meltbp_long = 4503; /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG ""), argtab, "", (union meltparam_un*)0); } ; /*_._IFELSE___V6*/ meltfptr[5] = /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4497:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4503:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = 0 ; } ; @@ -2598,7 +2598,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = /*_._IFELSE___V6*/ meltfptr[5];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4497:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4503:/ clear"); /*clear*/ /*_#IS_A__L2*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V6*/ meltfptr[5] = 0 ; @@ -2609,7 +2609,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = (/*nil*/NULL); #endif /*MELT_HAVE_DEBUG>0*/ ; - MELT_LOCATION("warmelt-outobj.melt:4498:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4504:/ quasiblock"); /*^getslot*/ @@ -2620,7 +2620,7 @@ meltlab_endgetargs: /*_.ILOC__V8*/ meltfptr[6] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4499:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4505:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OTOUCH__V2*/ meltfptr[1]) /*=obj*/; @@ -2628,7 +2628,7 @@ meltlab_endgetargs: /*_.TOUCHED__V9*/ meltfptr[5] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4500:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4506:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OTOUCH__V2*/ meltfptr[1]) /*=obj*/; @@ -2639,7 +2639,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4502:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4508:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -2694,7 +2694,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4504:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4510:/ cond"); /*cond*/ if (/*_.COMM__V10*/ meltfptr[9]) /*then*/ { /*^cond.then*/ @@ -2704,30 +2704,30 @@ meltlab_endgetargs: { - MELT_LOCATION("warmelt-outobj.melt:4505:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4511:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "/*touch:")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4506:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4512:/ locexp"); meltgc_add_strbuf_cident((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str((melt_ptr_t)(/*_.COMM__V10*/ meltfptr[9]))); } ; { - MELT_LOCATION("warmelt-outobj.melt:4507:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4513:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "*/")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4508:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4514:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION("warmelt-outobj.melt:4504:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4510:/ quasiblock"); /*epilog*/ @@ -2737,14 +2737,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4510:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4516:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "meltgc_touch(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4511:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4517:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -2760,18 +2760,18 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4512:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4518:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ");")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4513:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4519:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION("warmelt-outobj.melt:4498:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4504:/ clear"); /*clear*/ /*_.ILOC__V8*/ meltfptr[6] = 0 ; /*^clear*/ /*clear*/ /*_.TOUCHED__V9*/ meltfptr[5] = 0 ; @@ -2788,7 +2788,7 @@ meltlab_endgetargs: ; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4496:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4502:/ clear"); /*clear*/ /*_.IFCPP___V5*/ meltfptr[4] = 0 ; } @@ -2872,12 +2872,12 @@ meltrout_96_WARMELTmiOUTOBJ_OUTPUCOD_DBGTRACEWRITEOBJ(meltclosure_ptr_t meltclos /* end of frame for routine meltrout_96_WARMELTmiOUTOBJ_OUTPUCOD_DBGTRACEWRITEOBJ fromline 1756 */ /* classy proc frame meltrout_96_WARMELTmiOUTOBJ_OUTPUCOD_DBGTRACEWRITEOBJ */ MeltFrame_meltrout_96_WARMELTmiOUTOBJ_OUTPUCOD_DBGTRACEWRITEOBJ - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_96_WARMELTmiOUTOBJ_OUTPUCOD_DBGTRACEWRITEOBJ fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_96_WARMELTmiOUTOBJ_OUTPUCOD_DBGTRACEWRITEOBJ fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -2893,7 +2893,7 @@ meltrout_96_WARMELTmiOUTOBJ_OUTPUCOD_DBGTRACEWRITEOBJ(meltclosure_ptr_t meltclos /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:4521:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:4527:/ getarg"); /*_.OTWRO__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -2925,7 +2925,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4522:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4528:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -2935,7 +2935,7 @@ meltlab_endgetargs: ; /*_#IS_A__L2*/ meltfnum[1] = melt_is_instance_of((melt_ptr_t)(/*_.OTWRO__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJDBGTRACEWRITEOBJ*/ meltfrout->tabval[0])));; - MELT_LOCATION("warmelt-outobj.melt:4522:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4528:/ cond"); /*cond*/ if (/*_#IS_A__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -2943,7 +2943,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4522:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4528:/ cond.else"); /*^block*/ /*anyblock*/ @@ -2962,7 +2962,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4522; + argtab[2].meltbp_long = 4528; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OTWRO__V2*/ meltfptr[1]; /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -2971,7 +2971,7 @@ meltlab_endgetargs: /*_._IFELSE___V6*/ meltfptr[5] = /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4522:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4528:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = 0 ; } ; @@ -2980,7 +2980,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = /*_._IFELSE___V6*/ meltfptr[5];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4522:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4528:/ clear"); /*clear*/ /*_#IS_A__L2*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V6*/ meltfptr[5] = 0 ; @@ -2991,7 +2991,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = (/*nil*/NULL); #endif /*MELT_HAVE_DEBUG>0*/ ; - MELT_LOCATION("warmelt-outobj.melt:4523:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4529:/ quasiblock"); /*^getslot*/ @@ -3002,7 +3002,7 @@ meltlab_endgetargs: /*_.ILOC__V8*/ meltfptr[6] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4524:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4530:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OTWRO__V2*/ meltfptr[1]) /*=obj*/; @@ -3010,7 +3010,7 @@ meltlab_endgetargs: /*_.OWRITTEN__V9*/ meltfptr[5] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4525:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4531:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OTWRO__V2*/ meltfptr[1]) /*=obj*/; @@ -3021,7 +3021,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4527:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4533:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -3037,20 +3037,20 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4528:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4534:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4529:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4535:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_dbgtrace_written_object (")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4530:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4536:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -3066,7 +3066,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4531:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4537:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ", \"")); } ; @@ -3075,7 +3075,7 @@ meltlab_endgetargs: ; /*_#IS_STRING__L3*/ meltfnum[1] = (melt_magic_discr((melt_ptr_t)(/*_.MSG__V10*/ meltfptr[9])) == MELTOBMAG_STRING);; - MELT_LOCATION("warmelt-outobj.melt:4532:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4538:/ cond"); /*cond*/ if (/*_#IS_STRING__L3*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -3085,7 +3085,7 @@ meltlab_endgetargs: { - MELT_LOCATION("warmelt-outobj.melt:4533:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4539:/ locexp"); meltgc_add_strbuf_cstr ((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str ((melt_ptr_t)(/*_.MSG__V10*/ meltfptr[9]))); } @@ -3096,7 +3096,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4532:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4538:/ cond.else"); /*^block*/ /*anyblock*/ @@ -3104,7 +3104,7 @@ meltlab_endgetargs: { - MELT_LOCATION("warmelt-outobj.melt:4534:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4540:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "*written object*")); } ; @@ -3115,18 +3115,18 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4535:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4541:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "\");")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4536:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4542:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION("warmelt-outobj.melt:4523:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4529:/ clear"); /*clear*/ /*_.ILOC__V8*/ meltfptr[6] = 0 ; /*^clear*/ /*clear*/ /*_.OWRITTEN__V9*/ meltfptr[5] = 0 ; @@ -3143,7 +3143,7 @@ meltlab_endgetargs: ; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4521:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4527:/ clear"); /*clear*/ /*_.IFCPP___V5*/ meltfptr[4] = 0 ; } @@ -3227,12 +3227,12 @@ meltrout_97_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTUPLE(meltclosure_ptr_t meltclosp_, me /* end of frame for routine meltrout_97_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTUPLE fromline 1756 */ /* classy proc frame meltrout_97_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTUPLE */ MeltFrame_meltrout_97_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTUPLE - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_97_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTUPLE fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_97_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTUPLE fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -3248,7 +3248,7 @@ meltrout_97_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTUPLE(meltclosure_ptr_t meltclosp_, me /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:4541:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:4547:/ getarg"); /*_.OPTUP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -3280,7 +3280,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4542:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4548:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -3290,7 +3290,7 @@ meltlab_endgetargs: ; /*_#IS_A__L2*/ meltfnum[1] = melt_is_instance_of((melt_ptr_t)(/*_.OPTUP__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTUPLE*/ meltfrout->tabval[0])));; - MELT_LOCATION("warmelt-outobj.melt:4542:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4548:/ cond"); /*cond*/ if (/*_#IS_A__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -3298,7 +3298,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4542:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4548:/ cond.else"); /*^block*/ /*anyblock*/ @@ -3317,7 +3317,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4542; + argtab[2].meltbp_long = 4548; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OPTUP__V2*/ meltfptr[1]; /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -3326,7 +3326,7 @@ meltlab_endgetargs: /*_._IFELSE___V6*/ meltfptr[5] = /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4542:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4548:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = 0 ; } ; @@ -3335,7 +3335,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = /*_._IFELSE___V6*/ meltfptr[5];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4542:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4548:/ clear"); /*clear*/ /*_#IS_A__L2*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V6*/ meltfptr[5] = 0 ; @@ -3346,7 +3346,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = (/*nil*/NULL); #endif /*MELT_HAVE_DEBUG>0*/ ; - MELT_LOCATION("warmelt-outobj.melt:4543:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4549:/ quasiblock"); /*^getslot*/ @@ -3357,7 +3357,7 @@ meltlab_endgetargs: /*_.ILOC__V9*/ meltfptr[5] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4544:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4550:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPTUP__V2*/ meltfptr[1]) /*=obj*/; @@ -3365,7 +3365,7 @@ meltlab_endgetargs: /*_.OTUP__V10*/ meltfptr[9] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4545:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4551:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPTUP__V2*/ meltfptr[1]) /*=obj*/; @@ -3374,7 +3374,7 @@ meltlab_endgetargs: }; ; /*_#UNIQRANK__L3*/ meltfnum[1] = 0;; - MELT_LOCATION("warmelt-outobj.melt:4547:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4553:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPTUP__V2*/ meltfptr[1]) /*=obj*/; @@ -3384,7 +3384,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4549:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4555:/ locexp"); { /* outpucod_objputuple UNIQRANKSET__1 */ static long UNIQRANKSET__1_cnt ; @@ -3396,7 +3396,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4555:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4561:/ quasiblock"); /*^multiapply*/ @@ -3417,7 +3417,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4558:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4564:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -3433,37 +3433,37 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4559:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4565:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "/*putupl")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4560:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4566:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "#")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4561:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4567:/ locexp"); meltgc_add_strbuf_dec((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#UNIQRANK__L3*/ meltfnum[1])); } ; { - MELT_LOCATION("warmelt-outobj.melt:4562:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4568:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "*/")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4563:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4569:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4564:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4570:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_assertmsg(\"putupl ")); } ; @@ -3475,7 +3475,7 @@ meltlab_endgetargs: /*^compute*/ /*_#gtI__L5*/ meltfnum[4] = ((/*_#GET_INT__L4*/ meltfnum[3]) > (0));; - MELT_LOCATION("warmelt-outobj.melt:4565:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4571:/ cond"); /*cond*/ if (/*_#gtI__L5*/ meltfnum[4]) /*then*/ { /*^cond.then*/ @@ -3485,20 +3485,20 @@ meltlab_endgetargs: { - MELT_LOCATION("warmelt-outobj.melt:4567:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4573:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "[")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4568:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4574:/ locexp"); /*add2sbuf_string*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str((melt_ptr_t)(/*_.FILEV__V15*/ meltfptr[14]))); } ; { - MELT_LOCATION("warmelt-outobj.melt:4569:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4575:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ":")); } ; @@ -3506,22 +3506,22 @@ meltlab_endgetargs: (melt_get_int((melt_ptr_t)(/*_.LINEV__V14*/ meltfptr[13])));; { - MELT_LOCATION("warmelt-outobj.melt:4570:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4576:/ locexp"); meltgc_add_strbuf_dec((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#GET_INT__L6*/ meltfnum[5])); } ; { - MELT_LOCATION("warmelt-outobj.melt:4571:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4577:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "] ")); } ; - MELT_LOCATION("warmelt-outobj.melt:4566:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4572:/ quasiblock"); /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4565:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4571:/ clear"); /*clear*/ /*_#GET_INT__L6*/ meltfnum[5] = 0 ; } ; @@ -3529,26 +3529,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4573:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4579:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "#")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4574:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4580:/ locexp"); meltgc_add_strbuf_dec((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#UNIQRANK__L3*/ meltfnum[1])); } ; { - MELT_LOCATION("warmelt-outobj.melt:4575:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4581:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( " checktup\", melt_magic_discr((melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4576:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4582:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -3564,19 +3564,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4577:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4583:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "))== MELTOBMAG_MULTIPLE);")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4578:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4584:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4579:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4585:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_assertmsg(\"putupl ")); } ; @@ -3588,7 +3588,7 @@ meltlab_endgetargs: /*^compute*/ /*_#gtI__L8*/ meltfnum[7] = ((/*_#GET_INT__L7*/ meltfnum[5]) > (0));; - MELT_LOCATION("warmelt-outobj.melt:4580:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4586:/ cond"); /*cond*/ if (/*_#gtI__L8*/ meltfnum[7]) /*then*/ { /*^cond.then*/ @@ -3598,20 +3598,20 @@ meltlab_endgetargs: { - MELT_LOCATION("warmelt-outobj.melt:4582:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4588:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "[")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4583:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4589:/ locexp"); /*add2sbuf_string*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), melt_string_str((melt_ptr_t)(/*_.FILEV__V15*/ meltfptr[14]))); } ; { - MELT_LOCATION("warmelt-outobj.melt:4584:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4590:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ":")); } ; @@ -3619,22 +3619,22 @@ meltlab_endgetargs: (melt_get_int((melt_ptr_t)(/*_.LINEV__V14*/ meltfptr[13])));; { - MELT_LOCATION("warmelt-outobj.melt:4585:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4591:/ locexp"); meltgc_add_strbuf_dec((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#GET_INT__L9*/ meltfnum[8])); } ; { - MELT_LOCATION("warmelt-outobj.melt:4586:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4592:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "] ")); } ; - MELT_LOCATION("warmelt-outobj.melt:4581:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4587:/ quasiblock"); /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4580:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4586:/ clear"); /*clear*/ /*_#GET_INT__L9*/ meltfnum[8] = 0 ; } ; @@ -3642,26 +3642,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4588:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4594:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "#")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4589:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4595:/ locexp"); meltgc_add_strbuf_dec((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#UNIQRANK__L3*/ meltfnum[1])); } ; { - MELT_LOCATION("warmelt-outobj.melt:4590:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4596:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( " checkoff\", (")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4591:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4597:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -3677,14 +3677,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4592:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4598:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ">=0 && ")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4593:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4599:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -3700,14 +3700,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4594:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4600:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "< melt_multiple_length((melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4595:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4601:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -3723,26 +3723,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4596:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4602:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "))));")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4597:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4603:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4598:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4604:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "((meltmultiple_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4599:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4605:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -3758,14 +3758,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4600:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4606:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "))->tabval[")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4601:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4607:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -3781,14 +3781,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4602:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4608:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "] = (melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4603:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4609:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -3804,19 +3804,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4604:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4610:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ");")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4605:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4611:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4606:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4612:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -3826,7 +3826,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L10*/ meltfnum[8] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:4607:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4613:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[5])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[6]))) @@ -3854,7 +3854,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L12*/ meltfnum[11] = ((/*_#STRBUF_USEDLENGTH__L10*/ meltfnum[8]) < (/*_#GET_INT__L11*/ meltfnum[10]));; - MELT_LOCATION("warmelt-outobj.melt:4606:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4612:/ cond"); /*cond*/ if (/*_#ltI__L12*/ meltfnum[11]) /*then*/ { /*^cond.then*/ @@ -3862,7 +3862,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4606:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4612:/ cond.else"); /*^block*/ /*anyblock*/ @@ -3881,7 +3881,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4606; + argtab[2].meltbp_long = 4612; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V27*/ meltfptr[26] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -3890,7 +3890,7 @@ meltlab_endgetargs: /*_._IFELSE___V26*/ meltfptr[25] = /*_.MELT_ASSERT_FAILURE_FUN__V27*/ meltfptr[26];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4606:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4612:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V27*/ meltfptr[26] = 0 ; } ; @@ -3899,7 +3899,7 @@ meltlab_endgetargs: /*_.IFCPP___V24*/ meltfptr[23] = /*_._IFELSE___V26*/ meltfptr[25];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4606:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4612:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L10*/ meltfnum[8] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V25*/ meltfptr[24] = 0 ; @@ -3922,7 +3922,7 @@ meltlab_endgetargs: /*^compute*/ /*_.MULTI___V13*/ meltfptr[12] = /*_.IFCPP___V24*/ meltfptr[23];; - MELT_LOCATION("warmelt-outobj.melt:4555:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4561:/ clear"); /*clear*/ /*_.OUTPUT_LOCATION__V16*/ meltfptr[15] = 0 ; /*^clear*/ /*clear*/ /*_#GET_INT__L4*/ meltfnum[3] = 0 ; @@ -3953,7 +3953,7 @@ meltlab_endgetargs: /*clear*/ /*_.FILEV__V15*/ meltfptr[14] = 0 ; /*_.LET___V8*/ meltfptr[6] = /*_.MULTI___V13*/ meltfptr[12];; - MELT_LOCATION("warmelt-outobj.melt:4543:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4549:/ clear"); /*clear*/ /*_.ILOC__V9*/ meltfptr[5] = 0 ; /*^clear*/ /*clear*/ /*_.OTUP__V10*/ meltfptr[9] = 0 ; @@ -3968,13 +3968,13 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4541:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4547:/ quasiblock"); /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; { - MELT_LOCATION("warmelt-outobj.melt:4541:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4547:/ locexp"); /*ochecknores compilobj_nrep_return*/ #if MELT_HAVE_DEBUG > 0 if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) @@ -4075,12 +4075,12 @@ meltrout_98_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRHEAD(meltclosure_ptr_t meltclosp_ /* end of frame for routine meltrout_98_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRHEAD fromline 1756 */ /* classy proc frame meltrout_98_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRHEAD */ MeltFrame_meltrout_98_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRHEAD - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_98_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRHEAD fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_98_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRHEAD fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -4096,7 +4096,7 @@ meltrout_98_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRHEAD(meltclosure_ptr_t meltclosp_ /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:4616:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:4622:/ getarg"); /*_.OPUT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -4126,7 +4126,7 @@ meltlab_endgetargs: /*anyblock*/ { - MELT_LOCATION("warmelt-outobj.melt:4617:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4623:/ quasiblock"); /*^getslot*/ @@ -4137,7 +4137,7 @@ meltlab_endgetargs: /*_.OLOC__V6*/ meltfptr[5] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4618:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4624:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.OPUT__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTPAIR*/ meltfrout->tabval[0]))) @@ -4159,7 +4159,7 @@ meltlab_endgetargs: /*_.OPAIR__V7*/ meltfptr[6] = /*reallynil*/ NULL ;; } ; - MELT_LOCATION("warmelt-outobj.melt:4619:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4625:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.OPUT__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTPAIRHEAD*/ meltfrout->tabval[1]))) @@ -4181,7 +4181,7 @@ meltlab_endgetargs: /*_.OHEAD__V8*/ meltfptr[7] = /*reallynil*/ NULL ;; } ; - MELT_LOCATION("warmelt-outobj.melt:4620:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4626:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!OBJPUTPAIRHEAD_COUNTER*/ meltfrout->tabval[2])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[3]))) @@ -4213,7 +4213,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4623:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4629:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -4229,20 +4229,20 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4624:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4630:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "/*putpairhead*/")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4625:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4631:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4626:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4632:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!OBJPUTPAIRHEAD_COUNTER*/ meltfrout->tabval[2])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[3]))) @@ -4272,7 +4272,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4627:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4633:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_assertmsg(\"putpairhead /")); } ; @@ -4280,20 +4280,20 @@ meltlab_endgetargs: (melt_get_int((melt_ptr_t)(/*_.NEWCOUNT__V10*/ meltfptr[9])));; { - MELT_LOCATION("warmelt-outobj.melt:4628:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4634:/ locexp"); meltgc_add_strbuf_hex((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#GET_INT__L2*/ meltfnum[1])); } ; { - MELT_LOCATION("warmelt-outobj.melt:4629:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4635:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( " checkpair\", melt_magic_discr((melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4630:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4636:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -4309,26 +4309,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4631:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4637:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "))== MELTOBMAG_PAIR);")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4632:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4638:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4633:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4639:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "((meltpair_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4634:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4640:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -4344,14 +4344,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4635:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4641:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "))->hd = (melt_ptr_t) (")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4636:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4642:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -4367,19 +4367,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4637:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4643:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ");")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4638:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4644:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4639:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4645:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -4389,7 +4389,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[2] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:4640:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4646:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[6])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[3]))) @@ -4417,7 +4417,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L5*/ meltfnum[4] = ((/*_#STRBUF_USEDLENGTH__L3*/ meltfnum[2]) < (/*_#GET_INT__L4*/ meltfnum[3]));; - MELT_LOCATION("warmelt-outobj.melt:4639:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4645:/ cond"); /*cond*/ if (/*_#ltI__L5*/ meltfnum[4]) /*then*/ { /*^cond.then*/ @@ -4425,7 +4425,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4639:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4645:/ cond.else"); /*^block*/ /*anyblock*/ @@ -4444,7 +4444,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4639; + argtab[2].meltbp_long = 4645; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V18*/ meltfptr[17] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[7])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -4453,7 +4453,7 @@ meltlab_endgetargs: /*_._IFELSE___V17*/ meltfptr[16] = /*_.MELT_ASSERT_FAILURE_FUN__V18*/ meltfptr[17];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4639:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4645:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V18*/ meltfptr[17] = 0 ; } ; @@ -4462,7 +4462,7 @@ meltlab_endgetargs: /*_.IFCPP___V15*/ meltfptr[14] = /*_._IFELSE___V17*/ meltfptr[16];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4639:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4645:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V16*/ meltfptr[15] = 0 ; @@ -4482,7 +4482,7 @@ meltlab_endgetargs: /*^compute*/ /*_.LET___V5*/ meltfptr[4] = /*_.IFCPP___V15*/ meltfptr[14];; - MELT_LOCATION("warmelt-outobj.melt:4617:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4623:/ clear"); /*clear*/ /*_.OLOC__V6*/ meltfptr[5] = 0 ; /*^clear*/ /*clear*/ /*_.OPAIR__V7*/ meltfptr[6] = 0 ; @@ -4504,13 +4504,13 @@ meltlab_endgetargs: /*clear*/ /*_.OUTPUT_C_CODE__V14*/ meltfptr[13] = 0 ; /*^clear*/ /*clear*/ /*_.IFCPP___V15*/ meltfptr[14] = 0 ; - MELT_LOCATION("warmelt-outobj.melt:4616:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4622:/ quasiblock"); /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[4];; { - MELT_LOCATION("warmelt-outobj.melt:4616:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4622:/ locexp"); /*ochecknores compilobj_nrep_return*/ #if MELT_HAVE_DEBUG > 0 if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) @@ -4609,12 +4609,12 @@ meltrout_99_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRTAIL(meltclosure_ptr_t meltclosp_ /* end of frame for routine meltrout_99_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRTAIL fromline 1756 */ /* classy proc frame meltrout_99_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRTAIL */ MeltFrame_meltrout_99_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRTAIL - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_99_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRTAIL fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_99_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRTAIL fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -4630,7 +4630,7 @@ meltrout_99_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTPAIRTAIL(meltclosure_ptr_t meltclosp_ /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:4645:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:4651:/ getarg"); /*_.OPUT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -4660,7 +4660,7 @@ meltlab_endgetargs: /*anyblock*/ { - MELT_LOCATION("warmelt-outobj.melt:4646:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4652:/ quasiblock"); /*^getslot*/ @@ -4671,7 +4671,7 @@ meltlab_endgetargs: /*_.OLOC__V6*/ meltfptr[5] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4647:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4653:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.OPUT__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTPAIR*/ meltfrout->tabval[0]))) @@ -4693,7 +4693,7 @@ meltlab_endgetargs: /*_.OPAIR__V7*/ meltfptr[6] = /*reallynil*/ NULL ;; } ; - MELT_LOCATION("warmelt-outobj.melt:4648:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4654:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.OPUT__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTPAIRTAIL*/ meltfrout->tabval[1]))) @@ -4718,7 +4718,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4650:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4656:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -4734,19 +4734,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4651:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4657:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "/*putpairtail*/")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4652:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4658:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4653:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4659:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_assertmsg(\"putpairtail /")); } ; @@ -4754,20 +4754,20 @@ meltlab_endgetargs: (melt_obj_hash((melt_ptr_t)(/*_.OPUT__V2*/ meltfptr[1])));; { - MELT_LOCATION("warmelt-outobj.melt:4654:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4660:/ locexp"); meltgc_add_strbuf_hex((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#OBJ_HASH__L2*/ meltfnum[1])); } ; { - MELT_LOCATION("warmelt-outobj.melt:4655:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4661:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( " checkpair\", melt_magic_discr((melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4656:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4662:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -4783,26 +4783,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4657:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4663:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "))== MELTOBMAG_PAIR);")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4658:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4664:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4659:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4665:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "((meltpair_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4660:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4666:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -4818,14 +4818,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4661:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4667:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "))->tl = (meltpair_ptr_t) (")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4662:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4668:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -4841,19 +4841,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4663:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4669:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ");")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4664:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4670:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4665:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4671:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -4863,7 +4863,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[2] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:4666:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4672:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[4])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[5]))) @@ -4891,7 +4891,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L5*/ meltfnum[4] = ((/*_#STRBUF_USEDLENGTH__L3*/ meltfnum[2]) < (/*_#GET_INT__L4*/ meltfnum[3]));; - MELT_LOCATION("warmelt-outobj.melt:4665:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4671:/ cond"); /*cond*/ if (/*_#ltI__L5*/ meltfnum[4]) /*then*/ { /*^cond.then*/ @@ -4899,7 +4899,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4665:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4671:/ cond.else"); /*^block*/ /*anyblock*/ @@ -4918,7 +4918,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4665; + argtab[2].meltbp_long = 4671; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V16*/ meltfptr[15] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[6])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -4927,7 +4927,7 @@ meltlab_endgetargs: /*_._IFELSE___V15*/ meltfptr[14] = /*_.MELT_ASSERT_FAILURE_FUN__V16*/ meltfptr[15];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4665:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4671:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V16*/ meltfptr[15] = 0 ; } ; @@ -4936,7 +4936,7 @@ meltlab_endgetargs: /*_.IFCPP___V13*/ meltfptr[12] = /*_._IFELSE___V15*/ meltfptr[14];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4665:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4671:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V14*/ meltfptr[13] = 0 ; @@ -4956,7 +4956,7 @@ meltlab_endgetargs: /*^compute*/ /*_.LET___V5*/ meltfptr[4] = /*_.IFCPP___V13*/ meltfptr[12];; - MELT_LOCATION("warmelt-outobj.melt:4646:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4652:/ clear"); /*clear*/ /*_.OLOC__V6*/ meltfptr[5] = 0 ; /*^clear*/ /*clear*/ /*_.OPAIR__V7*/ meltfptr[6] = 0 ; @@ -4974,13 +4974,13 @@ meltlab_endgetargs: /*clear*/ /*_.OUTPUT_C_CODE__V12*/ meltfptr[11] = 0 ; /*^clear*/ /*clear*/ /*_.IFCPP___V13*/ meltfptr[12] = 0 ; - MELT_LOCATION("warmelt-outobj.melt:4645:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4651:/ quasiblock"); /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[4];; { - MELT_LOCATION("warmelt-outobj.melt:4645:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4651:/ locexp"); /*ochecknores compilobj_nrep_return*/ #if MELT_HAVE_DEBUG > 0 if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) @@ -5079,12 +5079,12 @@ meltrout_100_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTLIST(meltclosure_ptr_t meltclosp_, m /* end of frame for routine meltrout_100_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTLIST fromline 1756 */ /* classy proc frame meltrout_100_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTLIST */ MeltFrame_meltrout_100_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTLIST - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_100_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTLIST fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_100_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTLIST fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -5100,7 +5100,7 @@ meltrout_100_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTLIST(meltclosure_ptr_t meltclosp_, m /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:4671:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:4677:/ getarg"); /*_.OPUT__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -5130,7 +5130,7 @@ meltlab_endgetargs: /*anyblock*/ { - MELT_LOCATION("warmelt-outobj.melt:4672:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4678:/ quasiblock"); /*^getslot*/ @@ -5141,7 +5141,7 @@ meltlab_endgetargs: /*_.OLOC__V6*/ meltfptr[5] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4673:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4679:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.OPUT__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTLIST*/ meltfrout->tabval[0]))) @@ -5163,7 +5163,7 @@ meltlab_endgetargs: /*_.OLIST__V7*/ meltfptr[6] = /*reallynil*/ NULL ;; } ; - MELT_LOCATION("warmelt-outobj.melt:4674:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4680:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.OPUT__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTLIST*/ meltfrout->tabval[0]))) @@ -5185,7 +5185,7 @@ meltlab_endgetargs: /*_.OFIRST__V8*/ meltfptr[7] = /*reallynil*/ NULL ;; } ; - MELT_LOCATION("warmelt-outobj.melt:4675:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4681:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.OPUT__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTLIST*/ meltfrout->tabval[0]))) @@ -5210,7 +5210,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4677:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4683:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -5226,26 +5226,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4678:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4684:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "/*putlist*/")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4679:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4685:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4680:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4686:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_assertmsg(\"putlist checklist\", melt_magic_discr((melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4681:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4687:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -5261,26 +5261,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4682:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4688:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "))== MELTOBMAG_LIST);")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4683:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4689:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4684:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4690:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "((meltlist_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4685:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4691:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -5296,14 +5296,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4686:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4692:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "))->first = (meltpair_ptr_t) (")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4687:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4693:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -5319,26 +5319,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4688:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4694:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ");")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4689:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4695:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4690:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4696:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "((meltlist_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4691:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4697:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -5354,14 +5354,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4692:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4698:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "))->last = (meltpair_ptr_t) (")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4693:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4699:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -5377,19 +5377,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4694:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4700:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ");")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4695:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4701:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4696:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4702:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -5399,7 +5399,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:4697:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4703:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[3])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[4]))) @@ -5427,7 +5427,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L4*/ meltfnum[3] = ((/*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1]) < (/*_#GET_INT__L3*/ meltfnum[2]));; - MELT_LOCATION("warmelt-outobj.melt:4696:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4702:/ cond"); /*cond*/ if (/*_#ltI__L4*/ meltfnum[3]) /*then*/ { /*^cond.then*/ @@ -5435,7 +5435,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4696:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4702:/ cond.else"); /*^block*/ /*anyblock*/ @@ -5454,7 +5454,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4696; + argtab[2].meltbp_long = 4702; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V19*/ meltfptr[18] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[5])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -5463,7 +5463,7 @@ meltlab_endgetargs: /*_._IFELSE___V18*/ meltfptr[17] = /*_.MELT_ASSERT_FAILURE_FUN__V19*/ meltfptr[18];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4696:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4702:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V19*/ meltfptr[18] = 0 ; } ; @@ -5472,7 +5472,7 @@ meltlab_endgetargs: /*_.IFCPP___V16*/ meltfptr[15] = /*_._IFELSE___V18*/ meltfptr[17];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4696:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4702:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L2*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V17*/ meltfptr[16] = 0 ; @@ -5492,7 +5492,7 @@ meltlab_endgetargs: /*^compute*/ /*_.LET___V5*/ meltfptr[4] = /*_.IFCPP___V16*/ meltfptr[15];; - MELT_LOCATION("warmelt-outobj.melt:4672:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4678:/ clear"); /*clear*/ /*_.OLOC__V6*/ meltfptr[5] = 0 ; /*^clear*/ /*clear*/ /*_.OLIST__V7*/ meltfptr[6] = 0 ; @@ -5514,13 +5514,13 @@ meltlab_endgetargs: /*clear*/ /*_.OUTPUT_C_CODE__V15*/ meltfptr[14] = 0 ; /*^clear*/ /*clear*/ /*_.IFCPP___V16*/ meltfptr[15] = 0 ; - MELT_LOCATION("warmelt-outobj.melt:4671:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4677:/ quasiblock"); /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V5*/ meltfptr[4];; { - MELT_LOCATION("warmelt-outobj.melt:4671:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4677:/ locexp"); /*ochecknores compilobj_nrep_return*/ #if MELT_HAVE_DEBUG > 0 if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) @@ -5619,12 +5619,12 @@ meltrout_101_WARMELTmiOUTOBJ_OUTPUCOD_OBJGETSLOT(meltclosure_ptr_t meltclosp_, m /* end of frame for routine meltrout_101_WARMELTmiOUTOBJ_OUTPUCOD_OBJGETSLOT fromline 1756 */ /* classy proc frame meltrout_101_WARMELTmiOUTOBJ_OUTPUCOD_OBJGETSLOT */ MeltFrame_meltrout_101_WARMELTmiOUTOBJ_OUTPUCOD_OBJGETSLOT - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_101_WARMELTmiOUTOBJ_OUTPUCOD_OBJGETSLOT fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_101_WARMELTmiOUTOBJ_OUTPUCOD_OBJGETSLOT fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -5640,7 +5640,7 @@ meltrout_101_WARMELTmiOUTOBJ_OUTPUCOD_OBJGETSLOT(meltclosure_ptr_t meltclosp_, m /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:4702:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:4708:/ getarg"); /*_.OGSL__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -5672,7 +5672,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4703:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4709:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -5682,7 +5682,7 @@ meltlab_endgetargs: ; /*_#IS_A__L2*/ meltfnum[1] = melt_is_instance_of((melt_ptr_t)(/*_.OGSL__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJGETSLOT*/ meltfrout->tabval[0])));; - MELT_LOCATION("warmelt-outobj.melt:4703:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4709:/ cond"); /*cond*/ if (/*_#IS_A__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -5690,7 +5690,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4703:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4709:/ cond.else"); /*^block*/ /*anyblock*/ @@ -5709,7 +5709,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4703; + argtab[2].meltbp_long = 4709; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OGSL__V2*/ meltfptr[1]; /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -5718,7 +5718,7 @@ meltlab_endgetargs: /*_._IFELSE___V6*/ meltfptr[5] = /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4703:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4709:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = 0 ; } ; @@ -5727,7 +5727,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = /*_._IFELSE___V6*/ meltfptr[5];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4703:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4709:/ clear"); /*clear*/ /*_#IS_A__L2*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V6*/ meltfptr[5] = 0 ; @@ -5738,7 +5738,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = (/*nil*/NULL); #endif /*MELT_HAVE_DEBUG>0*/ ; - MELT_LOCATION("warmelt-outobj.melt:4704:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4710:/ quasiblock"); /*^getslot*/ @@ -5749,7 +5749,7 @@ meltlab_endgetargs: /*_.OLOC__V9*/ meltfptr[5] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4705:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4711:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OGSL__V2*/ meltfptr[1]) /*=obj*/; @@ -5757,7 +5757,7 @@ meltlab_endgetargs: /*_.DESTLIST__V10*/ meltfptr[9] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4706:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4712:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OGSL__V2*/ meltfptr[1]) /*=obj*/; @@ -5765,7 +5765,7 @@ meltlab_endgetargs: /*_.OOBJ__V11*/ meltfptr[10] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4707:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4713:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OGSL__V2*/ meltfptr[1]) /*=obj*/; @@ -5780,7 +5780,7 @@ meltlab_endgetargs: (meltgc_new_int((meltobject_ptr_t)((/*!DISCR_INTEGER*/ meltfrout->tabval[2])), (/*_#plI__L3*/ meltfnum[1])));; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4710:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4716:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -5790,7 +5790,7 @@ meltlab_endgetargs: ; /*_#IS_A__L4*/ meltfnum[3] = melt_is_instance_of((melt_ptr_t)(/*_.OFIELD__V12*/ meltfptr[11]), (melt_ptr_t)((/*!CLASS_FIELD*/ meltfrout->tabval[3])));; - MELT_LOCATION("warmelt-outobj.melt:4710:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4716:/ cond"); /*cond*/ if (/*_#IS_A__L4*/ meltfnum[3]) /*then*/ { /*^cond.then*/ @@ -5798,7 +5798,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4710:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4716:/ cond.else"); /*^block*/ /*anyblock*/ @@ -5817,7 +5817,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4710; + argtab[2].meltbp_long = 4716; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OFIELD__V12*/ meltfptr[11]; /*_.MELT_ASSERT_FAILURE_FUN__V16*/ meltfptr[15] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -5826,7 +5826,7 @@ meltlab_endgetargs: /*_._IFELSE___V15*/ meltfptr[14] = /*_.MELT_ASSERT_FAILURE_FUN__V16*/ meltfptr[15];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4710:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4716:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V16*/ meltfptr[15] = 0 ; } ; @@ -5835,7 +5835,7 @@ meltlab_endgetargs: /*_.IFCPP___V14*/ meltfptr[13] = /*_._IFELSE___V15*/ meltfptr[14];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4710:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4716:/ clear"); /*clear*/ /*_#IS_A__L4*/ meltfnum[3] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V15*/ meltfptr[14] = 0 ; @@ -5849,7 +5849,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4711:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4717:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -5865,7 +5865,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4712:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4718:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "{ melt_ptr_t slot=NULL, obj=NULL;")); } ; @@ -5873,20 +5873,20 @@ meltlab_endgetargs: ((1) + (/*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION("warmelt-outobj.melt:4713:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4719:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#plI__L5*/ meltfnum[3]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4714:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4720:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "obj = (melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4715:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4721:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -5902,7 +5902,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4716:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4722:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ") /*=obj*/;")); } ; @@ -5910,13 +5910,13 @@ meltlab_endgetargs: ((1) + (/*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION("warmelt-outobj.melt:4717:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4723:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#plI__L6*/ meltfnum[5]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4718:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4724:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_object_get_field(slot,obj, ")); } ; @@ -5924,17 +5924,17 @@ meltlab_endgetargs: (melt_get_int((melt_ptr_t)(/*_.OFIELD__V12*/ meltfptr[11])));; { - MELT_LOCATION("warmelt-outobj.melt:4719:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4725:/ locexp"); meltgc_add_strbuf_dec((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#GET_INT__L7*/ meltfnum[6])); } ; { - MELT_LOCATION("warmelt-outobj.melt:4720:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4726:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ", \"")); } ; - MELT_LOCATION("warmelt-outobj.melt:4721:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4727:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OFIELD__V12*/ meltfptr[11]) /*=obj*/; @@ -5951,7 +5951,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4722:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4728:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "\");")); } ; @@ -5959,7 +5959,7 @@ meltlab_endgetargs: ((1) + (/*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION("warmelt-outobj.melt:4723:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4729:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#plI__L8*/ meltfnum[7]), 0); } ; @@ -5978,7 +5978,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4727:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4733:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -5994,7 +5994,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4728:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4734:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -6004,7 +6004,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L10*/ meltfnum[9] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:4729:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4735:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[6])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[7]))) @@ -6032,7 +6032,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L12*/ meltfnum[11] = ((/*_#STRBUF_USEDLENGTH__L10*/ meltfnum[9]) < (/*_#GET_INT__L11*/ meltfnum[10]));; - MELT_LOCATION("warmelt-outobj.melt:4728:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4734:/ cond"); /*cond*/ if (/*_#ltI__L12*/ meltfnum[11]) /*then*/ { /*^cond.then*/ @@ -6040,7 +6040,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4728:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4734:/ cond.else"); /*^block*/ /*anyblock*/ @@ -6059,7 +6059,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4728; + argtab[2].meltbp_long = 4734; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V26*/ meltfptr[25] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -6068,7 +6068,7 @@ meltlab_endgetargs: /*_._IFELSE___V25*/ meltfptr[24] = /*_.MELT_ASSERT_FAILURE_FUN__V26*/ meltfptr[25];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4728:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4734:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V26*/ meltfptr[25] = 0 ; } ; @@ -6077,7 +6077,7 @@ meltlab_endgetargs: /*_.IFCPP___V23*/ meltfptr[22] = /*_._IFELSE___V25*/ meltfptr[24];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4728:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4734:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L10*/ meltfnum[9] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V24*/ meltfptr[23] = 0 ; @@ -6096,7 +6096,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4730:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4736:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( " = ")); } ; @@ -6107,7 +6107,7 @@ meltlab_endgetargs: /*citerepilog*/ - MELT_LOCATION("warmelt-outobj.melt:4724:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4730:/ clear"); /*clear*/ /*_.CURPAIR__V20*/ meltfptr[19] = 0 ; /*^clear*/ /*clear*/ /*_.DST__V21*/ meltfptr[20] = 0 ; @@ -6121,19 +6121,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4731:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4737:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "slot; };")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4732:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4738:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4733:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4739:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -6143,7 +6143,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L13*/ meltfnum[9] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:4734:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4740:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[6])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[7]))) @@ -6171,7 +6171,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L15*/ meltfnum[11] = ((/*_#STRBUF_USEDLENGTH__L13*/ meltfnum[9]) < (/*_#GET_INT__L14*/ meltfnum[10]));; - MELT_LOCATION("warmelt-outobj.melt:4733:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4739:/ cond"); /*cond*/ if (/*_#ltI__L15*/ meltfnum[11]) /*then*/ { /*^cond.then*/ @@ -6179,7 +6179,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4733:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4739:/ cond.else"); /*^block*/ /*anyblock*/ @@ -6198,7 +6198,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4733; + argtab[2].meltbp_long = 4739; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V30*/ meltfptr[29] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -6207,7 +6207,7 @@ meltlab_endgetargs: /*_._IFELSE___V29*/ meltfptr[24] = /*_.MELT_ASSERT_FAILURE_FUN__V30*/ meltfptr[29];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4733:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4739:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V30*/ meltfptr[29] = 0 ; } ; @@ -6216,7 +6216,7 @@ meltlab_endgetargs: /*_.IFCPP___V27*/ meltfptr[25] = /*_._IFELSE___V29*/ meltfptr[24];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4733:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4739:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L13*/ meltfnum[9] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V28*/ meltfptr[23] = 0 ; @@ -6236,7 +6236,7 @@ meltlab_endgetargs: /*^compute*/ /*_.LET___V8*/ meltfptr[6] = /*_.IFCPP___V27*/ meltfptr[25];; - MELT_LOCATION("warmelt-outobj.melt:4704:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4710:/ clear"); /*clear*/ /*_.OLOC__V9*/ meltfptr[5] = 0 ; /*^clear*/ /*clear*/ /*_.DESTLIST__V10*/ meltfptr[9] = 0 ; @@ -6269,13 +6269,13 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4702:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4708:/ quasiblock"); /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; { - MELT_LOCATION("warmelt-outobj.melt:4702:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4708:/ locexp"); /*ochecknores compilobj_nrep_return*/ #if MELT_HAVE_DEBUG > 0 if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) @@ -6376,12 +6376,12 @@ meltrout_102_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTSLOT(meltclosure_ptr_t meltclosp_, m /* end of frame for routine meltrout_102_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTSLOT fromline 1756 */ /* classy proc frame meltrout_102_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTSLOT */ MeltFrame_meltrout_102_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTSLOT - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_102_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTSLOT fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_102_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTSLOT fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -6397,7 +6397,7 @@ meltrout_102_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTSLOT(meltclosure_ptr_t meltclosp_, m /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:4741:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:4747:/ getarg"); /*_.OPSLO__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -6429,7 +6429,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4742:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4748:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -6455,7 +6455,7 @@ meltlab_endgetargs: 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG*/ ;; - MELT_LOCATION("warmelt-outobj.melt:4742:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4748:/ cond"); /*cond*/ if (/*_#MELT_NEED_DBG__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -6474,7 +6474,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4742:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4748:/ apply"); /*apply*/ { union meltparam_un argtab[5]; @@ -6484,7 +6484,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4742; + argtab[2].meltbp_long = 4748; /*^apply.arg*/ argtab[3].meltbp_cstring = "outpucod_objputslot opslo="; /*^apply.arg*/ @@ -6495,7 +6495,7 @@ meltlab_endgetargs: /*_._IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4742:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4748:/ clear"); /*clear*/ /*_#MELT_CALLCOUNT__L3*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0 ; @@ -6510,7 +6510,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4742:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4748:/ locexp"); /*void*/(void)0; } ; @@ -6544,7 +6544,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4743:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4749:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -6554,7 +6554,7 @@ meltlab_endgetargs: ; /*_#IS_A__L4*/ meltfnum[2] = melt_is_instance_of((melt_ptr_t)(/*_.OPSLO__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTSLOT*/ meltfrout->tabval[1])));; - MELT_LOCATION("warmelt-outobj.melt:4743:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4749:/ cond"); /*cond*/ if (/*_#IS_A__L4*/ meltfnum[2]) /*then*/ { /*^cond.then*/ @@ -6562,7 +6562,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4743:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4749:/ cond.else"); /*^block*/ /*anyblock*/ @@ -6581,7 +6581,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4743; + argtab[2].meltbp_long = 4749; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OPSLO__V2*/ meltfptr[1]; /*_.MELT_ASSERT_FAILURE_FUN__V9*/ meltfptr[8] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[2])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -6590,7 +6590,7 @@ meltlab_endgetargs: /*_._IFELSE___V8*/ meltfptr[4] = /*_.MELT_ASSERT_FAILURE_FUN__V9*/ meltfptr[8];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4743:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4749:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V9*/ meltfptr[8] = 0 ; } ; @@ -6599,7 +6599,7 @@ meltlab_endgetargs: /*_.IFCPP___V7*/ meltfptr[5] = /*_._IFELSE___V8*/ meltfptr[4];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4743:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4749:/ clear"); /*clear*/ /*_#IS_A__L4*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V8*/ meltfptr[4] = 0 ; @@ -6648,7 +6648,7 @@ meltlab_endgetargs: /*_._IF___V10*/ meltfptr[8] = /*reallynil*/ NULL ;; } ; - MELT_LOCATION("warmelt-outobj.melt:4745:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4751:/ quasiblock"); /*^getslot*/ @@ -6659,7 +6659,7 @@ meltlab_endgetargs: /*_.ILOC__V13*/ meltfptr[12] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4746:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4752:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPSLO__V2*/ meltfptr[1]) /*=obj*/; @@ -6667,7 +6667,7 @@ meltlab_endgetargs: /*_.ODATA__V14*/ meltfptr[13] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4747:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4753:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPSLO__V2*/ meltfptr[1]) /*=obj*/; @@ -6675,7 +6675,7 @@ meltlab_endgetargs: /*_.OOFF__V15*/ meltfptr[14] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4748:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4754:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPSLO__V2*/ meltfptr[1]) /*=obj*/; @@ -6683,7 +6683,7 @@ meltlab_endgetargs: /*_.OFIELD__V16*/ meltfptr[15] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4749:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4755:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPSLO__V2*/ meltfptr[1]) /*=obj*/; @@ -6691,7 +6691,7 @@ meltlab_endgetargs: /*_.OVAL__V17*/ meltfptr[16] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4750:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4756:/ quasiblock"); /*_.MSGBUF__V19*/ meltfptr[18] = @@ -6699,7 +6699,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4752:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4758:/ apply"); /*apply*/ { union meltparam_un argtab[1]; @@ -6714,7 +6714,7 @@ meltlab_endgetargs: ; /*_#IS_A__L5*/ meltfnum[1] = melt_is_instance_of((melt_ptr_t)(/*_.ODATA__V14*/ meltfptr[13]), (melt_ptr_t)((/*!CLASS_NAMED*/ meltfrout->tabval[6])));; - MELT_LOCATION("warmelt-outobj.melt:4753:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4759:/ cond"); /*cond*/ if (/*_#IS_A__L5*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -6722,7 +6722,7 @@ meltlab_endgetargs: /*anyblock*/ { - MELT_LOCATION("warmelt-outobj.melt:4754:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4760:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.ODATA__V14*/ meltfptr[13]) /*=obj*/; @@ -6748,7 +6748,7 @@ meltlab_endgetargs: /*_._IFELSE___V21*/ meltfptr[20] = /*_.ADD2OUT__V23*/ meltfptr[22];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4753:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4759:/ clear"); /*clear*/ /*_.NAMED_NAME__V22*/ meltfptr[21] = 0 ; /*^clear*/ /*clear*/ /*_.ADD2OUT__V23*/ meltfptr[22] = 0 ; @@ -6767,7 +6767,7 @@ meltlab_endgetargs: ; /*_#IS_A__L6*/ meltfnum[2] = melt_is_instance_of((melt_ptr_t)(/*_.ODATA__V14*/ meltfptr[13]), (melt_ptr_t)((/*!CLASS_OBJINITELEM*/ meltfrout->tabval[7])));; - MELT_LOCATION("warmelt-outobj.melt:4756:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4762:/ cond"); /*cond*/ if (/*_#IS_A__L6*/ meltfnum[2]) /*then*/ { /*^cond.then*/ @@ -6775,7 +6775,7 @@ meltlab_endgetargs: /*anyblock*/ { - MELT_LOCATION("warmelt-outobj.melt:4757:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4763:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.ODATA__V14*/ meltfptr[13]) /*=obj*/; @@ -6801,7 +6801,7 @@ meltlab_endgetargs: /*_._IFELSE___V24*/ meltfptr[21] = /*_.ADD2OUT__V26*/ meltfptr[25];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4756:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4762:/ clear"); /*clear*/ /*_.OIE_CNAME__V25*/ meltfptr[22] = 0 ; /*^clear*/ /*clear*/ /*_.ADD2OUT__V26*/ meltfptr[25] = 0 ; @@ -6818,7 +6818,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4759:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4765:/ apply"); /*apply*/ { union meltparam_un argtab[1]; @@ -6828,7 +6828,7 @@ meltlab_endgetargs: /*_.ADD2OUT__V27*/ meltfptr[22] = melt_apply ((meltclosure_ptr_t)((/*!ADD2OUT*/ meltfrout->tabval[5])), (melt_ptr_t)(/*_.MSGBUF__V19*/ meltfptr[18]), (MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un*)0); } ; - MELT_LOCATION("warmelt-outobj.melt:4758:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4764:/ quasiblock"); /*_.PROGN___V28*/ meltfptr[25] = /*_.ADD2OUT__V27*/ meltfptr[22];; @@ -6836,7 +6836,7 @@ meltlab_endgetargs: /*_._IFELSE___V24*/ meltfptr[21] = /*_.PROGN___V28*/ meltfptr[25];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4756:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4762:/ clear"); /*clear*/ /*_.ADD2OUT__V27*/ meltfptr[22] = 0 ; /*^clear*/ /*clear*/ /*_.PROGN___V28*/ meltfptr[25] = 0 ; @@ -6847,7 +6847,7 @@ meltlab_endgetargs: /*_._IFELSE___V21*/ meltfptr[20] = /*_._IFELSE___V24*/ meltfptr[21];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4753:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4759:/ clear"); /*clear*/ /*_#IS_A__L6*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V24*/ meltfptr[21] = 0 ; @@ -6860,7 +6860,7 @@ meltlab_endgetargs: ; /*_#IS_A__L7*/ meltfnum[2] = melt_is_instance_of((melt_ptr_t)(/*_.OFIELD__V16*/ meltfptr[15]), (melt_ptr_t)((/*!CLASS_NAMED*/ meltfrout->tabval[6])));; - MELT_LOCATION("warmelt-outobj.melt:4760:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4766:/ cond"); /*cond*/ if (/*_#IS_A__L7*/ meltfnum[2]) /*then*/ { /*^cond.then*/ @@ -6868,7 +6868,7 @@ meltlab_endgetargs: /*anyblock*/ { - MELT_LOCATION("warmelt-outobj.melt:4761:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4767:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OFIELD__V16*/ meltfptr[15]) /*=obj*/; @@ -6894,7 +6894,7 @@ meltlab_endgetargs: /*_._IFELSE___V29*/ meltfptr[22] = /*_.ADD2OUT__V31*/ meltfptr[21];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4760:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4766:/ clear"); /*clear*/ /*_.NAMED_NAME__V30*/ meltfptr[25] = 0 ; /*^clear*/ /*clear*/ /*_.ADD2OUT__V31*/ meltfptr[21] = 0 ; @@ -6911,7 +6911,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4763:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4769:/ apply"); /*apply*/ { union meltparam_un argtab[2]; @@ -6923,7 +6923,7 @@ meltlab_endgetargs: /*_.ADD2OUT__V32*/ meltfptr[25] = melt_apply ((meltclosure_ptr_t)((/*!ADD2OUT*/ meltfrout->tabval[5])), (melt_ptr_t)(/*_.MSGBUF__V19*/ meltfptr[18]), (MELTBPARSTR_CSTRING MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; - MELT_LOCATION("warmelt-outobj.melt:4762:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4768:/ quasiblock"); /*_.PROGN___V33*/ meltfptr[21] = /*_.ADD2OUT__V32*/ meltfptr[25];; @@ -6931,7 +6931,7 @@ meltlab_endgetargs: /*_._IFELSE___V29*/ meltfptr[22] = /*_.PROGN___V33*/ meltfptr[21];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4760:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4766:/ clear"); /*clear*/ /*_.ADD2OUT__V32*/ meltfptr[25] = 0 ; /*^clear*/ /*clear*/ /*_.PROGN___V33*/ meltfptr[21] = 0 ; @@ -6944,7 +6944,7 @@ meltlab_endgetargs: /*^compute*/ /*_.LET___V18*/ meltfptr[17] = /*_.STRBUF2STRING__V34*/ meltfptr[25];; - MELT_LOCATION("warmelt-outobj.melt:4750:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4756:/ clear"); /*clear*/ /*_.MSGBUF__V19*/ meltfptr[18] = 0 ; /*^clear*/ /*clear*/ /*_.ADD2OUT__V20*/ meltfptr[19] = 0 ; @@ -6961,7 +6961,7 @@ meltlab_endgetargs: /*_.MSG__V35*/ meltfptr[21] = /*_.LET___V18*/ meltfptr[17];; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4766:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4772:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -6987,7 +6987,7 @@ meltlab_endgetargs: 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG*/ ;; - MELT_LOCATION("warmelt-outobj.melt:4766:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4772:/ cond"); /*cond*/ if (/*_#MELT_NEED_DBG__L8*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -7006,7 +7006,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4766:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4772:/ apply"); /*apply*/ { union meltparam_un argtab[5]; @@ -7016,7 +7016,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4766; + argtab[2].meltbp_long = 4772; /*^apply.arg*/ argtab[3].meltbp_cstring = "outpucod_objputslot msg="; /*^apply.arg*/ @@ -7027,7 +7027,7 @@ meltlab_endgetargs: /*_._IF___V36*/ meltfptr[18] = /*_.MELT_DEBUG_FUN__V37*/ meltfptr[19];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4766:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4772:/ clear"); /*clear*/ /*_#MELT_CALLCOUNT__L9*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_.MELT_DEBUG_FUN__V37*/ meltfptr[19] = 0 ; @@ -7042,7 +7042,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4766:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4772:/ locexp"); /*void*/(void)0; } ; @@ -7076,7 +7076,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4767:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4773:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -7086,7 +7086,7 @@ meltlab_endgetargs: ; /*_#IS_NOT_A__L10*/ meltfnum[2] = !melt_is_instance_of((melt_ptr_t)(/*_.OVAL__V17*/ meltfptr[16]), (melt_ptr_t)((/*!CLASS_NREP*/ meltfrout->tabval[9])));; - MELT_LOCATION("warmelt-outobj.melt:4767:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4773:/ cond"); /*cond*/ if (/*_#IS_NOT_A__L10*/ meltfnum[2]) /*then*/ { /*^cond.then*/ @@ -7094,7 +7094,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4767:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4773:/ cond.else"); /*^block*/ /*anyblock*/ @@ -7113,7 +7113,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4767; + argtab[2].meltbp_long = 4773; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OVAL__V17*/ meltfptr[16]; /*_.MELT_ASSERT_FAILURE_FUN__V40*/ meltfptr[25] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[2])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -7122,7 +7122,7 @@ meltlab_endgetargs: /*_._IFELSE___V39*/ meltfptr[22] = /*_.MELT_ASSERT_FAILURE_FUN__V40*/ meltfptr[25];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4767:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4773:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V40*/ meltfptr[25] = 0 ; } ; @@ -7131,7 +7131,7 @@ meltlab_endgetargs: /*_.IFCPP___V38*/ meltfptr[20] = /*_._IFELSE___V39*/ meltfptr[22];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4767:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4773:/ clear"); /*clear*/ /*_#IS_NOT_A__L10*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V39*/ meltfptr[22] = 0 ; @@ -7145,7 +7145,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4768:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4774:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -7161,20 +7161,20 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4769:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4775:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "/*putslot*/")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4770:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4776:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4771:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4777:/ apply"); /*apply*/ { union meltparam_un argtab[2]; @@ -7188,14 +7188,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4772:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4778:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "\", melt_magic_discr((melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4773:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4779:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -7211,13 +7211,13 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4774:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4780:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ")) == MELTOBMAG_OBJECT);")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4775:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4781:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; @@ -7226,7 +7226,7 @@ meltlab_endgetargs: ; /*_#IS_A__L11*/ meltfnum[1] = melt_is_instance_of((melt_ptr_t)(/*_.OFIELD__V16*/ meltfptr[15]), (melt_ptr_t)((/*!CLASS_FIELD*/ meltfrout->tabval[12])));; - MELT_LOCATION("warmelt-outobj.melt:4776:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4782:/ cond"); /*cond*/ if (/*_#IS_A__L11*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -7236,14 +7236,14 @@ meltlab_endgetargs: { - MELT_LOCATION("warmelt-outobj.melt:4778:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4784:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_putfield_object((")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4779:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4785:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -7259,14 +7259,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4780:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4786:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "), (")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4781:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4787:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -7282,7 +7282,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4782:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4788:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "), (")); } ; @@ -7291,7 +7291,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4783:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4789:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -7307,11 +7307,11 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4784:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4790:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "), \"")); } ; - MELT_LOCATION("warmelt-outobj.melt:4785:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4791:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OFIELD__V16*/ meltfptr[15]) /*=obj*/; @@ -7328,16 +7328,16 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4786:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4792:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "\");")); } ; - MELT_LOCATION("warmelt-outobj.melt:4777:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4783:/ quasiblock"); /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4776:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4782:/ clear"); /*clear*/ /*_.OUTPUT_C_CODE__V44*/ meltfptr[22] = 0 ; /*^clear*/ /*clear*/ /*_.OUTPUT_C_CODE__V45*/ meltfptr[44] = 0 ; @@ -7359,14 +7359,14 @@ meltlab_endgetargs: { - MELT_LOCATION("warmelt-outobj.melt:4790:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4796:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4791:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4797:/ apply"); /*apply*/ { union meltparam_un argtab[2]; @@ -7380,14 +7380,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4792:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4798:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "\", (")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4793:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4799:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -7403,14 +7403,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4794:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4800:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ">=0 && ")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4795:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4801:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -7426,14 +7426,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4796:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4802:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "< melt_object_length((melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4797:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4803:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -7449,26 +7449,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4798:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4804:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "))));")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4799:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4805:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4800:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4806:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "((meltobject_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4801:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4807:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -7484,14 +7484,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4802:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4808:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "))->obj_vartab[")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4803:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4809:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -7507,7 +7507,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4804:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4810:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "] = (melt_ptr_t)(")); } ; @@ -7515,7 +7515,7 @@ meltlab_endgetargs: ((1) + (/*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION("warmelt-outobj.melt:4805:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4811:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#plI__L13*/ meltfnum[2]), 0); } ; @@ -7524,7 +7524,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4806:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4812:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -7540,16 +7540,16 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4807:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4813:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ");")); } ; - MELT_LOCATION("warmelt-outobj.melt:4788:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4794:/ quasiblock"); /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4776:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4782:/ clear"); /*clear*/ /*_.ADD2OUT__V48*/ meltfptr[22] = 0 ; /*^clear*/ /*clear*/ /*_.OUTPUT_C_CODE__V49*/ meltfptr[44] = 0 ; @@ -7573,13 +7573,13 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4810:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4816:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4811:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4817:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -7589,7 +7589,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L15*/ meltfnum[2] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:4812:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4818:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[13])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[14]))) @@ -7617,7 +7617,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L17*/ meltfnum[16] = ((/*_#STRBUF_USEDLENGTH__L15*/ meltfnum[2]) < (/*_#GET_INT__L16*/ meltfnum[13]));; - MELT_LOCATION("warmelt-outobj.melt:4811:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4817:/ cond"); /*cond*/ if (/*_#ltI__L17*/ meltfnum[16]) /*then*/ { /*^cond.then*/ @@ -7625,7 +7625,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4811:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4817:/ cond.else"); /*^block*/ /*anyblock*/ @@ -7644,7 +7644,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4811; + argtab[2].meltbp_long = 4817; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V58*/ meltfptr[46] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[2])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -7653,7 +7653,7 @@ meltlab_endgetargs: /*_._IFELSE___V57*/ meltfptr[45] = /*_.MELT_ASSERT_FAILURE_FUN__V58*/ meltfptr[46];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4811:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4817:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V58*/ meltfptr[46] = 0 ; } ; @@ -7662,7 +7662,7 @@ meltlab_endgetargs: /*_.IFCPP___V55*/ meltfptr[22] = /*_._IFELSE___V57*/ meltfptr[45];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4811:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4817:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L15*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V56*/ meltfptr[44] = 0 ; @@ -7682,7 +7682,7 @@ meltlab_endgetargs: /*^compute*/ /*_.LET___V12*/ meltfptr[4] = /*_.IFCPP___V55*/ meltfptr[22];; - MELT_LOCATION("warmelt-outobj.melt:4745:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4751:/ clear"); /*clear*/ /*_.ILOC__V13*/ meltfptr[12] = 0 ; /*^clear*/ /*clear*/ /*_.ODATA__V14*/ meltfptr[13] = 0 ; @@ -7711,13 +7711,13 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4741:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4747:/ quasiblock"); /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V12*/ meltfptr[4];; { - MELT_LOCATION("warmelt-outobj.melt:4741:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4747:/ locexp"); /*ochecknores compilobj_nrep_return*/ #if MELT_HAVE_DEBUG > 0 if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) @@ -7820,12 +7820,12 @@ meltrout_103_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSUROUT(meltclosure_ptr_t meltclos /* end of frame for routine meltrout_103_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSUROUT fromline 1756 */ /* classy proc frame meltrout_103_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSUROUT */ MeltFrame_meltrout_103_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSUROUT - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_103_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSUROUT fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_103_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSUROUT fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -7841,7 +7841,7 @@ meltrout_103_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSUROUT(meltclosure_ptr_t meltclos /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:4819:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:4825:/ getarg"); /*_.OPCLOR__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -7873,7 +7873,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4820:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4826:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -7883,7 +7883,7 @@ meltlab_endgetargs: ; /*_#IS_A__L2*/ meltfnum[1] = melt_is_instance_of((melt_ptr_t)(/*_.OPCLOR__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTCLOSUROUT*/ meltfrout->tabval[0])));; - MELT_LOCATION("warmelt-outobj.melt:4820:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4826:/ cond"); /*cond*/ if (/*_#IS_A__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -7891,7 +7891,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4820:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4826:/ cond.else"); /*^block*/ /*anyblock*/ @@ -7910,7 +7910,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4820; + argtab[2].meltbp_long = 4826; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OPCLOR__V2*/ meltfptr[1]; /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -7919,7 +7919,7 @@ meltlab_endgetargs: /*_._IFELSE___V6*/ meltfptr[5] = /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4820:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4826:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = 0 ; } ; @@ -7928,7 +7928,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = /*_._IFELSE___V6*/ meltfptr[5];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4820:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4826:/ clear"); /*clear*/ /*_#IS_A__L2*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V6*/ meltfptr[5] = 0 ; @@ -7939,7 +7939,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = (/*nil*/NULL); #endif /*MELT_HAVE_DEBUG>0*/ ; - MELT_LOCATION("warmelt-outobj.melt:4821:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4827:/ quasiblock"); /*^getslot*/ @@ -7950,7 +7950,7 @@ meltlab_endgetargs: /*_.OLOC__V9*/ meltfptr[5] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4822:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4828:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPCLOR__V2*/ meltfptr[1]) /*=obj*/; @@ -7958,7 +7958,7 @@ meltlab_endgetargs: /*_.OCLOS__V10*/ meltfptr[9] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4823:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4829:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPCLOR__V2*/ meltfptr[1]) /*=obj*/; @@ -8007,7 +8007,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4827:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4833:/ locexp"); /* GETCNTCHK__1 in outpucod_objputclosurout */ { static long GETCNTCHK__1_cnt; @@ -8019,7 +8019,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4834:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4840:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -8035,50 +8035,50 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4835:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4841:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "/*putclosurout#")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4836:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4842:/ locexp"); meltgc_add_strbuf_dec((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#CNT__L3*/ meltfnum[1])); } ; { - MELT_LOCATION("warmelt-outobj.melt:4837:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4843:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "*/")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4838:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4844:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4839:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4845:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_assertmsg(\"putclosrout#")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4840:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4846:/ locexp"); meltgc_add_strbuf_dec((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#CNT__L3*/ meltfnum[1])); } ; { - MELT_LOCATION("warmelt-outobj.melt:4841:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4847:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( " checkclo\", melt_magic_discr((melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4842:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4848:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -8094,38 +8094,38 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4843:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4849:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ")) == MELTOBMAG_CLOSURE);")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4844:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4850:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4845:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4851:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_assertmsg(\"putclosrout#")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4846:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4852:/ locexp"); meltgc_add_strbuf_dec((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#CNT__L3*/ meltfnum[1])); } ; { - MELT_LOCATION("warmelt-outobj.melt:4847:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4853:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( " checkrout\", melt_magic_discr((melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4848:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4854:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -8141,26 +8141,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4849:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4855:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ")) == MELTOBMAG_ROUTINE);")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4850:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4856:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4851:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4857:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "((meltclosure_ptr_t)")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4852:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4858:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -8176,14 +8176,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4853:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4859:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ")->rout = (meltroutine_ptr_t) (")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4854:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4860:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -8199,19 +8199,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4855:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4861:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ");")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4856:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4862:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4857:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4863:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -8221,7 +8221,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[3] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:4858:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4864:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[5])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[6]))) @@ -8249,7 +8249,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L6*/ meltfnum[5] = ((/*_#STRBUF_USEDLENGTH__L4*/ meltfnum[3]) < (/*_#GET_INT__L5*/ meltfnum[4]));; - MELT_LOCATION("warmelt-outobj.melt:4857:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4863:/ cond"); /*cond*/ if (/*_#ltI__L6*/ meltfnum[5]) /*then*/ { /*^cond.then*/ @@ -8257,7 +8257,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4857:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4863:/ cond.else"); /*^block*/ /*anyblock*/ @@ -8276,7 +8276,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4857; + argtab[2].meltbp_long = 4863; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V22*/ meltfptr[21] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -8285,7 +8285,7 @@ meltlab_endgetargs: /*_._IFELSE___V21*/ meltfptr[20] = /*_.MELT_ASSERT_FAILURE_FUN__V22*/ meltfptr[21];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4857:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4863:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V22*/ meltfptr[21] = 0 ; } ; @@ -8294,7 +8294,7 @@ meltlab_endgetargs: /*_.IFCPP___V19*/ meltfptr[18] = /*_._IFELSE___V21*/ meltfptr[20];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4857:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4863:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[3] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V20*/ meltfptr[19] = 0 ; @@ -8314,7 +8314,7 @@ meltlab_endgetargs: /*^compute*/ /*_.LET___V8*/ meltfptr[6] = /*_.IFCPP___V19*/ meltfptr[18];; - MELT_LOCATION("warmelt-outobj.melt:4821:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4827:/ clear"); /*clear*/ /*_.OLOC__V9*/ meltfptr[5] = 0 ; /*^clear*/ /*clear*/ /*_.OCLOS__V10*/ meltfptr[9] = 0 ; @@ -8339,13 +8339,13 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4819:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4825:/ quasiblock"); /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; { - MELT_LOCATION("warmelt-outobj.melt:4819:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4825:/ locexp"); /*ochecknores compilobj_nrep_return*/ #if MELT_HAVE_DEBUG > 0 if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) @@ -8446,12 +8446,12 @@ meltrout_104_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDV(meltclosure_ptr_t meltclosp_ /* end of frame for routine meltrout_104_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDV fromline 1756 */ /* classy proc frame meltrout_104_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDV */ MeltFrame_meltrout_104_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDV - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_104_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDV fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_104_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDV fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -8467,7 +8467,7 @@ meltrout_104_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDV(meltclosure_ptr_t meltclosp_ /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:4864:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:4870:/ getarg"); /*_.OPCLOV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -8499,7 +8499,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4865:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4871:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -8509,7 +8509,7 @@ meltlab_endgetargs: ; /*_#IS_A__L2*/ meltfnum[1] = melt_is_instance_of((melt_ptr_t)(/*_.OPCLOV__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTCLOSEDV*/ meltfrout->tabval[0])));; - MELT_LOCATION("warmelt-outobj.melt:4865:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4871:/ cond"); /*cond*/ if (/*_#IS_A__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -8517,7 +8517,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4865:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4871:/ cond.else"); /*^block*/ /*anyblock*/ @@ -8536,7 +8536,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4865; + argtab[2].meltbp_long = 4871; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OPCLOV__V2*/ meltfptr[1]; /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -8545,7 +8545,7 @@ meltlab_endgetargs: /*_._IFELSE___V6*/ meltfptr[5] = /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4865:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4871:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = 0 ; } ; @@ -8554,7 +8554,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = /*_._IFELSE___V6*/ meltfptr[5];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4865:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4871:/ clear"); /*clear*/ /*_#IS_A__L2*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V6*/ meltfptr[5] = 0 ; @@ -8565,7 +8565,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = (/*nil*/NULL); #endif /*MELT_HAVE_DEBUG>0*/ ; - MELT_LOCATION("warmelt-outobj.melt:4866:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4872:/ quasiblock"); /*^getslot*/ @@ -8576,7 +8576,7 @@ meltlab_endgetargs: /*_.OLOC__V9*/ meltfptr[5] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4867:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4873:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPCLOV__V2*/ meltfptr[1]) /*=obj*/; @@ -8584,7 +8584,7 @@ meltlab_endgetargs: /*_.OCLOS__V10*/ meltfptr[9] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4868:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4874:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPCLOV__V2*/ meltfptr[1]) /*=obj*/; @@ -8592,7 +8592,7 @@ meltlab_endgetargs: /*_.OOFF__V11*/ meltfptr[10] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4869:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4875:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPCLOV__V2*/ meltfptr[1]) /*=obj*/; @@ -8603,7 +8603,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4871:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4877:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -8657,26 +8657,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4873:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4879:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "/*putclosv*/")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4874:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4880:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4875:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4881:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_assertmsg(\"putclosv checkclo\", melt_magic_discr((melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4876:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4882:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -8692,26 +8692,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4877:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4883:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ")) == MELTOBMAG_CLOSURE);")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4878:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4884:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4879:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4885:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_assertmsg(\"putclosv checkoff\", ")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4880:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4886:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -8727,14 +8727,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4881:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4887:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ">= 0 && ")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4882:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4888:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -8750,14 +8750,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4883:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4889:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "< melt_closure_size((melt_ptr_t) (")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4884:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4890:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -8773,26 +8773,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4885:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4891:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ")));")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4886:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4892:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4887:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4893:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "((meltclosure_ptr_t)")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4888:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4894:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -8808,14 +8808,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4889:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4895:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ")->tabval[")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4890:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4896:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -8831,14 +8831,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4891:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4897:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "] = (melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4892:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4898:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -8854,19 +8854,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4893:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4899:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ");")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4894:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4900:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4895:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4901:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -8876,7 +8876,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:4896:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4902:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[5])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[6]))) @@ -8904,7 +8904,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L5*/ meltfnum[4] = ((/*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1]) < (/*_#GET_INT__L4*/ meltfnum[3]));; - MELT_LOCATION("warmelt-outobj.melt:4895:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4901:/ cond"); /*cond*/ if (/*_#ltI__L5*/ meltfnum[4]) /*then*/ { /*^cond.then*/ @@ -8912,7 +8912,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4895:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4901:/ cond.else"); /*^block*/ /*anyblock*/ @@ -8931,7 +8931,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4895; + argtab[2].meltbp_long = 4901; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V26*/ meltfptr[25] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -8940,7 +8940,7 @@ meltlab_endgetargs: /*_._IFELSE___V25*/ meltfptr[24] = /*_.MELT_ASSERT_FAILURE_FUN__V26*/ meltfptr[25];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4895:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4901:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V26*/ meltfptr[25] = 0 ; } ; @@ -8949,7 +8949,7 @@ meltlab_endgetargs: /*_.IFCPP___V23*/ meltfptr[22] = /*_._IFELSE___V25*/ meltfptr[24];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4895:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4901:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V24*/ meltfptr[23] = 0 ; @@ -8969,7 +8969,7 @@ meltlab_endgetargs: /*^compute*/ /*_.LET___V8*/ meltfptr[6] = /*_.IFCPP___V23*/ meltfptr[22];; - MELT_LOCATION("warmelt-outobj.melt:4866:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4872:/ clear"); /*clear*/ /*_.OLOC__V9*/ meltfptr[5] = 0 ; /*^clear*/ /*clear*/ /*_.OCLOS__V10*/ meltfptr[9] = 0 ; @@ -9000,13 +9000,13 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4864:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4870:/ quasiblock"); /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; { - MELT_LOCATION("warmelt-outobj.melt:4864:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4870:/ locexp"); /*ochecknores compilobj_nrep_return*/ #if MELT_HAVE_DEBUG > 0 if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) @@ -9107,12 +9107,12 @@ meltrout_105_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDNOTNULLV(meltclosure_ptr_t mel /* end of frame for routine meltrout_105_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDNOTNULLV fromline 1756 */ /* classy proc frame meltrout_105_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDNOTNULLV */ MeltFrame_meltrout_105_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDNOTNULLV - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_105_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDNOTNULLV fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_105_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDNOTNULLV fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -9128,7 +9128,7 @@ meltrout_105_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTCLOSEDNOTNULLV(meltclosure_ptr_t mel /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:4902:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:4908:/ getarg"); /*_.OPCLOV__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -9160,7 +9160,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4903:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4909:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -9170,7 +9170,7 @@ meltlab_endgetargs: ; /*_#IS_A__L2*/ meltfnum[1] = melt_is_instance_of((melt_ptr_t)(/*_.OPCLOV__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTCLOSEDNOTNULLV*/ meltfrout->tabval[0])));; - MELT_LOCATION("warmelt-outobj.melt:4903:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4909:/ cond"); /*cond*/ if (/*_#IS_A__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -9178,7 +9178,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4903:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4909:/ cond.else"); /*^block*/ /*anyblock*/ @@ -9197,7 +9197,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4903; + argtab[2].meltbp_long = 4909; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OPCLOV__V2*/ meltfptr[1]; /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -9206,7 +9206,7 @@ meltlab_endgetargs: /*_._IFELSE___V6*/ meltfptr[5] = /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4903:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4909:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = 0 ; } ; @@ -9215,7 +9215,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = /*_._IFELSE___V6*/ meltfptr[5];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4903:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4909:/ clear"); /*clear*/ /*_#IS_A__L2*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V6*/ meltfptr[5] = 0 ; @@ -9226,7 +9226,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = (/*nil*/NULL); #endif /*MELT_HAVE_DEBUG>0*/ ; - MELT_LOCATION("warmelt-outobj.melt:4904:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4910:/ quasiblock"); /*^getslot*/ @@ -9237,7 +9237,7 @@ meltlab_endgetargs: /*_.OLOC__V9*/ meltfptr[5] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4905:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4911:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPCLOV__V2*/ meltfptr[1]) /*=obj*/; @@ -9245,7 +9245,7 @@ meltlab_endgetargs: /*_.OCLOS__V10*/ meltfptr[9] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4906:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4912:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPCLOV__V2*/ meltfptr[1]) /*=obj*/; @@ -9253,7 +9253,7 @@ meltlab_endgetargs: /*_.OOFF__V11*/ meltfptr[10] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4907:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4913:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPCLOV__V2*/ meltfptr[1]) /*=obj*/; @@ -9264,7 +9264,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4908:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4914:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -9318,26 +9318,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4910:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4916:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "/*putclosvnotnull*/")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4911:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4917:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4912:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4918:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_assertmsg(\"putclosvnotnull checkclo\", melt_magic_discr((melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4913:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4919:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -9353,26 +9353,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4914:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4920:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ")) == MELTOBMAG_CLOSURE);")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4915:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4921:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4916:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4922:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_assertmsg(\"putclosvnotnull checknotnullval\", NULL != ")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4917:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4923:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -9388,26 +9388,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4918:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4924:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ");")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4919:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4925:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4920:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4926:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_assertmsg(\"putclosvnotnull checkoff\", ")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4921:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4927:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -9423,14 +9423,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4922:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4928:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ">= 0 && ")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4923:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4929:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -9446,14 +9446,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4924:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4930:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "< melt_closure_size((melt_ptr_t) (")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4925:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4931:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -9469,26 +9469,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4926:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4932:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ")));")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4927:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4933:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4928:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4934:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "((meltclosure_ptr_t)")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4929:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4935:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -9504,14 +9504,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4930:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4936:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ")->tabval[")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4931:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4937:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -9527,14 +9527,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4932:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4938:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "] = (melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4933:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4939:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -9550,19 +9550,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4934:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4940:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ");")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4935:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4941:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4936:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4942:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -9572,7 +9572,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:4937:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4943:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[5])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[6]))) @@ -9600,7 +9600,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L5*/ meltfnum[4] = ((/*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1]) < (/*_#GET_INT__L4*/ meltfnum[3]));; - MELT_LOCATION("warmelt-outobj.melt:4936:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4942:/ cond"); /*cond*/ if (/*_#ltI__L5*/ meltfnum[4]) /*then*/ { /*^cond.then*/ @@ -9608,7 +9608,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4936:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4942:/ cond.else"); /*^block*/ /*anyblock*/ @@ -9627,7 +9627,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4936; + argtab[2].meltbp_long = 4942; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V27*/ meltfptr[26] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -9636,7 +9636,7 @@ meltlab_endgetargs: /*_._IFELSE___V26*/ meltfptr[25] = /*_.MELT_ASSERT_FAILURE_FUN__V27*/ meltfptr[26];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4936:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4942:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V27*/ meltfptr[26] = 0 ; } ; @@ -9645,7 +9645,7 @@ meltlab_endgetargs: /*_.IFCPP___V24*/ meltfptr[23] = /*_._IFELSE___V26*/ meltfptr[25];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4936:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4942:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L3*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V25*/ meltfptr[24] = 0 ; @@ -9665,7 +9665,7 @@ meltlab_endgetargs: /*^compute*/ /*_.LET___V8*/ meltfptr[6] = /*_.IFCPP___V24*/ meltfptr[23];; - MELT_LOCATION("warmelt-outobj.melt:4904:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4910:/ clear"); /*clear*/ /*_.OLOC__V9*/ meltfptr[5] = 0 ; /*^clear*/ /*clear*/ /*_.OCLOS__V10*/ meltfptr[9] = 0 ; @@ -9698,13 +9698,13 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4902:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4908:/ quasiblock"); /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; { - MELT_LOCATION("warmelt-outobj.melt:4902:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4908:/ locexp"); /*ochecknores compilobj_nrep_return*/ #if MELT_HAVE_DEBUG > 0 if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) @@ -9805,12 +9805,12 @@ meltrout_106_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONST(meltclosure_ptr_t meltclos /* end of frame for routine meltrout_106_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONST fromline 1756 */ /* classy proc frame meltrout_106_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONST */ MeltFrame_meltrout_106_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONST - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_106_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONST fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_106_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONST fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -9826,7 +9826,7 @@ meltrout_106_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONST(meltclosure_ptr_t meltclos /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:4943:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:4949:/ getarg"); /*_.OPRCONST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -9858,7 +9858,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4944:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4950:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -9868,7 +9868,7 @@ meltlab_endgetargs: ; /*_#IS_A__L2*/ meltfnum[1] = melt_is_instance_of((melt_ptr_t)(/*_.OPRCONST__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTROUTCONST*/ meltfrout->tabval[0])));; - MELT_LOCATION("warmelt-outobj.melt:4944:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4950:/ cond"); /*cond*/ if (/*_#IS_A__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -9876,7 +9876,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4944:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4950:/ cond.else"); /*^block*/ /*anyblock*/ @@ -9895,7 +9895,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4944; + argtab[2].meltbp_long = 4950; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OPRCONST__V2*/ meltfptr[1]; /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -9904,7 +9904,7 @@ meltlab_endgetargs: /*_._IFELSE___V6*/ meltfptr[5] = /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4944:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4950:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = 0 ; } ; @@ -9913,7 +9913,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = /*_._IFELSE___V6*/ meltfptr[5];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4944:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4950:/ clear"); /*clear*/ /*_#IS_A__L2*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V6*/ meltfptr[5] = 0 ; @@ -9924,7 +9924,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = (/*nil*/NULL); #endif /*MELT_HAVE_DEBUG>0*/ ; - MELT_LOCATION("warmelt-outobj.melt:4945:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4951:/ quasiblock"); /*^getslot*/ @@ -9935,7 +9935,7 @@ meltlab_endgetargs: /*_.OLOC__V9*/ meltfptr[5] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4946:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4952:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPRCONST__V2*/ meltfptr[1]) /*=obj*/; @@ -9948,7 +9948,7 @@ meltlab_endgetargs: ; /*_#IS_A__L3*/ meltfnum[1] = melt_is_instance_of((melt_ptr_t)(/*_.OROUT__V10*/ meltfptr[9]), (melt_ptr_t)((/*!CLASS_OBJINITROUTINE*/ meltfrout->tabval[2])));; - MELT_LOCATION("warmelt-outobj.melt:4947:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4953:/ cond"); /*cond*/ if (/*_#IS_A__L3*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -9967,7 +9967,7 @@ meltlab_endgetargs: /*_.OROUTNAM__V11*/ meltfptr[10] = /*_.OIE_CNAME__V12*/ meltfptr[11];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4947:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4953:/ clear"); /*clear*/ /*_.OIE_CNAME__V12*/ meltfptr[11] = 0 ; } ; @@ -9978,7 +9978,7 @@ meltlab_endgetargs: /*_.OROUTNAM__V11*/ meltfptr[10] = /*reallynil*/ NULL ;; } ; - MELT_LOCATION("warmelt-outobj.melt:4948:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4954:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPRCONST__V2*/ meltfptr[1]) /*=obj*/; @@ -9986,7 +9986,7 @@ meltlab_endgetargs: /*_.OOFF__V13*/ meltfptr[11] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4949:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4955:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPRCONST__V2*/ meltfptr[1]) /*=obj*/; @@ -9997,7 +9997,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4950:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4956:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -10051,19 +10051,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4952:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4958:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "/*putroutconst*/")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4953:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4959:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4954:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4960:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "if (MELT_HAS_INITIAL_ENVIRONMENT) melt_assertmsg(\"putroutconst checkrout\ \", melt_magic_discr((melt_ptr_t)(")); } @@ -10071,7 +10071,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4955:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4961:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -10087,19 +10087,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4956:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4962:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ")) == MELTOBMAG_ROUTINE);")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4957:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4963:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4959:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4965:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "if (MELT_HAS_INITIAL_ENVIRONMENT) melt_checkmsg(\"putroutconst constnull.")); } ; @@ -10108,7 +10108,7 @@ meltlab_endgetargs: ; /*_#IS_STRING__L4*/ meltfnum[3] = (melt_magic_discr((melt_ptr_t)(/*_.OROUTNAM__V11*/ meltfptr[10])) == MELTOBMAG_STRING);; - MELT_LOCATION("warmelt-outobj.melt:4960:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4966:/ cond"); /*cond*/ if (/*_#IS_STRING__L4*/ meltfnum[3]) /*then*/ { /*^cond.then*/ @@ -10130,14 +10130,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4961:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4967:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "#")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4962:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4968:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -10153,14 +10153,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4963:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4969:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "\", NULL != (")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4964:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4970:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -10176,26 +10176,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4965:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4971:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "));")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4966:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4972:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4968:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4974:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "((meltroutine_ptr_t)")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4969:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4975:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -10211,14 +10211,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4970:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4976:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ")->tabval[")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4971:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4977:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -10234,14 +10234,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4972:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4978:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "] = (melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4973:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:4979:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -10257,19 +10257,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4974:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4980:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ");")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4975:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4981:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4976:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4982:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -10279,7 +10279,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[4] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:4977:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4983:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[6])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[7]))) @@ -10307,7 +10307,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L7*/ meltfnum[6] = ((/*_#STRBUF_USEDLENGTH__L5*/ meltfnum[4]) < (/*_#GET_INT__L6*/ meltfnum[5]));; - MELT_LOCATION("warmelt-outobj.melt:4976:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4982:/ cond"); /*cond*/ if (/*_#ltI__L7*/ meltfnum[6]) /*then*/ { /*^cond.then*/ @@ -10315,7 +10315,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4976:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4982:/ cond.else"); /*^block*/ /*anyblock*/ @@ -10334,7 +10334,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4976; + argtab[2].meltbp_long = 4982; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V27*/ meltfptr[26] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -10343,7 +10343,7 @@ meltlab_endgetargs: /*_._IFELSE___V26*/ meltfptr[25] = /*_.MELT_ASSERT_FAILURE_FUN__V27*/ meltfptr[26];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4976:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4982:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V27*/ meltfptr[26] = 0 ; } ; @@ -10352,7 +10352,7 @@ meltlab_endgetargs: /*_.IFCPP___V24*/ meltfptr[23] = /*_._IFELSE___V26*/ meltfptr[25];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4976:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4982:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L5*/ meltfnum[4] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V25*/ meltfptr[24] = 0 ; @@ -10372,7 +10372,7 @@ meltlab_endgetargs: /*^compute*/ /*_.LET___V8*/ meltfptr[6] = /*_.IFCPP___V24*/ meltfptr[23];; - MELT_LOCATION("warmelt-outobj.melt:4945:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4951:/ clear"); /*clear*/ /*_.OLOC__V9*/ meltfptr[5] = 0 ; /*^clear*/ /*clear*/ /*_.OROUT__V10*/ meltfptr[9] = 0 ; @@ -10407,13 +10407,13 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4943:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4949:/ quasiblock"); /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; { - MELT_LOCATION("warmelt-outobj.melt:4943:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4949:/ locexp"); /*ochecknores compilobj_nrep_return*/ #if MELT_HAVE_DEBUG > 0 if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) @@ -10514,12 +10514,12 @@ meltrout_107_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONSTNOTNULL(meltclosure_ptr_t m /* end of frame for routine meltrout_107_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONSTNOTNULL fromline 1756 */ /* classy proc frame meltrout_107_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONSTNOTNULL */ MeltFrame_meltrout_107_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONSTNOTNULL - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_107_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONSTNOTNULL fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_107_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONSTNOTNULL fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -10535,7 +10535,7 @@ meltrout_107_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTROUTCONSTNOTNULL(meltclosure_ptr_t m /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:4983:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:4989:/ getarg"); /*_.OPRCONST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -10567,7 +10567,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4984:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4990:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -10577,7 +10577,7 @@ meltlab_endgetargs: ; /*_#IS_A__L2*/ meltfnum[1] = melt_is_instance_of((melt_ptr_t)(/*_.OPRCONST__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTROUTCONSTNOTNULL*/ meltfrout->tabval[0])));; - MELT_LOCATION("warmelt-outobj.melt:4984:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4990:/ cond"); /*cond*/ if (/*_#IS_A__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -10585,7 +10585,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4984:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4990:/ cond.else"); /*^block*/ /*anyblock*/ @@ -10604,7 +10604,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4984; + argtab[2].meltbp_long = 4990; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OPRCONST__V2*/ meltfptr[1]; /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -10613,7 +10613,7 @@ meltlab_endgetargs: /*_._IFELSE___V6*/ meltfptr[5] = /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4984:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4990:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = 0 ; } ; @@ -10622,7 +10622,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = /*_._IFELSE___V6*/ meltfptr[5];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4984:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4990:/ clear"); /*clear*/ /*_#IS_A__L2*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V6*/ meltfptr[5] = 0 ; @@ -10633,7 +10633,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = (/*nil*/NULL); #endif /*MELT_HAVE_DEBUG>0*/ ; - MELT_LOCATION("warmelt-outobj.melt:4985:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4991:/ quasiblock"); /*^getslot*/ @@ -10644,7 +10644,7 @@ meltlab_endgetargs: /*_.OLOC__V9*/ meltfptr[5] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4986:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4992:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPRCONST__V2*/ meltfptr[1]) /*=obj*/; @@ -10652,7 +10652,7 @@ meltlab_endgetargs: /*_.OROUT__V10*/ meltfptr[9] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4987:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4993:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPRCONST__V2*/ meltfptr[1]) /*=obj*/; @@ -10660,7 +10660,7 @@ meltlab_endgetargs: /*_.OOFF__V11*/ meltfptr[10] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:4988:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:4994:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPRCONST__V2*/ meltfptr[1]) /*=obj*/; @@ -10670,7 +10670,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:4990:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:4996:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -10680,7 +10680,7 @@ meltlab_endgetargs: ; /*_#NOTNULL__L3*/ meltfnum[1] = ((/*_.OCVAL__V12*/ meltfptr[11]) != NULL);; - MELT_LOCATION("warmelt-outobj.melt:4990:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:4996:/ cond"); /*cond*/ if (/*_#NOTNULL__L3*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -10688,7 +10688,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:4990:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:4996:/ cond.else"); /*^block*/ /*anyblock*/ @@ -10707,14 +10707,14 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 4990; + argtab[2].meltbp_long = 4996; /*_.MELT_ASSERT_FAILURE_FUN__V15*/ meltfptr[14] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG ""), argtab, "", (union meltparam_un*)0); } ; /*_._IFELSE___V14*/ meltfptr[13] = /*_.MELT_ASSERT_FAILURE_FUN__V15*/ meltfptr[14];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4990:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4996:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V15*/ meltfptr[14] = 0 ; } ; @@ -10723,7 +10723,7 @@ meltlab_endgetargs: /*_.IFCPP___V13*/ meltfptr[12] = /*_._IFELSE___V14*/ meltfptr[13];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:4990:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4996:/ clear"); /*clear*/ /*_#NOTNULL__L3*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V14*/ meltfptr[13] = 0 ; @@ -10737,7 +10737,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4991:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:4997:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -10791,19 +10791,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4993:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4999:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "/*putroutconstnotnull*/")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4994:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5000:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4995:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5001:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_assertmsg(\"putroutconstnotnull checkrout\", melt_magic_discr\ ((melt_ptr_t)(")); } @@ -10811,7 +10811,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4996:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5002:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -10827,26 +10827,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:4997:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5003:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ")) == MELTOBMAG_ROUTINE);")); } ; { - MELT_LOCATION("warmelt-outobj.melt:4998:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5004:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:4999:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5005:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "melt_assertmsg(\"putroutconstnotnull notnullconst\", NULL != ")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5000:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5006:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -10862,26 +10862,26 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5001:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5007:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ");")); } ; { - MELT_LOCATION("warmelt-outobj.melt:5002:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5008:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:5003:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5009:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "((meltroutine_ptr_t)")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5004:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5010:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -10897,14 +10897,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5005:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5011:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ")->tabval[")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5006:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5012:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -10920,14 +10920,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5007:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5013:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "] = (melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5008:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5014:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -10943,19 +10943,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5009:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5015:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ");")); } ; { - MELT_LOCATION("warmelt-outobj.melt:5010:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5016:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5011:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5017:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -10965,7 +10965,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:5012:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5018:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[5])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[6]))) @@ -10993,7 +10993,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L6*/ meltfnum[5] = ((/*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1]) < (/*_#GET_INT__L5*/ meltfnum[4]));; - MELT_LOCATION("warmelt-outobj.melt:5011:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5017:/ cond"); /*cond*/ if (/*_#ltI__L6*/ meltfnum[5]) /*then*/ { /*^cond.then*/ @@ -11001,7 +11001,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:5011:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:5017:/ cond.else"); /*^block*/ /*anyblock*/ @@ -11020,7 +11020,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5011; + argtab[2].meltbp_long = 5017; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V27*/ meltfptr[26] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -11029,7 +11029,7 @@ meltlab_endgetargs: /*_._IFELSE___V26*/ meltfptr[25] = /*_.MELT_ASSERT_FAILURE_FUN__V27*/ meltfptr[26];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5011:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5017:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V27*/ meltfptr[26] = 0 ; } ; @@ -11038,7 +11038,7 @@ meltlab_endgetargs: /*_.IFCPP___V24*/ meltfptr[23] = /*_._IFELSE___V26*/ meltfptr[25];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5011:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5017:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L4*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V25*/ meltfptr[24] = 0 ; @@ -11058,7 +11058,7 @@ meltlab_endgetargs: /*^compute*/ /*_.LET___V8*/ meltfptr[6] = /*_.IFCPP___V24*/ meltfptr[23];; - MELT_LOCATION("warmelt-outobj.melt:4985:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:4991:/ clear"); /*clear*/ /*_.OLOC__V9*/ meltfptr[5] = 0 ; /*^clear*/ /*clear*/ /*_.OROUT__V10*/ meltfptr[9] = 0 ; @@ -11087,13 +11087,13 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:4983:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:4989:/ quasiblock"); /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; { - MELT_LOCATION("warmelt-outobj.melt:4983:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:4989:/ locexp"); /*ochecknores compilobj_nrep_return*/ #if MELT_HAVE_DEBUG > 0 if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) @@ -11194,12 +11194,12 @@ meltrout_108_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKCONST(meltclosure_ptr_t meltclos /* end of frame for routine meltrout_108_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKCONST fromline 1756 */ /* classy proc frame meltrout_108_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKCONST */ MeltFrame_meltrout_108_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKCONST - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_108_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKCONST fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_108_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKCONST fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -11215,7 +11215,7 @@ meltrout_108_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKCONST(meltclosure_ptr_t meltclos /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:5018:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:5024:/ getarg"); /*_.OPHCONST__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -11247,7 +11247,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5019:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5025:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -11273,7 +11273,7 @@ meltlab_endgetargs: 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG*/ ;; - MELT_LOCATION("warmelt-outobj.melt:5019:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5025:/ cond"); /*cond*/ if (/*_#MELT_NEED_DBG__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -11292,7 +11292,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5019:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5025:/ apply"); /*apply*/ { union meltparam_un argtab[5]; @@ -11302,7 +11302,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5019; + argtab[2].meltbp_long = 5025; /*^apply.arg*/ argtab[3].meltbp_cstring = "outpucod_objputhookconst ophconst="; /*^apply.arg*/ @@ -11313,7 +11313,7 @@ meltlab_endgetargs: /*_._IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5019:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5025:/ clear"); /*clear*/ /*_#MELT_CALLCOUNT__L3*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0 ; @@ -11328,7 +11328,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5019:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5025:/ locexp"); /*void*/(void)0; } ; @@ -11362,7 +11362,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5020:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5026:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -11372,7 +11372,7 @@ meltlab_endgetargs: ; /*_#IS_A__L4*/ meltfnum[2] = melt_is_instance_of((melt_ptr_t)(/*_.OPHCONST__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTHOOKCONST*/ meltfrout->tabval[1])));; - MELT_LOCATION("warmelt-outobj.melt:5020:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5026:/ cond"); /*cond*/ if (/*_#IS_A__L4*/ meltfnum[2]) /*then*/ { /*^cond.then*/ @@ -11380,7 +11380,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:5020:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:5026:/ cond.else"); /*^block*/ /*anyblock*/ @@ -11399,7 +11399,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5020; + argtab[2].meltbp_long = 5026; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OPHCONST__V2*/ meltfptr[1]; /*_.MELT_ASSERT_FAILURE_FUN__V9*/ meltfptr[8] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[2])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -11408,7 +11408,7 @@ meltlab_endgetargs: /*_._IFELSE___V8*/ meltfptr[4] = /*_.MELT_ASSERT_FAILURE_FUN__V9*/ meltfptr[8];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5020:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5026:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V9*/ meltfptr[8] = 0 ; } ; @@ -11417,7 +11417,7 @@ meltlab_endgetargs: /*_.IFCPP___V7*/ meltfptr[5] = /*_._IFELSE___V8*/ meltfptr[4];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5020:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5026:/ clear"); /*clear*/ /*_#IS_A__L4*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V8*/ meltfptr[4] = 0 ; @@ -11428,7 +11428,7 @@ meltlab_endgetargs: /*_.IFCPP___V7*/ meltfptr[5] = (/*nil*/NULL); #endif /*MELT_HAVE_DEBUG>0*/ ; - MELT_LOCATION("warmelt-outobj.melt:5021:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:5027:/ quasiblock"); /*^cond*/ @@ -11453,7 +11453,7 @@ meltlab_endgetargs: /*_.OLOC__V10*/ meltfptr[8] = /*reallynil*/ NULL ;; } ; - MELT_LOCATION("warmelt-outobj.melt:5022:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5028:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.OPHCONST__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTHOOKCONST*/ meltfrout->tabval[1]))) @@ -11475,7 +11475,7 @@ meltlab_endgetargs: /*_.OHOOK__V11*/ meltfptr[4] = /*reallynil*/ NULL ;; } ; - MELT_LOCATION("warmelt-outobj.melt:5023:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5029:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.OPHCONST__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTHOOKCONST*/ meltfrout->tabval[1]))) @@ -11497,7 +11497,7 @@ meltlab_endgetargs: /*_.OHOFF__V12*/ meltfptr[11] = /*reallynil*/ NULL ;; } ; - MELT_LOCATION("warmelt-outobj.melt:5024:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5030:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.OPHCONST__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTHOOKCONST*/ meltfrout->tabval[1]))) @@ -11519,7 +11519,7 @@ meltlab_endgetargs: /*_.OVAL__V13*/ meltfptr[12] = /*reallynil*/ NULL ;; } ; - MELT_LOCATION("warmelt-outobj.melt:5025:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5031:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.OHOOK__V11*/ meltfptr[4]), (melt_ptr_t)((/*!CLASS_OBJINITELEM*/ meltfrout->tabval[4]))) @@ -11541,7 +11541,7 @@ meltlab_endgetargs: /*_.NHOOK__V14*/ meltfptr[13] = /*reallynil*/ NULL ;; } ; - MELT_LOCATION("warmelt-outobj.melt:5026:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5032:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.NHOOK__V14*/ meltfptr[13]), (melt_ptr_t)((/*!CLASS_NREP_BOUND_DATA*/ meltfrout->tabval[5]))) @@ -11565,7 +11565,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5028:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5034:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -11591,7 +11591,7 @@ meltlab_endgetargs: 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG*/ ;; - MELT_LOCATION("warmelt-outobj.melt:5028:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5034:/ cond"); /*cond*/ if (/*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -11610,7 +11610,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5028:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5034:/ apply"); /*apply*/ { union meltparam_un argtab[11]; @@ -11620,7 +11620,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5028; + argtab[2].meltbp_long = 5034; /*^apply.arg*/ argtab[3].meltbp_cstring = "outpucod_objputhookconst ohook="; /*^apply.arg*/ @@ -11643,7 +11643,7 @@ meltlab_endgetargs: /*_._IF___V16*/ meltfptr[15] = /*_.MELT_DEBUG_FUN__V17*/ meltfptr[16];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5028:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5034:/ clear"); /*clear*/ /*_#MELT_CALLCOUNT__L6*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_.MELT_DEBUG_FUN__V17*/ meltfptr[16] = 0 ; @@ -11658,7 +11658,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5028:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5034:/ locexp"); /*void*/(void)0; } ; @@ -11693,7 +11693,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5029:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5035:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -11748,7 +11748,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5031:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5037:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -11764,14 +11764,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5032:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5038:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5033:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5039:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -11788,7 +11788,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5034:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5040:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -11805,7 +11805,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5035:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5041:/ apply"); /*apply*/ { union meltparam_un argtab[1]; @@ -11817,14 +11817,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5036:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5042:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5037:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5043:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -11842,14 +11842,14 @@ meltlab_endgetargs: ((10) + (/*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION("warmelt-outobj.melt:5039:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5045:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#plI__L7*/ meltfnum[2]), 0); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5040:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5046:/ apply"); /*apply*/ { union meltparam_un argtab[1]; @@ -11862,7 +11862,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5041:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5047:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -11879,7 +11879,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5042:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5048:/ apply"); /*apply*/ { union meltparam_un argtab[1]; @@ -11893,14 +11893,14 @@ meltlab_endgetargs: ((12) + (/*_#DEPTH__L1*/ meltfnum[0]));; { - MELT_LOCATION("warmelt-outobj.melt:5043:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5049:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#plI__L8*/ meltfnum[1]), 0); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5044:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5050:/ apply"); /*apply*/ { union meltparam_un argtab[1]; @@ -11913,7 +11913,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5045:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5051:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -11930,7 +11930,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5046:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5052:/ apply"); /*apply*/ { union meltparam_un argtab[1]; @@ -11943,7 +11943,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5047:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5053:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -11960,7 +11960,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5048:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5054:/ apply"); /*apply*/ { union meltparam_un argtab[1]; @@ -11972,20 +11972,20 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5049:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5055:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:5050:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5056:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "((melthook_ptr_t)")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5051:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5057:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -12001,14 +12001,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5052:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5058:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ")->tabval[")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5053:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5059:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -12024,14 +12024,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5054:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5060:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "] = (melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5055:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5061:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -12047,18 +12047,18 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5056:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5062:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ");")); } ; { - MELT_LOCATION("warmelt-outobj.melt:5057:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5063:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION("warmelt-outobj.melt:5021:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5027:/ clear"); /*clear*/ /*_.OLOC__V10*/ meltfptr[8] = 0 ; /*^clear*/ /*clear*/ /*_.OHOOK__V11*/ meltfptr[4] = 0 ; @@ -12115,7 +12115,7 @@ meltlab_endgetargs: ; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5018:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5024:/ clear"); /*clear*/ /*_.IFCPP___V7*/ meltfptr[5] = 0 ; } @@ -12199,12 +12199,12 @@ meltrout_109_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKDATA(meltclosure_ptr_t meltclosp /* end of frame for routine meltrout_109_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKDATA fromline 1756 */ /* classy proc frame meltrout_109_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKDATA */ MeltFrame_meltrout_109_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKDATA - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_109_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKDATA fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_109_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKDATA fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -12220,7 +12220,7 @@ meltrout_109_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTHOOKDATA(meltclosure_ptr_t meltclosp /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:5063:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:5069:/ getarg"); /*_.OPHD__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -12252,7 +12252,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5064:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5070:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -12278,7 +12278,7 @@ meltlab_endgetargs: 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG*/ ;; - MELT_LOCATION("warmelt-outobj.melt:5064:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5070:/ cond"); /*cond*/ if (/*_#MELT_NEED_DBG__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -12297,7 +12297,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5064:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5070:/ apply"); /*apply*/ { union meltparam_un argtab[5]; @@ -12307,7 +12307,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5064; + argtab[2].meltbp_long = 5070; /*^apply.arg*/ argtab[3].meltbp_cstring = "outpucod_objputhookdata ophd="; /*^apply.arg*/ @@ -12318,7 +12318,7 @@ meltlab_endgetargs: /*_._IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5064:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5070:/ clear"); /*clear*/ /*_#MELT_CALLCOUNT__L3*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0 ; @@ -12333,7 +12333,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5064:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5070:/ locexp"); /*void*/(void)0; } ; @@ -12367,7 +12367,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5065:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5071:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -12377,7 +12377,7 @@ meltlab_endgetargs: ; /*_#IS_A__L4*/ meltfnum[2] = melt_is_instance_of((melt_ptr_t)(/*_.OPHD__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTHOOKDATA*/ meltfrout->tabval[1])));; - MELT_LOCATION("warmelt-outobj.melt:5065:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5071:/ cond"); /*cond*/ if (/*_#IS_A__L4*/ meltfnum[2]) /*then*/ { /*^cond.then*/ @@ -12385,7 +12385,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:5065:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:5071:/ cond.else"); /*^block*/ /*anyblock*/ @@ -12404,7 +12404,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5065; + argtab[2].meltbp_long = 5071; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OPHD__V2*/ meltfptr[1]; /*_.MELT_ASSERT_FAILURE_FUN__V9*/ meltfptr[8] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[2])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -12413,7 +12413,7 @@ meltlab_endgetargs: /*_._IFELSE___V8*/ meltfptr[4] = /*_.MELT_ASSERT_FAILURE_FUN__V9*/ meltfptr[8];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5065:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5071:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V9*/ meltfptr[8] = 0 ; } ; @@ -12422,7 +12422,7 @@ meltlab_endgetargs: /*_.IFCPP___V7*/ meltfptr[5] = /*_._IFELSE___V8*/ meltfptr[4];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5065:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5071:/ clear"); /*clear*/ /*_#IS_A__L4*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V8*/ meltfptr[4] = 0 ; @@ -12433,7 +12433,7 @@ meltlab_endgetargs: /*_.IFCPP___V7*/ meltfptr[5] = (/*nil*/NULL); #endif /*MELT_HAVE_DEBUG>0*/ ; - MELT_LOCATION("warmelt-outobj.melt:5066:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:5072:/ quasiblock"); /*^cond*/ @@ -12458,7 +12458,7 @@ meltlab_endgetargs: /*_.OLOC__V10*/ meltfptr[8] = /*reallynil*/ NULL ;; } ; - MELT_LOCATION("warmelt-outobj.melt:5067:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5073:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.OPHD__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTHOOKDATA*/ meltfrout->tabval[1]))) @@ -12480,7 +12480,7 @@ meltlab_endgetargs: /*_.OHOOK__V11*/ meltfptr[4] = /*reallynil*/ NULL ;; } ; - MELT_LOCATION("warmelt-outobj.melt:5068:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5074:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.OPHD__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTHOOKDATA*/ meltfrout->tabval[1]))) @@ -12502,7 +12502,7 @@ meltlab_endgetargs: /*_.ODATA__V12*/ meltfptr[11] = /*reallynil*/ NULL ;; } ; - MELT_LOCATION("warmelt-outobj.melt:5069:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5075:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.OHOOK__V11*/ meltfptr[4]), (melt_ptr_t)((/*!CLASS_OBJINITELEM*/ meltfrout->tabval[4]))) @@ -12524,7 +12524,7 @@ meltlab_endgetargs: /*_.NHOOK__V13*/ meltfptr[12] = /*reallynil*/ NULL ;; } ; - MELT_LOCATION("warmelt-outobj.melt:5070:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5076:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.NHOOK__V13*/ meltfptr[12]), (melt_ptr_t)((/*!CLASS_NREP_BOUND_DATA*/ meltfrout->tabval[5]))) @@ -12548,7 +12548,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5072:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5078:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -12574,7 +12574,7 @@ meltlab_endgetargs: 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG*/ ;; - MELT_LOCATION("warmelt-outobj.melt:5072:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5078:/ cond"); /*cond*/ if (/*_#MELT_NEED_DBG__L5*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -12593,7 +12593,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5072:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5078:/ apply"); /*apply*/ { union meltparam_un argtab[11]; @@ -12603,7 +12603,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5072; + argtab[2].meltbp_long = 5078; /*^apply.arg*/ argtab[3].meltbp_cstring = "outpucod_objputhookdata ophd="; /*^apply.arg*/ @@ -12626,7 +12626,7 @@ meltlab_endgetargs: /*_._IF___V15*/ meltfptr[14] = /*_.MELT_DEBUG_FUN__V16*/ meltfptr[15];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5072:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5078:/ clear"); /*clear*/ /*_#MELT_CALLCOUNT__L6*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_.MELT_DEBUG_FUN__V16*/ meltfptr[15] = 0 ; @@ -12641,7 +12641,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5072:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5078:/ locexp"); /*void*/(void)0; } ; @@ -12675,7 +12675,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5073:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5079:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -12685,7 +12685,7 @@ meltlab_endgetargs: ; /*_#IS_A__L7*/ meltfnum[2] = melt_is_instance_of((melt_ptr_t)(/*_.OHOOK__V11*/ meltfptr[4]), (melt_ptr_t)((/*!CLASS_OBJINITHOOK*/ meltfrout->tabval[6])));; - MELT_LOCATION("warmelt-outobj.melt:5073:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5079:/ cond"); /*cond*/ if (/*_#IS_A__L7*/ meltfnum[2]) /*then*/ { /*^cond.then*/ @@ -12693,7 +12693,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:5073:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:5079:/ cond.else"); /*^block*/ /*anyblock*/ @@ -12712,7 +12712,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5073; + argtab[2].meltbp_long = 5079; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OHOOK__V11*/ meltfptr[4]; /*_.MELT_ASSERT_FAILURE_FUN__V19*/ meltfptr[18] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[2])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -12721,7 +12721,7 @@ meltlab_endgetargs: /*_._IFELSE___V18*/ meltfptr[14] = /*_.MELT_ASSERT_FAILURE_FUN__V19*/ meltfptr[18];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5073:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5079:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V19*/ meltfptr[18] = 0 ; } ; @@ -12730,7 +12730,7 @@ meltlab_endgetargs: /*_.IFCPP___V17*/ meltfptr[15] = /*_._IFELSE___V18*/ meltfptr[14];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5073:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5079:/ clear"); /*clear*/ /*_#IS_A__L7*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V18*/ meltfptr[14] = 0 ; @@ -12744,7 +12744,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5074:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5080:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -12799,7 +12799,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5076:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5082:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -12815,14 +12815,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5077:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5083:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5078:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5084:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -12839,7 +12839,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5079:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5085:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -12856,7 +12856,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5080:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5086:/ apply"); /*apply*/ { union meltparam_un argtab[1]; @@ -12868,20 +12868,20 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5081:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5087:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:5082:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5088:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "((melthook_ptr_t)")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5083:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5089:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -12897,14 +12897,14 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5084:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5090:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ")->hookdata = (melt_ptr_t)(")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5085:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5091:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -12920,18 +12920,18 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5086:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5092:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ");")); } ; { - MELT_LOCATION("warmelt-outobj.melt:5087:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5093:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION("warmelt-outobj.melt:5066:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5072:/ clear"); /*clear*/ /*_.OLOC__V10*/ meltfptr[8] = 0 ; /*^clear*/ /*clear*/ /*_.OHOOK__V11*/ meltfptr[4] = 0 ; @@ -12964,7 +12964,7 @@ meltlab_endgetargs: ; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5063:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5069:/ clear"); /*clear*/ /*_.IFCPP___V7*/ meltfptr[5] = 0 ; } @@ -13048,12 +13048,12 @@ meltrout_110_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTXTRARESULT(meltclosure_ptr_t meltclo /* end of frame for routine meltrout_110_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTXTRARESULT fromline 1756 */ /* classy proc frame meltrout_110_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTXTRARESULT */ MeltFrame_meltrout_110_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTXTRARESULT - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_110_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTXTRARESULT fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_110_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTXTRARESULT fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -13069,7 +13069,7 @@ meltrout_110_WARMELTmiOUTOBJ_OUTPUCOD_OBJPUTXTRARESULT(meltclosure_ptr_t meltclo /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:5093:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:5099:/ getarg"); /*_.OPUTX__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -13101,7 +13101,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5094:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5100:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -13111,7 +13111,7 @@ meltlab_endgetargs: ; /*_#IS_A__L2*/ meltfnum[1] = melt_is_instance_of((melt_ptr_t)(/*_.OPUTX__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJPUTXTRARESULT*/ meltfrout->tabval[0])));; - MELT_LOCATION("warmelt-outobj.melt:5094:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5100:/ cond"); /*cond*/ if (/*_#IS_A__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -13119,7 +13119,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:5094:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:5100:/ cond.else"); /*^block*/ /*anyblock*/ @@ -13138,7 +13138,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5094; + argtab[2].meltbp_long = 5100; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OPUTX__V2*/ meltfptr[1]; /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -13147,7 +13147,7 @@ meltlab_endgetargs: /*_._IFELSE___V6*/ meltfptr[5] = /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5094:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5100:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = 0 ; } ; @@ -13156,7 +13156,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = /*_._IFELSE___V6*/ meltfptr[5];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5094:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5100:/ clear"); /*clear*/ /*_#IS_A__L2*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V6*/ meltfptr[5] = 0 ; @@ -13167,7 +13167,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = (/*nil*/NULL); #endif /*MELT_HAVE_DEBUG>0*/ ; - MELT_LOCATION("warmelt-outobj.melt:5095:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:5101:/ quasiblock"); /*^getslot*/ @@ -13178,7 +13178,7 @@ meltlab_endgetargs: /*_.OLOC__V9*/ meltfptr[5] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:5096:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:5102:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPUTX__V2*/ meltfptr[1]) /*=obj*/; @@ -13186,7 +13186,7 @@ meltlab_endgetargs: /*_.ORANK__V10*/ meltfptr[9] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:5097:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:5103:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OPUTX__V2*/ meltfptr[1]) /*=obj*/; @@ -13197,7 +13197,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5098:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5104:/ msend"); /*msend*/ { union meltparam_un argtab[1]; @@ -13210,7 +13210,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5100:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5106:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -13264,7 +13264,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5102:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5108:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -13274,7 +13274,7 @@ meltlab_endgetargs: ; /*_#IS_A__L3*/ meltfnum[1] = melt_is_instance_of((melt_ptr_t)(/*_.OCTYP__V12*/ meltfptr[11]), (melt_ptr_t)((/*!CLASS_CTYPE*/ meltfrout->tabval[5])));; - MELT_LOCATION("warmelt-outobj.melt:5102:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5108:/ cond"); /*cond*/ if (/*_#IS_A__L3*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -13282,7 +13282,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:5102:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:5108:/ cond.else"); /*^block*/ /*anyblock*/ @@ -13301,7 +13301,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5102; + argtab[2].meltbp_long = 5108; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OCTYP__V12*/ meltfptr[11]; /*_.MELT_ASSERT_FAILURE_FUN__V18*/ meltfptr[17] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -13310,7 +13310,7 @@ meltlab_endgetargs: /*_._IFELSE___V17*/ meltfptr[16] = /*_.MELT_ASSERT_FAILURE_FUN__V18*/ meltfptr[17];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5102:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5108:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V18*/ meltfptr[17] = 0 ; } ; @@ -13319,7 +13319,7 @@ meltlab_endgetargs: /*_.IFCPP___V16*/ meltfptr[14] = /*_._IFELSE___V17*/ meltfptr[16];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5102:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5108:/ clear"); /*clear*/ /*_#IS_A__L3*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V17*/ meltfptr[16] = 0 ; @@ -13332,7 +13332,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5103:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5109:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -13342,7 +13342,7 @@ meltlab_endgetargs: ; /*_#IS_INTEGERBOX__L4*/ meltfnum[1] = (melt_magic_discr((melt_ptr_t)(/*_.ORANK__V10*/ meltfptr[9])) == MELTOBMAG_INT);; - MELT_LOCATION("warmelt-outobj.melt:5103:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5109:/ cond"); /*cond*/ if (/*_#IS_INTEGERBOX__L4*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -13350,7 +13350,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:5103:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:5109:/ cond.else"); /*^block*/ /*anyblock*/ @@ -13369,7 +13369,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5103; + argtab[2].meltbp_long = 5109; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.ORANK__V10*/ meltfptr[9]; /*_.MELT_ASSERT_FAILURE_FUN__V21*/ meltfptr[20] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -13378,7 +13378,7 @@ meltlab_endgetargs: /*_._IFELSE___V20*/ meltfptr[16] = /*_.MELT_ASSERT_FAILURE_FUN__V21*/ meltfptr[20];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5103:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5109:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V21*/ meltfptr[20] = 0 ; } ; @@ -13387,7 +13387,7 @@ meltlab_endgetargs: /*_.IFCPP___V19*/ meltfptr[17] = /*_._IFELSE___V20*/ meltfptr[16];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5103:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5109:/ clear"); /*clear*/ /*_#IS_INTEGERBOX__L4*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V20*/ meltfptr[16] = 0 ; @@ -13400,19 +13400,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5104:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5110:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "if (!meltxrestab_ || !meltxresdescr_) goto meltlabend_rout;")); } ; { - MELT_LOCATION("warmelt-outobj.melt:5105:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5111:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:5106:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5112:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "if (meltxresdescr_[")); } ; @@ -13420,17 +13420,17 @@ meltlab_endgetargs: (melt_get_int((melt_ptr_t)(/*_.ORANK__V10*/ meltfptr[9])));; { - MELT_LOCATION("warmelt-outobj.melt:5107:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5113:/ locexp"); meltgc_add_strbuf_dec((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#GET_INT__L5*/ meltfnum[1])); } ; { - MELT_LOCATION("warmelt-outobj.melt:5108:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5114:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "] != ")); } ; - MELT_LOCATION("warmelt-outobj.melt:5109:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:5115:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OCTYP__V12*/ meltfptr[11]) /*=obj*/; @@ -13447,19 +13447,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5110:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5116:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ") goto meltlabend_rout;")); } ; { - MELT_LOCATION("warmelt-outobj.melt:5111:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5117:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:5112:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5118:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "if (meltxrestab_[")); } ; @@ -13467,20 +13467,20 @@ meltlab_endgetargs: (melt_get_int((melt_ptr_t)(/*_.ORANK__V10*/ meltfptr[9])));; { - MELT_LOCATION("warmelt-outobj.melt:5113:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5119:/ locexp"); meltgc_add_strbuf_dec((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#GET_INT__L6*/ meltfnum[5])); } ; { - MELT_LOCATION("warmelt-outobj.melt:5114:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5120:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "].")); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5115:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5121:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.OCTYP__V12*/ meltfptr[11]), (melt_ptr_t)((/*!CLASS_CTYPE*/ meltfrout->tabval[5]))) @@ -13505,7 +13505,7 @@ meltlab_endgetargs: /*^compute*/ /*_#IS_STRING__L7*/ meltfnum[6] = (melt_magic_discr((melt_ptr_t)(/*_.CTYPE_RESFIELD__V23*/ meltfptr[16])) == MELTOBMAG_STRING);; - MELT_LOCATION("warmelt-outobj.melt:5115:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5121:/ cond"); /*cond*/ if (/*_#IS_STRING__L7*/ meltfnum[6]) /*then*/ { /*^cond.then*/ @@ -13513,7 +13513,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:5115:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:5121:/ cond.else"); /*^block*/ /*anyblock*/ @@ -13521,7 +13521,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5116:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5122:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -13547,7 +13547,7 @@ meltlab_endgetargs: 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG*/ ;; - MELT_LOCATION("warmelt-outobj.melt:5116:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5122:/ cond"); /*cond*/ if (/*_#MELT_NEED_DBG__L8*/ meltfnum[7]) /*then*/ { /*^cond.then*/ @@ -13566,7 +13566,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5116:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5122:/ apply"); /*apply*/ { union meltparam_un argtab[7]; @@ -13576,7 +13576,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5116; + argtab[2].meltbp_long = 5122; /*^apply.arg*/ argtab[3].meltbp_cstring = "outpucod_objputxtraresult bad octyp"; /*^apply.arg*/ @@ -13591,7 +13591,7 @@ meltlab_endgetargs: /*_._IF___V25*/ meltfptr[24] = /*_.MELT_DEBUG_FUN__V26*/ meltfptr[25];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5116:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5122:/ clear"); /*clear*/ /*_#MELT_CALLCOUNT__L9*/ meltfnum[8] = 0 ; /*^clear*/ /*clear*/ /*_.MELT_DEBUG_FUN__V26*/ meltfptr[25] = 0 ; @@ -13606,7 +13606,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5116:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5122:/ locexp"); /*void*/(void)0; } ; @@ -13638,7 +13638,7 @@ meltlab_endgetargs: #endif /*MELT_HAVE_DEBUG>0*/ ; - MELT_LOCATION("warmelt-outobj.melt:5117:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5123:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.OCTYP__V12*/ meltfptr[11]), (melt_ptr_t)((/*!CLASS_NAMED*/ meltfrout->tabval[7]))) @@ -13662,11 +13662,11 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5117:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5123:/ locexp"); melt_error_str((melt_ptr_t)(/*_.OLOC__V9*/ meltfptr[5]), ( "impossible secondary result type"), (melt_ptr_t)(/*_.NAMED_NAME__V27*/ meltfptr[25])); } ; - MELT_LOCATION("warmelt-outobj.melt:5115:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:5121:/ quasiblock"); /*epilog*/ @@ -13677,7 +13677,7 @@ meltlab_endgetargs: ; } ; - MELT_LOCATION("warmelt-outobj.melt:5119:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:5125:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OCTYP__V12*/ meltfptr[11]) /*=obj*/; @@ -13694,7 +13694,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5120:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5126:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ") *(meltxrestab_[")); } ; @@ -13702,17 +13702,17 @@ meltlab_endgetargs: (melt_get_int((melt_ptr_t)(/*_.ORANK__V10*/ meltfptr[9])));; { - MELT_LOCATION("warmelt-outobj.melt:5121:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5127:/ locexp"); meltgc_add_strbuf_dec((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#GET_INT__L10*/ meltfnum[8])); } ; { - MELT_LOCATION("warmelt-outobj.melt:5122:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5128:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "].")); } ; - MELT_LOCATION("warmelt-outobj.melt:5123:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:5129:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OCTYP__V12*/ meltfptr[11]) /*=obj*/; @@ -13729,7 +13729,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5124:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5130:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ") = (")); } ; @@ -13738,7 +13738,7 @@ meltlab_endgetargs: ; /*_#eqeq__L11*/ meltfnum[7] = ((/*_.OCTYP__V12*/ meltfptr[11]) == ((/*!CTYPE_VALUE*/ meltfrout->tabval[8])));; - MELT_LOCATION("warmelt-outobj.melt:5125:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5131:/ cond"); /*cond*/ if (/*_#eqeq__L11*/ meltfnum[7]) /*then*/ { /*^cond.then*/ @@ -13760,7 +13760,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5126:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5132:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -13776,19 +13776,19 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5127:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5133:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ");")); } ; { - MELT_LOCATION("warmelt-outobj.melt:5128:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5134:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5129:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5135:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -13798,7 +13798,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L12*/ meltfnum[11] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:5130:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5136:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[10])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[11]))) @@ -13826,7 +13826,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L14*/ meltfnum[13] = ((/*_#STRBUF_USEDLENGTH__L12*/ meltfnum[11]) < (/*_#GET_INT__L13*/ meltfnum[12]));; - MELT_LOCATION("warmelt-outobj.melt:5129:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5135:/ cond"); /*cond*/ if (/*_#ltI__L14*/ meltfnum[13]) /*then*/ { /*^cond.then*/ @@ -13834,7 +13834,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:5129:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:5135:/ cond.else"); /*^block*/ /*anyblock*/ @@ -13853,7 +13853,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5129; + argtab[2].meltbp_long = 5135; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V34*/ meltfptr[33] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -13862,7 +13862,7 @@ meltlab_endgetargs: /*_._IFELSE___V33*/ meltfptr[32] = /*_.MELT_ASSERT_FAILURE_FUN__V34*/ meltfptr[33];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5129:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5135:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V34*/ meltfptr[33] = 0 ; } ; @@ -13871,7 +13871,7 @@ meltlab_endgetargs: /*_.IFCPP___V31*/ meltfptr[30] = /*_._IFELSE___V33*/ meltfptr[32];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5129:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5135:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L12*/ meltfnum[11] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V32*/ meltfptr[31] = 0 ; @@ -13891,7 +13891,7 @@ meltlab_endgetargs: /*^compute*/ /*_.LET___V8*/ meltfptr[6] = /*_.IFCPP___V31*/ meltfptr[30];; - MELT_LOCATION("warmelt-outobj.melt:5095:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5101:/ clear"); /*clear*/ /*_.OLOC__V9*/ meltfptr[5] = 0 ; /*^clear*/ /*clear*/ /*_.ORANK__V10*/ meltfptr[9] = 0 ; @@ -13934,13 +13934,13 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5093:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:5099:/ quasiblock"); /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V8*/ meltfptr[6];; { - MELT_LOCATION("warmelt-outobj.melt:5093:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5099:/ locexp"); /*ochecknores compilobj_nrep_return*/ #if MELT_HAVE_DEBUG > 0 if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) @@ -14041,12 +14041,12 @@ meltrout_111_WARMELTmiOUTOBJ_OUTPUCOD_OBJEXPV(meltclosure_ptr_t meltclosp_, melt /* end of frame for routine meltrout_111_WARMELTmiOUTOBJ_OUTPUCOD_OBJEXPV fromline 1756 */ /* classy proc frame meltrout_111_WARMELTmiOUTOBJ_OUTPUCOD_OBJEXPV */ MeltFrame_meltrout_111_WARMELTmiOUTOBJ_OUTPUCOD_OBJEXPV - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_111_WARMELTmiOUTOBJ_OUTPUCOD_OBJEXPV fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_111_WARMELTmiOUTOBJ_OUTPUCOD_OBJEXPV fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -14062,7 +14062,7 @@ meltrout_111_WARMELTmiOUTOBJ_OUTPUCOD_OBJEXPV(meltclosure_ptr_t meltclosp_, melt /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:5136:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:5142:/ getarg"); /*_.OEXP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -14094,7 +14094,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5137:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5143:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -14104,7 +14104,7 @@ meltlab_endgetargs: ; /*_#IS_A__L2*/ meltfnum[1] = melt_is_instance_of((melt_ptr_t)(/*_.OEXP__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJEXPV*/ meltfrout->tabval[0])));; - MELT_LOCATION("warmelt-outobj.melt:5137:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5143:/ cond"); /*cond*/ if (/*_#IS_A__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -14112,7 +14112,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:5137:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:5143:/ cond.else"); /*^block*/ /*anyblock*/ @@ -14131,14 +14131,14 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5137; + argtab[2].meltbp_long = 5143; /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG ""), argtab, "", (union meltparam_un*)0); } ; /*_._IFELSE___V6*/ meltfptr[5] = /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5137:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5143:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V7*/ meltfptr[6] = 0 ; } ; @@ -14147,7 +14147,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = /*_._IFELSE___V6*/ meltfptr[5];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5137:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5143:/ clear"); /*clear*/ /*_#IS_A__L2*/ meltfnum[1] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V6*/ meltfptr[5] = 0 ; @@ -14158,7 +14158,7 @@ meltlab_endgetargs: /*_.IFCPP___V5*/ meltfptr[4] = (/*nil*/NULL); #endif /*MELT_HAVE_DEBUG>0*/ ; - MELT_LOCATION("warmelt-outobj.melt:5138:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:5144:/ quasiblock"); /*^getslot*/ @@ -14214,7 +14214,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5142:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5148:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -14224,7 +14224,7 @@ meltlab_endgetargs: ; /*_#IS_MULTIPLE__L4*/ meltfnum[3] = (melt_magic_discr((melt_ptr_t)(/*_.CONT__V8*/ meltfptr[6])) == MELTOBMAG_MULTIPLE);; - MELT_LOCATION("warmelt-outobj.melt:5142:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5148:/ cond"); /*cond*/ if (/*_#IS_MULTIPLE__L4*/ meltfnum[3]) /*then*/ { /*^cond.then*/ @@ -14232,7 +14232,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:5142:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:5148:/ cond.else"); /*^block*/ /*anyblock*/ @@ -14251,7 +14251,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5142; + argtab[2].meltbp_long = 5148; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.CONT__V8*/ meltfptr[6]; /*_.MELT_ASSERT_FAILURE_FUN__V14*/ meltfptr[13] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -14260,7 +14260,7 @@ meltlab_endgetargs: /*_._IFELSE___V13*/ meltfptr[12] = /*_.MELT_ASSERT_FAILURE_FUN__V14*/ meltfptr[13];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5142:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5148:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V14*/ meltfptr[13] = 0 ; } ; @@ -14269,7 +14269,7 @@ meltlab_endgetargs: /*_.IFCPP___V12*/ meltfptr[10] = /*_._IFELSE___V13*/ meltfptr[12];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5142:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5148:/ clear"); /*clear*/ /*_#IS_MULTIPLE__L4*/ meltfnum[3] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V13*/ meltfptr[12] = 0 ; @@ -14297,7 +14297,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5146:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5152:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -14313,7 +14313,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5147:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5153:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -14323,7 +14323,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:5148:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5154:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[5])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[6]))) @@ -14351,7 +14351,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L9*/ meltfnum[8] = ((/*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6]) < (/*_#GET_INT__L8*/ meltfnum[7]));; - MELT_LOCATION("warmelt-outobj.melt:5147:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5153:/ cond"); /*cond*/ if (/*_#ltI__L9*/ meltfnum[8]) /*then*/ { /*^cond.then*/ @@ -14359,7 +14359,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:5147:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:5153:/ cond.else"); /*^block*/ /*anyblock*/ @@ -14378,7 +14378,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5147; + argtab[2].meltbp_long = 5153; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V20*/ meltfptr[19] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[1])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -14387,7 +14387,7 @@ meltlab_endgetargs: /*_._IFELSE___V19*/ meltfptr[18] = /*_.MELT_ASSERT_FAILURE_FUN__V20*/ meltfptr[19];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5147:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5153:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V20*/ meltfptr[19] = 0 ; } ; @@ -14396,7 +14396,7 @@ meltlab_endgetargs: /*_.IFCPP___V17*/ meltfptr[16] = /*_._IFELSE___V19*/ meltfptr[18];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5147:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5153:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L7*/ meltfnum[6] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V18*/ meltfptr[17] = 0 ; @@ -14418,7 +14418,7 @@ meltlab_endgetargs: /*citerepilog*/ - MELT_LOCATION("warmelt-outobj.melt:5143:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5149:/ clear"); /*clear*/ /*_.COMP__V15*/ meltfptr[13] = 0 ; /*^clear*/ /*clear*/ /*_#IX__L5*/ meltfnum[3] = 0 ; @@ -14431,7 +14431,7 @@ meltlab_endgetargs: } /*endciterblock FOREACH_IN_MULTIPLE*/ ; - MELT_LOCATION("warmelt-outobj.melt:5138:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5144:/ clear"); /*clear*/ /*_.CONT__V8*/ meltfptr[6] = 0 ; /*^clear*/ /*clear*/ /*_#plI__L3*/ meltfnum[1] = 0 ; @@ -14446,7 +14446,7 @@ meltlab_endgetargs: ; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5136:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5142:/ clear"); /*clear*/ /*_.IFCPP___V5*/ meltfptr[4] = 0 ; } @@ -14530,12 +14530,12 @@ meltrout_112_WARMELTmiOUTOBJ_OUTPUCOD_OBJLOCATEDEXPV(meltclosure_ptr_t meltclosp /* end of frame for routine meltrout_112_WARMELTmiOUTOBJ_OUTPUCOD_OBJLOCATEDEXPV fromline 1756 */ /* classy proc frame meltrout_112_WARMELTmiOUTOBJ_OUTPUCOD_OBJLOCATEDEXPV */ MeltFrame_meltrout_112_WARMELTmiOUTOBJ_OUTPUCOD_OBJLOCATEDEXPV - meltfram__ /*declfrastruct fromline 1780*/ - /*classyprocarg meltrout_112_WARMELTmiOUTOBJ_OUTPUCOD_OBJLOCATEDEXPV fromline 1785*/ + meltfram__ /*declfrastruct fromline 1782*/ + /*classyprocarg meltrout_112_WARMELTmiOUTOBJ_OUTPUCOD_OBJLOCATEDEXPV fromline 1787*/ #if MELT_HAVE_DEBUG > 0 - (__FILE__, __LINE__, meltclosp_) /* fromline 1789*/ + (__FILE__, __LINE__, meltclosp_) /* fromline 1791*/ #else /*MELT_HAVE_DEBUG */ - (meltclosp_) /* fromline 1793*/ + (meltclosp_) /* fromline 1795*/ #endif /*MELT_HAVE_DEBUG */ ; @@ -14551,7 +14551,7 @@ meltrout_112_WARMELTmiOUTOBJ_OUTPUCOD_OBJLOCATEDEXPV(meltclosure_ptr_t meltclosp /*getargs*/ /*getarg#0*/ - MELT_LOCATION("warmelt-outobj.melt:5153:/ getarg"); + MELT_LOCATION("warmelt-outobj.melt:5159:/ getarg"); /*_.OEXP__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ @@ -14583,7 +14583,7 @@ meltlab_endgetargs: #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5154:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5160:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -14609,7 +14609,7 @@ meltlab_endgetargs: 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG*/ ;; - MELT_LOCATION("warmelt-outobj.melt:5154:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5160:/ cond"); /*cond*/ if (/*_#MELT_NEED_DBG__L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -14628,7 +14628,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5154:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5160:/ apply"); /*apply*/ { union meltparam_un argtab[5]; @@ -14638,7 +14638,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5154; + argtab[2].meltbp_long = 5160; /*^apply.arg*/ argtab[3].meltbp_cstring = "outpucod_objlocatedexpv oexp="; /*^apply.arg*/ @@ -14649,7 +14649,7 @@ meltlab_endgetargs: /*_._IF___V5*/ meltfptr[4] = /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5154:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5160:/ clear"); /*clear*/ /*_#MELT_CALLCOUNT__L3*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_.MELT_DEBUG_FUN__V6*/ meltfptr[5] = 0 ; @@ -14664,7 +14664,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5154:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5160:/ locexp"); /*void*/(void)0; } ; @@ -14698,7 +14698,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5155:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5161:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -14708,7 +14708,7 @@ meltlab_endgetargs: ; /*_#IS_A__L4*/ meltfnum[2] = melt_is_instance_of((melt_ptr_t)(/*_.OEXP__V2*/ meltfptr[1]), (melt_ptr_t)((/*!CLASS_OBJLOCATEDEXPV*/ meltfrout->tabval[1])));; - MELT_LOCATION("warmelt-outobj.melt:5155:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5161:/ cond"); /*cond*/ if (/*_#IS_A__L4*/ meltfnum[2]) /*then*/ { /*^cond.then*/ @@ -14716,7 +14716,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:5155:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:5161:/ cond.else"); /*^block*/ /*anyblock*/ @@ -14735,7 +14735,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5155; + argtab[2].meltbp_long = 5161; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OEXP__V2*/ meltfptr[1]; /*_.MELT_ASSERT_FAILURE_FUN__V9*/ meltfptr[8] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[2])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -14744,7 +14744,7 @@ meltlab_endgetargs: /*_._IFELSE___V8*/ meltfptr[4] = /*_.MELT_ASSERT_FAILURE_FUN__V9*/ meltfptr[8];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5155:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5161:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V9*/ meltfptr[8] = 0 ; } ; @@ -14753,7 +14753,7 @@ meltlab_endgetargs: /*_.IFCPP___V7*/ meltfptr[5] = /*_._IFELSE___V8*/ meltfptr[4];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5155:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5161:/ clear"); /*clear*/ /*_#IS_A__L4*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V8*/ meltfptr[4] = 0 ; @@ -14764,7 +14764,7 @@ meltlab_endgetargs: /*_.IFCPP___V7*/ meltfptr[5] = (/*nil*/NULL); #endif /*MELT_HAVE_DEBUG>0*/ ; - MELT_LOCATION("warmelt-outobj.melt:5156:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:5162:/ quasiblock"); /*^getslot*/ @@ -14775,7 +14775,7 @@ meltlab_endgetargs: /*_.CONT__V10*/ meltfptr[8] = slot; }; ; - MELT_LOCATION("warmelt-outobj.melt:5157:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:5163:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OEXP__V2*/ meltfptr[1]) /*=obj*/; @@ -14785,7 +14785,7 @@ meltlab_endgetargs: ; /*_#DEPTHP1__L5*/ meltfnum[1] = ((/*_#DEPTH__L1*/ meltfnum[0]) + (1));; - MELT_LOCATION("warmelt-outobj.melt:5159:/ getslot"); + MELT_LOCATION("warmelt-outobj.melt:5165:/ getslot"); { melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.OEXP__V2*/ meltfptr[1]) /*=obj*/; @@ -14795,7 +14795,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5162:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5168:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -14805,7 +14805,7 @@ meltlab_endgetargs: ; /*_#IS_MULTIPLE_OR_NULL__L6*/ meltfnum[2] = ((/*_.CONT__V10*/ meltfptr[8]) == NULL || (melt_unsafe_magic_discr((melt_ptr_t)(/*_.CONT__V10*/ meltfptr[8])) == MELTOBMAG_MULTIPLE));; - MELT_LOCATION("warmelt-outobj.melt:5162:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5168:/ cond"); /*cond*/ if (/*_#IS_MULTIPLE_OR_NULL__L6*/ meltfnum[2]) /*then*/ { /*^cond.then*/ @@ -14813,7 +14813,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:5162:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:5168:/ cond.else"); /*^block*/ /*anyblock*/ @@ -14832,7 +14832,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5162; + argtab[2].meltbp_long = 5168; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.CONT__V10*/ meltfptr[8]; /*_.MELT_ASSERT_FAILURE_FUN__V15*/ meltfptr[14] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[2])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -14841,7 +14841,7 @@ meltlab_endgetargs: /*_._IFELSE___V14*/ meltfptr[13] = /*_.MELT_ASSERT_FAILURE_FUN__V15*/ meltfptr[14];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5162:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5168:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V15*/ meltfptr[14] = 0 ; } ; @@ -14850,7 +14850,7 @@ meltlab_endgetargs: /*_.IFCPP___V13*/ meltfptr[12] = /*_._IFELSE___V14*/ meltfptr[13];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5162:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5168:/ clear"); /*clear*/ /*_#IS_MULTIPLE_OR_NULL__L6*/ meltfnum[2] = 0 ; /*^clear*/ /*clear*/ /*_._IFELSE___V14*/ meltfptr[13] = 0 ; @@ -14867,7 +14867,7 @@ meltlab_endgetargs: /*^compute*/ /*_#eqeq__L7*/ meltfnum[2] = ((/*_.OTYP__V12*/ meltfptr[11]) == ((/*!CTYPE_VOID*/ meltfrout->tabval[3])));; - MELT_LOCATION("warmelt-outobj.melt:5163:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5169:/ cond"); /*cond*/ if (/*_#eqeq__L7*/ meltfnum[2]) /*then*/ { /*^cond.then*/ @@ -14877,26 +14877,26 @@ meltlab_endgetargs: { - MELT_LOCATION("warmelt-outobj.melt:5165:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5171:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; { - MELT_LOCATION("warmelt-outobj.melt:5166:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5172:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( "{")); } ; { - MELT_LOCATION("warmelt-outobj.melt:5167:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5173:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5168:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5174:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -14910,7 +14910,7 @@ meltlab_endgetargs: /*_.OUTPUT_LOCATION__V17*/ meltfptr[13] = melt_apply ((meltclosure_ptr_t)((/*!OUTPUT_LOCATION*/ meltfrout->tabval[4])), (melt_ptr_t)(/*_.OLOC__V11*/ meltfptr[4]), (MELTBPARSTR_PTR MELTBPARSTR_LONG MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un*)0); } ; - MELT_LOCATION("warmelt-outobj.melt:5164:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:5170:/ quasiblock"); /*_.PROGN___V18*/ meltfptr[17] = /*_.OUTPUT_LOCATION__V17*/ meltfptr[13];; @@ -14918,7 +14918,7 @@ meltlab_endgetargs: /*_._IFELSE___V16*/ meltfptr[14] = /*_.PROGN___V18*/ meltfptr[17];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5163:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5169:/ clear"); /*clear*/ /*_.OUTPUT_LOCATION__V17*/ meltfptr[13] = 0 ; /*^clear*/ /*clear*/ /*_.PROGN___V18*/ meltfptr[17] = 0 ; @@ -14935,7 +14935,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5170:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5176:/ cond"); /*cond*/ if (/*_.OLOC__V11*/ meltfptr[4]) /*then*/ { /*^cond.then*/ @@ -14946,7 +14946,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5171:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5177:/ apply"); /*apply*/ { union meltparam_un argtab[3]; @@ -14963,7 +14963,7 @@ meltlab_endgetargs: /*_._IF___V19*/ meltfptr[13] = /*_.OUTPUT_RAW_LOCATION__V20*/ meltfptr[17];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5170:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5176:/ clear"); /*clear*/ /*_.OUTPUT_RAW_LOCATION__V20*/ meltfptr[17] = 0 ; } ; @@ -14978,7 +14978,7 @@ meltlab_endgetargs: /*_._IFELSE___V16*/ meltfptr[14] = /*_._IF___V19*/ meltfptr[13];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5163:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5169:/ clear"); /*clear*/ /*_._IF___V19*/ meltfptr[13] = 0 ; } ; @@ -15024,7 +15024,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5176:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5182:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -15050,7 +15050,7 @@ meltlab_endgetargs: 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG*/ ;; - MELT_LOCATION("warmelt-outobj.melt:5176:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5182:/ cond"); /*cond*/ if (/*_#MELT_NEED_DBG__L8*/ meltfnum[7]) /*then*/ { /*^cond.then*/ @@ -15069,7 +15069,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5176:/ apply"); + MELT_LOCATION("warmelt-outobj.melt:5182:/ apply"); /*apply*/ { union meltparam_un argtab[5]; @@ -15079,7 +15079,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5176; + argtab[2].meltbp_long = 5182; /*^apply.arg*/ argtab[3].meltbp_cstring = "outpucod_objlocatedexpv cont="; /*^apply.arg*/ @@ -15090,7 +15090,7 @@ meltlab_endgetargs: /*_._IF___V23*/ meltfptr[13] = /*_.MELT_DEBUG_FUN__V24*/ meltfptr[23];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5176:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5182:/ clear"); /*clear*/ /*_#MELT_CALLCOUNT__L9*/ meltfnum[8] = 0 ; /*^clear*/ /*clear*/ /*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] = 0 ; @@ -15105,7 +15105,7 @@ meltlab_endgetargs: ; { - MELT_LOCATION("warmelt-outobj.melt:5176:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5182:/ locexp"); /*void*/(void)0; } ; @@ -15152,7 +15152,7 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5180:/ msend"); + MELT_LOCATION("warmelt-outobj.melt:5186:/ msend"); /*msend*/ { union meltparam_un argtab[3]; @@ -15168,7 +15168,7 @@ meltlab_endgetargs: ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5181:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5187:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -15178,7 +15178,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L11*/ meltfnum[7] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:5182:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5188:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[8])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[9]))) @@ -15206,7 +15206,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L13*/ meltfnum[12] = ((/*_#STRBUF_USEDLENGTH__L11*/ meltfnum[7]) < (/*_#GET_INT__L12*/ meltfnum[11]));; - MELT_LOCATION("warmelt-outobj.melt:5181:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5187:/ cond"); /*cond*/ if (/*_#ltI__L13*/ meltfnum[12]) /*then*/ { /*^cond.then*/ @@ -15214,7 +15214,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:5181:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:5187:/ cond.else"); /*^block*/ /*anyblock*/ @@ -15233,7 +15233,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5181; + argtab[2].meltbp_long = 5187; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V30*/ meltfptr[29] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[2])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -15242,7 +15242,7 @@ meltlab_endgetargs: /*_._IFELSE___V29*/ meltfptr[28] = /*_.MELT_ASSERT_FAILURE_FUN__V30*/ meltfptr[29];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5181:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5187:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V30*/ meltfptr[29] = 0 ; } ; @@ -15251,7 +15251,7 @@ meltlab_endgetargs: /*_.IFCPP___V27*/ meltfptr[26] = /*_._IFELSE___V29*/ meltfptr[28];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5181:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5187:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L11*/ meltfnum[7] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V28*/ meltfptr[27] = 0 ; @@ -15273,7 +15273,7 @@ meltlab_endgetargs: /*citerepilog*/ - MELT_LOCATION("warmelt-outobj.melt:5177:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5183:/ clear"); /*clear*/ /*_.COMP__V25*/ meltfptr[23] = 0 ; /*^clear*/ /*clear*/ /*_#IX__L10*/ meltfnum[8] = 0 ; @@ -15288,7 +15288,7 @@ meltlab_endgetargs: ; /*_#eqeq__L14*/ meltfnum[7] = ((/*_.OTYP__V12*/ meltfptr[11]) == ((/*!CTYPE_VOID*/ meltfrout->tabval[3])));; - MELT_LOCATION("warmelt-outobj.melt:5184:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5190:/ cond"); /*cond*/ if (/*_#eqeq__L14*/ meltfnum[7]) /*then*/ { /*^cond.then*/ @@ -15298,17 +15298,17 @@ meltlab_endgetargs: { - MELT_LOCATION("warmelt-outobj.melt:5185:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5191:/ locexp"); /*add2sbuf_strconst*/ meltgc_add_strbuf((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), ( ";}")); } ; { - MELT_LOCATION("warmelt-outobj.melt:5186:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5192:/ locexp"); meltgc_strbuf_add_indent((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]), (/*_#DEPTH__L1*/ meltfnum[0]), 0); } ; - MELT_LOCATION("warmelt-outobj.melt:5184:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:5190:/ quasiblock"); /*epilog*/ @@ -15317,7 +15317,7 @@ meltlab_endgetargs: } /*noelse*/ ; - MELT_LOCATION("warmelt-outobj.melt:5156:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5162:/ clear"); /*clear*/ /*_.CONT__V10*/ meltfptr[8] = 0 ; /*^clear*/ /*clear*/ /*_.OLOC__V11*/ meltfptr[4] = 0 ; @@ -15337,7 +15337,7 @@ meltlab_endgetargs: /*clear*/ /*_#eqeq__L14*/ meltfnum[7] = 0 ; #if MELT_HAVE_DEBUG>0 - MELT_LOCATION("warmelt-outobj.melt:5188:/ cppif.then"); + MELT_LOCATION("warmelt-outobj.melt:5194:/ cppif.then"); /*^block*/ /*anyblock*/ { @@ -15347,7 +15347,7 @@ meltlab_endgetargs: ; /*_#STRBUF_USEDLENGTH__L15*/ meltfnum[11] = melt_strbuf_usedlength((melt_ptr_t)(/*_.IMPLBUF__V4*/ meltfptr[3]));; - MELT_LOCATION("warmelt-outobj.melt:5189:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5195:/ cond"); /*cond*/ if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BUFFER_LIMIT_CONT*/ meltfrout->tabval[8])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[9]))) @@ -15375,7 +15375,7 @@ meltlab_endgetargs: /*^compute*/ /*_#ltI__L17*/ meltfnum[1] = ((/*_#STRBUF_USEDLENGTH__L15*/ meltfnum[11]) < (/*_#GET_INT__L16*/ meltfnum[12]));; - MELT_LOCATION("warmelt-outobj.melt:5188:/ cond"); + MELT_LOCATION("warmelt-outobj.melt:5194:/ cond"); /*cond*/ if (/*_#ltI__L17*/ meltfnum[1]) /*then*/ { /*^cond.then*/ @@ -15383,7 +15383,7 @@ meltlab_endgetargs: } else { - MELT_LOCATION("warmelt-outobj.melt:5188:/ cond.else"); + MELT_LOCATION("warmelt-outobj.melt:5194:/ cond.else"); /*^block*/ /*anyblock*/ @@ -15402,7 +15402,7 @@ meltlab_endgetargs: /*^apply.arg*/ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg*/ - argtab[2].meltbp_long = 5188; + argtab[2].meltbp_long = 5194; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.IMPLBUF__V4*/ meltfptr[3]; /*_.MELT_ASSERT_FAILURE_FUN__V34*/ meltfptr[8] = melt_apply ((meltclosure_ptr_t)((/*!MELT_ASSERT_FAILURE_FUN*/ meltfrout->tabval[2])), (melt_ptr_t)((/*nil*/NULL)), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); @@ -15411,7 +15411,7 @@ meltlab_endgetargs: /*_._IFELSE___V33*/ meltfptr[28] = /*_.MELT_ASSERT_FAILURE_FUN__V34*/ meltfptr[8];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5188:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5194:/ clear"); /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V34*/ meltfptr[8] = 0 ; } ; @@ -15420,7 +15420,7 @@ meltlab_endgetargs: /*_.IFCPP___V31*/ meltfptr[29] = /*_._IFELSE___V33*/ meltfptr[28];; /*epilog*/ - MELT_LOCATION("warmelt-outobj.melt:5188:/ clear"); + MELT_LOCATION("warmelt-outobj.melt:5194:/ clear"); /*clear*/ /*_#STRBUF_USEDLENGTH__L15*/ meltfnum[11] = 0 ; /*^clear*/ /*clear*/ /*_.REFERENCED_VALUE__V32*/ meltfptr[27] = 0 ; @@ -15440,13 +15440,13 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - MELT_LOCATION("warmelt-outobj.melt:5153:/ quasiblock"); + MELT_LOCATION("warmelt-outobj.melt:5159:/ quasiblock"); /*_._RETVAL___V1*/ meltfptr[0] = /*_.IFCPP___V31*/ meltfptr[29];; { - MELT_LOCATION("warmelt-outobj.melt:5153:/ locexp"); + MELT_LOCATION("warmelt-outobj.melt:5159:/ locexp"); /*ochecknores compilobj_nrep_return*/ #if MELT_HAVE_DEBUG > 0 if (meltxresdescr_ && meltxresdescr_[0] && meltxrestab_) |