diff options
Diffstat (limited to 'gcc/melt/generated/warmelt-debug.cc')
| -rw-r--r-- | gcc/melt/generated/warmelt-debug.cc | 3638 |
1 files changed, 2386 insertions, 1252 deletions
diff --git a/gcc/melt/generated/warmelt-debug.cc b/gcc/melt/generated/warmelt-debug.cc index 2c2d56f6405..f489ba7afda 100644 --- a/gcc/melt/generated/warmelt-debug.cc +++ b/gcc/melt/generated/warmelt-debug.cc @@ -442,7 +442,8 @@ meltrout_1_WARMELTmiDEBUG_REGISTER_TREE_DEBUG_FUN(meltclosure_ptr_t meltclosp_, /* end of frame for routine meltrout_1_WARMELTmiDEBUG_REGISTER_TREE_DEBUG_FUN fromline 1756 */ - /* classy proc frame meltrout_1_WARMELTmiDEBUG_REGISTER_TREE_DEBUG_FUN */ MeltFrame_meltrout_1_WARMELTmiDEBUG_REGISTER_TREE_DEBUG_FUN + /* classy proc frame meltrout_1_WARMELTmiDEBUG_REGISTER_TREE_DEBUG_FUN */ + MeltFrame_meltrout_1_WARMELTmiDEBUG_REGISTER_TREE_DEBUG_FUN meltfram__ /*declfrastruct fromline 1780*/ /*classyprocarg meltrout_1_WARMELTmiDEBUG_REGISTER_TREE_DEBUG_FUN fromline 1785*/ #if ENABLE_CHECKING @@ -455,7 +456,8 @@ meltrout_1_WARMELTmiDEBUG_REGISTER_TREE_DEBUG_FUN(meltclosure_ptr_t meltclosp_, #define meltframe meltfram__ melt_trace_start("REGISTER_TREE_DEBUG_FUN", meltcallcount); - /*use arguments*/ (void) meltclosp_; + /*use arguments*/ + (void) meltclosp_; (void)meltfirstargp_; (void)meltxargdescr_; (void)meltxargtab_; @@ -465,7 +467,8 @@ meltrout_1_WARMELTmiDEBUG_REGISTER_TREE_DEBUG_FUN(meltclosure_ptr_t meltclosp_, /*getarg#0*/ MELT_LOCATION("warmelt-debug.melt:111:/ getarg"); - /*_.F__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; + /*_.F__V2*/ + meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto meltlab_endgetargs; meltlab_endgetargs: @@ -479,7 +482,8 @@ meltlab_endgetargs: /*^cond*/ - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!TREE_DEBUG_FUNCONT*/ meltfrout->tabval[0])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[1]))) ) /*then*/ @@ -490,7 +494,8 @@ meltlab_endgetargs: melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)((/*!TREE_DEBUG_FUNCONT*/ meltfrout->tabval[0])) /*=obj*/; melt_object_get_field(slot,obj, 0, "REFERENCED_VALUE"); - /*_.OLDCONT__V4*/ meltfptr[3] = slot; + /*_.OLDCONT__V4*/ + meltfptr[3] = slot; }; ; } @@ -504,10 +509,12 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; /*^compute*/ - /*_#NULL__L1*/ meltfnum[0] = + /*_#NULL__L1*/ + meltfnum[0] = (/*null*/(/*_.F__V2*/ meltfptr[1]) == NULL);; MELT_LOCATION("warmelt-debug.melt:118:/ cond"); - /*cond*/ if (/*_#NULL__L1*/ meltfnum[0]) /*then*/ + /*cond*/ + if (/*_#NULL__L1*/ meltfnum[0]) /*then*/ { /*^cond.then*/ /*_#OR___L2*/ meltfnum[1] = /*_#NULL__L1*/ meltfnum[0];; @@ -523,17 +530,20 @@ meltlab_endgetargs: /*_#IS_CLOSURE__L3*/ meltfnum[2] = (melt_magic_discr((melt_ptr_t)(/*_.F__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; /*^compute*/ - /*_#OR___L2*/ meltfnum[1] = /*_#IS_CLOSURE__L3*/ meltfnum[2];; + /*_#OR___L2*/ + meltfnum[1] = /*_#IS_CLOSURE__L3*/ meltfnum[2];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:118:/ clear"); - /*clear*/ /*_#IS_CLOSURE__L3*/ meltfnum[2] = 0 ; + /*clear*/ /*_#IS_CLOSURE__L3*/ + meltfnum[2] = 0 ; } ; } ; /*^cond*/ - /*cond*/ if (/*_#OR___L2*/ meltfnum[1]) /*then*/ + /*cond*/ + if (/*_#OR___L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -544,7 +554,8 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; MELT_LOCATION("warmelt-debug.melt:119:/ cond"); - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!TREE_DEBUG_FUNCONT*/ meltfrout->tabval[0])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[1]))) ) /*then*/ @@ -576,18 +587,23 @@ meltlab_endgetargs: ; } /*noelse*/ ; - /*_.LET___V3*/ meltfptr[2] = /*_.OLDCONT__V4*/ meltfptr[3];; + /*_.LET___V3*/ + meltfptr[2] = /*_.OLDCONT__V4*/ meltfptr[3];; MELT_LOCATION("warmelt-debug.melt:116:/ clear"); - /*clear*/ /*_.OLDCONT__V4*/ meltfptr[3] = 0 ; + /*clear*/ /*_.OLDCONT__V4*/ + meltfptr[3] = 0 ; /*^clear*/ - /*clear*/ /*_#NULL__L1*/ meltfnum[0] = 0 ; + /*clear*/ /*_#NULL__L1*/ + meltfnum[0] = 0 ; /*^clear*/ - /*clear*/ /*_#OR___L2*/ meltfnum[1] = 0 ; + /*clear*/ /*_#OR___L2*/ + meltfnum[1] = 0 ; MELT_LOCATION("warmelt-debug.melt:111:/ quasiblock"); - /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; + /*_._RETVAL___V1*/ + meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; { MELT_LOCATION("warmelt-debug.melt:111:/ locexp"); @@ -602,11 +618,13 @@ meltlab_endgetargs: ; /*^finalreturn*/ ; - /*finalret*/ goto meltlabend_rout ; + /*finalret*/ + goto meltlabend_rout ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.LET___V3*/ meltfptr[2] = 0 ; + /*clear*/ /*_.LET___V3*/ + meltfptr[2] = 0 ; } ; @@ -688,7 +706,8 @@ meltrout_2_WARMELTmiDEBUG_REGISTER_GIMPLE_DEBUG_FUN(meltclosure_ptr_t meltclosp_ /* end of frame for routine meltrout_2_WARMELTmiDEBUG_REGISTER_GIMPLE_DEBUG_FUN fromline 1756 */ - /* classy proc frame meltrout_2_WARMELTmiDEBUG_REGISTER_GIMPLE_DEBUG_FUN */ MeltFrame_meltrout_2_WARMELTmiDEBUG_REGISTER_GIMPLE_DEBUG_FUN + /* classy proc frame meltrout_2_WARMELTmiDEBUG_REGISTER_GIMPLE_DEBUG_FUN */ + MeltFrame_meltrout_2_WARMELTmiDEBUG_REGISTER_GIMPLE_DEBUG_FUN meltfram__ /*declfrastruct fromline 1780*/ /*classyprocarg meltrout_2_WARMELTmiDEBUG_REGISTER_GIMPLE_DEBUG_FUN fromline 1785*/ #if ENABLE_CHECKING @@ -701,7 +720,8 @@ meltrout_2_WARMELTmiDEBUG_REGISTER_GIMPLE_DEBUG_FUN(meltclosure_ptr_t meltclosp_ #define meltframe meltfram__ melt_trace_start("REGISTER_GIMPLE_DEBUG_FUN", meltcallcount); - /*use arguments*/ (void) meltclosp_; + /*use arguments*/ + (void) meltclosp_; (void)meltfirstargp_; (void)meltxargdescr_; (void)meltxargtab_; @@ -711,7 +731,8 @@ meltrout_2_WARMELTmiDEBUG_REGISTER_GIMPLE_DEBUG_FUN(meltclosure_ptr_t meltclosp_ /*getarg#0*/ MELT_LOCATION("warmelt-debug.melt:124:/ getarg"); - /*_.F__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; + /*_.F__V2*/ + meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto meltlab_endgetargs; meltlab_endgetargs: @@ -725,7 +746,8 @@ meltlab_endgetargs: /*^cond*/ - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!GIMPLE_DEBUG_FUNCONT*/ meltfrout->tabval[0])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[1]))) ) /*then*/ @@ -736,7 +758,8 @@ meltlab_endgetargs: melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)((/*!GIMPLE_DEBUG_FUNCONT*/ meltfrout->tabval[0])) /*=obj*/; melt_object_get_field(slot,obj, 0, "REFERENCED_VALUE"); - /*_.OLDCONT__V4*/ meltfptr[3] = slot; + /*_.OLDCONT__V4*/ + meltfptr[3] = slot; }; ; } @@ -750,10 +773,12 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; /*^compute*/ - /*_#NULL__L1*/ meltfnum[0] = + /*_#NULL__L1*/ + meltfnum[0] = (/*null*/(/*_.F__V2*/ meltfptr[1]) == NULL);; MELT_LOCATION("warmelt-debug.melt:131:/ cond"); - /*cond*/ if (/*_#NULL__L1*/ meltfnum[0]) /*then*/ + /*cond*/ + if (/*_#NULL__L1*/ meltfnum[0]) /*then*/ { /*^cond.then*/ /*_#OR___L2*/ meltfnum[1] = /*_#NULL__L1*/ meltfnum[0];; @@ -769,17 +794,20 @@ meltlab_endgetargs: /*_#IS_CLOSURE__L3*/ meltfnum[2] = (melt_magic_discr((melt_ptr_t)(/*_.F__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; /*^compute*/ - /*_#OR___L2*/ meltfnum[1] = /*_#IS_CLOSURE__L3*/ meltfnum[2];; + /*_#OR___L2*/ + meltfnum[1] = /*_#IS_CLOSURE__L3*/ meltfnum[2];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:131:/ clear"); - /*clear*/ /*_#IS_CLOSURE__L3*/ meltfnum[2] = 0 ; + /*clear*/ /*_#IS_CLOSURE__L3*/ + meltfnum[2] = 0 ; } ; } ; /*^cond*/ - /*cond*/ if (/*_#OR___L2*/ meltfnum[1]) /*then*/ + /*cond*/ + if (/*_#OR___L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -790,7 +818,8 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; MELT_LOCATION("warmelt-debug.melt:132:/ cond"); - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!GIMPLE_DEBUG_FUNCONT*/ meltfrout->tabval[0])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[1]))) ) /*then*/ @@ -822,18 +851,23 @@ meltlab_endgetargs: ; } /*noelse*/ ; - /*_.LET___V3*/ meltfptr[2] = /*_.OLDCONT__V4*/ meltfptr[3];; + /*_.LET___V3*/ + meltfptr[2] = /*_.OLDCONT__V4*/ meltfptr[3];; MELT_LOCATION("warmelt-debug.melt:129:/ clear"); - /*clear*/ /*_.OLDCONT__V4*/ meltfptr[3] = 0 ; + /*clear*/ /*_.OLDCONT__V4*/ + meltfptr[3] = 0 ; /*^clear*/ - /*clear*/ /*_#NULL__L1*/ meltfnum[0] = 0 ; + /*clear*/ /*_#NULL__L1*/ + meltfnum[0] = 0 ; /*^clear*/ - /*clear*/ /*_#OR___L2*/ meltfnum[1] = 0 ; + /*clear*/ /*_#OR___L2*/ + meltfnum[1] = 0 ; MELT_LOCATION("warmelt-debug.melt:124:/ quasiblock"); - /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; + /*_._RETVAL___V1*/ + meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; { MELT_LOCATION("warmelt-debug.melt:124:/ locexp"); @@ -848,11 +882,13 @@ meltlab_endgetargs: ; /*^finalreturn*/ ; - /*finalret*/ goto meltlabend_rout ; + /*finalret*/ + goto meltlabend_rout ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.LET___V3*/ meltfptr[2] = 0 ; + /*clear*/ /*_.LET___V3*/ + meltfptr[2] = 0 ; } ; @@ -934,7 +970,8 @@ meltrout_3_WARMELTmiDEBUG_REGISTER_GIMPLESEQ_DEBUG_FUN(meltclosure_ptr_t meltclo /* end of frame for routine meltrout_3_WARMELTmiDEBUG_REGISTER_GIMPLESEQ_DEBUG_FUN fromline 1756 */ - /* classy proc frame meltrout_3_WARMELTmiDEBUG_REGISTER_GIMPLESEQ_DEBUG_FUN */ MeltFrame_meltrout_3_WARMELTmiDEBUG_REGISTER_GIMPLESEQ_DEBUG_FUN + /* classy proc frame meltrout_3_WARMELTmiDEBUG_REGISTER_GIMPLESEQ_DEBUG_FUN */ + MeltFrame_meltrout_3_WARMELTmiDEBUG_REGISTER_GIMPLESEQ_DEBUG_FUN meltfram__ /*declfrastruct fromline 1780*/ /*classyprocarg meltrout_3_WARMELTmiDEBUG_REGISTER_GIMPLESEQ_DEBUG_FUN fromline 1785*/ #if ENABLE_CHECKING @@ -947,7 +984,8 @@ meltrout_3_WARMELTmiDEBUG_REGISTER_GIMPLESEQ_DEBUG_FUN(meltclosure_ptr_t meltclo #define meltframe meltfram__ melt_trace_start("REGISTER_GIMPLESEQ_DEBUG_FUN", meltcallcount); - /*use arguments*/ (void) meltclosp_; + /*use arguments*/ + (void) meltclosp_; (void)meltfirstargp_; (void)meltxargdescr_; (void)meltxargtab_; @@ -957,7 +995,8 @@ meltrout_3_WARMELTmiDEBUG_REGISTER_GIMPLESEQ_DEBUG_FUN(meltclosure_ptr_t meltclo /*getarg#0*/ MELT_LOCATION("warmelt-debug.melt:137:/ getarg"); - /*_.F__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; + /*_.F__V2*/ + meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto meltlab_endgetargs; meltlab_endgetargs: @@ -971,7 +1010,8 @@ meltlab_endgetargs: /*^cond*/ - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!GIMPLESEQ_DEBUG_FUNCONT*/ meltfrout->tabval[0])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[1]))) ) /*then*/ @@ -982,7 +1022,8 @@ meltlab_endgetargs: melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)((/*!GIMPLESEQ_DEBUG_FUNCONT*/ meltfrout->tabval[0])) /*=obj*/; melt_object_get_field(slot,obj, 0, "REFERENCED_VALUE"); - /*_.OLDCONT__V4*/ meltfptr[3] = slot; + /*_.OLDCONT__V4*/ + meltfptr[3] = slot; }; ; } @@ -996,10 +1037,12 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; /*^compute*/ - /*_#NULL__L1*/ meltfnum[0] = + /*_#NULL__L1*/ + meltfnum[0] = (/*null*/(/*_.F__V2*/ meltfptr[1]) == NULL);; MELT_LOCATION("warmelt-debug.melt:144:/ cond"); - /*cond*/ if (/*_#NULL__L1*/ meltfnum[0]) /*then*/ + /*cond*/ + if (/*_#NULL__L1*/ meltfnum[0]) /*then*/ { /*^cond.then*/ /*_#OR___L2*/ meltfnum[1] = /*_#NULL__L1*/ meltfnum[0];; @@ -1015,17 +1058,20 @@ meltlab_endgetargs: /*_#IS_CLOSURE__L3*/ meltfnum[2] = (melt_magic_discr((melt_ptr_t)(/*_.F__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; /*^compute*/ - /*_#OR___L2*/ meltfnum[1] = /*_#IS_CLOSURE__L3*/ meltfnum[2];; + /*_#OR___L2*/ + meltfnum[1] = /*_#IS_CLOSURE__L3*/ meltfnum[2];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:144:/ clear"); - /*clear*/ /*_#IS_CLOSURE__L3*/ meltfnum[2] = 0 ; + /*clear*/ /*_#IS_CLOSURE__L3*/ + meltfnum[2] = 0 ; } ; } ; /*^cond*/ - /*cond*/ if (/*_#OR___L2*/ meltfnum[1]) /*then*/ + /*cond*/ + if (/*_#OR___L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -1036,7 +1082,8 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; MELT_LOCATION("warmelt-debug.melt:145:/ cond"); - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!GIMPLESEQ_DEBUG_FUNCONT*/ meltfrout->tabval[0])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[1]))) ) /*then*/ @@ -1068,18 +1115,23 @@ meltlab_endgetargs: ; } /*noelse*/ ; - /*_.LET___V3*/ meltfptr[2] = /*_.OLDCONT__V4*/ meltfptr[3];; + /*_.LET___V3*/ + meltfptr[2] = /*_.OLDCONT__V4*/ meltfptr[3];; MELT_LOCATION("warmelt-debug.melt:142:/ clear"); - /*clear*/ /*_.OLDCONT__V4*/ meltfptr[3] = 0 ; + /*clear*/ /*_.OLDCONT__V4*/ + meltfptr[3] = 0 ; /*^clear*/ - /*clear*/ /*_#NULL__L1*/ meltfnum[0] = 0 ; + /*clear*/ /*_#NULL__L1*/ + meltfnum[0] = 0 ; /*^clear*/ - /*clear*/ /*_#OR___L2*/ meltfnum[1] = 0 ; + /*clear*/ /*_#OR___L2*/ + meltfnum[1] = 0 ; MELT_LOCATION("warmelt-debug.melt:137:/ quasiblock"); - /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; + /*_._RETVAL___V1*/ + meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; { MELT_LOCATION("warmelt-debug.melt:137:/ locexp"); @@ -1094,11 +1146,13 @@ meltlab_endgetargs: ; /*^finalreturn*/ ; - /*finalret*/ goto meltlabend_rout ; + /*finalret*/ + goto meltlabend_rout ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.LET___V3*/ meltfptr[2] = 0 ; + /*clear*/ /*_.LET___V3*/ + meltfptr[2] = 0 ; } ; @@ -1180,7 +1234,8 @@ meltrout_4_WARMELTmiDEBUG_REGISTER_EDGE_DEBUG_FUN(meltclosure_ptr_t meltclosp_, /* end of frame for routine meltrout_4_WARMELTmiDEBUG_REGISTER_EDGE_DEBUG_FUN fromline 1756 */ - /* classy proc frame meltrout_4_WARMELTmiDEBUG_REGISTER_EDGE_DEBUG_FUN */ MeltFrame_meltrout_4_WARMELTmiDEBUG_REGISTER_EDGE_DEBUG_FUN + /* classy proc frame meltrout_4_WARMELTmiDEBUG_REGISTER_EDGE_DEBUG_FUN */ + MeltFrame_meltrout_4_WARMELTmiDEBUG_REGISTER_EDGE_DEBUG_FUN meltfram__ /*declfrastruct fromline 1780*/ /*classyprocarg meltrout_4_WARMELTmiDEBUG_REGISTER_EDGE_DEBUG_FUN fromline 1785*/ #if ENABLE_CHECKING @@ -1193,7 +1248,8 @@ meltrout_4_WARMELTmiDEBUG_REGISTER_EDGE_DEBUG_FUN(meltclosure_ptr_t meltclosp_, #define meltframe meltfram__ melt_trace_start("REGISTER_EDGE_DEBUG_FUN", meltcallcount); - /*use arguments*/ (void) meltclosp_; + /*use arguments*/ + (void) meltclosp_; (void)meltfirstargp_; (void)meltxargdescr_; (void)meltxargtab_; @@ -1203,7 +1259,8 @@ meltrout_4_WARMELTmiDEBUG_REGISTER_EDGE_DEBUG_FUN(meltclosure_ptr_t meltclosp_, /*getarg#0*/ MELT_LOCATION("warmelt-debug.melt:150:/ getarg"); - /*_.F__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; + /*_.F__V2*/ + meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto meltlab_endgetargs; meltlab_endgetargs: @@ -1217,7 +1274,8 @@ meltlab_endgetargs: /*^cond*/ - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!EDGE_DEBUG_FUNCONT*/ meltfrout->tabval[0])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[1]))) ) /*then*/ @@ -1228,7 +1286,8 @@ meltlab_endgetargs: melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)((/*!EDGE_DEBUG_FUNCONT*/ meltfrout->tabval[0])) /*=obj*/; melt_object_get_field(slot,obj, 0, "REFERENCED_VALUE"); - /*_.OLDCONT__V4*/ meltfptr[3] = slot; + /*_.OLDCONT__V4*/ + meltfptr[3] = slot; }; ; } @@ -1242,10 +1301,12 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; /*^compute*/ - /*_#NULL__L1*/ meltfnum[0] = + /*_#NULL__L1*/ + meltfnum[0] = (/*null*/(/*_.F__V2*/ meltfptr[1]) == NULL);; MELT_LOCATION("warmelt-debug.melt:157:/ cond"); - /*cond*/ if (/*_#NULL__L1*/ meltfnum[0]) /*then*/ + /*cond*/ + if (/*_#NULL__L1*/ meltfnum[0]) /*then*/ { /*^cond.then*/ /*_#OR___L2*/ meltfnum[1] = /*_#NULL__L1*/ meltfnum[0];; @@ -1261,17 +1322,20 @@ meltlab_endgetargs: /*_#IS_CLOSURE__L3*/ meltfnum[2] = (melt_magic_discr((melt_ptr_t)(/*_.F__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; /*^compute*/ - /*_#OR___L2*/ meltfnum[1] = /*_#IS_CLOSURE__L3*/ meltfnum[2];; + /*_#OR___L2*/ + meltfnum[1] = /*_#IS_CLOSURE__L3*/ meltfnum[2];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:157:/ clear"); - /*clear*/ /*_#IS_CLOSURE__L3*/ meltfnum[2] = 0 ; + /*clear*/ /*_#IS_CLOSURE__L3*/ + meltfnum[2] = 0 ; } ; } ; /*^cond*/ - /*cond*/ if (/*_#OR___L2*/ meltfnum[1]) /*then*/ + /*cond*/ + if (/*_#OR___L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -1282,7 +1346,8 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; MELT_LOCATION("warmelt-debug.melt:158:/ cond"); - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!EDGE_DEBUG_FUNCONT*/ meltfrout->tabval[0])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[1]))) ) /*then*/ @@ -1314,18 +1379,23 @@ meltlab_endgetargs: ; } /*noelse*/ ; - /*_.LET___V3*/ meltfptr[2] = /*_.OLDCONT__V4*/ meltfptr[3];; + /*_.LET___V3*/ + meltfptr[2] = /*_.OLDCONT__V4*/ meltfptr[3];; MELT_LOCATION("warmelt-debug.melt:155:/ clear"); - /*clear*/ /*_.OLDCONT__V4*/ meltfptr[3] = 0 ; + /*clear*/ /*_.OLDCONT__V4*/ + meltfptr[3] = 0 ; /*^clear*/ - /*clear*/ /*_#NULL__L1*/ meltfnum[0] = 0 ; + /*clear*/ /*_#NULL__L1*/ + meltfnum[0] = 0 ; /*^clear*/ - /*clear*/ /*_#OR___L2*/ meltfnum[1] = 0 ; + /*clear*/ /*_#OR___L2*/ + meltfnum[1] = 0 ; MELT_LOCATION("warmelt-debug.melt:150:/ quasiblock"); - /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; + /*_._RETVAL___V1*/ + meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; { MELT_LOCATION("warmelt-debug.melt:150:/ locexp"); @@ -1340,11 +1410,13 @@ meltlab_endgetargs: ; /*^finalreturn*/ ; - /*finalret*/ goto meltlabend_rout ; + /*finalret*/ + goto meltlabend_rout ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.LET___V3*/ meltfptr[2] = 0 ; + /*clear*/ /*_.LET___V3*/ + meltfptr[2] = 0 ; } ; @@ -1426,7 +1498,8 @@ meltrout_5_WARMELTmiDEBUG_REGISTER_BASICBLOCK_DEBUG_FUN(meltclosure_ptr_t meltcl /* end of frame for routine meltrout_5_WARMELTmiDEBUG_REGISTER_BASICBLOCK_DEBUG_FUN fromline 1756 */ - /* classy proc frame meltrout_5_WARMELTmiDEBUG_REGISTER_BASICBLOCK_DEBUG_FUN */ MeltFrame_meltrout_5_WARMELTmiDEBUG_REGISTER_BASICBLOCK_DEBUG_FUN + /* classy proc frame meltrout_5_WARMELTmiDEBUG_REGISTER_BASICBLOCK_DEBUG_FUN */ + MeltFrame_meltrout_5_WARMELTmiDEBUG_REGISTER_BASICBLOCK_DEBUG_FUN meltfram__ /*declfrastruct fromline 1780*/ /*classyprocarg meltrout_5_WARMELTmiDEBUG_REGISTER_BASICBLOCK_DEBUG_FUN fromline 1785*/ #if ENABLE_CHECKING @@ -1439,7 +1512,8 @@ meltrout_5_WARMELTmiDEBUG_REGISTER_BASICBLOCK_DEBUG_FUN(meltclosure_ptr_t meltcl #define meltframe meltfram__ melt_trace_start("REGISTER_BASICBLOCK_DEBUG_FUN", meltcallcount); - /*use arguments*/ (void) meltclosp_; + /*use arguments*/ + (void) meltclosp_; (void)meltfirstargp_; (void)meltxargdescr_; (void)meltxargtab_; @@ -1449,7 +1523,8 @@ meltrout_5_WARMELTmiDEBUG_REGISTER_BASICBLOCK_DEBUG_FUN(meltclosure_ptr_t meltcl /*getarg#0*/ MELT_LOCATION("warmelt-debug.melt:163:/ getarg"); - /*_.F__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; + /*_.F__V2*/ + meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto meltlab_endgetargs; meltlab_endgetargs: @@ -1463,7 +1538,8 @@ meltlab_endgetargs: /*^cond*/ - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BASICBLOCK_DEBUG_FUNCONT*/ meltfrout->tabval[0])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[1]))) ) /*then*/ @@ -1474,7 +1550,8 @@ meltlab_endgetargs: melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)((/*!BASICBLOCK_DEBUG_FUNCONT*/ meltfrout->tabval[0])) /*=obj*/; melt_object_get_field(slot,obj, 0, "REFERENCED_VALUE"); - /*_.OLDCONT__V4*/ meltfptr[3] = slot; + /*_.OLDCONT__V4*/ + meltfptr[3] = slot; }; ; } @@ -1488,10 +1565,12 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; /*^compute*/ - /*_#NULL__L1*/ meltfnum[0] = + /*_#NULL__L1*/ + meltfnum[0] = (/*null*/(/*_.F__V2*/ meltfptr[1]) == NULL);; MELT_LOCATION("warmelt-debug.melt:170:/ cond"); - /*cond*/ if (/*_#NULL__L1*/ meltfnum[0]) /*then*/ + /*cond*/ + if (/*_#NULL__L1*/ meltfnum[0]) /*then*/ { /*^cond.then*/ /*_#OR___L2*/ meltfnum[1] = /*_#NULL__L1*/ meltfnum[0];; @@ -1507,17 +1586,20 @@ meltlab_endgetargs: /*_#IS_CLOSURE__L3*/ meltfnum[2] = (melt_magic_discr((melt_ptr_t)(/*_.F__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; /*^compute*/ - /*_#OR___L2*/ meltfnum[1] = /*_#IS_CLOSURE__L3*/ meltfnum[2];; + /*_#OR___L2*/ + meltfnum[1] = /*_#IS_CLOSURE__L3*/ meltfnum[2];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:170:/ clear"); - /*clear*/ /*_#IS_CLOSURE__L3*/ meltfnum[2] = 0 ; + /*clear*/ /*_#IS_CLOSURE__L3*/ + meltfnum[2] = 0 ; } ; } ; /*^cond*/ - /*cond*/ if (/*_#OR___L2*/ meltfnum[1]) /*then*/ + /*cond*/ + if (/*_#OR___L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -1528,7 +1610,8 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; MELT_LOCATION("warmelt-debug.melt:171:/ cond"); - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BASICBLOCK_DEBUG_FUNCONT*/ meltfrout->tabval[0])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[1]))) ) /*then*/ @@ -1560,18 +1643,23 @@ meltlab_endgetargs: ; } /*noelse*/ ; - /*_.LET___V3*/ meltfptr[2] = /*_.OLDCONT__V4*/ meltfptr[3];; + /*_.LET___V3*/ + meltfptr[2] = /*_.OLDCONT__V4*/ meltfptr[3];; MELT_LOCATION("warmelt-debug.melt:168:/ clear"); - /*clear*/ /*_.OLDCONT__V4*/ meltfptr[3] = 0 ; + /*clear*/ /*_.OLDCONT__V4*/ + meltfptr[3] = 0 ; /*^clear*/ - /*clear*/ /*_#NULL__L1*/ meltfnum[0] = 0 ; + /*clear*/ /*_#NULL__L1*/ + meltfnum[0] = 0 ; /*^clear*/ - /*clear*/ /*_#OR___L2*/ meltfnum[1] = 0 ; + /*clear*/ /*_#OR___L2*/ + meltfnum[1] = 0 ; MELT_LOCATION("warmelt-debug.melt:163:/ quasiblock"); - /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; + /*_._RETVAL___V1*/ + meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; { MELT_LOCATION("warmelt-debug.melt:163:/ locexp"); @@ -1586,11 +1674,13 @@ meltlab_endgetargs: ; /*^finalreturn*/ ; - /*finalret*/ goto meltlabend_rout ; + /*finalret*/ + goto meltlabend_rout ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.LET___V3*/ meltfptr[2] = 0 ; + /*clear*/ /*_.LET___V3*/ + meltfptr[2] = 0 ; } ; @@ -1672,7 +1762,8 @@ meltrout_6_WARMELTmiDEBUG_REGISTER_LOOP_DEBUG_FUN(meltclosure_ptr_t meltclosp_, /* end of frame for routine meltrout_6_WARMELTmiDEBUG_REGISTER_LOOP_DEBUG_FUN fromline 1756 */ - /* classy proc frame meltrout_6_WARMELTmiDEBUG_REGISTER_LOOP_DEBUG_FUN */ MeltFrame_meltrout_6_WARMELTmiDEBUG_REGISTER_LOOP_DEBUG_FUN + /* classy proc frame meltrout_6_WARMELTmiDEBUG_REGISTER_LOOP_DEBUG_FUN */ + MeltFrame_meltrout_6_WARMELTmiDEBUG_REGISTER_LOOP_DEBUG_FUN meltfram__ /*declfrastruct fromline 1780*/ /*classyprocarg meltrout_6_WARMELTmiDEBUG_REGISTER_LOOP_DEBUG_FUN fromline 1785*/ #if ENABLE_CHECKING @@ -1685,7 +1776,8 @@ meltrout_6_WARMELTmiDEBUG_REGISTER_LOOP_DEBUG_FUN(meltclosure_ptr_t meltclosp_, #define meltframe meltfram__ melt_trace_start("REGISTER_LOOP_DEBUG_FUN", meltcallcount); - /*use arguments*/ (void) meltclosp_; + /*use arguments*/ + (void) meltclosp_; (void)meltfirstargp_; (void)meltxargdescr_; (void)meltxargtab_; @@ -1695,7 +1787,8 @@ meltrout_6_WARMELTmiDEBUG_REGISTER_LOOP_DEBUG_FUN(meltclosure_ptr_t meltclosp_, /*getarg#0*/ MELT_LOCATION("warmelt-debug.melt:176:/ getarg"); - /*_.F__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; + /*_.F__V2*/ + meltfptr[1] = (melt_ptr_t) meltfirstargp_; ; goto meltlab_endgetargs; meltlab_endgetargs: @@ -1709,7 +1802,8 @@ meltlab_endgetargs: /*^cond*/ - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!LOOP_DEBUG_FUNCONT*/ meltfrout->tabval[0])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[1]))) ) /*then*/ @@ -1720,7 +1814,8 @@ meltlab_endgetargs: melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)((/*!LOOP_DEBUG_FUNCONT*/ meltfrout->tabval[0])) /*=obj*/; melt_object_get_field(slot,obj, 0, "REFERENCED_VALUE"); - /*_.OLDCONT__V4*/ meltfptr[3] = slot; + /*_.OLDCONT__V4*/ + meltfptr[3] = slot; }; ; } @@ -1734,10 +1829,12 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; /*^compute*/ - /*_#NULL__L1*/ meltfnum[0] = + /*_#NULL__L1*/ + meltfnum[0] = (/*null*/(/*_.F__V2*/ meltfptr[1]) == NULL);; MELT_LOCATION("warmelt-debug.melt:183:/ cond"); - /*cond*/ if (/*_#NULL__L1*/ meltfnum[0]) /*then*/ + /*cond*/ + if (/*_#NULL__L1*/ meltfnum[0]) /*then*/ { /*^cond.then*/ /*_#OR___L2*/ meltfnum[1] = /*_#NULL__L1*/ meltfnum[0];; @@ -1753,17 +1850,20 @@ meltlab_endgetargs: /*_#IS_CLOSURE__L3*/ meltfnum[2] = (melt_magic_discr((melt_ptr_t)(/*_.F__V2*/ meltfptr[1])) == MELTOBMAG_CLOSURE);; /*^compute*/ - /*_#OR___L2*/ meltfnum[1] = /*_#IS_CLOSURE__L3*/ meltfnum[2];; + /*_#OR___L2*/ + meltfnum[1] = /*_#IS_CLOSURE__L3*/ meltfnum[2];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:183:/ clear"); - /*clear*/ /*_#IS_CLOSURE__L3*/ meltfnum[2] = 0 ; + /*clear*/ /*_#IS_CLOSURE__L3*/ + meltfnum[2] = 0 ; } ; } ; /*^cond*/ - /*cond*/ if (/*_#OR___L2*/ meltfnum[1]) /*then*/ + /*cond*/ + if (/*_#OR___L2*/ meltfnum[1]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -1774,7 +1874,8 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; MELT_LOCATION("warmelt-debug.melt:184:/ cond"); - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!LOOP_DEBUG_FUNCONT*/ meltfrout->tabval[0])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[1]))) ) /*then*/ @@ -1806,18 +1907,23 @@ meltlab_endgetargs: ; } /*noelse*/ ; - /*_.LET___V3*/ meltfptr[2] = /*_.OLDCONT__V4*/ meltfptr[3];; + /*_.LET___V3*/ + meltfptr[2] = /*_.OLDCONT__V4*/ meltfptr[3];; MELT_LOCATION("warmelt-debug.melt:181:/ clear"); - /*clear*/ /*_.OLDCONT__V4*/ meltfptr[3] = 0 ; + /*clear*/ /*_.OLDCONT__V4*/ + meltfptr[3] = 0 ; /*^clear*/ - /*clear*/ /*_#NULL__L1*/ meltfnum[0] = 0 ; + /*clear*/ /*_#NULL__L1*/ + meltfnum[0] = 0 ; /*^clear*/ - /*clear*/ /*_#OR___L2*/ meltfnum[1] = 0 ; + /*clear*/ /*_#OR___L2*/ + meltfnum[1] = 0 ; MELT_LOCATION("warmelt-debug.melt:176:/ quasiblock"); - /*_._RETVAL___V1*/ meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; + /*_._RETVAL___V1*/ + meltfptr[0] = /*_.LET___V3*/ meltfptr[2];; { MELT_LOCATION("warmelt-debug.melt:176:/ locexp"); @@ -1832,11 +1938,13 @@ meltlab_endgetargs: ; /*^finalreturn*/ ; - /*finalret*/ goto meltlabend_rout ; + /*finalret*/ + goto meltlabend_rout ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.LET___V3*/ meltfptr[2] = 0 ; + /*clear*/ /*_.LET___V3*/ + meltfptr[2] = 0 ; } ; @@ -1907,25 +2015,35 @@ meltrout_7_WARMELTmiDEBUG_MELT_DEBUG_FUN(meltclosure_ptr_t meltclosp_, melt_ptr_ /*marking tree*/ /*:tree marker*/ gt_ggc_mx_tree_node (loc_TREE__o3); /*marking gimple*/ - /*:gimple marker*/ gt_ggc_mx_gimple_statement_d (loc_GIMPLE__o4); + /*:gimple marker*/ + gt_ggc_mx_gimple_statement_d (loc_GIMPLE__o4); /*marking gimple_seq*/ - /*:gimple_seq marker, really gimple marker*/ gt_ggc_mx_gimple_statement_d (loc_GIMPLE_SEQ__o5); + /*:gimple_seq marker, really gimple marker*/ + gt_ggc_mx_gimple_statement_d (loc_GIMPLE_SEQ__o5); /*marking edge*/ - /*:edge marker*/ gt_ggc_mx_edge_def (loc_EDGE__o6); + /*:edge marker*/ + gt_ggc_mx_edge_def (loc_EDGE__o6); /*marking loop_p*/ - /*:loop marker*/ gt_ggc_mx_loop (loc_LOOP__o7); + /*:loop marker*/ + gt_ggc_mx_loop (loc_LOOP__o7); /*marking tree*/ - /*:tree marker*/ gt_ggc_mx_tree_node (loc_TREE__o8); + /*:tree marker*/ + gt_ggc_mx_tree_node (loc_TREE__o8); /*marking gimple*/ - /*:gimple marker*/ gt_ggc_mx_gimple_statement_d (loc_GIMPLE__o9); + /*:gimple marker*/ + gt_ggc_mx_gimple_statement_d (loc_GIMPLE__o9); /*marking gimple_seq*/ - /*:gimple_seq marker, really gimple marker*/ gt_ggc_mx_gimple_statement_d (loc_GIMPLE_SEQ__o10); + /*:gimple_seq marker, really gimple marker*/ + gt_ggc_mx_gimple_statement_d (loc_GIMPLE_SEQ__o10); /*marking edge*/ - /*:edge marker*/ gt_ggc_mx_edge_def (loc_EDGE__o11); + /*:edge marker*/ + gt_ggc_mx_edge_def (loc_EDGE__o11); /*marking basic_block*/ - /*:basic_block marker*/ gt_ggc_mx_basic_block_def (loc_BASIC_BLOCK__o12); + /*:basic_block marker*/ + gt_ggc_mx_basic_block_def (loc_BASIC_BLOCK__o12); /*marking loop_p*/ - /*:loop marker*/ gt_ggc_mx_loop (loc_LOOP__o13); + /*:loop marker*/ + gt_ggc_mx_loop (loc_LOOP__o13); } /*end melt_mark_stuff*/ virtual void melt_mark_ggc_data (void) { @@ -1958,7 +2076,8 @@ meltrout_7_WARMELTmiDEBUG_MELT_DEBUG_FUN(meltclosure_ptr_t meltclosp_, melt_ptr_ /* end of frame for routine meltrout_7_WARMELTmiDEBUG_MELT_DEBUG_FUN fromline 1756 */ - /* classy proc frame meltrout_7_WARMELTmiDEBUG_MELT_DEBUG_FUN */ MeltFrame_meltrout_7_WARMELTmiDEBUG_MELT_DEBUG_FUN + /* classy proc frame meltrout_7_WARMELTmiDEBUG_MELT_DEBUG_FUN */ + MeltFrame_meltrout_7_WARMELTmiDEBUG_MELT_DEBUG_FUN meltfram__ /*declfrastruct fromline 1780*/ /*classyprocarg meltrout_7_WARMELTmiDEBUG_MELT_DEBUG_FUN fromline 1785*/ #if ENABLE_CHECKING @@ -1971,7 +2090,8 @@ meltrout_7_WARMELTmiDEBUG_MELT_DEBUG_FUN(meltclosure_ptr_t meltclosp_, melt_ptr_ #define meltframe meltfram__ melt_trace_start("MELT_DEBUG_FUN", meltcallcount); - /*use arguments*/ (void) meltclosp_; + /*use arguments*/ + (void) meltclosp_; (void)meltfirstargp_; (void)meltxargdescr_; (void)meltxargtab_; @@ -1981,7 +2101,8 @@ meltrout_7_WARMELTmiDEBUG_MELT_DEBUG_FUN(meltclosure_ptr_t meltclosp_, melt_ptr_ /*getarg#0*/ MELT_LOCATION("warmelt-debug.melt:199:/ getarg"); - /*_.NOTHING__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; + /*_.NOTHING__V2*/ + meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1*/ /*^getarg*/ @@ -1991,7 +2112,8 @@ meltrout_7_WARMELTmiDEBUG_MELT_DEBUG_FUN(meltclosure_ptr_t meltclosp_, melt_ptr_ goto meltlab_endgetargs; } variad_MELT_DEBUG_FUN_ix = 1; - /*_#COUNT__L1*/ meltfnum[0] = meltxargtab_[0].meltbp_long; + /*_#COUNT__L1*/ + meltfnum[0] = meltxargtab_[0].meltbp_long; /*getarg#2*/ /*^getarg*/ @@ -2001,7 +2123,8 @@ meltrout_7_WARMELTmiDEBUG_MELT_DEBUG_FUN(meltclosure_ptr_t meltclosp_, melt_ptr_ goto meltlab_endgetargs; } variad_MELT_DEBUG_FUN_ix = 2; - /*_?*/ meltfram__.loc_CSTRING__o0 = meltxargtab_[1].meltbp_cstring; + /*_?*/ + meltfram__.loc_CSTRING__o0 = meltxargtab_[1].meltbp_cstring; /*getarg#3*/ /*^getarg*/ @@ -2011,7 +2134,8 @@ meltrout_7_WARMELTmiDEBUG_MELT_DEBUG_FUN(meltclosure_ptr_t meltclosp_, melt_ptr_ goto meltlab_endgetargs; } variad_MELT_DEBUG_FUN_ix = 3; - /*_#LINENO__L2*/ meltfnum[1] = meltxargtab_[2].meltbp_long; + /*_#LINENO__L2*/ + meltfnum[1] = meltxargtab_[2].meltbp_long; ; goto meltlab_endgetargs; meltlab_endgetargs: @@ -2024,10 +2148,12 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - /*_#MELT_HAS_FLAG_DEBUG_SET__L3*/ meltfnum[2] = + /*_#MELT_HAS_FLAG_DEBUG_SET__L3*/ + meltfnum[2] = /*MELT_HAS_FLAG_DEBUG_SET*/ melt_flag_debug;; MELT_LOCATION("warmelt-debug.melt:200:/ cond"); - /*cond*/ if (/*_#MELT_HAS_FLAG_DEBUG_SET__L3*/ meltfnum[2]) /*then*/ + /*cond*/ + if (/*_#MELT_HAS_FLAG_DEBUG_SET__L3*/ meltfnum[2]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -2037,9 +2163,11 @@ meltlab_endgetargs: MELT_LOCATION("warmelt-debug.melt:201:/ quasiblock"); - /*_#DBGCOUNTER__L4*/ meltfnum[3] = 0;; + /*_#DBGCOUNTER__L4*/ + meltfnum[3] = 0;; MELT_LOCATION("warmelt-debug.melt:202:/ cond"); - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!INITIAL_SYSTEM_DATA*/ meltfrout->tabval[0])), (melt_ptr_t)((/*!CLASS_SYSTEM_DATA*/ meltfrout->tabval[1]))) ) /*then*/ @@ -2050,7 +2178,8 @@ meltlab_endgetargs: melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)((/*!INITIAL_SYSTEM_DATA*/ meltfrout->tabval[0])) /*=obj*/; melt_object_get_field(slot,obj, 8, "SYSDATA_DUMPFILE"); - /*_.DUMPF__V3*/ meltfptr[2] = slot; + /*_.DUMPF__V3*/ + meltfptr[2] = slot; }; ; } @@ -2061,7 +2190,8 @@ meltlab_endgetargs: } ; MELT_LOCATION("warmelt-debug.melt:203:/ cond"); - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!INITIAL_SYSTEM_DATA*/ meltfrout->tabval[0])), (melt_ptr_t)((/*!CLASS_SYSTEM_DATA*/ meltfrout->tabval[1]))) ) /*then*/ @@ -2072,7 +2202,8 @@ meltlab_endgetargs: melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)((/*!INITIAL_SYSTEM_DATA*/ meltfrout->tabval[0])) /*=obj*/; melt_object_get_field(slot,obj, 7, "SYSDATA_STDERR"); - /*_.STDERRF__V4*/ meltfptr[3] = slot; + /*_.STDERRF__V4*/ + meltfptr[3] = slot; }; ; } @@ -2083,20 +2214,25 @@ meltlab_endgetargs: } ; /*^compute*/ - /*_.OUT__V5*/ meltfptr[4] = /*_.DUMPF__V3*/ meltfptr[2];; + /*_.OUT__V5*/ + meltfptr[4] = /*_.DUMPF__V3*/ meltfptr[2];; /*^compute*/ - /*_.OCCMAP__V6*/ meltfptr[5] = + /*_.OCCMAP__V6*/ + meltfptr[5] = (meltgc_new_mapobjects( (meltobject_ptr_t) ((/*!DISCR_MAP_OBJECTS*/ meltfrout->tabval[2])), (50)));; /*^compute*/ - /*_#DEBUG_DEPTH__L5*/ meltfnum[4] = + /*_#DEBUG_DEPTH__L5*/ + meltfnum[4] = (long) (melt_debug_depth ());; /*^compute*/ - /*_.BOXEDMAXDEPTH__V7*/ meltfptr[6] = + /*_.BOXEDMAXDEPTH__V7*/ + meltfptr[6] = (meltgc_new_int((meltobject_ptr_t)((/*!DISCR_INTEGER*/ meltfrout->tabval[3])), (/*_#DEBUG_DEPTH__L5*/ meltfnum[4])));; { MELT_LOCATION("warmelt-debug.melt:208:/ locexp"); - /* melt_debug_fun GETDBGCOUNTER__1*/ /*_#DBGCOUNTER__L4*/ meltfnum[3] = melt_dbgcounter ; + /* melt_debug_fun GETDBGCOUNTER__1*/ /*_#DBGCOUNTER__L4*/ + meltfnum[3] = melt_dbgcounter ; ; } ; @@ -2109,7 +2245,8 @@ meltlab_endgetargs: if (melt_get_file ((melt_ptr_t) /*_.OUT__V5*/ meltfptr[4]) == NULL) { gcc_assert (melt_get_file ((melt_ptr_t) /*_.STDERRF__V4*/ meltfptr[3]) == stderr) ; - /*_.OUT__V5*/ meltfptr[4] = /*_.STDERRF__V4*/ meltfptr[3] ; + /*_.OUT__V5*/ + meltfptr[4] = /*_.STDERRF__V4*/ meltfptr[3] ; if (nbwarn++ <= 0) { inform (UNKNOWN_LOCATION, @@ -2122,10 +2259,12 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - /*_#NULL__L6*/ meltfnum[5] = + /*_#NULL__L6*/ + meltfnum[5] = (/*null*/(/*_.OUT__V5*/ meltfptr[4]) == NULL);; MELT_LOCATION("warmelt-debug.melt:226:/ cond"); - /*cond*/ if (/*_#NULL__L6*/ meltfnum[5]) /*then*/ + /*cond*/ + if (/*_#NULL__L6*/ meltfnum[5]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -2133,12 +2272,15 @@ meltlab_endgetargs: { MELT_LOCATION("warmelt-debug.melt:227:/ compute"); - /*_.OUT__V5*/ meltfptr[4] = /*_.SETQ___V9*/ meltfptr[8] = /*_.STDERRF__V4*/ meltfptr[3];; - /*_._IF___V8*/ meltfptr[7] = /*_.SETQ___V9*/ meltfptr[8];; + /*_.OUT__V5*/ + meltfptr[4] = /*_.SETQ___V9*/ meltfptr[8] = /*_.STDERRF__V4*/ meltfptr[3];; + /*_._IF___V8*/ + meltfptr[7] = /*_.SETQ___V9*/ meltfptr[8];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:226:/ clear"); - /*clear*/ /*_.SETQ___V9*/ meltfptr[8] = 0 ; + /*clear*/ /*_.SETQ___V9*/ + meltfptr[8] = 0 ; } ; } @@ -2152,10 +2294,12 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; /*^compute*/ - /*_#NULL__L7*/ meltfnum[6] = + /*_#NULL__L7*/ + meltfnum[6] = (/*null*/(/*_.OUT__V5*/ meltfptr[4]) == NULL);; MELT_LOCATION("warmelt-debug.melt:231:/ cond"); - /*cond*/ if (/*_#NULL__L7*/ meltfnum[6]) /*then*/ + /*cond*/ + if (/*_#NULL__L7*/ meltfnum[6]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -2165,14 +2309,18 @@ meltlab_endgetargs: /*_.MAKE_STRBUF__V11*/ meltfptr[10] = (melt_ptr_t) meltgc_new_strbuf((meltobject_ptr_t)((/*!DISCR_STRBUF*/ meltfrout->tabval[4])), (const char*)0);; MELT_LOCATION("warmelt-debug.melt:232:/ compute"); - /*_.OUT__V5*/ meltfptr[4] = /*_.SETQ___V12*/ meltfptr[11] = /*_.MAKE_STRBUF__V11*/ meltfptr[10];; - /*_._IF___V10*/ meltfptr[8] = /*_.SETQ___V12*/ meltfptr[11];; + /*_.OUT__V5*/ + meltfptr[4] = /*_.SETQ___V12*/ meltfptr[11] = /*_.MAKE_STRBUF__V11*/ meltfptr[10];; + /*_._IF___V10*/ + meltfptr[8] = /*_.SETQ___V12*/ meltfptr[11];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:231:/ clear"); - /*clear*/ /*_.MAKE_STRBUF__V11*/ meltfptr[10] = 0 ; + /*clear*/ /*_.MAKE_STRBUF__V11*/ + meltfptr[10] = 0 ; /*^clear*/ - /*clear*/ /*_.SETQ___V12*/ meltfptr[11] = 0 ; + /*clear*/ /*_.SETQ___V12*/ + meltfptr[11] = 0 ; } ; } @@ -2192,10 +2340,12 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - /*_#IS_OUT__L8*/ meltfnum[7] = + /*_#IS_OUT__L8*/ + meltfnum[7] = (melt_is_out ((melt_ptr_t) /*_.OUT__V5*/ meltfptr[4])) ;; MELT_LOCATION("warmelt-debug.melt:233:/ cond"); - /*cond*/ if (/*_#IS_OUT__L8*/ meltfnum[7]) /*then*/ + /*cond*/ + if (/*_#IS_OUT__L8*/ meltfnum[7]) /*then*/ { /*^cond.then*/ /*_._IFELSE___V14*/ meltfptr[11] = (/*nil*/NULL);; @@ -2224,25 +2374,31 @@ meltlab_endgetargs: argtab[2].meltbp_long = 233; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.OUT__V5*/ meltfptr[4]; - /*_.MELT_ASSERT_FAILURE_FUN__V15*/ meltfptr[14] = 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); + /*_.MELT_ASSERT_FAILURE_FUN__V15*/ + meltfptr[14] = 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); } ; - /*_._IFELSE___V14*/ meltfptr[11] = /*_.MELT_ASSERT_FAILURE_FUN__V15*/ meltfptr[14];; + /*_._IFELSE___V14*/ + meltfptr[11] = /*_.MELT_ASSERT_FAILURE_FUN__V15*/ meltfptr[14];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:233:/ clear"); - /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V15*/ meltfptr[14] = 0 ; + /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V15*/ + meltfptr[14] = 0 ; } ; } ; - /*_.IFCPP___V13*/ meltfptr[10] = /*_._IFELSE___V14*/ meltfptr[11];; + /*_.IFCPP___V13*/ + meltfptr[10] = /*_._IFELSE___V14*/ meltfptr[11];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:233:/ clear"); - /*clear*/ /*_#IS_OUT__L8*/ meltfnum[7] = 0 ; + /*clear*/ /*_#IS_OUT__L8*/ + meltfnum[7] = 0 ; /*^clear*/ - /*clear*/ /*_._IFELSE___V14*/ meltfptr[11] = 0 ; + /*clear*/ /*_._IFELSE___V14*/ + meltfptr[11] = 0 ; } #else /*MELT_HAVE_DEBUG*/ @@ -2260,13 +2416,16 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; - /*_#GET_INT__L9*/ meltfnum[7] = + /*_#GET_INT__L9*/ + meltfnum[7] = (melt_get_int((melt_ptr_t)(/*_.BOXEDMAXDEPTH__V7*/ meltfptr[6])));; /*^compute*/ - /*_#gtI__L10*/ meltfnum[9] = + /*_#gtI__L10*/ + meltfnum[9] = ((/*_#GET_INT__L9*/ meltfnum[7]) > (1));; MELT_LOCATION("warmelt-debug.melt:234:/ cond"); - /*cond*/ if (/*_#gtI__L10*/ meltfnum[9]) /*then*/ + /*cond*/ + if (/*_#gtI__L10*/ meltfnum[9]) /*then*/ { /*^cond.then*/ /*_._IFELSE___V17*/ meltfptr[11] = (/*nil*/NULL);; @@ -2295,27 +2454,34 @@ meltlab_endgetargs: argtab[2].meltbp_long = 234; /*^apply.arg*/ argtab[3].meltbp_aptr = (melt_ptr_t*) &/*_.BOXEDMAXDEPTH__V7*/ meltfptr[6]; - /*_.MELT_ASSERT_FAILURE_FUN__V18*/ meltfptr[17] = 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); + /*_.MELT_ASSERT_FAILURE_FUN__V18*/ + meltfptr[17] = 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); } ; - /*_._IFELSE___V17*/ meltfptr[11] = /*_.MELT_ASSERT_FAILURE_FUN__V18*/ meltfptr[17];; + /*_._IFELSE___V17*/ + meltfptr[11] = /*_.MELT_ASSERT_FAILURE_FUN__V18*/ meltfptr[17];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:234:/ clear"); - /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V18*/ meltfptr[17] = 0 ; + /*clear*/ /*_.MELT_ASSERT_FAILURE_FUN__V18*/ + meltfptr[17] = 0 ; } ; } ; - /*_.IFCPP___V16*/ meltfptr[14] = /*_._IFELSE___V17*/ meltfptr[11];; + /*_.IFCPP___V16*/ + meltfptr[14] = /*_._IFELSE___V17*/ meltfptr[11];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:234:/ clear"); - /*clear*/ /*_#GET_INT__L9*/ meltfnum[7] = 0 ; + /*clear*/ /*_#GET_INT__L9*/ + meltfnum[7] = 0 ; /*^clear*/ - /*clear*/ /*_#gtI__L10*/ meltfnum[9] = 0 ; + /*clear*/ /*_#gtI__L10*/ + meltfnum[9] = 0 ; /*^clear*/ - /*clear*/ /*_._IFELSE___V17*/ meltfptr[11] = 0 ; + /*clear*/ /*_._IFELSE___V17*/ + meltfptr[11] = 0 ; } #else /*MELT_HAVE_DEBUG*/ @@ -2345,7 +2511,8 @@ meltlab_endgetargs: { melt_ptr_t newobj = 0; melt_raw_object_create(newobj,(melt_ptr_t)((/*!CLASS_DEBUG_INFORMATION*/ meltfrout->tabval[6])), (3), "CLASS_DEBUG_INFORMATION"); - /*_.INST__V20*/ meltfptr[11] = + /*_.INST__V20*/ + meltfptr[11] = newobj; }; ; @@ -2368,28 +2535,36 @@ meltlab_endgetargs: melt_dbgtrace_written_object (/*_.INST__V20*/ meltfptr[11], "newly made instance"); ; - /*_.DBGI__V19*/ meltfptr[17] = /*_.INST__V20*/ meltfptr[11];; + /*_.DBGI__V19*/ + meltfptr[17] = /*_.INST__V20*/ meltfptr[11];; /*^compute*/ - /*_#FRAMDEPTH__L11*/ meltfnum[7] = + /*_#FRAMDEPTH__L11*/ + meltfnum[7] = (melt_curframdepth());; /*^compute*/ - /*_#OUTLEN__L12*/ meltfnum[9] = + /*_#OUTLEN__L12*/ + meltfnum[9] = melt_output_length ((melt_ptr_t)/*_.OUT__V5*/ meltfptr[4]);; /*^compute*/ - /*_#LASTSTROUTLEN__L13*/ meltfnum[12] = /*_#OUTLEN__L12*/ meltfnum[9];; + /*_#LASTSTROUTLEN__L13*/ + meltfnum[12] = /*_#OUTLEN__L12*/ meltfnum[9];; /*^compute*/ - /*_#INITOUTLEN__L14*/ meltfnum[13] = /*_#OUTLEN__L12*/ meltfnum[9];; + /*_#INITOUTLEN__L14*/ + meltfnum[13] = /*_#OUTLEN__L12*/ meltfnum[9];; MELT_CHECK_SIGNAL(); ; /*^compute*/ - /*_#pcIRAW__L15*/ meltfnum[14] = + /*_#pcIRAW__L15*/ + meltfnum[14] = ((/*_#DBGCOUNTER__L4*/ meltfnum[3]) % (512));; /*^compute*/ - /*_#NOT__L16*/ meltfnum[15] = + /*_#NOT__L16*/ + meltfnum[15] = (!(/*_#pcIRAW__L15*/ meltfnum[14]));; MELT_LOCATION("warmelt-debug.melt:249:/ cond"); - /*cond*/ if (/*_#NOT__L16*/ meltfnum[15]) /*then*/ + /*cond*/ + if (/*_#NOT__L16*/ meltfnum[15]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -2431,13 +2606,15 @@ meltlab_endgetargs: argtab[1].meltbp_cstring = /*_?*/ meltfram__.loc_CSTRING__o1; /*^apply.arg*/ argtab[2].meltbp_cstring = "\n"; - /*_.ADD2OUT__V21*/ meltfptr[20] = melt_apply ((meltclosure_ptr_t)((/*!ADD2OUT*/ meltfrout->tabval[7])), (melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un*)0); + /*_.ADD2OUT__V21*/ + meltfptr[20] = melt_apply ((meltclosure_ptr_t)((/*!ADD2OUT*/ meltfrout->tabval[7])), (melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un*)0); } ; { MELT_LOCATION("warmelt-debug.melt:269:/ locexp"); - /*void*/(void)0; + /*void*/ + (void)0; } ; MELT_LOCATION("warmelt-debug.melt:263:/ quasiblock"); @@ -2446,9 +2623,11 @@ meltlab_endgetargs: /*epilog*/ MELT_LOCATION("warmelt-debug.melt:250:/ clear"); - /*clear*/ /*_?*/ meltfram__.loc_CSTRING__o1 = 0 ; + /*clear*/ /*_?*/ + meltfram__.loc_CSTRING__o1 = 0 ; /*^clear*/ - /*clear*/ /*_.ADD2OUT__V21*/ meltfptr[20] = 0 ; + /*clear*/ /*_.ADD2OUT__V21*/ + meltfptr[20] = 0 ; } /* melt_debug_fun GETTIME_CHK__1 end */ @@ -2463,7 +2642,8 @@ meltlab_endgetargs: ; } /*noelse*/ ; - /*_#miI__L17*/ meltfnum[16] = + /*_#miI__L17*/ + meltfnum[16] = ((/*_#FRAMDEPTH__L11*/ meltfnum[7]) - (1));; MELT_CHECK_SIGNAL(); @@ -2483,14 +2663,16 @@ meltlab_endgetargs: argtab[3].meltbp_long = /*_#miI__L17*/ meltfnum[16]; /*^apply.arg*/ argtab[4].meltbp_cstring = ":"; - /*_.ADD2OUT__V22*/ meltfptr[20] = melt_apply ((meltclosure_ptr_t)((/*!ADD2OUT*/ meltfrout->tabval[7])), (melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), (MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un*)0); + /*_.ADD2OUT__V22*/ + meltfptr[20] = melt_apply ((meltclosure_ptr_t)((/*!ADD2OUT*/ meltfrout->tabval[7])), (melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), (MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un*)0); } ; MELT_CHECK_SIGNAL(); ; MELT_LOCATION("warmelt-debug.melt:273:/ cond"); - /*cond*/ if (/*_?*/ meltfram__.loc_CSTRING__o0) /*then*/ + /*cond*/ + if (/*_?*/ meltfram__.loc_CSTRING__o0) /*then*/ { /*^cond.then*/ /*^block*/ @@ -2513,14 +2695,17 @@ meltlab_endgetargs: argtab[2].meltbp_long = /*_#LINENO__L2*/ meltfnum[1]; /*^apply.arg*/ argtab[3].meltbp_cstring = ":"; - /*_.ADD2OUT__V24*/ meltfptr[23] = melt_apply ((meltclosure_ptr_t)((/*!ADD2OUT*/ meltfrout->tabval[7])), (melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un*)0); + /*_.ADD2OUT__V24*/ + meltfptr[23] = melt_apply ((meltclosure_ptr_t)((/*!ADD2OUT*/ meltfrout->tabval[7])), (melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), (MELTBPARSTR_CSTRING MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un*)0); } ; - /*_._IF___V23*/ meltfptr[22] = /*_.ADD2OUT__V24*/ meltfptr[23];; + /*_._IF___V23*/ + meltfptr[22] = /*_.ADD2OUT__V24*/ meltfptr[23];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:273:/ clear"); - /*clear*/ /*_.ADD2OUT__V24*/ meltfptr[23] = 0 ; + /*clear*/ /*_.ADD2OUT__V24*/ + meltfptr[23] = 0 ; } ; } @@ -2534,10 +2719,12 @@ meltlab_endgetargs: MELT_CHECK_SIGNAL(); ; /*^compute*/ - /*_#gtI__L18*/ meltfnum[17] = + /*_#gtI__L18*/ + meltfnum[17] = ((/*_#COUNT__L1*/ meltfnum[0]) > (0));; MELT_LOCATION("warmelt-debug.melt:275:/ cond"); - /*cond*/ if (/*_#gtI__L18*/ meltfnum[17]) /*then*/ + /*cond*/ + if (/*_#gtI__L18*/ meltfnum[17]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -2558,21 +2745,26 @@ meltlab_endgetargs: argtab[1].meltbp_long = /*_#COUNT__L1*/ meltfnum[0]; /*^apply.arg*/ argtab[2].meltbp_cstring = ": "; - /*_.ADD2OUT__V26*/ meltfptr[25] = melt_apply ((meltclosure_ptr_t)((/*!ADD2OUT*/ meltfrout->tabval[7])), (melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), (MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un*)0); + /*_.ADD2OUT__V26*/ + meltfptr[25] = melt_apply ((meltclosure_ptr_t)((/*!ADD2OUT*/ meltfrout->tabval[7])), (melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), (MELTBPARSTR_CSTRING MELTBPARSTR_LONG MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un*)0); } ; MELT_LOCATION("warmelt-debug.melt:275:/ quasiblock"); - /*_.PROGN___V27*/ meltfptr[26] = /*_.ADD2OUT__V26*/ meltfptr[25];; + /*_.PROGN___V27*/ + meltfptr[26] = /*_.ADD2OUT__V26*/ meltfptr[25];; /*^compute*/ - /*_._IF___V25*/ meltfptr[23] = /*_.PROGN___V27*/ meltfptr[26];; + /*_._IF___V25*/ + meltfptr[23] = /*_.PROGN___V27*/ meltfptr[26];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:275:/ clear"); - /*clear*/ /*_.ADD2OUT__V26*/ meltfptr[25] = 0 ; + /*clear*/ /*_.ADD2OUT__V26*/ + meltfptr[25] = 0 ; /*^clear*/ - /*clear*/ /*_.PROGN___V27*/ meltfptr[26] = 0 ; + /*clear*/ /*_.PROGN___V27*/ + meltfptr[26] = 0 ; } ; } @@ -2595,7 +2787,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ MELT_CHECK_SIGNAL(); ; MELT_LOCATION("warmelt-debug.melt:281:/ cond"); - /*cond*/ if (/*ifvariadic nomore*/ variad_MELT_DEBUG_FUN_ix == variad_MELT_DEBUG_FUN_len) /*then*/ + /*cond*/ + if (/*ifvariadic nomore*/ variad_MELT_DEBUG_FUN_ix == variad_MELT_DEBUG_FUN_len) /*then*/ { /*^cond.then*/ /*^block*/ @@ -2609,7 +2802,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*^compute*/ - /*_.ARGLOOP__V29*/ meltfptr[26] = /*reallynil*/ NULL ;; + /*_.ARGLOOP__V29*/ + meltfptr[26] = /*reallynil*/ NULL ;; /*^exit*/ /*exit*/ @@ -2630,7 +2824,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:283:/ cond"); - /*cond*/ if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_LONG) /*then*/ + /*cond*/ + if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_LONG) /*then*/ { /*^cond.then*/ /*^block*/ @@ -2642,7 +2837,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*variadic argument stuff*/ meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_long;; /*^compute*/ - /*consume variadic LONG !*/ variad_MELT_DEBUG_FUN_ix += 1;; + /*consume variadic LONG !*/ + variad_MELT_DEBUG_FUN_ix += 1;; { MELT_LOCATION("warmelt-debug.melt:284:/ locexp"); @@ -2652,7 +2848,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*epilog*/ MELT_LOCATION("warmelt-debug.melt:283:/ clear"); - /*clear*/ /*_#L__L19*/ meltfnum[18] = 0 ; + /*clear*/ /*_#L__L19*/ + meltfnum[18] = 0 ; } ; } @@ -2664,7 +2861,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:285:/ cond"); - /*cond*/ if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_CSTRING) /*then*/ + /*cond*/ + if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_CSTRING) /*then*/ { /*^cond.then*/ /*^block*/ @@ -2676,11 +2874,13 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*variadic argument stuff*/ meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_cstring;; /*^compute*/ - /*consume variadic CSTRING !*/ variad_MELT_DEBUG_FUN_ix += 1;; + /*consume variadic CSTRING !*/ + variad_MELT_DEBUG_FUN_ix += 1;; MELT_LOCATION("warmelt-debug.melt:286:/ quasiblock"); - /*_#CUROUTLEN__L20*/ meltfnum[18] = + /*_#CUROUTLEN__L20*/ + meltfnum[18] = melt_output_length ((melt_ptr_t)/*_.OUT__V5*/ meltfptr[4]);; MELT_CHECK_SIGNAL(); @@ -2693,7 +2893,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*objgoto*/ goto mtch1_0; ; -/*objlabel*/ mtch1_0: + /*objlabel*/ +mtch1_0: ; MELT_LOCATION("warmelt-debug.melt:289:/ objlabel"); /* objlabel */ @@ -2705,7 +2906,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ ; /*^cond*/ - /*cond*/ if ( + /*cond*/ + if ( /* cstring_prefixed STRPREFIXED_mtch1__1 test*/ (/*_?*/ meltfram__.loc_CSTRING__o2 && " " && !strncmp(/*_?*/ meltfram__.loc_CSTRING__o2, " ", strlen ( " "))) ) /*then*/ { /*^cond.then*/ @@ -2720,7 +2922,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ } ; /*^objgoto*/ - /*objgoto*/ goto mtch1_1; + /*objgoto*/ + goto mtch1_1; ; } ; @@ -2733,14 +2936,16 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:292:/ objgoto"); - /*objgoto*/ goto mtch1_2; + /*objgoto*/ + goto mtch1_2; ; } ; } ; -/*objlabel*/ mtch1_1: + /*objlabel*/ +mtch1_1: ; MELT_LOCATION("warmelt-debug.melt:289:/ objlabel"); /* objlabel */ @@ -2757,13 +2962,16 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ MELT_CHECK_SIGNAL(); ; - /*_#plI__L21*/ meltfnum[20] = + /*_#plI__L21*/ + meltfnum[20] = ((/*_#LASTSTROUTLEN__L13*/ meltfnum[12]) + (70));; /*^compute*/ - /*_#gtI__L22*/ meltfnum[21] = + /*_#gtI__L22*/ + meltfnum[21] = ((/*_#CUROUTLEN__L20*/ meltfnum[18]) > (/*_#plI__L21*/ meltfnum[20]));; MELT_LOCATION("warmelt-debug.melt:290:/ cond"); - /*cond*/ if (/*_#gtI__L22*/ meltfnum[21]) /*then*/ + /*cond*/ + if (/*_#gtI__L22*/ meltfnum[21]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -2783,14 +2991,18 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ ; MELT_LOCATION("warmelt-debug.melt:289:/ clear"); - /*clear*/ /*_#plI__L21*/ meltfnum[20] = 0 ; + /*clear*/ /*_#plI__L21*/ + meltfnum[20] = 0 ; /*^clear*/ - /*clear*/ /*_#gtI__L22*/ meltfnum[21] = 0 ; + /*clear*/ /*_#gtI__L22*/ + meltfnum[21] = 0 ; /*^objgoto*/ - /*objgoto*/ goto mtch1__end /*endmatch*/; + /*objgoto*/ + goto mtch1__end /*endmatch*/; ; -/*objlabel*/ mtch1_2: + /*objlabel*/ +mtch1_2: ; MELT_LOCATION("warmelt-debug.melt:292:/ objlabel"); /* objlabel */ @@ -2812,10 +3024,12 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ ; /*^objgoto*/ - /*objgoto*/ goto mtch1__end /*endmatch*/; + /*objgoto*/ + goto mtch1__end /*endmatch*/; ; -/*objlabel*/ mtch1__end: + /*objlabel*/ +mtch1__end: ; MELT_LOCATION("warmelt-debug.melt:288:/ objlabel"); /* objlabel */ @@ -2830,11 +3044,14 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ ; MELT_LOCATION("warmelt-debug.melt:286:/ clear"); - /*clear*/ /*_#CUROUTLEN__L20*/ meltfnum[18] = 0 ; - /*_#OUTPUT_LENGTH__L23*/ meltfnum[20] = + /*clear*/ /*_#CUROUTLEN__L20*/ + meltfnum[18] = 0 ; + /*_#OUTPUT_LENGTH__L23*/ + meltfnum[20] = melt_output_length ((melt_ptr_t)/*_.OUT__V5*/ meltfptr[4]);; MELT_LOCATION("warmelt-debug.melt:294:/ compute"); - /*_#LASTSTROUTLEN__L13*/ meltfnum[12] = /*_#SETQ___L24*/ meltfnum[21] = /*_#OUTPUT_LENGTH__L23*/ meltfnum[20];; + /*_#LASTSTROUTLEN__L13*/ + meltfnum[12] = /*_#SETQ___L24*/ meltfnum[21] = /*_#OUTPUT_LENGTH__L23*/ meltfnum[20];; { MELT_LOCATION("warmelt-debug.melt:295:/ locexp"); @@ -2847,11 +3064,14 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*epilog*/ MELT_LOCATION("warmelt-debug.melt:285:/ clear"); - /*clear*/ /*_?*/ meltfram__.loc_CSTRING__o2 = 0 ; + /*clear*/ /*_?*/ + meltfram__.loc_CSTRING__o2 = 0 ; /*^clear*/ - /*clear*/ /*_#OUTPUT_LENGTH__L23*/ meltfnum[20] = 0 ; + /*clear*/ /*_#OUTPUT_LENGTH__L23*/ + meltfnum[20] = 0 ; /*^clear*/ - /*clear*/ /*_#SETQ___L24*/ meltfnum[21] = 0 ; + /*clear*/ /*_#SETQ___L24*/ + meltfnum[21] = 0 ; } ; } @@ -2863,7 +3083,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:297:/ cond"); - /*cond*/ if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_PTR) /*then*/ + /*cond*/ + if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_PTR) /*then*/ { /*^cond.then*/ /*^block*/ @@ -2875,7 +3096,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*variadic argument value*/ ((meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_aptr) ? (*(meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_aptr)) : NULL);; /*^compute*/ - /*consume variadic Value !*/ variad_MELT_DEBUG_FUN_ix += 1;; + /*consume variadic Value !*/ + variad_MELT_DEBUG_FUN_ix += 1;; { MELT_LOCATION("warmelt-debug.melt:298:/ locexp"); @@ -2885,10 +3107,12 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ MELT_CHECK_SIGNAL(); ; - /*_#NULL__L25*/ meltfnum[18] = + /*_#NULL__L25*/ + meltfnum[18] = (/*null*/(/*_.VAL__V30*/ meltfptr[29]) == NULL);; MELT_LOCATION("warmelt-debug.melt:300:/ cond"); - /*cond*/ if (/*_#NULL__L25*/ meltfnum[18]) /*then*/ + /*cond*/ + if (/*_#NULL__L25*/ meltfnum[18]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -2916,13 +3140,16 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ MELT_CHECK_SIGNAL(); ; - /*_.DISCRIM__V31*/ meltfptr[30] = + /*_.DISCRIM__V31*/ + meltfptr[30] = ((melt_ptr_t) (melt_discr((melt_ptr_t)(/*_.VAL__V30*/ meltfptr[29]))));; /*^compute*/ - /*_#eqeq__L26*/ meltfnum[20] = + /*_#eqeq__L26*/ + meltfnum[20] = ((/*_.DISCRIM__V31*/ meltfptr[30]) == ((/*!DISCR_DEBUG_CLOSURE*/ meltfrout->tabval[9])));; MELT_LOCATION("warmelt-debug.melt:302:/ cond"); - /*cond*/ if (/*_#eqeq__L26*/ meltfnum[20]) /*then*/ + /*cond*/ + if (/*_#eqeq__L26*/ meltfnum[20]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -2930,7 +3157,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:304:/ cond"); - /*cond*/ if (/*ifvariadic nomore*/ variad_MELT_DEBUG_FUN_ix == variad_MELT_DEBUG_FUN_len) /*then*/ + /*cond*/ + if (/*ifvariadic nomore*/ variad_MELT_DEBUG_FUN_ix == variad_MELT_DEBUG_FUN_len) /*then*/ { /*^cond.then*/ /*^block*/ @@ -2952,13 +3180,15 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_.DBGI__V19*/ meltfptr[17]; /*^apply.arg*/ argtab[1].meltbp_long = 0; - /*_.DBG_OUT__V32*/ meltfptr[31] = melt_apply ((meltclosure_ptr_t)((/*!DBG_OUT*/ meltfrout->tabval[10])), (melt_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (MELTBPARSTR_PTR MELTBPARSTR_LONG ""), argtab, "", (union meltparam_un*)0); + /*_.DBG_OUT__V32*/ + meltfptr[31] = melt_apply ((meltclosure_ptr_t)((/*!DBG_OUT*/ meltfrout->tabval[10])), (melt_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (MELTBPARSTR_PTR MELTBPARSTR_LONG ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:304:/ clear"); - /*clear*/ /*_.DBG_OUT__V32*/ meltfptr[31] = 0 ; + /*clear*/ /*_.DBG_OUT__V32*/ + meltfptr[31] = 0 ; } ; } @@ -2970,7 +3200,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:309:/ cond"); - /*cond*/ if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_PTR) /*then*/ + /*cond*/ + if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_PTR) /*then*/ { /*^cond.then*/ /*^block*/ @@ -2982,7 +3213,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*variadic argument value*/ ((meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_aptr) ? (*(meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_aptr)) : NULL);; /*^compute*/ - /*consume variadic Value !*/ variad_MELT_DEBUG_FUN_ix += 1;; + /*consume variadic Value !*/ + variad_MELT_DEBUG_FUN_ix += 1;; MELT_CHECK_SIGNAL(); ; @@ -2993,15 +3225,18 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_.VV__V33*/ meltfptr[31]; - /*_.VAL__V34*/ meltfptr[33] = melt_apply ((meltclosure_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.VAL__V34*/ + meltfptr[33] = melt_apply ((meltclosure_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:309:/ clear"); - /*clear*/ /*_.VV__V33*/ meltfptr[31] = 0 ; + /*clear*/ /*_.VV__V33*/ + meltfptr[31] = 0 ; /*^clear*/ - /*clear*/ /*_.VAL__V34*/ meltfptr[33] = 0 ; + /*clear*/ /*_.VAL__V34*/ + meltfptr[33] = 0 ; } ; } @@ -3013,7 +3248,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:311:/ cond"); - /*cond*/ if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_LONG) /*then*/ + /*cond*/ + if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_LONG) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3025,7 +3261,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*variadic argument stuff*/ meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_long;; /*^compute*/ - /*consume variadic LONG !*/ variad_MELT_DEBUG_FUN_ix += 1;; + /*consume variadic LONG !*/ + variad_MELT_DEBUG_FUN_ix += 1;; MELT_CHECK_SIGNAL(); ; @@ -3036,15 +3273,18 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].meltbp_long = /*_#LL__L27*/ meltfnum[21]; - /*_.VAL__V35*/ meltfptr[31] = melt_apply ((meltclosure_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_LONG ""), argtab, "", (union meltparam_un*)0); + /*_.VAL__V35*/ + meltfptr[31] = melt_apply ((meltclosure_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_LONG ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:311:/ clear"); - /*clear*/ /*_#LL__L27*/ meltfnum[21] = 0 ; + /*clear*/ /*_#LL__L27*/ + meltfnum[21] = 0 ; /*^clear*/ - /*clear*/ /*_.VAL__V35*/ meltfptr[31] = 0 ; + /*clear*/ /*_.VAL__V35*/ + meltfptr[31] = 0 ; } ; } @@ -3056,7 +3296,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:313:/ cond"); - /*cond*/ if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_TREE) /*then*/ + /*cond*/ + if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_TREE) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3068,7 +3309,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*variadic argument stuff*/ meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_tree;; /*^compute*/ - /*consume variadic TREE !*/ variad_MELT_DEBUG_FUN_ix += 1;; + /*consume variadic TREE !*/ + variad_MELT_DEBUG_FUN_ix += 1;; MELT_CHECK_SIGNAL(); ; @@ -3079,15 +3321,18 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].meltbp_tree = /*_?*/ meltfram__.loc_TREE__o3; - /*_.VAL__V36*/ meltfptr[33] = melt_apply ((meltclosure_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_TREE ""), argtab, "", (union meltparam_un*)0); + /*_.VAL__V36*/ + meltfptr[33] = melt_apply ((meltclosure_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_TREE ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:313:/ clear"); - /*clear*/ /*_?*/ meltfram__.loc_TREE__o3 = 0 ; + /*clear*/ /*_?*/ + meltfram__.loc_TREE__o3 = 0 ; /*^clear*/ - /*clear*/ /*_.VAL__V36*/ meltfptr[33] = 0 ; + /*clear*/ /*_.VAL__V36*/ + meltfptr[33] = 0 ; } ; } @@ -3099,7 +3344,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:315:/ cond"); - /*cond*/ if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_GIMPLE) /*then*/ + /*cond*/ + if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_GIMPLE) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3111,7 +3357,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*variadic argument stuff*/ meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_gimple;; /*^compute*/ - /*consume variadic GIMPLE !*/ variad_MELT_DEBUG_FUN_ix += 1;; + /*consume variadic GIMPLE !*/ + variad_MELT_DEBUG_FUN_ix += 1;; MELT_CHECK_SIGNAL(); ; @@ -3122,15 +3369,18 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].meltbp_gimple = /*_?*/ meltfram__.loc_GIMPLE__o4; - /*_.VAL__V37*/ meltfptr[31] = melt_apply ((meltclosure_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_GIMPLE ""), argtab, "", (union meltparam_un*)0); + /*_.VAL__V37*/ + meltfptr[31] = melt_apply ((meltclosure_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_GIMPLE ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:315:/ clear"); - /*clear*/ /*_?*/ meltfram__.loc_GIMPLE__o4 = 0 ; + /*clear*/ /*_?*/ + meltfram__.loc_GIMPLE__o4 = 0 ; /*^clear*/ - /*clear*/ /*_.VAL__V37*/ meltfptr[31] = 0 ; + /*clear*/ /*_.VAL__V37*/ + meltfptr[31] = 0 ; } ; } @@ -3142,7 +3392,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:317:/ cond"); - /*cond*/ if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_GIMPLESEQ) /*then*/ + /*cond*/ + if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_GIMPLESEQ) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3154,7 +3405,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*variadic argument stuff*/ meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_gimpleseq;; /*^compute*/ - /*consume variadic GIMPLE_SEQ !*/ variad_MELT_DEBUG_FUN_ix += 1;; + /*consume variadic GIMPLE_SEQ !*/ + variad_MELT_DEBUG_FUN_ix += 1;; MELT_CHECK_SIGNAL(); ; @@ -3165,15 +3417,18 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].meltbp_gimpleseq = /*_?*/ meltfram__.loc_GIMPLE_SEQ__o5; - /*_.VAL__V38*/ meltfptr[33] = melt_apply ((meltclosure_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_GIMPLESEQ ""), argtab, "", (union meltparam_un*)0); + /*_.VAL__V38*/ + meltfptr[33] = melt_apply ((meltclosure_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_GIMPLESEQ ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:317:/ clear"); - /*clear*/ /*_?*/ meltfram__.loc_GIMPLE_SEQ__o5 = 0 ; + /*clear*/ /*_?*/ + meltfram__.loc_GIMPLE_SEQ__o5 = 0 ; /*^clear*/ - /*clear*/ /*_.VAL__V38*/ meltfptr[33] = 0 ; + /*clear*/ /*_.VAL__V38*/ + meltfptr[33] = 0 ; } ; } @@ -3185,7 +3440,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:319:/ cond"); - /*cond*/ if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_EDGE) /*then*/ + /*cond*/ + if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_EDGE) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3197,7 +3453,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*variadic argument stuff*/ meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_edge;; /*^compute*/ - /*consume variadic EDGE !*/ variad_MELT_DEBUG_FUN_ix += 1;; + /*consume variadic EDGE !*/ + variad_MELT_DEBUG_FUN_ix += 1;; MELT_CHECK_SIGNAL(); ; @@ -3208,15 +3465,18 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].meltbp_edge = /*_?*/ meltfram__.loc_EDGE__o6; - /*_.VAL__V39*/ meltfptr[31] = melt_apply ((meltclosure_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_EDGE ""), argtab, "", (union meltparam_un*)0); + /*_.VAL__V39*/ + meltfptr[31] = melt_apply ((meltclosure_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_EDGE ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:319:/ clear"); - /*clear*/ /*_?*/ meltfram__.loc_EDGE__o6 = 0 ; + /*clear*/ /*_?*/ + meltfram__.loc_EDGE__o6 = 0 ; /*^clear*/ - /*clear*/ /*_.VAL__V39*/ meltfptr[31] = 0 ; + /*clear*/ /*_.VAL__V39*/ + meltfptr[31] = 0 ; } ; } @@ -3228,7 +3488,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:321:/ cond"); - /*cond*/ if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_LOOP) /*then*/ + /*cond*/ + if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_LOOP) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3240,7 +3501,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*variadic argument stuff*/ meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_loop;; /*^compute*/ - /*consume variadic LOOP !*/ variad_MELT_DEBUG_FUN_ix += 1;; + /*consume variadic LOOP !*/ + variad_MELT_DEBUG_FUN_ix += 1;; MELT_CHECK_SIGNAL(); ; @@ -3251,15 +3513,18 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].meltbp_loop = /*_?*/ meltfram__.loc_LOOP__o7; - /*_.VAL__V40*/ meltfptr[33] = melt_apply ((meltclosure_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_LOOP ""), argtab, "", (union meltparam_un*)0); + /*_.VAL__V40*/ + meltfptr[33] = melt_apply ((meltclosure_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_LOOP ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:321:/ clear"); - /*clear*/ /*_?*/ meltfram__.loc_LOOP__o7 = 0 ; + /*clear*/ /*_?*/ + meltfram__.loc_LOOP__o7 = 0 ; /*^clear*/ - /*clear*/ /*_.VAL__V40*/ meltfptr[33] = 0 ; + /*clear*/ /*_.VAL__V40*/ + meltfptr[33] = 0 ; } ; } /*noelse*/ @@ -3302,7 +3567,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:324:/ locexp"); - /*void*/(void)0; + /*void*/ + (void)0; } ; MELT_LOCATION("warmelt-debug.melt:302:/ quasiblock"); @@ -3331,13 +3597,15 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_.DBGI__V19*/ meltfptr[17]; /*^apply.arg*/ argtab[1].meltbp_long = 0; - /*_.DBG_OUT__V41*/ meltfptr[31] = melt_apply ((meltclosure_ptr_t)((/*!DBG_OUT*/ meltfrout->tabval[10])), (melt_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (MELTBPARSTR_PTR MELTBPARSTR_LONG ""), argtab, "", (union meltparam_un*)0); + /*_.DBG_OUT__V41*/ + meltfptr[31] = melt_apply ((meltclosure_ptr_t)((/*!DBG_OUT*/ meltfrout->tabval[10])), (melt_ptr_t)(/*_.VAL__V30*/ meltfptr[29]), (MELTBPARSTR_PTR MELTBPARSTR_LONG ""), argtab, "", (union meltparam_un*)0); } ; { MELT_LOCATION("warmelt-debug.melt:328:/ locexp"); - /*void*/(void)0; + /*void*/ + (void)0; } ; MELT_LOCATION("warmelt-debug.melt:326:/ quasiblock"); @@ -3346,7 +3614,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*epilog*/ MELT_LOCATION("warmelt-debug.melt:302:/ clear"); - /*clear*/ /*_.DBG_OUT__V41*/ meltfptr[31] = 0 ; + /*clear*/ /*_.DBG_OUT__V41*/ + meltfptr[31] = 0 ; } ; } @@ -3354,9 +3623,11 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*epilog*/ MELT_LOCATION("warmelt-debug.melt:300:/ clear"); - /*clear*/ /*_.DISCRIM__V31*/ meltfptr[30] = 0 ; + /*clear*/ /*_.DISCRIM__V31*/ + meltfptr[30] = 0 ; /*^clear*/ - /*clear*/ /*_#eqeq__L26*/ meltfnum[20] = 0 ; + /*clear*/ /*_#eqeq__L26*/ + meltfnum[20] = 0 ; } ; } @@ -3367,9 +3638,11 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*epilog*/ MELT_LOCATION("warmelt-debug.melt:297:/ clear"); - /*clear*/ /*_.VAL__V30*/ meltfptr[29] = 0 ; + /*clear*/ /*_.VAL__V30*/ + meltfptr[29] = 0 ; /*^clear*/ - /*clear*/ /*_#NULL__L25*/ meltfnum[18] = 0 ; + /*clear*/ /*_#NULL__L25*/ + meltfnum[18] = 0 ; } ; } @@ -3381,7 +3654,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:330:/ cond"); - /*cond*/ if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_TREE) /*then*/ + /*cond*/ + if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_TREE) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3393,12 +3667,14 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*variadic argument stuff*/ meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_tree;; /*^compute*/ - /*consume variadic TREE !*/ variad_MELT_DEBUG_FUN_ix += 1;; + /*consume variadic TREE !*/ + variad_MELT_DEBUG_FUN_ix += 1;; MELT_LOCATION("warmelt-debug.melt:331:/ quasiblock"); /*^cond*/ - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!TREE_DEBUG_FUNCONT*/ meltfrout->tabval[11])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[12]))) ) /*then*/ @@ -3409,7 +3685,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)((/*!TREE_DEBUG_FUNCONT*/ meltfrout->tabval[11])) /*=obj*/; melt_object_get_field(slot,obj, 0, "REFERENCED_VALUE"); - /*_.TDF__V43*/ meltfptr[31] = slot; + /*_.TDF__V43*/ + meltfptr[31] = slot; }; ; } @@ -3423,10 +3700,12 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ MELT_CHECK_SIGNAL(); ; /*^compute*/ - /*_#IS_CLOSURE__L28*/ meltfnum[21] = + /*_#IS_CLOSURE__L28*/ + meltfnum[21] = (melt_magic_discr((melt_ptr_t)(/*_.TDF__V43*/ meltfptr[31])) == MELTOBMAG_CLOSURE);; MELT_LOCATION("warmelt-debug.melt:333:/ cond"); - /*cond*/ if (/*_#IS_CLOSURE__L28*/ meltfnum[21]) /*then*/ + /*cond*/ + if (/*_#IS_CLOSURE__L28*/ meltfnum[21]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3443,14 +3722,17 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].meltbp_tree = /*_?*/ meltfram__.loc_TREE__o8; - /*_.TDF__V45*/ meltfptr[29] = melt_apply ((meltclosure_ptr_t)(/*_.TDF__V43*/ meltfptr[31]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_TREE ""), argtab, "", (union meltparam_un*)0); + /*_.TDF__V45*/ + meltfptr[29] = melt_apply ((meltclosure_ptr_t)(/*_.TDF__V43*/ meltfptr[31]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_TREE ""), argtab, "", (union meltparam_un*)0); } ; - /*_._IFELSE___V44*/ meltfptr[30] = /*_.TDF__V45*/ meltfptr[29];; + /*_._IFELSE___V44*/ + meltfptr[30] = /*_.TDF__V45*/ meltfptr[29];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:333:/ clear"); - /*clear*/ /*_.TDF__V45*/ meltfptr[29] = 0 ; + /*clear*/ /*_.TDF__V45*/ + meltfptr[29] = 0 ; } ; } @@ -3465,7 +3747,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ MELT_CHECK_SIGNAL(); ; MELT_LOCATION("warmelt-debug.melt:335:/ cond"); - /*cond*/ if (/*_?*/ meltfram__.loc_TREE__o8) /*then*/ + /*cond*/ + if (/*_?*/ meltfram__.loc_TREE__o8) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3480,7 +3763,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ meltgc_add_out((melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), ( " ?*tree*?")); } ; - /*clear*/ /*_._IFELSE___V44*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V44*/ + meltfptr[30] = 0 ; /*epilog*/ } ; @@ -3501,7 +3785,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ meltgc_add_out((melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), ( " ?*nulltree*?")); } ; - /*clear*/ /*_._IFELSE___V44*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V44*/ + meltfptr[30] = 0 ; /*epilog*/ } ; @@ -3513,20 +3798,26 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ } ; /*^compute*/ - /*_.LET___V42*/ meltfptr[33] = /*_._IFELSE___V44*/ meltfptr[30];; + /*_.LET___V42*/ + meltfptr[33] = /*_._IFELSE___V44*/ meltfptr[30];; MELT_LOCATION("warmelt-debug.melt:331:/ clear"); - /*clear*/ /*_.TDF__V43*/ meltfptr[31] = 0 ; + /*clear*/ /*_.TDF__V43*/ + meltfptr[31] = 0 ; /*^clear*/ - /*clear*/ /*_#IS_CLOSURE__L28*/ meltfnum[21] = 0 ; + /*clear*/ /*_#IS_CLOSURE__L28*/ + meltfnum[21] = 0 ; /*^clear*/ - /*clear*/ /*_._IFELSE___V44*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V44*/ + meltfptr[30] = 0 ; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:330:/ clear"); - /*clear*/ /*_?*/ meltfram__.loc_TREE__o8 = 0 ; + /*clear*/ /*_?*/ + meltfram__.loc_TREE__o8 = 0 ; /*^clear*/ - /*clear*/ /*_.LET___V42*/ meltfptr[33] = 0 ; + /*clear*/ /*_.LET___V42*/ + meltfptr[33] = 0 ; } ; } @@ -3538,7 +3829,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:338:/ cond"); - /*cond*/ if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_GIMPLE) /*then*/ + /*cond*/ + if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_GIMPLE) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3550,12 +3842,14 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*variadic argument stuff*/ meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_gimple;; /*^compute*/ - /*consume variadic GIMPLE !*/ variad_MELT_DEBUG_FUN_ix += 1;; + /*consume variadic GIMPLE !*/ + variad_MELT_DEBUG_FUN_ix += 1;; MELT_LOCATION("warmelt-debug.melt:339:/ quasiblock"); /*^cond*/ - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!GIMPLE_DEBUG_FUNCONT*/ meltfrout->tabval[13])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[12]))) ) /*then*/ @@ -3566,7 +3860,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)((/*!GIMPLE_DEBUG_FUNCONT*/ meltfrout->tabval[13])) /*=obj*/; melt_object_get_field(slot,obj, 0, "REFERENCED_VALUE"); - /*_.GDF__V47*/ meltfptr[31] = slot; + /*_.GDF__V47*/ + meltfptr[31] = slot; }; ; } @@ -3580,10 +3875,12 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ MELT_CHECK_SIGNAL(); ; /*^compute*/ - /*_#IS_CLOSURE__L29*/ meltfnum[20] = + /*_#IS_CLOSURE__L29*/ + meltfnum[20] = (melt_magic_discr((melt_ptr_t)(/*_.GDF__V47*/ meltfptr[31])) == MELTOBMAG_CLOSURE);; MELT_LOCATION("warmelt-debug.melt:341:/ cond"); - /*cond*/ if (/*_#IS_CLOSURE__L29*/ meltfnum[20]) /*then*/ + /*cond*/ + if (/*_#IS_CLOSURE__L29*/ meltfnum[20]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3600,14 +3897,17 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].meltbp_gimple = /*_?*/ meltfram__.loc_GIMPLE__o9; - /*_.GDF__V49*/ meltfptr[33] = melt_apply ((meltclosure_ptr_t)(/*_.GDF__V47*/ meltfptr[31]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_GIMPLE ""), argtab, "", (union meltparam_un*)0); + /*_.GDF__V49*/ + meltfptr[33] = melt_apply ((meltclosure_ptr_t)(/*_.GDF__V47*/ meltfptr[31]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_GIMPLE ""), argtab, "", (union meltparam_un*)0); } ; - /*_._IFELSE___V48*/ meltfptr[30] = /*_.GDF__V49*/ meltfptr[33];; + /*_._IFELSE___V48*/ + meltfptr[30] = /*_.GDF__V49*/ meltfptr[33];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:341:/ clear"); - /*clear*/ /*_.GDF__V49*/ meltfptr[33] = 0 ; + /*clear*/ /*_.GDF__V49*/ + meltfptr[33] = 0 ; } ; } @@ -3622,7 +3922,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ MELT_CHECK_SIGNAL(); ; MELT_LOCATION("warmelt-debug.melt:343:/ cond"); - /*cond*/ if (/*_?*/ meltfram__.loc_GIMPLE__o9) /*then*/ + /*cond*/ + if (/*_?*/ meltfram__.loc_GIMPLE__o9) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3637,7 +3938,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ meltgc_add_out((melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), ( " ?*gimple*?")); } ; - /*clear*/ /*_._IFELSE___V48*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V48*/ + meltfptr[30] = 0 ; /*epilog*/ } ; @@ -3658,7 +3960,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ meltgc_add_out((melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), ( " ?*nullgimple*?")); } ; - /*clear*/ /*_._IFELSE___V48*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V48*/ + meltfptr[30] = 0 ; /*epilog*/ } ; @@ -3670,20 +3973,26 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ } ; /*^compute*/ - /*_.LET___V46*/ meltfptr[29] = /*_._IFELSE___V48*/ meltfptr[30];; + /*_.LET___V46*/ + meltfptr[29] = /*_._IFELSE___V48*/ meltfptr[30];; MELT_LOCATION("warmelt-debug.melt:339:/ clear"); - /*clear*/ /*_.GDF__V47*/ meltfptr[31] = 0 ; + /*clear*/ /*_.GDF__V47*/ + meltfptr[31] = 0 ; /*^clear*/ - /*clear*/ /*_#IS_CLOSURE__L29*/ meltfnum[20] = 0 ; + /*clear*/ /*_#IS_CLOSURE__L29*/ + meltfnum[20] = 0 ; /*^clear*/ - /*clear*/ /*_._IFELSE___V48*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V48*/ + meltfptr[30] = 0 ; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:338:/ clear"); - /*clear*/ /*_?*/ meltfram__.loc_GIMPLE__o9 = 0 ; + /*clear*/ /*_?*/ + meltfram__.loc_GIMPLE__o9 = 0 ; /*^clear*/ - /*clear*/ /*_.LET___V46*/ meltfptr[29] = 0 ; + /*clear*/ /*_.LET___V46*/ + meltfptr[29] = 0 ; } ; } @@ -3695,7 +4004,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:346:/ cond"); - /*cond*/ if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_GIMPLESEQ) /*then*/ + /*cond*/ + if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_GIMPLESEQ) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3707,12 +4017,14 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*variadic argument stuff*/ meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_gimpleseq;; /*^compute*/ - /*consume variadic GIMPLE_SEQ !*/ variad_MELT_DEBUG_FUN_ix += 1;; + /*consume variadic GIMPLE_SEQ !*/ + variad_MELT_DEBUG_FUN_ix += 1;; MELT_LOCATION("warmelt-debug.melt:347:/ quasiblock"); /*^cond*/ - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!GIMPLESEQ_DEBUG_FUNCONT*/ meltfrout->tabval[14])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[12]))) ) /*then*/ @@ -3723,7 +4035,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)((/*!GIMPLESEQ_DEBUG_FUNCONT*/ meltfrout->tabval[14])) /*=obj*/; melt_object_get_field(slot,obj, 0, "REFERENCED_VALUE"); - /*_.GSDF__V51*/ meltfptr[31] = slot; + /*_.GSDF__V51*/ + meltfptr[31] = slot; }; ; } @@ -3737,10 +4050,12 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ MELT_CHECK_SIGNAL(); ; /*^compute*/ - /*_#IS_CLOSURE__L30*/ meltfnum[18] = + /*_#IS_CLOSURE__L30*/ + meltfnum[18] = (melt_magic_discr((melt_ptr_t)(/*_.GSDF__V51*/ meltfptr[31])) == MELTOBMAG_CLOSURE);; MELT_LOCATION("warmelt-debug.melt:349:/ cond"); - /*cond*/ if (/*_#IS_CLOSURE__L30*/ meltfnum[18]) /*then*/ + /*cond*/ + if (/*_#IS_CLOSURE__L30*/ meltfnum[18]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3757,14 +4072,17 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].meltbp_gimpleseq = /*_?*/ meltfram__.loc_GIMPLE_SEQ__o10; - /*_.GSDF__V53*/ meltfptr[29] = melt_apply ((meltclosure_ptr_t)(/*_.GSDF__V51*/ meltfptr[31]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_GIMPLESEQ ""), argtab, "", (union meltparam_un*)0); + /*_.GSDF__V53*/ + meltfptr[29] = melt_apply ((meltclosure_ptr_t)(/*_.GSDF__V51*/ meltfptr[31]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_GIMPLESEQ ""), argtab, "", (union meltparam_un*)0); } ; - /*_._IFELSE___V52*/ meltfptr[30] = /*_.GSDF__V53*/ meltfptr[29];; + /*_._IFELSE___V52*/ + meltfptr[30] = /*_.GSDF__V53*/ meltfptr[29];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:349:/ clear"); - /*clear*/ /*_.GSDF__V53*/ meltfptr[29] = 0 ; + /*clear*/ /*_.GSDF__V53*/ + meltfptr[29] = 0 ; } ; } @@ -3779,7 +4097,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ MELT_CHECK_SIGNAL(); ; MELT_LOCATION("warmelt-debug.melt:351:/ cond"); - /*cond*/ if (/*_?*/ meltfram__.loc_GIMPLE_SEQ__o10) /*then*/ + /*cond*/ + if (/*_?*/ meltfram__.loc_GIMPLE_SEQ__o10) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3794,7 +4113,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ meltgc_add_out((melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), ( " ?*gimpleseq*?")); } ; - /*clear*/ /*_._IFELSE___V52*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V52*/ + meltfptr[30] = 0 ; /*epilog*/ } ; @@ -3815,7 +4135,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ meltgc_add_out((melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), ( " ?*nullgimpleseq*?")); } ; - /*clear*/ /*_._IFELSE___V52*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V52*/ + meltfptr[30] = 0 ; /*epilog*/ } ; @@ -3827,20 +4148,26 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ } ; /*^compute*/ - /*_.LET___V50*/ meltfptr[33] = /*_._IFELSE___V52*/ meltfptr[30];; + /*_.LET___V50*/ + meltfptr[33] = /*_._IFELSE___V52*/ meltfptr[30];; MELT_LOCATION("warmelt-debug.melt:347:/ clear"); - /*clear*/ /*_.GSDF__V51*/ meltfptr[31] = 0 ; + /*clear*/ /*_.GSDF__V51*/ + meltfptr[31] = 0 ; /*^clear*/ - /*clear*/ /*_#IS_CLOSURE__L30*/ meltfnum[18] = 0 ; + /*clear*/ /*_#IS_CLOSURE__L30*/ + meltfnum[18] = 0 ; /*^clear*/ - /*clear*/ /*_._IFELSE___V52*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V52*/ + meltfptr[30] = 0 ; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:346:/ clear"); - /*clear*/ /*_?*/ meltfram__.loc_GIMPLE_SEQ__o10 = 0 ; + /*clear*/ /*_?*/ + meltfram__.loc_GIMPLE_SEQ__o10 = 0 ; /*^clear*/ - /*clear*/ /*_.LET___V50*/ meltfptr[33] = 0 ; + /*clear*/ /*_.LET___V50*/ + meltfptr[33] = 0 ; } ; } @@ -3852,7 +4179,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:354:/ cond"); - /*cond*/ if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_EDGE) /*then*/ + /*cond*/ + if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_EDGE) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3864,12 +4192,14 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*variadic argument stuff*/ meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_edge;; /*^compute*/ - /*consume variadic EDGE !*/ variad_MELT_DEBUG_FUN_ix += 1;; + /*consume variadic EDGE !*/ + variad_MELT_DEBUG_FUN_ix += 1;; MELT_LOCATION("warmelt-debug.melt:355:/ quasiblock"); /*^cond*/ - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!EDGE_DEBUG_FUNCONT*/ meltfrout->tabval[15])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[12]))) ) /*then*/ @@ -3880,7 +4210,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)((/*!EDGE_DEBUG_FUNCONT*/ meltfrout->tabval[15])) /*=obj*/; melt_object_get_field(slot,obj, 0, "REFERENCED_VALUE"); - /*_.EDF__V55*/ meltfptr[31] = slot; + /*_.EDF__V55*/ + meltfptr[31] = slot; }; ; } @@ -3894,10 +4225,12 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ MELT_CHECK_SIGNAL(); ; /*^compute*/ - /*_#IS_CLOSURE__L31*/ meltfnum[21] = + /*_#IS_CLOSURE__L31*/ + meltfnum[21] = (melt_magic_discr((melt_ptr_t)(/*_.EDF__V55*/ meltfptr[31])) == MELTOBMAG_CLOSURE);; MELT_LOCATION("warmelt-debug.melt:357:/ cond"); - /*cond*/ if (/*_#IS_CLOSURE__L31*/ meltfnum[21]) /*then*/ + /*cond*/ + if (/*_#IS_CLOSURE__L31*/ meltfnum[21]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3914,14 +4247,17 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].meltbp_edge = /*_?*/ meltfram__.loc_EDGE__o11; - /*_.EDF__V57*/ meltfptr[33] = melt_apply ((meltclosure_ptr_t)(/*_.EDF__V55*/ meltfptr[31]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_EDGE ""), argtab, "", (union meltparam_un*)0); + /*_.EDF__V57*/ + meltfptr[33] = melt_apply ((meltclosure_ptr_t)(/*_.EDF__V55*/ meltfptr[31]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_EDGE ""), argtab, "", (union meltparam_un*)0); } ; - /*_._IFELSE___V56*/ meltfptr[30] = /*_.EDF__V57*/ meltfptr[33];; + /*_._IFELSE___V56*/ + meltfptr[30] = /*_.EDF__V57*/ meltfptr[33];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:357:/ clear"); - /*clear*/ /*_.EDF__V57*/ meltfptr[33] = 0 ; + /*clear*/ /*_.EDF__V57*/ + meltfptr[33] = 0 ; } ; } @@ -3936,7 +4272,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ MELT_CHECK_SIGNAL(); ; MELT_LOCATION("warmelt-debug.melt:359:/ cond"); - /*cond*/ if (/*_?*/ meltfram__.loc_EDGE__o11) /*then*/ + /*cond*/ + if (/*_?*/ meltfram__.loc_EDGE__o11) /*then*/ { /*^cond.then*/ /*^block*/ @@ -3951,7 +4288,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ meltgc_add_out((melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), ( " ?*edge*?")); } ; - /*clear*/ /*_._IFELSE___V56*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V56*/ + meltfptr[30] = 0 ; /*epilog*/ } ; @@ -3972,7 +4310,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ meltgc_add_out((melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), ( " ?*nulledge*?")); } ; - /*clear*/ /*_._IFELSE___V56*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V56*/ + meltfptr[30] = 0 ; /*epilog*/ } ; @@ -3984,20 +4323,26 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ } ; /*^compute*/ - /*_.LET___V54*/ meltfptr[29] = /*_._IFELSE___V56*/ meltfptr[30];; + /*_.LET___V54*/ + meltfptr[29] = /*_._IFELSE___V56*/ meltfptr[30];; MELT_LOCATION("warmelt-debug.melt:355:/ clear"); - /*clear*/ /*_.EDF__V55*/ meltfptr[31] = 0 ; + /*clear*/ /*_.EDF__V55*/ + meltfptr[31] = 0 ; /*^clear*/ - /*clear*/ /*_#IS_CLOSURE__L31*/ meltfnum[21] = 0 ; + /*clear*/ /*_#IS_CLOSURE__L31*/ + meltfnum[21] = 0 ; /*^clear*/ - /*clear*/ /*_._IFELSE___V56*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V56*/ + meltfptr[30] = 0 ; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:354:/ clear"); - /*clear*/ /*_?*/ meltfram__.loc_EDGE__o11 = 0 ; + /*clear*/ /*_?*/ + meltfram__.loc_EDGE__o11 = 0 ; /*^clear*/ - /*clear*/ /*_.LET___V54*/ meltfptr[29] = 0 ; + /*clear*/ /*_.LET___V54*/ + meltfptr[29] = 0 ; } ; } @@ -4009,7 +4354,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:362:/ cond"); - /*cond*/ if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_BB) /*then*/ + /*cond*/ + if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_BB) /*then*/ { /*^cond.then*/ /*^block*/ @@ -4021,12 +4367,14 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*variadic argument stuff*/ meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_bb;; /*^compute*/ - /*consume variadic BASIC_BLOCK !*/ variad_MELT_DEBUG_FUN_ix += 1;; + /*consume variadic BASIC_BLOCK !*/ + variad_MELT_DEBUG_FUN_ix += 1;; MELT_LOCATION("warmelt-debug.melt:363:/ quasiblock"); /*^cond*/ - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!BASICBLOCK_DEBUG_FUNCONT*/ meltfrout->tabval[16])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[12]))) ) /*then*/ @@ -4037,7 +4385,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)((/*!BASICBLOCK_DEBUG_FUNCONT*/ meltfrout->tabval[16])) /*=obj*/; melt_object_get_field(slot,obj, 0, "REFERENCED_VALUE"); - /*_.BDF__V59*/ meltfptr[31] = slot; + /*_.BDF__V59*/ + meltfptr[31] = slot; }; ; } @@ -4051,10 +4400,12 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ MELT_CHECK_SIGNAL(); ; /*^compute*/ - /*_#IS_CLOSURE__L32*/ meltfnum[20] = + /*_#IS_CLOSURE__L32*/ + meltfnum[20] = (melt_magic_discr((melt_ptr_t)(/*_.BDF__V59*/ meltfptr[31])) == MELTOBMAG_CLOSURE);; MELT_LOCATION("warmelt-debug.melt:365:/ cond"); - /*cond*/ if (/*_#IS_CLOSURE__L32*/ meltfnum[20]) /*then*/ + /*cond*/ + if (/*_#IS_CLOSURE__L32*/ meltfnum[20]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -4071,14 +4422,17 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].meltbp_bb = /*_?*/ meltfram__.loc_BASIC_BLOCK__o12; - /*_.BDF__V61*/ meltfptr[29] = melt_apply ((meltclosure_ptr_t)(/*_.BDF__V59*/ meltfptr[31]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_BB ""), argtab, "", (union meltparam_un*)0); + /*_.BDF__V61*/ + meltfptr[29] = melt_apply ((meltclosure_ptr_t)(/*_.BDF__V59*/ meltfptr[31]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_BB ""), argtab, "", (union meltparam_un*)0); } ; - /*_._IFELSE___V60*/ meltfptr[30] = /*_.BDF__V61*/ meltfptr[29];; + /*_._IFELSE___V60*/ + meltfptr[30] = /*_.BDF__V61*/ meltfptr[29];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:365:/ clear"); - /*clear*/ /*_.BDF__V61*/ meltfptr[29] = 0 ; + /*clear*/ /*_.BDF__V61*/ + meltfptr[29] = 0 ; } ; } @@ -4093,7 +4447,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ MELT_CHECK_SIGNAL(); ; MELT_LOCATION("warmelt-debug.melt:367:/ cond"); - /*cond*/ if (/*_?*/ meltfram__.loc_BASIC_BLOCK__o12) /*then*/ + /*cond*/ + if (/*_?*/ meltfram__.loc_BASIC_BLOCK__o12) /*then*/ { /*^cond.then*/ /*^block*/ @@ -4108,7 +4463,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ meltgc_add_out((melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), ( " ?*basicblock*?")); } ; - /*clear*/ /*_._IFELSE___V60*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V60*/ + meltfptr[30] = 0 ; /*epilog*/ } ; @@ -4129,7 +4485,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ meltgc_add_out((melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), ( " ?*nullbasicblock*?")); } ; - /*clear*/ /*_._IFELSE___V60*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V60*/ + meltfptr[30] = 0 ; /*epilog*/ } ; @@ -4141,20 +4498,26 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ } ; /*^compute*/ - /*_.LET___V58*/ meltfptr[33] = /*_._IFELSE___V60*/ meltfptr[30];; + /*_.LET___V58*/ + meltfptr[33] = /*_._IFELSE___V60*/ meltfptr[30];; MELT_LOCATION("warmelt-debug.melt:363:/ clear"); - /*clear*/ /*_.BDF__V59*/ meltfptr[31] = 0 ; + /*clear*/ /*_.BDF__V59*/ + meltfptr[31] = 0 ; /*^clear*/ - /*clear*/ /*_#IS_CLOSURE__L32*/ meltfnum[20] = 0 ; + /*clear*/ /*_#IS_CLOSURE__L32*/ + meltfnum[20] = 0 ; /*^clear*/ - /*clear*/ /*_._IFELSE___V60*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V60*/ + meltfptr[30] = 0 ; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:362:/ clear"); - /*clear*/ /*_?*/ meltfram__.loc_BASIC_BLOCK__o12 = 0 ; + /*clear*/ /*_?*/ + meltfram__.loc_BASIC_BLOCK__o12 = 0 ; /*^clear*/ - /*clear*/ /*_.LET___V58*/ meltfptr[33] = 0 ; + /*clear*/ /*_.LET___V58*/ + meltfptr[33] = 0 ; } ; } @@ -4166,7 +4529,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ { MELT_LOCATION("warmelt-debug.melt:370:/ cond"); - /*cond*/ if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_LOOP) /*then*/ + /*cond*/ + if (/*ifvariadic arg#1*/ variad_MELT_DEBUG_FUN_ix>=0 && variad_MELT_DEBUG_FUN_ix + 1 <= variad_MELT_DEBUG_FUN_len && meltxargdescr_[variad_MELT_DEBUG_FUN_ix]== MELTBPAR_LOOP) /*then*/ { /*^cond.then*/ /*^block*/ @@ -4178,12 +4542,14 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ /*variadic argument stuff*/ meltxargtab_[variad_MELT_DEBUG_FUN_ix + 0].meltbp_loop;; /*^compute*/ - /*consume variadic LOOP !*/ variad_MELT_DEBUG_FUN_ix += 1;; + /*consume variadic LOOP !*/ + variad_MELT_DEBUG_FUN_ix += 1;; MELT_LOCATION("warmelt-debug.melt:371:/ quasiblock"); /*^cond*/ - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)((/*!LOOP_DEBUG_FUNCONT*/ meltfrout->tabval[17])), (melt_ptr_t)((/*!CLASS_REFERENCE*/ meltfrout->tabval[12]))) ) /*then*/ @@ -4194,7 +4560,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)((/*!LOOP_DEBUG_FUNCONT*/ meltfrout->tabval[17])) /*=obj*/; melt_object_get_field(slot,obj, 0, "REFERENCED_VALUE"); - /*_.LDF__V63*/ meltfptr[31] = slot; + /*_.LDF__V63*/ + meltfptr[31] = slot; }; ; } @@ -4208,10 +4575,12 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ MELT_CHECK_SIGNAL(); ; /*^compute*/ - /*_#IS_CLOSURE__L33*/ meltfnum[18] = + /*_#IS_CLOSURE__L33*/ + meltfnum[18] = (melt_magic_discr((melt_ptr_t)(/*_.LDF__V63*/ meltfptr[31])) == MELTOBMAG_CLOSURE);; MELT_LOCATION("warmelt-debug.melt:373:/ cond"); - /*cond*/ if (/*_#IS_CLOSURE__L33*/ meltfnum[18]) /*then*/ + /*cond*/ + if (/*_#IS_CLOSURE__L33*/ meltfnum[18]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -4228,14 +4597,17 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ memset(&argtab, 0, sizeof(argtab)); /*^apply.arg*/ argtab[0].meltbp_loop = /*_?*/ meltfram__.loc_LOOP__o13; - /*_.LDF__V65*/ meltfptr[33] = melt_apply ((meltclosure_ptr_t)(/*_.LDF__V63*/ meltfptr[31]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_LOOP ""), argtab, "", (union meltparam_un*)0); + /*_.LDF__V65*/ + meltfptr[33] = melt_apply ((meltclosure_ptr_t)(/*_.LDF__V63*/ meltfptr[31]), (melt_ptr_t)(/*_.DBGI__V19*/ meltfptr[17]), (MELTBPARSTR_LOOP ""), argtab, "", (union meltparam_un*)0); } ; - /*_._IFELSE___V64*/ meltfptr[30] = /*_.LDF__V65*/ meltfptr[33];; + /*_._IFELSE___V64*/ + meltfptr[30] = /*_.LDF__V65*/ meltfptr[33];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:373:/ clear"); - /*clear*/ /*_.LDF__V65*/ meltfptr[33] = 0 ; + /*clear*/ /*_.LDF__V65*/ + meltfptr[33] = 0 ; } ; } @@ -4250,7 +4622,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ MELT_CHECK_SIGNAL(); ; MELT_LOCATION("warmelt-debug.melt:375:/ cond"); - /*cond*/ if (/*_?*/ meltfram__.loc_LOOP__o13) /*then*/ + /*cond*/ + if (/*_?*/ meltfram__.loc_LOOP__o13) /*then*/ { /*^cond.then*/ /*^block*/ @@ -4265,7 +4638,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ meltgc_add_out((melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), ( " ?*loop*?")); } ; - /*clear*/ /*_._IFELSE___V64*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V64*/ + meltfptr[30] = 0 ; /*epilog*/ } ; @@ -4286,7 +4660,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ meltgc_add_out((melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), ( " ?*loop*?")); } ; - /*clear*/ /*_._IFELSE___V64*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V64*/ + meltfptr[30] = 0 ; /*epilog*/ } ; @@ -4298,20 +4673,26 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ } ; /*^compute*/ - /*_.LET___V62*/ meltfptr[29] = /*_._IFELSE___V64*/ meltfptr[30];; + /*_.LET___V62*/ + meltfptr[29] = /*_._IFELSE___V64*/ meltfptr[30];; MELT_LOCATION("warmelt-debug.melt:371:/ clear"); - /*clear*/ /*_.LDF__V63*/ meltfptr[31] = 0 ; + /*clear*/ /*_.LDF__V63*/ + meltfptr[31] = 0 ; /*^clear*/ - /*clear*/ /*_#IS_CLOSURE__L33*/ meltfnum[18] = 0 ; + /*clear*/ /*_#IS_CLOSURE__L33*/ + meltfnum[18] = 0 ; /*^clear*/ - /*clear*/ /*_._IFELSE___V64*/ meltfptr[30] = 0 ; + /*clear*/ /*_._IFELSE___V64*/ + meltfptr[30] = 0 ; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:370:/ clear"); - /*clear*/ /*_?*/ meltfram__.loc_LOOP__o13 = 0 ; + /*clear*/ /*_?*/ + meltfram__.loc_LOOP__o13 = 0 ; /*^clear*/ - /*clear*/ /*_.LET___V62*/ meltfptr[29] = 0 ; + /*clear*/ /*_.LET___V62*/ + meltfptr[29] = 0 ; } ; } @@ -4325,7 +4706,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ MELT_LOCATION("warmelt-debug.melt:379:/ quasiblock"); - /*_.VCTYP__V67*/ meltfptr[31] = + /*_.VCTYP__V67*/ + meltfptr[31] = /*variadic_type_code*/ #ifdef melt_variadic_index (((melt_variadic_index + 0) >= 0 @@ -4338,7 +4720,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ #endif /*melt_variadic_index*/ ;; MELT_LOCATION("warmelt-debug.melt:380:/ cond"); - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.VCTYP__V67*/ meltfptr[31]), (melt_ptr_t)((/*!CLASS_NAMED*/ meltfrout->tabval[18]))) ) /*then*/ @@ -4349,7 +4732,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.VCTYP__V67*/ meltfptr[31]) /*=obj*/; melt_object_get_field(slot,obj, 1, "NAMED_NAME"); - /*_.VCTYPNAME__V68*/ meltfptr[30] = slot; + /*_.VCTYPNAME__V68*/ + meltfptr[30] = slot; }; ; } @@ -4371,7 +4755,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ } ; MELT_LOCATION("warmelt-debug.melt:388:/ cond"); - /*cond*/ if ( + /*cond*/ + if ( /*ifisa*/ melt_is_instance_of((melt_ptr_t)(/*_.VCTYP__V67*/ meltfptr[31]), (melt_ptr_t)((/*!CLASS_QUASI_CTYPE*/ meltfrout->tabval[19]))) ) /*then*/ @@ -4382,7 +4767,8 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ melt_ptr_t slot=NULL, obj=NULL; obj = (melt_ptr_t)(/*_.VCTYP__V67*/ meltfptr[31]) /*=obj*/; melt_object_get_field(slot,obj, 2, "CTYPE_KEYWORD"); - /*_.CTYPE_KEYWORD__V69*/ meltfptr[29] = slot; + /*_.CTYPE_KEYWORD__V69*/ + meltfptr[29] = slot; }; ; } @@ -4406,23 +4792,30 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_.CTYPE_KEYWORD__V69*/ meltfptr[29]; /*^apply.arg*/ argtab[2].meltbp_cstring = "?? "; - /*_.ADD2OUT__V70*/ meltfptr[69] = melt_apply ((meltclosure_ptr_t)((/*!ADD2OUT*/ meltfrout->tabval[7])), (melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), (MELTBPARSTR_CSTRING MELTBPARSTR_PTR MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un*)0); + /*_.ADD2OUT__V70*/ + meltfptr[69] = melt_apply ((meltclosure_ptr_t)((/*!ADD2OUT*/ meltfrout->tabval[7])), (melt_ptr_t)(/*_.OUT__V5*/ meltfptr[4]), (MELTBPARSTR_CSTRING MELTBPARSTR_PTR MELTBPARSTR_CSTRING ""), argtab, "", (union meltparam_un*)0); } ; - /*_.LET___V66*/ meltfptr[33] = /*_.ADD2OUT__V70*/ meltfptr[69];; + /*_.LET___V66*/ + meltfptr[33] = /*_.ADD2OUT__V70*/ meltfptr[69];; MELT_LOCATION("warmelt-debug.melt:379:/ clear"); - /*clear*/ /*_.VCTYP__V67*/ meltfptr[31] = 0 ; + /*clear*/ /*_.VCTYP__V67*/ + meltfptr[31] = 0 ; /*^clear*/ - /*clear*/ /*_.VCTYPNAME__V68*/ meltfptr[30] = 0 ; + /*clear*/ /*_.VCTYPNAME__V68*/ + meltfptr[30] = 0 ; /*^clear*/ - /*clear*/ /*_.CTYPE_KEYWORD__V69*/ meltfptr[29] = 0 ; + /*clear*/ /*_.CTYPE_KEYWORD__V69*/ + meltfptr[29] = 0 ; /*^clear*/ - /*clear*/ /*_.ADD2OUT__V70*/ meltfptr[69] = 0 ; + /*clear*/ /*_.ADD2OUT__V70*/ + meltfptr[69] = 0 ; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:370:/ clear"); - /*clear*/ /*_.LET___V66*/ meltfptr[33] = 0 ; + /*clear*/ /*_.LET___V66*/ + meltfptr[33] = 0 ; } ; } @@ -4472,39 +4865,47 @@ meltlabloop_ARGLOOP_1:;/*^loopbody*/ ; } ; - /*_#OUTPUT_LENGTH__L34*/ meltfnum[21] = + /*_#OUTPUT_LENGTH__L34*/ + meltfnum[21] = melt_output_length ((melt_ptr_t)/*_.OUT__V5*/ meltfptr[4]);; MELT_LOCATION("warmelt-debug.melt:390:/ compute"); - /*_#OUTLEN__L12*/ meltfnum[9] = /*_#SETQ___L35*/ meltfnum[20] = /*_#OUTPUT_LENGTH__L34*/ meltfnum[21];; + /*_#OUTLEN__L12*/ + meltfnum[9] = /*_#SETQ___L35*/ meltfnum[20] = /*_#OUTPUT_LENGTH__L34*/ meltfnum[21];; MELT_CHECK_SIGNAL(); ; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:278:/ clear"); - /*clear*/ /*_#OUTPUT_LENGTH__L34*/ meltfnum[21] = 0 ; + /*clear*/ /*_#OUTPUT_LENGTH__L34*/ + meltfnum[21] = 0 ; /*^clear*/ - /*clear*/ /*_#SETQ___L35*/ meltfnum[20] = 0 ; + /*clear*/ /*_#SETQ___L35*/ + meltfnum[20] = 0 ; } ; ; goto meltlabloop_ARGLOOP_1; meltlabexit_ARGLOOP_1:;/*^loopepilog*/ /*loopepilog*/ - /*_.FOREVER___V28*/ meltfptr[25] = /*_.ARGLOOP__V29*/ meltfptr[26];; + /*_.FOREVER___V28*/ + meltfptr[25] = /*_.ARGLOOP__V29*/ meltfptr[26];; } ; MELT_CHECK_SIGNAL(); ; /*^compute*/ - /*_#plI__L36*/ meltfnum[18] = + /*_#plI__L36*/ + meltfnum[18] = ((/*_#INITOUTLEN__L14*/ meltfnum[13]) + (200));; /*^compute*/ - /*_#gtI__L37*/ meltfnum[21] = + /*_#gtI__L37*/ + meltfnum[21] = ((/*_#OUTLEN__L12*/ meltfnum[9]) > (/*_#plI__L36*/ meltfnum[18]));; MELT_LOCATION("warmelt-debug.melt:394:/ cond"); - /*cond*/ if (/*_#gtI__L37*/ meltfnum[21]) /*then*/ + /*cond*/ + if (/*_#gtI__L37*/ meltfnum[21]) /*then*/ { /*^cond.then*/ /*^block*/ @@ -4547,35 +4948,50 @@ meltlabexit_ARGLOOP_1:;/*^loopepilog*/ ; MELT_LOCATION("warmelt-debug.melt:239:/ clear"); - /*clear*/ /*_.DBGI__V19*/ meltfptr[17] = 0 ; + /*clear*/ /*_.DBGI__V19*/ + meltfptr[17] = 0 ; /*^clear*/ - /*clear*/ /*_#FRAMDEPTH__L11*/ meltfnum[7] = 0 ; + /*clear*/ /*_#FRAMDEPTH__L11*/ + meltfnum[7] = 0 ; /*^clear*/ - /*clear*/ /*_#OUTLEN__L12*/ meltfnum[9] = 0 ; + /*clear*/ /*_#OUTLEN__L12*/ + meltfnum[9] = 0 ; /*^clear*/ - /*clear*/ /*_#LASTSTROUTLEN__L13*/ meltfnum[12] = 0 ; + /*clear*/ /*_#LASTSTROUTLEN__L13*/ + meltfnum[12] = 0 ; /*^clear*/ - /*clear*/ /*_#INITOUTLEN__L14*/ meltfnum[13] = 0 ; + /*clear*/ /*_#INITOUTLEN__L14*/ + meltfnum[13] = 0 ; /*^clear*/ - /*clear*/ /*_#pcIRAW__L15*/ meltfnum[14] = 0 ; + /*clear*/ /*_#pcIRAW__L15*/ + meltfnum[14] = 0 ; /*^clear*/ - /*clear*/ /*_#NOT__L16*/ meltfnum[15] = 0 ; + /*clear*/ /*_#NOT__L16*/ + meltfnum[15] = 0 ; /*^clear*/ - /*clear*/ /*_#miI__L17*/ meltfnum[16] = 0 ; + /*clear*/ /*_#miI__L17*/ + meltfnum[16] = 0 ; /*^clear*/ - /*clear*/ /*_.ADD2OUT__V22*/ meltfptr[20] = 0 ; + /*clear*/ /*_.ADD2OUT__V22*/ + meltfptr[20] = 0 ; /*^clear*/ - /*clear*/ /*_._IF___V23*/ meltfptr[22] = 0 ; + /*clear*/ /*_._IF___V23*/ + meltfptr[22] = 0 ; /*^clear*/ - /*clear*/ /*_#gtI__L18*/ meltfnum[17] = 0 ; + /*clear*/ /*_#gtI__L18*/ + meltfnum[17] = 0 ; /*^clear*/ - /*clear*/ /*_._IF___V25*/ meltfptr[23] = 0 ; + /*clear*/ /*_._IF___V25*/ + meltfptr[23] = 0 ; /*^clear*/ - /*clear*/ /*_.FOREVER___V28*/ meltfptr[25] = 0 ; + /*clear*/ /*_.FOREVER___V28*/ + meltfptr[25] = 0 ; /*^clear*/ - /*clear*/ /*_#plI__L36*/ meltfnum[18] = 0 ; + /*clear*/ /*_#plI__L36*/ + meltfnum[18] = 0 ; /*^clear*/ - /*clear*/ /*_#gtI__L37*/ meltfnum[21] = 0 ; + /*clear*/ /*_#gtI__L37*/ + meltfnum[21] = 0 ; /* block_signals meltcit1__BLKSIGNAL end */ melt_blocklevel_signals = meltcit1__BLKSIGNAL_lev; MELT_CHECK_SIGNAL(); @@ -4586,31 +5002,44 @@ meltlabexit_ARGLOOP_1:;/*^loopepilog*/ ; MELT_LOCATION("warmelt-debug.melt:201:/ clear"); - /*clear*/ /*_#DBGCOUNTER__L4*/ meltfnum[3] = 0 ; + /*clear*/ /*_#DBGCOUNTER__L4*/ + meltfnum[3] = 0 ; /*^clear*/ - /*clear*/ /*_.DUMPF__V3*/ meltfptr[2] = 0 ; + /*clear*/ /*_.DUMPF__V3*/ + meltfptr[2] = 0 ; /*^clear*/ - /*clear*/ /*_.STDERRF__V4*/ meltfptr[3] = 0 ; + /*clear*/ /*_.STDERRF__V4*/ + meltfptr[3] = 0 ; /*^clear*/ - /*clear*/ /*_.OUT__V5*/ meltfptr[4] = 0 ; + /*clear*/ /*_.OUT__V5*/ + meltfptr[4] = 0 ; /*^clear*/ - /*clear*/ /*_.OCCMAP__V6*/ meltfptr[5] = 0 ; + /*clear*/ /*_.OCCMAP__V6*/ + meltfptr[5] = 0 ; /*^clear*/ - /*clear*/ /*_#DEBUG_DEPTH__L5*/ meltfnum[4] = 0 ; + /*clear*/ /*_#DEBUG_DEPTH__L5*/ + meltfnum[4] = 0 ; /*^clear*/ - /*clear*/ /*_.BOXEDMAXDEPTH__V7*/ meltfptr[6] = 0 ; + /*clear*/ /*_.BOXEDMAXDEPTH__V7*/ + meltfptr[6] = 0 ; /*^clear*/ - /*clear*/ /*_#NULL__L6*/ meltfnum[5] = 0 ; + /*clear*/ /*_#NULL__L6*/ + meltfnum[5] = 0 ; /*^clear*/ - /*clear*/ /*_._IF___V8*/ meltfptr[7] = 0 ; + /*clear*/ /*_._IF___V8*/ + meltfptr[7] = 0 ; /*^clear*/ - /*clear*/ /*_#NULL__L7*/ meltfnum[6] = 0 ; + /*clear*/ /*_#NULL__L7*/ + meltfnum[6] = 0 ; /*^clear*/ - /*clear*/ /*_._IF___V10*/ meltfptr[8] = 0 ; + /*clear*/ /*_._IF___V10*/ + meltfptr[8] = 0 ; /*^clear*/ - /*clear*/ /*_.IFCPP___V13*/ meltfptr[10] = 0 ; + /*clear*/ /*_.IFCPP___V13*/ + meltfptr[10] = 0 ; /*^clear*/ - /*clear*/ /*_.IFCPP___V16*/ meltfptr[14] = 0 ; + /*clear*/ /*_.IFCPP___V16*/ + meltfptr[14] = 0 ; /*epilog*/ } ; @@ -4619,7 +5048,8 @@ meltlabexit_ARGLOOP_1:;/*^loopepilog*/ /*epilog*/ MELT_LOCATION("warmelt-debug.melt:199:/ clear"); - /*clear*/ /*_#MELT_HAS_FLAG_DEBUG_SET__L3*/ meltfnum[2] = 0 ; + /*clear*/ /*_#MELT_HAS_FLAG_DEBUG_SET__L3*/ + meltfnum[2] = 0 ; } ; @@ -4709,7 +5139,8 @@ const char melt_module_is_gpl_compatible[]= "warmelt-debug: GPLv3+"; /* the frame for initial routine */ /** start of frame for melt_start_this_module of CLASS_INITIAL_MODULE_ROUTINEOBJ from 1555**/ -/*curframdeclclassy*/ class Melt_InitialClassyFrame_WARMELTmiDEBUG_h749076111// fromline 1568 +/*curframdeclclassy*/ +class Melt_InitialClassyFrame_WARMELTmiDEBUG_h749076111// fromline 1568 : public Melt_CallFrameWithValues<444> { public: /* fromline 1572*/ @@ -5113,7 +5544,8 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*iniobj dsym_1__HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER*/ - /*uniqueobj*/ if (!/*_._VALDATA___V58*/ meltfptr[57]) + /*uniqueobj*/ + if (!/*_._VALDATA___V58*/ meltfptr[57]) /*_._VALDATA___V58*/ meltfptr[57] = (melt_ptr_t )&meltcdat->dsym_1__HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_1__HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_1__HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5123,15 +5555,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_2__HOOK_FRESH_ENVIRONMENT_R*/ - /*_._VALSTR___V59*/ meltfptr[58] = (melt_ptr_t) &meltcdat->dstr_2__HOOK_FRESH_ENVIRONMENT_R; + /*_._VALSTR___V59*/ + meltfptr[58] = (melt_ptr_t) &meltcdat->dstr_2__HOOK_FRESH_ENVIRONMENT_R; meltcdat->dstr_2__HOOK_FRESH_ENVIRONMENT_R.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_2__HOOK_FRESH_ENVIRONMENT_R.val, "HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER", sizeof (meltcdat->dstr_2__HOOK_FRESH_ENVIRONMENT_R.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_2__HOOK_FRESH_ENVIRONMENT_R.val, "HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER", sizeof (meltcdat->dstr_2__HOOK_FRESH_ENVIRONMENT_R.val)-1); meltcdat->dstr_2__HOOK_FRESH_ENVIRONMENT_R.val[38] = (char)0 ; meltcdat->dstr_2__HOOK_FRESH_ENVIRONMENT_R.slen = 38 ; /*iniobj dsym_3__CLASS_DEBUG_INFORMATION*/ - /*uniqueobj*/ if (!/*_._VALDATA___V60*/ meltfptr[59]) + /*uniqueobj*/ + if (!/*_._VALDATA___V60*/ meltfptr[59]) /*_._VALDATA___V60*/ meltfptr[59] = (melt_ptr_t )&meltcdat->dsym_3__CLASS_DEBUG_INFORMATION; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_3__CLASS_DEBUG_INFORMATION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_3__CLASS_DEBUG_INFORMATION", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5141,15 +5576,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_4__CLASS_DEBUG_INFORMATION*/ - /*_._VALSTR___V61*/ meltfptr[60] = (melt_ptr_t) &meltcdat->dstr_4__CLASS_DEBUG_INFORMATION; + /*_._VALSTR___V61*/ + meltfptr[60] = (melt_ptr_t) &meltcdat->dstr_4__CLASS_DEBUG_INFORMATION; meltcdat->dstr_4__CLASS_DEBUG_INFORMATION.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_4__CLASS_DEBUG_INFORMATION.val, "CLASS_DEBUG_INFORMATION", sizeof (meltcdat->dstr_4__CLASS_DEBUG_INFORMATION.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_4__CLASS_DEBUG_INFORMATION.val, "CLASS_DEBUG_INFORMATION", sizeof (meltcdat->dstr_4__CLASS_DEBUG_INFORMATION.val)-1); meltcdat->dstr_4__CLASS_DEBUG_INFORMATION.val[23] = (char)0 ; meltcdat->dstr_4__CLASS_DEBUG_INFORMATION.slen = 23 ; /*iniobj dsym_5__CLASS_ROOT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V62*/ meltfptr[61]) + /*uniqueobj*/ + if (!/*_._VALDATA___V62*/ meltfptr[61]) /*_._VALDATA___V62*/ meltfptr[61] = (melt_ptr_t )&meltcdat->dsym_5__CLASS_ROOT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_5__CLASS_ROOT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_5__CLASS_ROOT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5159,16 +5597,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_6__CLASS_ROOT*/ - /*_._VALSTR___V63*/ meltfptr[62] = (melt_ptr_t) &meltcdat->dstr_6__CLASS_ROOT; + /*_._VALSTR___V63*/ + meltfptr[62] = (melt_ptr_t) &meltcdat->dstr_6__CLASS_ROOT; meltcdat->dstr_6__CLASS_ROOT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_6__CLASS_ROOT.val, "CLASS_ROOT", sizeof (meltcdat->dstr_6__CLASS_ROOT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_6__CLASS_ROOT.val, "CLASS_ROOT", sizeof (meltcdat->dstr_6__CLASS_ROOT.val)-1); meltcdat->dstr_6__CLASS_ROOT.val[10] = (char)0 ; meltcdat->dstr_6__CLASS_ROOT.slen = 10 ; MELT_LOCATION("warmelt-debug.melt:42:/ iniobj"); /*iniobj dobj_7__CLASS_DEBUG_INFORMATION*/ - /*_._VALDATA___V64*/ meltfptr[63] = (melt_ptr_t )&meltcdat->dobj_7__CLASS_DEBUG_INFORMATION; + /*_._VALDATA___V64*/ + meltfptr[63] = (melt_ptr_t )&meltcdat->dobj_7__CLASS_DEBUG_INFORMATION; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_7__CLASS_DEBUG_INFORMATION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_7__CLASS_DEBUG_INFORMATION", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_CLASS)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_7__CLASS_DEBUG_INFORMATION.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_CLASS)))); @@ -5178,23 +5619,28 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_8__CLASS_DEBUG_INFORMATION*/ - /*_._VALSTR___V65*/ meltfptr[64] = (melt_ptr_t) &meltcdat->dstr_8__CLASS_DEBUG_INFORMATION; + /*_._VALSTR___V65*/ + meltfptr[64] = (melt_ptr_t) &meltcdat->dstr_8__CLASS_DEBUG_INFORMATION; meltcdat->dstr_8__CLASS_DEBUG_INFORMATION.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_8__CLASS_DEBUG_INFORMATION.val, "CLASS_DEBUG_INFORMATION", sizeof (meltcdat->dstr_8__CLASS_DEBUG_INFORMATION.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_8__CLASS_DEBUG_INFORMATION.val, "CLASS_DEBUG_INFORMATION", sizeof (meltcdat->dstr_8__CLASS_DEBUG_INFORMATION.val)-1); meltcdat->dstr_8__CLASS_DEBUG_INFORMATION.val[23] = (char)0 ; meltcdat->dstr_8__CLASS_DEBUG_INFORMATION.slen = 23 ; /*inimult dtup_9_syCLASS_DEBUG_INFORMATION*/ - /*_._VALTUP___V66*/ meltfptr[65] = (melt_ptr_t) &meltcdat->dtup_9_syCLASS_DEBUG_INFORMATION; + /*_._VALTUP___V66*/ + meltfptr[65] = (melt_ptr_t) &meltcdat->dtup_9_syCLASS_DEBUG_INFORMATION; meltcdat->dtup_9_syCLASS_DEBUG_INFORMATION.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLASS_SEQUENCE)))); meltcdat->dtup_9_syCLASS_DEBUG_INFORMATION.nbval = 1; /*inimult dtup_10_syCLASS_DEBUG_INFORMATION*/ - /*_._VALTUP___V73*/ meltfptr[72] = (melt_ptr_t) &meltcdat->dtup_10_syCLASS_DEBUG_INFORMATION; + /*_._VALTUP___V73*/ + meltfptr[72] = (melt_ptr_t) &meltcdat->dtup_10_syCLASS_DEBUG_INFORMATION; meltcdat->dtup_10_syCLASS_DEBUG_INFORMATION.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_FIELD_SEQUENCE)))); meltcdat->dtup_10_syCLASS_DEBUG_INFORMATION.nbval = 3; /*iniobj dsym_11__DBGI_OUT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V74*/ meltfptr[73]) + /*uniqueobj*/ + if (!/*_._VALDATA___V74*/ meltfptr[73]) /*_._VALDATA___V74*/ meltfptr[73] = (melt_ptr_t )&meltcdat->dsym_11__DBGI_OUT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_11__DBGI_OUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_11__DBGI_OUT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5204,16 +5650,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_12__DBGI_OUT*/ - /*_._VALSTR___V75*/ meltfptr[74] = (melt_ptr_t) &meltcdat->dstr_12__DBGI_OUT; + /*_._VALSTR___V75*/ + meltfptr[74] = (melt_ptr_t) &meltcdat->dstr_12__DBGI_OUT; meltcdat->dstr_12__DBGI_OUT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_12__DBGI_OUT.val, "DBGI_OUT", sizeof (meltcdat->dstr_12__DBGI_OUT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_12__DBGI_OUT.val, "DBGI_OUT", sizeof (meltcdat->dstr_12__DBGI_OUT.val)-1); meltcdat->dstr_12__DBGI_OUT.val[8] = (char)0 ; meltcdat->dstr_12__DBGI_OUT.slen = 8 ; /*^iniobj*/ /*iniobj dobj_13__DBGI_OUT*/ - /*_._VALDATA___V67*/ meltfptr[66] = (melt_ptr_t )&meltcdat->dobj_13__DBGI_OUT; + /*_._VALDATA___V67*/ + meltfptr[66] = (melt_ptr_t )&meltcdat->dobj_13__DBGI_OUT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_13__DBGI_OUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_13__DBGI_OUT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FIELD)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_13__DBGI_OUT.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_FIELD)))); @@ -5223,15 +5672,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_14__DBGI_OUT*/ - /*_._VALSTR___V68*/ meltfptr[67] = (melt_ptr_t) &meltcdat->dstr_14__DBGI_OUT; + /*_._VALSTR___V68*/ + meltfptr[67] = (melt_ptr_t) &meltcdat->dstr_14__DBGI_OUT; meltcdat->dstr_14__DBGI_OUT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_14__DBGI_OUT.val, "DBGI_OUT", sizeof (meltcdat->dstr_14__DBGI_OUT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_14__DBGI_OUT.val, "DBGI_OUT", sizeof (meltcdat->dstr_14__DBGI_OUT.val)-1); meltcdat->dstr_14__DBGI_OUT.val[8] = (char)0 ; meltcdat->dstr_14__DBGI_OUT.slen = 8 ; /*iniobj dsym_15__DBGI_OCCMAP*/ - /*uniqueobj*/ if (!/*_._VALDATA___V76*/ meltfptr[75]) + /*uniqueobj*/ + if (!/*_._VALDATA___V76*/ meltfptr[75]) /*_._VALDATA___V76*/ meltfptr[75] = (melt_ptr_t )&meltcdat->dsym_15__DBGI_OCCMAP; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_15__DBGI_OCCMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_15__DBGI_OCCMAP", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5241,16 +5693,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_16__DBGI_OCCMAP*/ - /*_._VALSTR___V77*/ meltfptr[76] = (melt_ptr_t) &meltcdat->dstr_16__DBGI_OCCMAP; + /*_._VALSTR___V77*/ + meltfptr[76] = (melt_ptr_t) &meltcdat->dstr_16__DBGI_OCCMAP; meltcdat->dstr_16__DBGI_OCCMAP.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_16__DBGI_OCCMAP.val, "DBGI_OCCMAP", sizeof (meltcdat->dstr_16__DBGI_OCCMAP.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_16__DBGI_OCCMAP.val, "DBGI_OCCMAP", sizeof (meltcdat->dstr_16__DBGI_OCCMAP.val)-1); meltcdat->dstr_16__DBGI_OCCMAP.val[11] = (char)0 ; meltcdat->dstr_16__DBGI_OCCMAP.slen = 11 ; /*^iniobj*/ /*iniobj dobj_17__DBGI_OCCMAP*/ - /*_._VALDATA___V69*/ meltfptr[68] = (melt_ptr_t )&meltcdat->dobj_17__DBGI_OCCMAP; + /*_._VALDATA___V69*/ + meltfptr[68] = (melt_ptr_t )&meltcdat->dobj_17__DBGI_OCCMAP; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_17__DBGI_OCCMAP", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_17__DBGI_OCCMAP", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FIELD)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_17__DBGI_OCCMAP.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_FIELD)))); @@ -5260,15 +5715,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_18__DBGI_OCCMAP*/ - /*_._VALSTR___V70*/ meltfptr[69] = (melt_ptr_t) &meltcdat->dstr_18__DBGI_OCCMAP; + /*_._VALSTR___V70*/ + meltfptr[69] = (melt_ptr_t) &meltcdat->dstr_18__DBGI_OCCMAP; meltcdat->dstr_18__DBGI_OCCMAP.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_18__DBGI_OCCMAP.val, "DBGI_OCCMAP", sizeof (meltcdat->dstr_18__DBGI_OCCMAP.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_18__DBGI_OCCMAP.val, "DBGI_OCCMAP", sizeof (meltcdat->dstr_18__DBGI_OCCMAP.val)-1); meltcdat->dstr_18__DBGI_OCCMAP.val[11] = (char)0 ; meltcdat->dstr_18__DBGI_OCCMAP.slen = 11 ; /*iniobj dsym_19__DBGI_MAXDEPTH*/ - /*uniqueobj*/ if (!/*_._VALDATA___V78*/ meltfptr[77]) + /*uniqueobj*/ + if (!/*_._VALDATA___V78*/ meltfptr[77]) /*_._VALDATA___V78*/ meltfptr[77] = (melt_ptr_t )&meltcdat->dsym_19__DBGI_MAXDEPTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_19__DBGI_MAXDEPTH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_19__DBGI_MAXDEPTH", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5278,16 +5736,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_20__DBGI_MAXDEPTH*/ - /*_._VALSTR___V79*/ meltfptr[78] = (melt_ptr_t) &meltcdat->dstr_20__DBGI_MAXDEPTH; + /*_._VALSTR___V79*/ + meltfptr[78] = (melt_ptr_t) &meltcdat->dstr_20__DBGI_MAXDEPTH; meltcdat->dstr_20__DBGI_MAXDEPTH.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_20__DBGI_MAXDEPTH.val, "DBGI_MAXDEPTH", sizeof (meltcdat->dstr_20__DBGI_MAXDEPTH.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_20__DBGI_MAXDEPTH.val, "DBGI_MAXDEPTH", sizeof (meltcdat->dstr_20__DBGI_MAXDEPTH.val)-1); meltcdat->dstr_20__DBGI_MAXDEPTH.val[13] = (char)0 ; meltcdat->dstr_20__DBGI_MAXDEPTH.slen = 13 ; /*^iniobj*/ /*iniobj dobj_21__DBGI_MAXDEPTH*/ - /*_._VALDATA___V71*/ meltfptr[70] = (melt_ptr_t )&meltcdat->dobj_21__DBGI_MAXDEPTH; + /*_._VALDATA___V71*/ + meltfptr[70] = (melt_ptr_t )&meltcdat->dobj_21__DBGI_MAXDEPTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_21__DBGI_MAXDEPTH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FIELD))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_21__DBGI_MAXDEPTH", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FIELD)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_21__DBGI_MAXDEPTH.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_FIELD)))); @@ -5297,15 +5758,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_22__DBGI_MAXDEPTH*/ - /*_._VALSTR___V72*/ meltfptr[71] = (melt_ptr_t) &meltcdat->dstr_22__DBGI_MAXDEPTH; + /*_._VALSTR___V72*/ + meltfptr[71] = (melt_ptr_t) &meltcdat->dstr_22__DBGI_MAXDEPTH; meltcdat->dstr_22__DBGI_MAXDEPTH.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_22__DBGI_MAXDEPTH.val, "DBGI_MAXDEPTH", sizeof (meltcdat->dstr_22__DBGI_MAXDEPTH.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_22__DBGI_MAXDEPTH.val, "DBGI_MAXDEPTH", sizeof (meltcdat->dstr_22__DBGI_MAXDEPTH.val)-1); meltcdat->dstr_22__DBGI_MAXDEPTH.val[13] = (char)0 ; meltcdat->dstr_22__DBGI_MAXDEPTH.slen = 13 ; /*iniobj dsym_23__CLASS_DEBUG_OUTPUT_INFORMATION*/ - /*uniqueobj*/ if (!/*_._VALDATA___V80*/ meltfptr[79]) + /*uniqueobj*/ + if (!/*_._VALDATA___V80*/ meltfptr[79]) /*_._VALDATA___V80*/ meltfptr[79] = (melt_ptr_t )&meltcdat->dsym_23__CLASS_DEBUG_OUTPUT_INFORMATION; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_23__CLASS_DEBUG_OUTPUT_INFORMATION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_23__CLASS_DEBUG_OUTPUT_INFORMATION", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5315,16 +5779,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_24__CLASS_DEBUG_OUTPUT_INFOR*/ - /*_._VALSTR___V81*/ meltfptr[80] = (melt_ptr_t) &meltcdat->dstr_24__CLASS_DEBUG_OUTPUT_INFOR; + /*_._VALSTR___V81*/ + meltfptr[80] = (melt_ptr_t) &meltcdat->dstr_24__CLASS_DEBUG_OUTPUT_INFOR; meltcdat->dstr_24__CLASS_DEBUG_OUTPUT_INFOR.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_24__CLASS_DEBUG_OUTPUT_INFOR.val, "CLASS_DEBUG_OUTPUT_INFORMATION", sizeof (meltcdat->dstr_24__CLASS_DEBUG_OUTPUT_INFOR.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_24__CLASS_DEBUG_OUTPUT_INFOR.val, "CLASS_DEBUG_OUTPUT_INFORMATION", sizeof (meltcdat->dstr_24__CLASS_DEBUG_OUTPUT_INFOR.val)-1); meltcdat->dstr_24__CLASS_DEBUG_OUTPUT_INFOR.val[30] = (char)0 ; meltcdat->dstr_24__CLASS_DEBUG_OUTPUT_INFOR.slen = 30 ; MELT_LOCATION("warmelt-debug.melt:53:/ iniobj"); /*iniobj dobj_25__CLASS_DEBUG_OUTPUT_INFORMATION*/ - /*_._VALDATA___V82*/ meltfptr[81] = (melt_ptr_t )&meltcdat->dobj_25__CLASS_DEBUG_OUTPUT_INFORMATION; + /*_._VALDATA___V82*/ + meltfptr[81] = (melt_ptr_t )&meltcdat->dobj_25__CLASS_DEBUG_OUTPUT_INFORMATION; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_25__CLASS_DEBUG_OUTPUT_INFORMATION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_CLASS))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_25__CLASS_DEBUG_OUTPUT_INFORMATION", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_CLASS)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_25__CLASS_DEBUG_OUTPUT_INFORMATION.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_CLASS)))); @@ -5334,23 +5801,28 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_26__CLASS_DEBUG_OUTPUT_INFOR*/ - /*_._VALSTR___V83*/ meltfptr[82] = (melt_ptr_t) &meltcdat->dstr_26__CLASS_DEBUG_OUTPUT_INFOR; + /*_._VALSTR___V83*/ + meltfptr[82] = (melt_ptr_t) &meltcdat->dstr_26__CLASS_DEBUG_OUTPUT_INFOR; meltcdat->dstr_26__CLASS_DEBUG_OUTPUT_INFOR.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_26__CLASS_DEBUG_OUTPUT_INFOR.val, "CLASS_DEBUG_OUTPUT_INFORMATION", sizeof (meltcdat->dstr_26__CLASS_DEBUG_OUTPUT_INFOR.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_26__CLASS_DEBUG_OUTPUT_INFOR.val, "CLASS_DEBUG_OUTPUT_INFORMATION", sizeof (meltcdat->dstr_26__CLASS_DEBUG_OUTPUT_INFOR.val)-1); meltcdat->dstr_26__CLASS_DEBUG_OUTPUT_INFOR.val[30] = (char)0 ; meltcdat->dstr_26__CLASS_DEBUG_OUTPUT_INFOR.slen = 30 ; /*inimult dtup_27_syCLASS_DEBUG_OUTPUT_INFORMATION*/ - /*_._VALTUP___V84*/ meltfptr[83] = (melt_ptr_t) &meltcdat->dtup_27_syCLASS_DEBUG_OUTPUT_INFORMATION; + /*_._VALTUP___V84*/ + meltfptr[83] = (melt_ptr_t) &meltcdat->dtup_27_syCLASS_DEBUG_OUTPUT_INFORMATION; meltcdat->dtup_27_syCLASS_DEBUG_OUTPUT_INFORMATION.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLASS_SEQUENCE)))); meltcdat->dtup_27_syCLASS_DEBUG_OUTPUT_INFORMATION.nbval = 2; /*inimult dtup_28_syCLASS_DEBUG_OUTPUT_INFORMATION*/ - /*_._VALTUP___V85*/ meltfptr[84] = (melt_ptr_t) &meltcdat->dtup_28_syCLASS_DEBUG_OUTPUT_INFORMATION; + /*_._VALTUP___V85*/ + meltfptr[84] = (melt_ptr_t) &meltcdat->dtup_28_syCLASS_DEBUG_OUTPUT_INFORMATION; meltcdat->dtup_28_syCLASS_DEBUG_OUTPUT_INFORMATION.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_FIELD_SEQUENCE)))); meltcdat->dtup_28_syCLASS_DEBUG_OUTPUT_INFORMATION.nbval = 3; /*iniobj dsym_29__DEBUG_DEPTH*/ - /*uniqueobj*/ if (!/*_._VALDATA___V86*/ meltfptr[85]) + /*uniqueobj*/ + if (!/*_._VALDATA___V86*/ meltfptr[85]) /*_._VALDATA___V86*/ meltfptr[85] = (melt_ptr_t )&meltcdat->dsym_29__DEBUG_DEPTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_29__DEBUG_DEPTH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_29__DEBUG_DEPTH", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5360,16 +5832,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_30__DEBUG_DEPTH*/ - /*_._VALSTR___V87*/ meltfptr[86] = (melt_ptr_t) &meltcdat->dstr_30__DEBUG_DEPTH; + /*_._VALSTR___V87*/ + meltfptr[86] = (melt_ptr_t) &meltcdat->dstr_30__DEBUG_DEPTH; meltcdat->dstr_30__DEBUG_DEPTH.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_30__DEBUG_DEPTH.val, "DEBUG_DEPTH", sizeof (meltcdat->dstr_30__DEBUG_DEPTH.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_30__DEBUG_DEPTH.val, "DEBUG_DEPTH", sizeof (meltcdat->dstr_30__DEBUG_DEPTH.val)-1); meltcdat->dstr_30__DEBUG_DEPTH.val[11] = (char)0 ; meltcdat->dstr_30__DEBUG_DEPTH.slen = 11 ; MELT_LOCATION("warmelt-debug.melt:64:/ iniobj"); /*iniobj dobj_31__DEBUG_DEPTH*/ - /*_._VALDATA___V88*/ meltfptr[87] = (melt_ptr_t )&meltcdat->dobj_31__DEBUG_DEPTH; + /*_._VALDATA___V88*/ + meltfptr[87] = (melt_ptr_t )&meltcdat->dobj_31__DEBUG_DEPTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_31__DEBUG_DEPTH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_PRIMITIVE))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_31__DEBUG_DEPTH", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_PRIMITIVE)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_31__DEBUG_DEPTH.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_PRIMITIVE)))); @@ -5377,32 +5852,39 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t meltcdat->dobj_31__DEBUG_DEPTH.obj_len = 5; /*inimult dtup_32_syDEBUG_DEPTH*/ - /*_._VALTUP___V92*/ meltfptr[91] = (melt_ptr_t) &meltcdat->dtup_32_syDEBUG_DEPTH; + /*_._VALTUP___V92*/ + meltfptr[91] = (melt_ptr_t) &meltcdat->dtup_32_syDEBUG_DEPTH; meltcdat->dtup_32_syDEBUG_DEPTH.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_MULTIPLE)))); meltcdat->dtup_32_syDEBUG_DEPTH.nbval = 1; /*inimult dtup_33_syDEBUG_DEPTH*/ - /*_._VALTUP___V90*/ meltfptr[89] = (melt_ptr_t) &meltcdat->dtup_33_syDEBUG_DEPTH; + /*_._VALTUP___V90*/ + meltfptr[89] = (melt_ptr_t) &meltcdat->dtup_33_syDEBUG_DEPTH; meltcdat->dtup_33_syDEBUG_DEPTH.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_MULTIPLE)))); meltcdat->dtup_33_syDEBUG_DEPTH.nbval = 0; /*inistring dstr_34__long_melt_debug_depth*/ - /*_._VALSTR___V91*/ meltfptr[90] = (melt_ptr_t) &meltcdat->dstr_34__long_melt_debug_depth; + /*_._VALSTR___V91*/ + meltfptr[90] = (melt_ptr_t) &meltcdat->dstr_34__long_melt_debug_depth; meltcdat->dstr_34__long_melt_debug_depth.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_34__long_melt_debug_depth.val, "(long) (melt_debug_depth ())", sizeof (meltcdat->dstr_34__long_melt_debug_depth.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_34__long_melt_debug_depth.val, "(long) (melt_debug_depth ())", sizeof (meltcdat->dstr_34__long_melt_debug_depth.val)-1); meltcdat->dstr_34__long_melt_debug_depth.val[28] = (char)0 ; meltcdat->dstr_34__long_melt_debug_depth.slen = 28 ; /*inistring dstr_35__DEBUG_DEPTH*/ - /*_._VALSTR___V89*/ meltfptr[88] = (melt_ptr_t) &meltcdat->dstr_35__DEBUG_DEPTH; + /*_._VALSTR___V89*/ + meltfptr[88] = (melt_ptr_t) &meltcdat->dstr_35__DEBUG_DEPTH; meltcdat->dstr_35__DEBUG_DEPTH.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_35__DEBUG_DEPTH.val, "DEBUG_DEPTH", sizeof (meltcdat->dstr_35__DEBUG_DEPTH.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_35__DEBUG_DEPTH.val, "DEBUG_DEPTH", sizeof (meltcdat->dstr_35__DEBUG_DEPTH.val)-1); meltcdat->dstr_35__DEBUG_DEPTH.val[11] = (char)0 ; meltcdat->dstr_35__DEBUG_DEPTH.slen = 11 ; /*iniobj dsym_36__MELT_REALLY_NEED_DEBUG*/ - /*uniqueobj*/ if (!/*_._VALDATA___V93*/ meltfptr[92]) + /*uniqueobj*/ + if (!/*_._VALDATA___V93*/ meltfptr[92]) /*_._VALDATA___V93*/ meltfptr[92] = (melt_ptr_t )&meltcdat->dsym_36__MELT_REALLY_NEED_DEBUG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_36__MELT_REALLY_NEED_DEBUG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_36__MELT_REALLY_NEED_DEBUG", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5412,16 +5894,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_37__MELT_REALLY_NEED_DEBUG*/ - /*_._VALSTR___V94*/ meltfptr[93] = (melt_ptr_t) &meltcdat->dstr_37__MELT_REALLY_NEED_DEBUG; + /*_._VALSTR___V94*/ + meltfptr[93] = (melt_ptr_t) &meltcdat->dstr_37__MELT_REALLY_NEED_DEBUG; meltcdat->dstr_37__MELT_REALLY_NEED_DEBUG.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_37__MELT_REALLY_NEED_DEBUG.val, "MELT_REALLY_NEED_DEBUG", sizeof (meltcdat->dstr_37__MELT_REALLY_NEED_DEBUG.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_37__MELT_REALLY_NEED_DEBUG.val, "MELT_REALLY_NEED_DEBUG", sizeof (meltcdat->dstr_37__MELT_REALLY_NEED_DEBUG.val)-1); meltcdat->dstr_37__MELT_REALLY_NEED_DEBUG.val[22] = (char)0 ; meltcdat->dstr_37__MELT_REALLY_NEED_DEBUG.slen = 22 ; MELT_LOCATION("warmelt-debug.melt:72:/ iniobj"); /*iniobj dobj_38__MELT_REALLY_NEED_DEBUG*/ - /*_._VALDATA___V95*/ meltfptr[94] = (melt_ptr_t )&meltcdat->dobj_38__MELT_REALLY_NEED_DEBUG; + /*_._VALDATA___V95*/ + meltfptr[94] = (melt_ptr_t )&meltcdat->dobj_38__MELT_REALLY_NEED_DEBUG; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_38__MELT_REALLY_NEED_DEBUG", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_PRIMITIVE))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_38__MELT_REALLY_NEED_DEBUG", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_PRIMITIVE)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_38__MELT_REALLY_NEED_DEBUG.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_PRIMITIVE)))); @@ -5429,16 +5914,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t meltcdat->dobj_38__MELT_REALLY_NEED_DEBUG.obj_len = 5; /*inimult dtup_39_syMELT_REALLY_NEED_DEBUG*/ - /*_._VALTUP___V103*/ meltfptr[102] = (melt_ptr_t) &meltcdat->dtup_39_syMELT_REALLY_NEED_DEBUG; + /*_._VALTUP___V103*/ + meltfptr[102] = (melt_ptr_t) &meltcdat->dtup_39_syMELT_REALLY_NEED_DEBUG; meltcdat->dtup_39_syMELT_REALLY_NEED_DEBUG.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_MULTIPLE)))); meltcdat->dtup_39_syMELT_REALLY_NEED_DEBUG.nbval = 3; /*inimult dtup_40_syMELT_REALLY_NEED_DEBUG*/ - /*_._VALTUP___V100*/ meltfptr[99] = (melt_ptr_t) &meltcdat->dtup_40_syMELT_REALLY_NEED_DEBUG; + /*_._VALTUP___V100*/ + meltfptr[99] = (melt_ptr_t) &meltcdat->dtup_40_syMELT_REALLY_NEED_DEBUG; meltcdat->dtup_40_syMELT_REALLY_NEED_DEBUG.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_MULTIPLE)))); meltcdat->dtup_40_syMELT_REALLY_NEED_DEBUG.nbval = 1; /*iniobj dsym_41__DEPTH*/ - /*uniqueobj*/ if (!/*_._VALDATA___V98*/ meltfptr[97]) + /*uniqueobj*/ + if (!/*_._VALDATA___V98*/ meltfptr[97]) /*_._VALDATA___V98*/ meltfptr[97] = (melt_ptr_t )&meltcdat->dsym_41__DEPTH; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_41__DEPTH", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_41__DEPTH", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5448,16 +5936,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_42__DEPTH*/ - /*_._VALSTR___V99*/ meltfptr[98] = (melt_ptr_t) &meltcdat->dstr_42__DEPTH; + /*_._VALSTR___V99*/ + meltfptr[98] = (melt_ptr_t) &meltcdat->dstr_42__DEPTH; meltcdat->dstr_42__DEPTH.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_42__DEPTH.val, "DEPTH", sizeof (meltcdat->dstr_42__DEPTH.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_42__DEPTH.val, "DEPTH", sizeof (meltcdat->dstr_42__DEPTH.val)-1); meltcdat->dstr_42__DEPTH.val[5] = (char)0 ; meltcdat->dstr_42__DEPTH.slen = 5 ; /*^iniobj*/ /*iniobj dobj_43*/ - /*_._VALDATA___V97*/ meltfptr[96] = (melt_ptr_t )&meltcdat->dobj_43; + /*_._VALDATA___V97*/ + meltfptr[96] = (melt_ptr_t )&meltcdat->dobj_43; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_43", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_43", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_43.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); @@ -5467,31 +5958,38 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_44__MELT_REALLY_NEED_DEBUG*/ - /*_._VALSTR___V101*/ meltfptr[100] = (melt_ptr_t) &meltcdat->dstr_44__MELT_REALLY_NEED_DEBUG; + /*_._VALSTR___V101*/ + meltfptr[100] = (melt_ptr_t) &meltcdat->dstr_44__MELT_REALLY_NEED_DEBUG; meltcdat->dstr_44__MELT_REALLY_NEED_DEBUG.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_44__MELT_REALLY_NEED_DEBUG.val, "/*MELT_REALLY_NEED_DEBUG*/ (melt_need_debug ((int) ", sizeof (meltcdat->dstr_44__MELT_REALLY_NEED_DEBUG.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_44__MELT_REALLY_NEED_DEBUG.val, "/*MELT_REALLY_NEED_DEBUG*/ (melt_need_debug ((int) ", sizeof (meltcdat->dstr_44__MELT_REALLY_NEED_DEBUG.val)-1); meltcdat->dstr_44__MELT_REALLY_NEED_DEBUG.val[51] = (char)0 ; meltcdat->dstr_44__MELT_REALLY_NEED_DEBUG.slen = 51 ; /*inistring dstr_45__*/ - /*_._VALSTR___V102*/ meltfptr[101] = (melt_ptr_t) &meltcdat->dstr_45__; + /*_._VALSTR___V102*/ + meltfptr[101] = (melt_ptr_t) &meltcdat->dstr_45__; meltcdat->dstr_45__.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_45__.val, "))", sizeof (meltcdat->dstr_45__.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_45__.val, "))", sizeof (meltcdat->dstr_45__.val)-1); meltcdat->dstr_45__.val[2] = (char)0 ; meltcdat->dstr_45__.slen = 2 ; /*inistring dstr_46__MELT_REALLY_NEED_DEBUG*/ - /*_._VALSTR___V96*/ meltfptr[95] = (melt_ptr_t) &meltcdat->dstr_46__MELT_REALLY_NEED_DEBUG; + /*_._VALSTR___V96*/ + meltfptr[95] = (melt_ptr_t) &meltcdat->dstr_46__MELT_REALLY_NEED_DEBUG; meltcdat->dstr_46__MELT_REALLY_NEED_DEBUG.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_46__MELT_REALLY_NEED_DEBUG.val, "MELT_REALLY_NEED_DEBUG", sizeof (meltcdat->dstr_46__MELT_REALLY_NEED_DEBUG.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_46__MELT_REALLY_NEED_DEBUG.val, "MELT_REALLY_NEED_DEBUG", sizeof (meltcdat->dstr_46__MELT_REALLY_NEED_DEBUG.val)-1); meltcdat->dstr_46__MELT_REALLY_NEED_DEBUG.val[22] = (char)0 ; meltcdat->dstr_46__MELT_REALLY_NEED_DEBUG.slen = 22 ; /*iniobj dsym_47__MELT_HAS_FLAG_DEBUG_SET*/ - /*uniqueobj*/ if (!/*_._VALDATA___V104*/ meltfptr[103]) + /*uniqueobj*/ + if (!/*_._VALDATA___V104*/ meltfptr[103]) /*_._VALDATA___V104*/ meltfptr[103] = (melt_ptr_t )&meltcdat->dsym_47__MELT_HAS_FLAG_DEBUG_SET; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_47__MELT_HAS_FLAG_DEBUG_SET", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_47__MELT_HAS_FLAG_DEBUG_SET", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5501,16 +5999,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_48__MELT_HAS_FLAG_DEBUG_SET*/ - /*_._VALSTR___V105*/ meltfptr[104] = (melt_ptr_t) &meltcdat->dstr_48__MELT_HAS_FLAG_DEBUG_SET; + /*_._VALSTR___V105*/ + meltfptr[104] = (melt_ptr_t) &meltcdat->dstr_48__MELT_HAS_FLAG_DEBUG_SET; meltcdat->dstr_48__MELT_HAS_FLAG_DEBUG_SET.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_48__MELT_HAS_FLAG_DEBUG_SET.val, "MELT_HAS_FLAG_DEBUG_SET", sizeof (meltcdat->dstr_48__MELT_HAS_FLAG_DEBUG_SET.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_48__MELT_HAS_FLAG_DEBUG_SET.val, "MELT_HAS_FLAG_DEBUG_SET", sizeof (meltcdat->dstr_48__MELT_HAS_FLAG_DEBUG_SET.val)-1); meltcdat->dstr_48__MELT_HAS_FLAG_DEBUG_SET.val[23] = (char)0 ; meltcdat->dstr_48__MELT_HAS_FLAG_DEBUG_SET.slen = 23 ; MELT_LOCATION("warmelt-debug.melt:77:/ iniobj"); /*iniobj dobj_49__MELT_HAS_FLAG_DEBUG_SET*/ - /*_._VALDATA___V106*/ meltfptr[105] = (melt_ptr_t )&meltcdat->dobj_49__MELT_HAS_FLAG_DEBUG_SET; + /*_._VALDATA___V106*/ + meltfptr[105] = (melt_ptr_t )&meltcdat->dobj_49__MELT_HAS_FLAG_DEBUG_SET; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_49__MELT_HAS_FLAG_DEBUG_SET", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_PRIMITIVE))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_49__MELT_HAS_FLAG_DEBUG_SET", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_PRIMITIVE)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_49__MELT_HAS_FLAG_DEBUG_SET.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_PRIMITIVE)))); @@ -5518,32 +6019,39 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t meltcdat->dobj_49__MELT_HAS_FLAG_DEBUG_SET.obj_len = 5; /*inimult dtup_50_syMELT_HAS_FLAG_DEBUG_SET*/ - /*_._VALTUP___V110*/ meltfptr[109] = (melt_ptr_t) &meltcdat->dtup_50_syMELT_HAS_FLAG_DEBUG_SET; + /*_._VALTUP___V110*/ + meltfptr[109] = (melt_ptr_t) &meltcdat->dtup_50_syMELT_HAS_FLAG_DEBUG_SET; meltcdat->dtup_50_syMELT_HAS_FLAG_DEBUG_SET.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_MULTIPLE)))); meltcdat->dtup_50_syMELT_HAS_FLAG_DEBUG_SET.nbval = 1; /*inimult dtup_51_syMELT_HAS_FLAG_DEBUG_SET*/ - /*_._VALTUP___V108*/ meltfptr[107] = (melt_ptr_t) &meltcdat->dtup_51_syMELT_HAS_FLAG_DEBUG_SET; + /*_._VALTUP___V108*/ + meltfptr[107] = (melt_ptr_t) &meltcdat->dtup_51_syMELT_HAS_FLAG_DEBUG_SET; meltcdat->dtup_51_syMELT_HAS_FLAG_DEBUG_SET.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_MULTIPLE)))); meltcdat->dtup_51_syMELT_HAS_FLAG_DEBUG_SET.nbval = 0; /*inistring dstr_52__MELT_HAS_FLAG_DEBUG_SE*/ - /*_._VALSTR___V109*/ meltfptr[108] = (melt_ptr_t) &meltcdat->dstr_52__MELT_HAS_FLAG_DEBUG_SE; + /*_._VALSTR___V109*/ + meltfptr[108] = (melt_ptr_t) &meltcdat->dstr_52__MELT_HAS_FLAG_DEBUG_SE; meltcdat->dstr_52__MELT_HAS_FLAG_DEBUG_SE.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_52__MELT_HAS_FLAG_DEBUG_SE.val, "/*MELT_HAS_FLAG_DEBUG_SET*/ melt_flag_debug", sizeof (meltcdat->dstr_52__MELT_HAS_FLAG_DEBUG_SE.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_52__MELT_HAS_FLAG_DEBUG_SE.val, "/*MELT_HAS_FLAG_DEBUG_SET*/ melt_flag_debug", sizeof (meltcdat->dstr_52__MELT_HAS_FLAG_DEBUG_SE.val)-1); meltcdat->dstr_52__MELT_HAS_FLAG_DEBUG_SE.val[43] = (char)0 ; meltcdat->dstr_52__MELT_HAS_FLAG_DEBUG_SE.slen = 43 ; /*inistring dstr_53__MELT_HAS_FLAG_DEBUG_SET*/ - /*_._VALSTR___V107*/ meltfptr[106] = (melt_ptr_t) &meltcdat->dstr_53__MELT_HAS_FLAG_DEBUG_SET; + /*_._VALSTR___V107*/ + meltfptr[106] = (melt_ptr_t) &meltcdat->dstr_53__MELT_HAS_FLAG_DEBUG_SET; meltcdat->dstr_53__MELT_HAS_FLAG_DEBUG_SET.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_53__MELT_HAS_FLAG_DEBUG_SET.val, "MELT_HAS_FLAG_DEBUG_SET", sizeof (meltcdat->dstr_53__MELT_HAS_FLAG_DEBUG_SET.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_53__MELT_HAS_FLAG_DEBUG_SET.val, "MELT_HAS_FLAG_DEBUG_SET", sizeof (meltcdat->dstr_53__MELT_HAS_FLAG_DEBUG_SET.val)-1); meltcdat->dstr_53__MELT_HAS_FLAG_DEBUG_SET.val[23] = (char)0 ; meltcdat->dstr_53__MELT_HAS_FLAG_DEBUG_SET.slen = 23 ; /*iniobj dsym_54__MELT_REALLY_NEED_DBGLIM*/ - /*uniqueobj*/ if (!/*_._VALDATA___V111*/ meltfptr[110]) + /*uniqueobj*/ + if (!/*_._VALDATA___V111*/ meltfptr[110]) /*_._VALDATA___V111*/ meltfptr[110] = (melt_ptr_t )&meltcdat->dsym_54__MELT_REALLY_NEED_DBGLIM; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_54__MELT_REALLY_NEED_DBGLIM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_54__MELT_REALLY_NEED_DBGLIM", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5553,16 +6061,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_55__MELT_REALLY_NEED_DBGLIM*/ - /*_._VALSTR___V112*/ meltfptr[111] = (melt_ptr_t) &meltcdat->dstr_55__MELT_REALLY_NEED_DBGLIM; + /*_._VALSTR___V112*/ + meltfptr[111] = (melt_ptr_t) &meltcdat->dstr_55__MELT_REALLY_NEED_DBGLIM; meltcdat->dstr_55__MELT_REALLY_NEED_DBGLIM.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_55__MELT_REALLY_NEED_DBGLIM.val, "MELT_REALLY_NEED_DBGLIM", sizeof (meltcdat->dstr_55__MELT_REALLY_NEED_DBGLIM.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_55__MELT_REALLY_NEED_DBGLIM.val, "MELT_REALLY_NEED_DBGLIM", sizeof (meltcdat->dstr_55__MELT_REALLY_NEED_DBGLIM.val)-1); meltcdat->dstr_55__MELT_REALLY_NEED_DBGLIM.val[23] = (char)0 ; meltcdat->dstr_55__MELT_REALLY_NEED_DBGLIM.slen = 23 ; MELT_LOCATION("warmelt-debug.melt:80:/ iniobj"); /*iniobj dobj_56__MELT_REALLY_NEED_DBGLIM*/ - /*_._VALDATA___V113*/ meltfptr[112] = (melt_ptr_t )&meltcdat->dobj_56__MELT_REALLY_NEED_DBGLIM; + /*_._VALDATA___V113*/ + meltfptr[112] = (melt_ptr_t )&meltcdat->dobj_56__MELT_REALLY_NEED_DBGLIM; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_56__MELT_REALLY_NEED_DBGLIM", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_PRIMITIVE))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_56__MELT_REALLY_NEED_DBGLIM", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_PRIMITIVE)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_56__MELT_REALLY_NEED_DBGLIM.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_PRIMITIVE)))); @@ -5570,17 +6081,20 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t meltcdat->dobj_56__MELT_REALLY_NEED_DBGLIM.obj_len = 5; /*inimult dtup_57_syMELT_REALLY_NEED_DBGLIM*/ - /*_._VALTUP___V123*/ meltfptr[122] = (melt_ptr_t) &meltcdat->dtup_57_syMELT_REALLY_NEED_DBGLIM; + /*_._VALTUP___V123*/ + meltfptr[122] = (melt_ptr_t) &meltcdat->dtup_57_syMELT_REALLY_NEED_DBGLIM; meltcdat->dtup_57_syMELT_REALLY_NEED_DBGLIM.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_MULTIPLE)))); meltcdat->dtup_57_syMELT_REALLY_NEED_DBGLIM.nbval = 5; /*inimult dtup_58_syMELT_REALLY_NEED_DBGLIM*/ - /*_._VALTUP___V119*/ meltfptr[118] = (melt_ptr_t) &meltcdat->dtup_58_syMELT_REALLY_NEED_DBGLIM; + /*_._VALTUP___V119*/ + meltfptr[118] = (melt_ptr_t) &meltcdat->dtup_58_syMELT_REALLY_NEED_DBGLIM; meltcdat->dtup_58_syMELT_REALLY_NEED_DBGLIM.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_MULTIPLE)))); meltcdat->dtup_58_syMELT_REALLY_NEED_DBGLIM.nbval = 2; /*^iniobj*/ /*iniobj dobj_59*/ - /*_._VALDATA___V115*/ meltfptr[114] = (melt_ptr_t )&meltcdat->dobj_59; + /*_._VALDATA___V115*/ + meltfptr[114] = (melt_ptr_t )&meltcdat->dobj_59; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_59", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_59", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_59.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); @@ -5590,7 +6104,8 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*iniobj dsym_60__LIMIT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V117*/ meltfptr[116]) + /*uniqueobj*/ + if (!/*_._VALDATA___V117*/ meltfptr[116]) /*_._VALDATA___V117*/ meltfptr[116] = (melt_ptr_t )&meltcdat->dsym_60__LIMIT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_60__LIMIT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_60__LIMIT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5600,16 +6115,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_61__LIMIT*/ - /*_._VALSTR___V118*/ meltfptr[117] = (melt_ptr_t) &meltcdat->dstr_61__LIMIT; + /*_._VALSTR___V118*/ + meltfptr[117] = (melt_ptr_t) &meltcdat->dstr_61__LIMIT; meltcdat->dstr_61__LIMIT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_61__LIMIT.val, "LIMIT", sizeof (meltcdat->dstr_61__LIMIT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_61__LIMIT.val, "LIMIT", sizeof (meltcdat->dstr_61__LIMIT.val)-1); meltcdat->dstr_61__LIMIT.val[5] = (char)0 ; meltcdat->dstr_61__LIMIT.slen = 5 ; /*^iniobj*/ /*iniobj dobj_62*/ - /*_._VALDATA___V116*/ meltfptr[115] = (melt_ptr_t )&meltcdat->dobj_62; + /*_._VALDATA___V116*/ + meltfptr[115] = (melt_ptr_t )&meltcdat->dobj_62; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_62", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_62", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_62.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); @@ -5619,39 +6137,48 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_63__MELT_REALLY_NEED_DBG*/ - /*_._VALSTR___V120*/ meltfptr[119] = (melt_ptr_t) &meltcdat->dstr_63__MELT_REALLY_NEED_DBG; + /*_._VALSTR___V120*/ + meltfptr[119] = (melt_ptr_t) &meltcdat->dstr_63__MELT_REALLY_NEED_DBG; meltcdat->dstr_63__MELT_REALLY_NEED_DBG.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_63__MELT_REALLY_NEED_DBG.val, "( /*MELT_REALLY_NEED_DBGLIM*/ melt_need_debug_limit ((int) ", sizeof (meltcdat->dstr_63__MELT_REALLY_NEED_DBG.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_63__MELT_REALLY_NEED_DBG.val, "( /*MELT_REALLY_NEED_DBGLIM*/ melt_need_debug_limit ((int) ", sizeof (meltcdat->dstr_63__MELT_REALLY_NEED_DBG.val)-1); meltcdat->dstr_63__MELT_REALLY_NEED_DBG.val[59] = (char)0 ; meltcdat->dstr_63__MELT_REALLY_NEED_DBG.slen = 59 ; /*inistring dstr_64__int_*/ - /*_._VALSTR___V121*/ meltfptr[120] = (melt_ptr_t) &meltcdat->dstr_64__int_; + /*_._VALSTR___V121*/ + meltfptr[120] = (melt_ptr_t) &meltcdat->dstr_64__int_; meltcdat->dstr_64__int_.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_64__int_.val, ", (int) ", sizeof (meltcdat->dstr_64__int_.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_64__int_.val, ", (int) ", sizeof (meltcdat->dstr_64__int_.val)-1); meltcdat->dstr_64__int_.val[8] = (char)0 ; meltcdat->dstr_64__int_.slen = 8 ; /*inistring dstr_65__*/ - /*_._VALSTR___V122*/ meltfptr[121] = (melt_ptr_t) &meltcdat->dstr_65__; + /*_._VALSTR___V122*/ + meltfptr[121] = (melt_ptr_t) &meltcdat->dstr_65__; meltcdat->dstr_65__.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_VERBATIM_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_65__.val, "))", sizeof (meltcdat->dstr_65__.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_65__.val, "))", sizeof (meltcdat->dstr_65__.val)-1); meltcdat->dstr_65__.val[2] = (char)0 ; meltcdat->dstr_65__.slen = 2 ; /*inistring dstr_66__MELT_REALLY_NEED_DBGLIM*/ - /*_._VALSTR___V114*/ meltfptr[113] = (melt_ptr_t) &meltcdat->dstr_66__MELT_REALLY_NEED_DBGLIM; + /*_._VALSTR___V114*/ + meltfptr[113] = (melt_ptr_t) &meltcdat->dstr_66__MELT_REALLY_NEED_DBGLIM; meltcdat->dstr_66__MELT_REALLY_NEED_DBGLIM.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_66__MELT_REALLY_NEED_DBGLIM.val, "MELT_REALLY_NEED_DBGLIM", sizeof (meltcdat->dstr_66__MELT_REALLY_NEED_DBGLIM.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_66__MELT_REALLY_NEED_DBGLIM.val, "MELT_REALLY_NEED_DBGLIM", sizeof (meltcdat->dstr_66__MELT_REALLY_NEED_DBGLIM.val)-1); meltcdat->dstr_66__MELT_REALLY_NEED_DBGLIM.val[23] = (char)0 ; meltcdat->dstr_66__MELT_REALLY_NEED_DBGLIM.slen = 23 ; /*iniobj dsym_67__DBG_OUTPUT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V124*/ meltfptr[123]) + /*uniqueobj*/ + if (!/*_._VALDATA___V124*/ meltfptr[123]) /*_._VALDATA___V124*/ meltfptr[123] = (melt_ptr_t )&meltcdat->dsym_67__DBG_OUTPUT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_67__DBG_OUTPUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_67__DBG_OUTPUT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5661,15 +6188,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_68__DBG_OUTPUT*/ - /*_._VALSTR___V125*/ meltfptr[124] = (melt_ptr_t) &meltcdat->dstr_68__DBG_OUTPUT; + /*_._VALSTR___V125*/ + meltfptr[124] = (melt_ptr_t) &meltcdat->dstr_68__DBG_OUTPUT; meltcdat->dstr_68__DBG_OUTPUT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_68__DBG_OUTPUT.val, "DBG_OUTPUT", sizeof (meltcdat->dstr_68__DBG_OUTPUT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_68__DBG_OUTPUT.val, "DBG_OUTPUT", sizeof (meltcdat->dstr_68__DBG_OUTPUT.val)-1); meltcdat->dstr_68__DBG_OUTPUT.val[10] = (char)0 ; meltcdat->dstr_68__DBG_OUTPUT.slen = 10 ; /*iniobj dsym_69__CLASS_SELECTOR*/ - /*uniqueobj*/ if (!/*_._VALDATA___V126*/ meltfptr[125]) + /*uniqueobj*/ + if (!/*_._VALDATA___V126*/ meltfptr[125]) /*_._VALDATA___V126*/ meltfptr[125] = (melt_ptr_t )&meltcdat->dsym_69__CLASS_SELECTOR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_69__CLASS_SELECTOR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_69__CLASS_SELECTOR", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5679,15 +6209,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_70__CLASS_SELECTOR*/ - /*_._VALSTR___V127*/ meltfptr[126] = (melt_ptr_t) &meltcdat->dstr_70__CLASS_SELECTOR; + /*_._VALSTR___V127*/ + meltfptr[126] = (melt_ptr_t) &meltcdat->dstr_70__CLASS_SELECTOR; meltcdat->dstr_70__CLASS_SELECTOR.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_70__CLASS_SELECTOR.val, "CLASS_SELECTOR", sizeof (meltcdat->dstr_70__CLASS_SELECTOR.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_70__CLASS_SELECTOR.val, "CLASS_SELECTOR", sizeof (meltcdat->dstr_70__CLASS_SELECTOR.val)-1); meltcdat->dstr_70__CLASS_SELECTOR.val[14] = (char)0 ; meltcdat->dstr_70__CLASS_SELECTOR.slen = 14 ; /*iniobj dsym_71__RECV*/ - /*uniqueobj*/ if (!/*_._VALDATA___V128*/ meltfptr[127]) + /*uniqueobj*/ + if (!/*_._VALDATA___V128*/ meltfptr[127]) /*_._VALDATA___V128*/ meltfptr[127] = (melt_ptr_t )&meltcdat->dsym_71__RECV; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_71__RECV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_71__RECV", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5697,16 +6230,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_72__RECV*/ - /*_._VALSTR___V129*/ meltfptr[128] = (melt_ptr_t) &meltcdat->dstr_72__RECV; + /*_._VALSTR___V129*/ + meltfptr[128] = (melt_ptr_t) &meltcdat->dstr_72__RECV; meltcdat->dstr_72__RECV.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_72__RECV.val, "RECV", sizeof (meltcdat->dstr_72__RECV.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_72__RECV.val, "RECV", sizeof (meltcdat->dstr_72__RECV.val)-1); meltcdat->dstr_72__RECV.val[4] = (char)0 ; meltcdat->dstr_72__RECV.slen = 4 ; MELT_LOCATION("warmelt-debug.melt:90:/ iniobj"); /*iniobj dobj_73*/ - /*_._VALDATA___V130*/ meltfptr[129] = (melt_ptr_t )&meltcdat->dobj_73; + /*_._VALDATA___V130*/ + meltfptr[129] = (melt_ptr_t )&meltcdat->dobj_73; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_73", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_73", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_73.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); @@ -5716,7 +6252,8 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*iniobj dsym_74__DBGINFO*/ - /*uniqueobj*/ if (!/*_._VALDATA___V131*/ meltfptr[130]) + /*uniqueobj*/ + if (!/*_._VALDATA___V131*/ meltfptr[130]) /*_._VALDATA___V131*/ meltfptr[130] = (melt_ptr_t )&meltcdat->dsym_74__DBGINFO; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_74__DBGINFO", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_74__DBGINFO", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5726,16 +6263,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_75__DBGINFO*/ - /*_._VALSTR___V132*/ meltfptr[131] = (melt_ptr_t) &meltcdat->dstr_75__DBGINFO; + /*_._VALSTR___V132*/ + meltfptr[131] = (melt_ptr_t) &meltcdat->dstr_75__DBGINFO; meltcdat->dstr_75__DBGINFO.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_75__DBGINFO.val, "DBGINFO", sizeof (meltcdat->dstr_75__DBGINFO.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_75__DBGINFO.val, "DBGINFO", sizeof (meltcdat->dstr_75__DBGINFO.val)-1); meltcdat->dstr_75__DBGINFO.val[7] = (char)0 ; meltcdat->dstr_75__DBGINFO.slen = 7 ; /*^iniobj*/ /*iniobj dobj_76*/ - /*_._VALDATA___V133*/ meltfptr[132] = (melt_ptr_t )&meltcdat->dobj_76; + /*_._VALDATA___V133*/ + meltfptr[132] = (melt_ptr_t )&meltcdat->dobj_76; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_76", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_76", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_76.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); @@ -5746,7 +6286,8 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*^iniobj*/ /*iniobj dobj_77*/ - /*_._VALDATA___V134*/ meltfptr[133] = (melt_ptr_t )&meltcdat->dobj_77; + /*_._VALDATA___V134*/ + meltfptr[133] = (melt_ptr_t )&meltcdat->dobj_77; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_77", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_77", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_77.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); @@ -5755,13 +6296,15 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t meltcdat->dobj_77.obj_len = 2; /*inimult dtup_78_syDBG_OUTPUT*/ - /*_._VALTUP___V135*/ meltfptr[134] = (melt_ptr_t) &meltcdat->dtup_78_syDBG_OUTPUT; + /*_._VALTUP___V135*/ + meltfptr[134] = (melt_ptr_t) &meltcdat->dtup_78_syDBG_OUTPUT; meltcdat->dtup_78_syDBG_OUTPUT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_MULTIPLE)))); meltcdat->dtup_78_syDBG_OUTPUT.nbval = 3; /*^iniobj*/ /*iniobj dobj_79__DBG_OUTPUT*/ - /*_._VALDATA___V136*/ meltfptr[135] = (melt_ptr_t )&meltcdat->dobj_79__DBG_OUTPUT; + /*_._VALDATA___V136*/ + meltfptr[135] = (melt_ptr_t )&meltcdat->dobj_79__DBG_OUTPUT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_79__DBG_OUTPUT", melt_magic_discr ((melt_ptr_t) (/*_.CLASS_SELECTOR__V9*/ meltfptr[8])) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_79__DBG_OUTPUT", ((meltobject_ptr_t) (/*_.CLASS_SELECTOR__V9*/ meltfptr[8]))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_79__DBG_OUTPUT.meltobj_class = (meltobject_ptr_t)(/*_.CLASS_SELECTOR__V9*/ meltfptr[8]); @@ -5770,15 +6313,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_80__DBG_OUTPUT*/ - /*_._VALSTR___V137*/ meltfptr[136] = (melt_ptr_t) &meltcdat->dstr_80__DBG_OUTPUT; + /*_._VALSTR___V137*/ + meltfptr[136] = (melt_ptr_t) &meltcdat->dstr_80__DBG_OUTPUT; meltcdat->dstr_80__DBG_OUTPUT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_80__DBG_OUTPUT.val, "DBG_OUTPUT", sizeof (meltcdat->dstr_80__DBG_OUTPUT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_80__DBG_OUTPUT.val, "DBG_OUTPUT", sizeof (meltcdat->dstr_80__DBG_OUTPUT.val)-1); meltcdat->dstr_80__DBG_OUTPUT.val[10] = (char)0 ; meltcdat->dstr_80__DBG_OUTPUT.slen = 10 ; /*iniobj dsym_81__DBG_OUTPUTAGAIN*/ - /*uniqueobj*/ if (!/*_._VALDATA___V138*/ meltfptr[137]) + /*uniqueobj*/ + if (!/*_._VALDATA___V138*/ meltfptr[137]) /*_._VALDATA___V138*/ meltfptr[137] = (melt_ptr_t )&meltcdat->dsym_81__DBG_OUTPUTAGAIN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_81__DBG_OUTPUTAGAIN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_81__DBG_OUTPUTAGAIN", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5788,16 +6334,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_82__DBG_OUTPUTAGAIN*/ - /*_._VALSTR___V139*/ meltfptr[138] = (melt_ptr_t) &meltcdat->dstr_82__DBG_OUTPUTAGAIN; + /*_._VALSTR___V139*/ + meltfptr[138] = (melt_ptr_t) &meltcdat->dstr_82__DBG_OUTPUTAGAIN; meltcdat->dstr_82__DBG_OUTPUTAGAIN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_82__DBG_OUTPUTAGAIN.val, "DBG_OUTPUTAGAIN", sizeof (meltcdat->dstr_82__DBG_OUTPUTAGAIN.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_82__DBG_OUTPUTAGAIN.val, "DBG_OUTPUTAGAIN", sizeof (meltcdat->dstr_82__DBG_OUTPUTAGAIN.val)-1); meltcdat->dstr_82__DBG_OUTPUTAGAIN.val[15] = (char)0 ; meltcdat->dstr_82__DBG_OUTPUTAGAIN.slen = 15 ; MELT_LOCATION("warmelt-debug.melt:99:/ iniobj"); /*iniobj dobj_83*/ - /*_._VALDATA___V140*/ meltfptr[139] = (melt_ptr_t )&meltcdat->dobj_83; + /*_._VALDATA___V140*/ + meltfptr[139] = (melt_ptr_t )&meltcdat->dobj_83; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_83", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_83", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_83.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); @@ -5808,7 +6357,8 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*^iniobj*/ /*iniobj dobj_84*/ - /*_._VALDATA___V141*/ meltfptr[140] = (melt_ptr_t )&meltcdat->dobj_84; + /*_._VALDATA___V141*/ + meltfptr[140] = (melt_ptr_t )&meltcdat->dobj_84; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_84", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_84", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_84.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); @@ -5819,7 +6369,8 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*^iniobj*/ /*iniobj dobj_85*/ - /*_._VALDATA___V142*/ meltfptr[141] = (melt_ptr_t )&meltcdat->dobj_85; + /*_._VALDATA___V142*/ + meltfptr[141] = (melt_ptr_t )&meltcdat->dobj_85; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_85", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_85", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_85.meltobj_class = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(CLASS_FORMAL_BINDING)))); @@ -5828,13 +6379,15 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t meltcdat->dobj_85.obj_len = 2; /*inimult dtup_86_syDBG_OUTPUTAGAIN*/ - /*_._VALTUP___V143*/ meltfptr[142] = (melt_ptr_t) &meltcdat->dtup_86_syDBG_OUTPUTAGAIN; + /*_._VALTUP___V143*/ + meltfptr[142] = (melt_ptr_t) &meltcdat->dtup_86_syDBG_OUTPUTAGAIN; meltcdat->dtup_86_syDBG_OUTPUTAGAIN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_MULTIPLE)))); meltcdat->dtup_86_syDBG_OUTPUTAGAIN.nbval = 3; /*^iniobj*/ /*iniobj dobj_87__DBG_OUTPUTAGAIN*/ - /*_._VALDATA___V144*/ meltfptr[143] = (melt_ptr_t )&meltcdat->dobj_87__DBG_OUTPUTAGAIN; + /*_._VALDATA___V144*/ + meltfptr[143] = (melt_ptr_t )&meltcdat->dobj_87__DBG_OUTPUTAGAIN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_87__DBG_OUTPUTAGAIN", melt_magic_discr ((melt_ptr_t) (/*_.CLASS_SELECTOR__V9*/ meltfptr[8])) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_87__DBG_OUTPUTAGAIN", ((meltobject_ptr_t) (/*_.CLASS_SELECTOR__V9*/ meltfptr[8]))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_87__DBG_OUTPUTAGAIN.meltobj_class = (meltobject_ptr_t)(/*_.CLASS_SELECTOR__V9*/ meltfptr[8]); @@ -5843,15 +6396,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_88__DBG_OUTPUTAGAIN*/ - /*_._VALSTR___V145*/ meltfptr[144] = (melt_ptr_t) &meltcdat->dstr_88__DBG_OUTPUTAGAIN; + /*_._VALSTR___V145*/ + meltfptr[144] = (melt_ptr_t) &meltcdat->dstr_88__DBG_OUTPUTAGAIN; meltcdat->dstr_88__DBG_OUTPUTAGAIN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_88__DBG_OUTPUTAGAIN.val, "DBG_OUTPUTAGAIN", sizeof (meltcdat->dstr_88__DBG_OUTPUTAGAIN.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_88__DBG_OUTPUTAGAIN.val, "DBG_OUTPUTAGAIN", sizeof (meltcdat->dstr_88__DBG_OUTPUTAGAIN.val)-1); meltcdat->dstr_88__DBG_OUTPUTAGAIN.val[15] = (char)0 ; meltcdat->dstr_88__DBG_OUTPUTAGAIN.slen = 15 ; /*iniobj dsym_89__TREE_DEBUG_FUNCONT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V146*/ meltfptr[145]) + /*uniqueobj*/ + if (!/*_._VALDATA___V146*/ meltfptr[145]) /*_._VALDATA___V146*/ meltfptr[145] = (melt_ptr_t )&meltcdat->dsym_89__TREE_DEBUG_FUNCONT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_89__TREE_DEBUG_FUNCONT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_89__TREE_DEBUG_FUNCONT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5861,15 +6417,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_90__TREE_DEBUG_FUNCONT*/ - /*_._VALSTR___V147*/ meltfptr[146] = (melt_ptr_t) &meltcdat->dstr_90__TREE_DEBUG_FUNCONT; + /*_._VALSTR___V147*/ + meltfptr[146] = (melt_ptr_t) &meltcdat->dstr_90__TREE_DEBUG_FUNCONT; meltcdat->dstr_90__TREE_DEBUG_FUNCONT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_90__TREE_DEBUG_FUNCONT.val, "TREE_DEBUG_FUNCONT", sizeof (meltcdat->dstr_90__TREE_DEBUG_FUNCONT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_90__TREE_DEBUG_FUNCONT.val, "TREE_DEBUG_FUNCONT", sizeof (meltcdat->dstr_90__TREE_DEBUG_FUNCONT.val)-1); meltcdat->dstr_90__TREE_DEBUG_FUNCONT.val[18] = (char)0 ; meltcdat->dstr_90__TREE_DEBUG_FUNCONT.slen = 18 ; /*iniobj dsym_91__CLASS_REFERENCE*/ - /*uniqueobj*/ if (!/*_._VALDATA___V148*/ meltfptr[147]) + /*uniqueobj*/ + if (!/*_._VALDATA___V148*/ meltfptr[147]) /*_._VALDATA___V148*/ meltfptr[147] = (melt_ptr_t )&meltcdat->dsym_91__CLASS_REFERENCE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_91__CLASS_REFERENCE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_91__CLASS_REFERENCE", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5879,16 +6438,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_92__CLASS_REFERENCE*/ - /*_._VALSTR___V149*/ meltfptr[148] = (melt_ptr_t) &meltcdat->dstr_92__CLASS_REFERENCE; + /*_._VALSTR___V149*/ + meltfptr[148] = (melt_ptr_t) &meltcdat->dstr_92__CLASS_REFERENCE; meltcdat->dstr_92__CLASS_REFERENCE.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_92__CLASS_REFERENCE.val, "CLASS_REFERENCE", sizeof (meltcdat->dstr_92__CLASS_REFERENCE.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_92__CLASS_REFERENCE.val, "CLASS_REFERENCE", sizeof (meltcdat->dstr_92__CLASS_REFERENCE.val)-1); meltcdat->dstr_92__CLASS_REFERENCE.val[15] = (char)0 ; meltcdat->dstr_92__CLASS_REFERENCE.slen = 15 ; MELT_LOCATION("warmelt-debug.melt:110:/ iniobj"); /*iniobj dobj_93__TREE_DEBUG_FUNCONT*/ - /*_._VALDATA___V150*/ meltfptr[149] = (melt_ptr_t )&meltcdat->dobj_93__TREE_DEBUG_FUNCONT; + /*_._VALDATA___V150*/ + meltfptr[149] = (melt_ptr_t )&meltcdat->dobj_93__TREE_DEBUG_FUNCONT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_93__TREE_DEBUG_FUNCONT", melt_magic_discr ((melt_ptr_t) (/*_.CLASS_REFERENCE__V10*/ meltfptr[9])) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_93__TREE_DEBUG_FUNCONT", ((meltobject_ptr_t) (/*_.CLASS_REFERENCE__V10*/ meltfptr[9]))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_93__TREE_DEBUG_FUNCONT.meltobj_class = (meltobject_ptr_t)(/*_.CLASS_REFERENCE__V10*/ meltfptr[9]); @@ -5896,20 +6458,23 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t meltcdat->dobj_93__TREE_DEBUG_FUNCONT.obj_len = 1; /*inirout drout_94__REGISTER_TREE_DEBUG_FUN*/ - /*iniroutlocvar*/ /*_._VALROUT___V151*/ meltfptr[150] = (melt_ptr_t) &meltcdat->drout_94__REGISTER_TREE_DEBUG_FUN; + /*iniroutlocvar*/ /*_._VALROUT___V151*/ + meltfptr[150] = (melt_ptr_t) &meltcdat->drout_94__REGISTER_TREE_DEBUG_FUN; meltcdat->drout_94__REGISTER_TREE_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_94__REGISTER_TREE_DEBUG_FUN.routdescr, "REGISTER_TREE_DEBUG_FUN @warmelt-debug.melt:111", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_94__REGISTER_TREE_DEBUG_FUN.nbval = 2; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_94__REGISTER_TREE_DEBUG_FUN, meltrout_1_WARMELTmiDEBUG_REGISTER_TREE_DEBUG_FUN); /*iniclos dclo_95__REGISTER_TREE_DEBUG_FUN*/ - /*_._VALCLO___V152*/ meltfptr[151] = (melt_ptr_t) &meltcdat->dclo_95__REGISTER_TREE_DEBUG_FUN; + /*_._VALCLO___V152*/ + meltfptr[151] = (melt_ptr_t) &meltcdat->dclo_95__REGISTER_TREE_DEBUG_FUN; meltcdat->dclo_95__REGISTER_TREE_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_95__REGISTER_TREE_DEBUG_FUN.nbval = 0; /*iniobj dsym_96__GIMPLE_DEBUG_FUNCONT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V153*/ meltfptr[152]) + /*uniqueobj*/ + if (!/*_._VALDATA___V153*/ meltfptr[152]) /*_._VALDATA___V153*/ meltfptr[152] = (melt_ptr_t )&meltcdat->dsym_96__GIMPLE_DEBUG_FUNCONT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_96__GIMPLE_DEBUG_FUNCONT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_96__GIMPLE_DEBUG_FUNCONT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5919,16 +6484,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_97__GIMPLE_DEBUG_FUNCONT*/ - /*_._VALSTR___V154*/ meltfptr[153] = (melt_ptr_t) &meltcdat->dstr_97__GIMPLE_DEBUG_FUNCONT; + /*_._VALSTR___V154*/ + meltfptr[153] = (melt_ptr_t) &meltcdat->dstr_97__GIMPLE_DEBUG_FUNCONT; meltcdat->dstr_97__GIMPLE_DEBUG_FUNCONT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_97__GIMPLE_DEBUG_FUNCONT.val, "GIMPLE_DEBUG_FUNCONT", sizeof (meltcdat->dstr_97__GIMPLE_DEBUG_FUNCONT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_97__GIMPLE_DEBUG_FUNCONT.val, "GIMPLE_DEBUG_FUNCONT", sizeof (meltcdat->dstr_97__GIMPLE_DEBUG_FUNCONT.val)-1); meltcdat->dstr_97__GIMPLE_DEBUG_FUNCONT.val[20] = (char)0 ; meltcdat->dstr_97__GIMPLE_DEBUG_FUNCONT.slen = 20 ; MELT_LOCATION("warmelt-debug.melt:123:/ iniobj"); /*iniobj dobj_98__GIMPLE_DEBUG_FUNCONT*/ - /*_._VALDATA___V155*/ meltfptr[154] = (melt_ptr_t )&meltcdat->dobj_98__GIMPLE_DEBUG_FUNCONT; + /*_._VALDATA___V155*/ + meltfptr[154] = (melt_ptr_t )&meltcdat->dobj_98__GIMPLE_DEBUG_FUNCONT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_98__GIMPLE_DEBUG_FUNCONT", melt_magic_discr ((melt_ptr_t) (/*_.CLASS_REFERENCE__V10*/ meltfptr[9])) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_98__GIMPLE_DEBUG_FUNCONT", ((meltobject_ptr_t) (/*_.CLASS_REFERENCE__V10*/ meltfptr[9]))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_98__GIMPLE_DEBUG_FUNCONT.meltobj_class = (meltobject_ptr_t)(/*_.CLASS_REFERENCE__V10*/ meltfptr[9]); @@ -5936,20 +6504,23 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t meltcdat->dobj_98__GIMPLE_DEBUG_FUNCONT.obj_len = 1; /*inirout drout_99__REGISTER_GIMPLE_DEBUG_FUN*/ - /*iniroutlocvar*/ /*_._VALROUT___V156*/ meltfptr[155] = (melt_ptr_t) &meltcdat->drout_99__REGISTER_GIMPLE_DEBUG_FUN; + /*iniroutlocvar*/ /*_._VALROUT___V156*/ + meltfptr[155] = (melt_ptr_t) &meltcdat->drout_99__REGISTER_GIMPLE_DEBUG_FUN; meltcdat->drout_99__REGISTER_GIMPLE_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_99__REGISTER_GIMPLE_DEBUG_FUN.routdescr, "REGISTER_GIMPLE_DEBUG_FUN @warmelt-debug.melt:124", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_99__REGISTER_GIMPLE_DEBUG_FUN.nbval = 2; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_99__REGISTER_GIMPLE_DEBUG_FUN, meltrout_2_WARMELTmiDEBUG_REGISTER_GIMPLE_DEBUG_FUN); /*iniclos dclo_100__REGISTER_GIMPLE_DEBUG_FUN*/ - /*_._VALCLO___V157*/ meltfptr[156] = (melt_ptr_t) &meltcdat->dclo_100__REGISTER_GIMPLE_DEBUG_FUN; + /*_._VALCLO___V157*/ + meltfptr[156] = (melt_ptr_t) &meltcdat->dclo_100__REGISTER_GIMPLE_DEBUG_FUN; meltcdat->dclo_100__REGISTER_GIMPLE_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_100__REGISTER_GIMPLE_DEBUG_FUN.nbval = 0; /*iniobj dsym_101__GIMPLESEQ_DEBUG_FUNCONT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V158*/ meltfptr[157]) + /*uniqueobj*/ + if (!/*_._VALDATA___V158*/ meltfptr[157]) /*_._VALDATA___V158*/ meltfptr[157] = (melt_ptr_t )&meltcdat->dsym_101__GIMPLESEQ_DEBUG_FUNCONT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_101__GIMPLESEQ_DEBUG_FUNCONT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_101__GIMPLESEQ_DEBUG_FUNCONT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5959,16 +6530,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_102__GIMPLESEQ_DEBUG_FUNCONT*/ - /*_._VALSTR___V159*/ meltfptr[158] = (melt_ptr_t) &meltcdat->dstr_102__GIMPLESEQ_DEBUG_FUNCONT; + /*_._VALSTR___V159*/ + meltfptr[158] = (melt_ptr_t) &meltcdat->dstr_102__GIMPLESEQ_DEBUG_FUNCONT; meltcdat->dstr_102__GIMPLESEQ_DEBUG_FUNCONT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_102__GIMPLESEQ_DEBUG_FUNCONT.val, "GIMPLESEQ_DEBUG_FUNCONT", sizeof (meltcdat->dstr_102__GIMPLESEQ_DEBUG_FUNCONT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_102__GIMPLESEQ_DEBUG_FUNCONT.val, "GIMPLESEQ_DEBUG_FUNCONT", sizeof (meltcdat->dstr_102__GIMPLESEQ_DEBUG_FUNCONT.val)-1); meltcdat->dstr_102__GIMPLESEQ_DEBUG_FUNCONT.val[23] = (char)0 ; meltcdat->dstr_102__GIMPLESEQ_DEBUG_FUNCONT.slen = 23 ; MELT_LOCATION("warmelt-debug.melt:136:/ iniobj"); /*iniobj dobj_103__GIMPLESEQ_DEBUG_FUNCONT*/ - /*_._VALDATA___V160*/ meltfptr[159] = (melt_ptr_t )&meltcdat->dobj_103__GIMPLESEQ_DEBUG_FUNCONT; + /*_._VALDATA___V160*/ + meltfptr[159] = (melt_ptr_t )&meltcdat->dobj_103__GIMPLESEQ_DEBUG_FUNCONT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_103__GIMPLESEQ_DEBUG_FUNCONT", melt_magic_discr ((melt_ptr_t) (/*_.CLASS_REFERENCE__V10*/ meltfptr[9])) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_103__GIMPLESEQ_DEBUG_FUNCONT", ((meltobject_ptr_t) (/*_.CLASS_REFERENCE__V10*/ meltfptr[9]))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_103__GIMPLESEQ_DEBUG_FUNCONT.meltobj_class = (meltobject_ptr_t)(/*_.CLASS_REFERENCE__V10*/ meltfptr[9]); @@ -5976,20 +6550,23 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t meltcdat->dobj_103__GIMPLESEQ_DEBUG_FUNCONT.obj_len = 1; /*inirout drout_104__REGISTER_GIMPLESEQ_DEBUG_FUN*/ - /*iniroutlocvar*/ /*_._VALROUT___V161*/ meltfptr[160] = (melt_ptr_t) &meltcdat->drout_104__REGISTER_GIMPLESEQ_DEBUG_FUN; + /*iniroutlocvar*/ /*_._VALROUT___V161*/ + meltfptr[160] = (melt_ptr_t) &meltcdat->drout_104__REGISTER_GIMPLESEQ_DEBUG_FUN; meltcdat->drout_104__REGISTER_GIMPLESEQ_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_104__REGISTER_GIMPLESEQ_DEBUG_FUN.routdescr, "REGISTER_GIMPLESEQ_DEBUG_FUN @warmelt-debug.melt:137", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_104__REGISTER_GIMPLESEQ_DEBUG_FUN.nbval = 2; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_104__REGISTER_GIMPLESEQ_DEBUG_FUN, meltrout_3_WARMELTmiDEBUG_REGISTER_GIMPLESEQ_DEBUG_FUN); /*iniclos dclo_105__REGISTER_GIMPLESEQ_DEBUG_FUN*/ - /*_._VALCLO___V162*/ meltfptr[161] = (melt_ptr_t) &meltcdat->dclo_105__REGISTER_GIMPLESEQ_DEBUG_FUN; + /*_._VALCLO___V162*/ + meltfptr[161] = (melt_ptr_t) &meltcdat->dclo_105__REGISTER_GIMPLESEQ_DEBUG_FUN; meltcdat->dclo_105__REGISTER_GIMPLESEQ_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_105__REGISTER_GIMPLESEQ_DEBUG_FUN.nbval = 0; /*iniobj dsym_106__EDGE_DEBUG_FUNCONT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V163*/ meltfptr[162]) + /*uniqueobj*/ + if (!/*_._VALDATA___V163*/ meltfptr[162]) /*_._VALDATA___V163*/ meltfptr[162] = (melt_ptr_t )&meltcdat->dsym_106__EDGE_DEBUG_FUNCONT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_106__EDGE_DEBUG_FUNCONT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_106__EDGE_DEBUG_FUNCONT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -5999,16 +6576,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_107__EDGE_DEBUG_FUNCONT*/ - /*_._VALSTR___V164*/ meltfptr[163] = (melt_ptr_t) &meltcdat->dstr_107__EDGE_DEBUG_FUNCONT; + /*_._VALSTR___V164*/ + meltfptr[163] = (melt_ptr_t) &meltcdat->dstr_107__EDGE_DEBUG_FUNCONT; meltcdat->dstr_107__EDGE_DEBUG_FUNCONT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_107__EDGE_DEBUG_FUNCONT.val, "EDGE_DEBUG_FUNCONT", sizeof (meltcdat->dstr_107__EDGE_DEBUG_FUNCONT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_107__EDGE_DEBUG_FUNCONT.val, "EDGE_DEBUG_FUNCONT", sizeof (meltcdat->dstr_107__EDGE_DEBUG_FUNCONT.val)-1); meltcdat->dstr_107__EDGE_DEBUG_FUNCONT.val[18] = (char)0 ; meltcdat->dstr_107__EDGE_DEBUG_FUNCONT.slen = 18 ; MELT_LOCATION("warmelt-debug.melt:149:/ iniobj"); /*iniobj dobj_108__EDGE_DEBUG_FUNCONT*/ - /*_._VALDATA___V165*/ meltfptr[164] = (melt_ptr_t )&meltcdat->dobj_108__EDGE_DEBUG_FUNCONT; + /*_._VALDATA___V165*/ + meltfptr[164] = (melt_ptr_t )&meltcdat->dobj_108__EDGE_DEBUG_FUNCONT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_108__EDGE_DEBUG_FUNCONT", melt_magic_discr ((melt_ptr_t) (/*_.CLASS_REFERENCE__V10*/ meltfptr[9])) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_108__EDGE_DEBUG_FUNCONT", ((meltobject_ptr_t) (/*_.CLASS_REFERENCE__V10*/ meltfptr[9]))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_108__EDGE_DEBUG_FUNCONT.meltobj_class = (meltobject_ptr_t)(/*_.CLASS_REFERENCE__V10*/ meltfptr[9]); @@ -6016,20 +6596,23 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t meltcdat->dobj_108__EDGE_DEBUG_FUNCONT.obj_len = 1; /*inirout drout_109__REGISTER_EDGE_DEBUG_FUN*/ - /*iniroutlocvar*/ /*_._VALROUT___V166*/ meltfptr[165] = (melt_ptr_t) &meltcdat->drout_109__REGISTER_EDGE_DEBUG_FUN; + /*iniroutlocvar*/ /*_._VALROUT___V166*/ + meltfptr[165] = (melt_ptr_t) &meltcdat->drout_109__REGISTER_EDGE_DEBUG_FUN; meltcdat->drout_109__REGISTER_EDGE_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_109__REGISTER_EDGE_DEBUG_FUN.routdescr, "REGISTER_EDGE_DEBUG_FUN @warmelt-debug.melt:150", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_109__REGISTER_EDGE_DEBUG_FUN.nbval = 2; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_109__REGISTER_EDGE_DEBUG_FUN, meltrout_4_WARMELTmiDEBUG_REGISTER_EDGE_DEBUG_FUN); /*iniclos dclo_110__REGISTER_EDGE_DEBUG_FUN*/ - /*_._VALCLO___V167*/ meltfptr[166] = (melt_ptr_t) &meltcdat->dclo_110__REGISTER_EDGE_DEBUG_FUN; + /*_._VALCLO___V167*/ + meltfptr[166] = (melt_ptr_t) &meltcdat->dclo_110__REGISTER_EDGE_DEBUG_FUN; meltcdat->dclo_110__REGISTER_EDGE_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_110__REGISTER_EDGE_DEBUG_FUN.nbval = 0; /*iniobj dsym_111__BASICBLOCK_DEBUG_FUNCONT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V168*/ meltfptr[167]) + /*uniqueobj*/ + if (!/*_._VALDATA___V168*/ meltfptr[167]) /*_._VALDATA___V168*/ meltfptr[167] = (melt_ptr_t )&meltcdat->dsym_111__BASICBLOCK_DEBUG_FUNCONT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_111__BASICBLOCK_DEBUG_FUNCONT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_111__BASICBLOCK_DEBUG_FUNCONT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6039,16 +6622,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_112__BASICBLOCK_DEBUG_FUNCONT*/ - /*_._VALSTR___V169*/ meltfptr[168] = (melt_ptr_t) &meltcdat->dstr_112__BASICBLOCK_DEBUG_FUNCONT; + /*_._VALSTR___V169*/ + meltfptr[168] = (melt_ptr_t) &meltcdat->dstr_112__BASICBLOCK_DEBUG_FUNCONT; meltcdat->dstr_112__BASICBLOCK_DEBUG_FUNCONT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_112__BASICBLOCK_DEBUG_FUNCONT.val, "BASICBLOCK_DEBUG_FUNCONT", sizeof (meltcdat->dstr_112__BASICBLOCK_DEBUG_FUNCONT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_112__BASICBLOCK_DEBUG_FUNCONT.val, "BASICBLOCK_DEBUG_FUNCONT", sizeof (meltcdat->dstr_112__BASICBLOCK_DEBUG_FUNCONT.val)-1); meltcdat->dstr_112__BASICBLOCK_DEBUG_FUNCONT.val[24] = (char)0 ; meltcdat->dstr_112__BASICBLOCK_DEBUG_FUNCONT.slen = 24 ; MELT_LOCATION("warmelt-debug.melt:162:/ iniobj"); /*iniobj dobj_113__BASICBLOCK_DEBUG_FUNCONT*/ - /*_._VALDATA___V170*/ meltfptr[169] = (melt_ptr_t )&meltcdat->dobj_113__BASICBLOCK_DEBUG_FUNCONT; + /*_._VALDATA___V170*/ + meltfptr[169] = (melt_ptr_t )&meltcdat->dobj_113__BASICBLOCK_DEBUG_FUNCONT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_113__BASICBLOCK_DEBUG_FUNCONT", melt_magic_discr ((melt_ptr_t) (/*_.CLASS_REFERENCE__V10*/ meltfptr[9])) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_113__BASICBLOCK_DEBUG_FUNCONT", ((meltobject_ptr_t) (/*_.CLASS_REFERENCE__V10*/ meltfptr[9]))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_113__BASICBLOCK_DEBUG_FUNCONT.meltobj_class = (meltobject_ptr_t)(/*_.CLASS_REFERENCE__V10*/ meltfptr[9]); @@ -6056,20 +6642,23 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t meltcdat->dobj_113__BASICBLOCK_DEBUG_FUNCONT.obj_len = 1; /*inirout drout_114__REGISTER_BASICBLOCK_DEBUG_FUN*/ - /*iniroutlocvar*/ /*_._VALROUT___V171*/ meltfptr[170] = (melt_ptr_t) &meltcdat->drout_114__REGISTER_BASICBLOCK_DEBUG_FUN; + /*iniroutlocvar*/ /*_._VALROUT___V171*/ + meltfptr[170] = (melt_ptr_t) &meltcdat->drout_114__REGISTER_BASICBLOCK_DEBUG_FUN; meltcdat->drout_114__REGISTER_BASICBLOCK_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_114__REGISTER_BASICBLOCK_DEBUG_FUN.routdescr, "REGISTER_BASICBLOCK_DEBUG_FUN @warmelt-debug.melt:163", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_114__REGISTER_BASICBLOCK_DEBUG_FUN.nbval = 2; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_114__REGISTER_BASICBLOCK_DEBUG_FUN, meltrout_5_WARMELTmiDEBUG_REGISTER_BASICBLOCK_DEBUG_FUN); /*iniclos dclo_115__REGISTER_BASICBLOCK_DEBUG_FUN*/ - /*_._VALCLO___V172*/ meltfptr[171] = (melt_ptr_t) &meltcdat->dclo_115__REGISTER_BASICBLOCK_DEBUG_FUN; + /*_._VALCLO___V172*/ + meltfptr[171] = (melt_ptr_t) &meltcdat->dclo_115__REGISTER_BASICBLOCK_DEBUG_FUN; meltcdat->dclo_115__REGISTER_BASICBLOCK_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_115__REGISTER_BASICBLOCK_DEBUG_FUN.nbval = 0; /*iniobj dsym_116__LOOP_DEBUG_FUNCONT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V173*/ meltfptr[172]) + /*uniqueobj*/ + if (!/*_._VALDATA___V173*/ meltfptr[172]) /*_._VALDATA___V173*/ meltfptr[172] = (melt_ptr_t )&meltcdat->dsym_116__LOOP_DEBUG_FUNCONT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_116__LOOP_DEBUG_FUNCONT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_116__LOOP_DEBUG_FUNCONT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6079,16 +6668,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_117__LOOP_DEBUG_FUNCONT*/ - /*_._VALSTR___V174*/ meltfptr[173] = (melt_ptr_t) &meltcdat->dstr_117__LOOP_DEBUG_FUNCONT; + /*_._VALSTR___V174*/ + meltfptr[173] = (melt_ptr_t) &meltcdat->dstr_117__LOOP_DEBUG_FUNCONT; meltcdat->dstr_117__LOOP_DEBUG_FUNCONT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_117__LOOP_DEBUG_FUNCONT.val, "LOOP_DEBUG_FUNCONT", sizeof (meltcdat->dstr_117__LOOP_DEBUG_FUNCONT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_117__LOOP_DEBUG_FUNCONT.val, "LOOP_DEBUG_FUNCONT", sizeof (meltcdat->dstr_117__LOOP_DEBUG_FUNCONT.val)-1); meltcdat->dstr_117__LOOP_DEBUG_FUNCONT.val[18] = (char)0 ; meltcdat->dstr_117__LOOP_DEBUG_FUNCONT.slen = 18 ; MELT_LOCATION("warmelt-debug.melt:175:/ iniobj"); /*iniobj dobj_118__LOOP_DEBUG_FUNCONT*/ - /*_._VALDATA___V175*/ meltfptr[174] = (melt_ptr_t )&meltcdat->dobj_118__LOOP_DEBUG_FUNCONT; + /*_._VALDATA___V175*/ + meltfptr[174] = (melt_ptr_t )&meltcdat->dobj_118__LOOP_DEBUG_FUNCONT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_118__LOOP_DEBUG_FUNCONT", melt_magic_discr ((melt_ptr_t) (/*_.CLASS_REFERENCE__V10*/ meltfptr[9])) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_118__LOOP_DEBUG_FUNCONT", ((meltobject_ptr_t) (/*_.CLASS_REFERENCE__V10*/ meltfptr[9]))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_118__LOOP_DEBUG_FUNCONT.meltobj_class = (meltobject_ptr_t)(/*_.CLASS_REFERENCE__V10*/ meltfptr[9]); @@ -6096,20 +6688,23 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t meltcdat->dobj_118__LOOP_DEBUG_FUNCONT.obj_len = 1; /*inirout drout_119__REGISTER_LOOP_DEBUG_FUN*/ - /*iniroutlocvar*/ /*_._VALROUT___V176*/ meltfptr[175] = (melt_ptr_t) &meltcdat->drout_119__REGISTER_LOOP_DEBUG_FUN; + /*iniroutlocvar*/ /*_._VALROUT___V176*/ + meltfptr[175] = (melt_ptr_t) &meltcdat->drout_119__REGISTER_LOOP_DEBUG_FUN; meltcdat->drout_119__REGISTER_LOOP_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_119__REGISTER_LOOP_DEBUG_FUN.routdescr, "REGISTER_LOOP_DEBUG_FUN @warmelt-debug.melt:176", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_119__REGISTER_LOOP_DEBUG_FUN.nbval = 2; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_119__REGISTER_LOOP_DEBUG_FUN, meltrout_6_WARMELTmiDEBUG_REGISTER_LOOP_DEBUG_FUN); /*iniclos dclo_120__REGISTER_LOOP_DEBUG_FUN*/ - /*_._VALCLO___V177*/ meltfptr[176] = (melt_ptr_t) &meltcdat->dclo_120__REGISTER_LOOP_DEBUG_FUN; + /*_._VALCLO___V177*/ + meltfptr[176] = (melt_ptr_t) &meltcdat->dclo_120__REGISTER_LOOP_DEBUG_FUN; meltcdat->dclo_120__REGISTER_LOOP_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_120__REGISTER_LOOP_DEBUG_FUN.nbval = 0; /*iniobj dsym_121__DISCR_DEBUG_CLOSURE*/ - /*uniqueobj*/ if (!/*_._VALDATA___V178*/ meltfptr[177]) + /*uniqueobj*/ + if (!/*_._VALDATA___V178*/ meltfptr[177]) /*_._VALDATA___V178*/ meltfptr[177] = (melt_ptr_t )&meltcdat->dsym_121__DISCR_DEBUG_CLOSURE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_121__DISCR_DEBUG_CLOSURE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_121__DISCR_DEBUG_CLOSURE", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6119,15 +6714,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_122__DISCR_DEBUG_CLOSURE*/ - /*_._VALSTR___V179*/ meltfptr[178] = (melt_ptr_t) &meltcdat->dstr_122__DISCR_DEBUG_CLOSURE; + /*_._VALSTR___V179*/ + meltfptr[178] = (melt_ptr_t) &meltcdat->dstr_122__DISCR_DEBUG_CLOSURE; meltcdat->dstr_122__DISCR_DEBUG_CLOSURE.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_122__DISCR_DEBUG_CLOSURE.val, "DISCR_DEBUG_CLOSURE", sizeof (meltcdat->dstr_122__DISCR_DEBUG_CLOSURE.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_122__DISCR_DEBUG_CLOSURE.val, "DISCR_DEBUG_CLOSURE", sizeof (meltcdat->dstr_122__DISCR_DEBUG_CLOSURE.val)-1); meltcdat->dstr_122__DISCR_DEBUG_CLOSURE.val[19] = (char)0 ; meltcdat->dstr_122__DISCR_DEBUG_CLOSURE.slen = 19 ; /*iniobj dsym_123__CLASS_DISCRIMINANT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V180*/ meltfptr[179]) + /*uniqueobj*/ + if (!/*_._VALDATA___V180*/ meltfptr[179]) /*_._VALDATA___V180*/ meltfptr[179] = (melt_ptr_t )&meltcdat->dsym_123__CLASS_DISCRIMINANT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_123__CLASS_DISCRIMINANT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_123__CLASS_DISCRIMINANT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6137,16 +6735,19 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_124__CLASS_DISCRIMINANT*/ - /*_._VALSTR___V181*/ meltfptr[180] = (melt_ptr_t) &meltcdat->dstr_124__CLASS_DISCRIMINANT; + /*_._VALSTR___V181*/ + meltfptr[180] = (melt_ptr_t) &meltcdat->dstr_124__CLASS_DISCRIMINANT; meltcdat->dstr_124__CLASS_DISCRIMINANT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_124__CLASS_DISCRIMINANT.val, "CLASS_DISCRIMINANT", sizeof (meltcdat->dstr_124__CLASS_DISCRIMINANT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_124__CLASS_DISCRIMINANT.val, "CLASS_DISCRIMINANT", sizeof (meltcdat->dstr_124__CLASS_DISCRIMINANT.val)-1); meltcdat->dstr_124__CLASS_DISCRIMINANT.val[18] = (char)0 ; meltcdat->dstr_124__CLASS_DISCRIMINANT.slen = 18 ; MELT_LOCATION("warmelt-debug.melt:188:/ iniobj"); /*iniobj dobj_125__DISCR_DEBUG_CLOSURE*/ - /*_._VALDATA___V182*/ meltfptr[181] = (melt_ptr_t )&meltcdat->dobj_125__DISCR_DEBUG_CLOSURE; + /*_._VALDATA___V182*/ + meltfptr[181] = (melt_ptr_t )&meltcdat->dobj_125__DISCR_DEBUG_CLOSURE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dobj_125__DISCR_DEBUG_CLOSURE", melt_magic_discr ((melt_ptr_t) (/*_.CLASS_DISCRIMINANT__V11*/ meltfptr[10])) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dobj_125__DISCR_DEBUG_CLOSURE", ((meltobject_ptr_t) (/*_.CLASS_DISCRIMINANT__V11*/ meltfptr[10]))->meltobj_magic == MELTOBMAG_OBJECT); meltcdat->dobj_125__DISCR_DEBUG_CLOSURE.meltobj_class = (meltobject_ptr_t)(/*_.CLASS_DISCRIMINANT__V11*/ meltfptr[10]); @@ -6156,7 +6757,8 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*iniobj dsym_126__DISCR_CLOSURE*/ - /*uniqueobj*/ if (!/*_._VALDATA___V184*/ meltfptr[183]) + /*uniqueobj*/ + if (!/*_._VALDATA___V184*/ meltfptr[183]) /*_._VALDATA___V184*/ meltfptr[183] = (melt_ptr_t )&meltcdat->dsym_126__DISCR_CLOSURE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_126__DISCR_CLOSURE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_126__DISCR_CLOSURE", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6166,35 +6768,42 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_127__DISCR_CLOSURE*/ - /*_._VALSTR___V185*/ meltfptr[184] = (melt_ptr_t) &meltcdat->dstr_127__DISCR_CLOSURE; + /*_._VALSTR___V185*/ + meltfptr[184] = (melt_ptr_t) &meltcdat->dstr_127__DISCR_CLOSURE; meltcdat->dstr_127__DISCR_CLOSURE.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_127__DISCR_CLOSURE.val, "DISCR_CLOSURE", sizeof (meltcdat->dstr_127__DISCR_CLOSURE.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_127__DISCR_CLOSURE.val, "DISCR_CLOSURE", sizeof (meltcdat->dstr_127__DISCR_CLOSURE.val)-1); meltcdat->dstr_127__DISCR_CLOSURE.val[13] = (char)0 ; meltcdat->dstr_127__DISCR_CLOSURE.slen = 13 ; /*inistring dstr_128__DISCR_DEBUG_CLOSURE*/ - /*_._VALSTR___V183*/ meltfptr[182] = (melt_ptr_t) &meltcdat->dstr_128__DISCR_DEBUG_CLOSURE; + /*_._VALSTR___V183*/ + meltfptr[182] = (melt_ptr_t) &meltcdat->dstr_128__DISCR_DEBUG_CLOSURE; meltcdat->dstr_128__DISCR_DEBUG_CLOSURE.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_128__DISCR_DEBUG_CLOSURE.val, "DISCR_DEBUG_CLOSURE", sizeof (meltcdat->dstr_128__DISCR_DEBUG_CLOSURE.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_128__DISCR_DEBUG_CLOSURE.val, "DISCR_DEBUG_CLOSURE", sizeof (meltcdat->dstr_128__DISCR_DEBUG_CLOSURE.val)-1); meltcdat->dstr_128__DISCR_DEBUG_CLOSURE.val[19] = (char)0 ; meltcdat->dstr_128__DISCR_DEBUG_CLOSURE.slen = 19 ; /*inirout drout_129__MELT_DEBUG_FUN*/ - /*iniroutlocvar*/ /*_._VALROUT___V186*/ meltfptr[185] = (melt_ptr_t) &meltcdat->drout_129__MELT_DEBUG_FUN; + /*iniroutlocvar*/ /*_._VALROUT___V186*/ + meltfptr[185] = (melt_ptr_t) &meltcdat->drout_129__MELT_DEBUG_FUN; meltcdat->drout_129__MELT_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_129__MELT_DEBUG_FUN.routdescr, "MELT_DEBUG_FUN @warmelt-debug.melt:199", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_129__MELT_DEBUG_FUN.nbval = 20; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_129__MELT_DEBUG_FUN, meltrout_7_WARMELTmiDEBUG_MELT_DEBUG_FUN); /*iniclos dclo_130__MELT_DEBUG_FUN*/ - /*_._VALCLO___V191*/ meltfptr[190] = (melt_ptr_t) &meltcdat->dclo_130__MELT_DEBUG_FUN; + /*_._VALCLO___V191*/ + meltfptr[190] = (melt_ptr_t) &meltcdat->dclo_130__MELT_DEBUG_FUN; meltcdat->dclo_130__MELT_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_130__MELT_DEBUG_FUN.nbval = 0; /*iniobj dsym_131__INITIAL_SYSTEM_DATA*/ - /*uniqueobj*/ if (!/*_._VALDATA___V192*/ meltfptr[191]) + /*uniqueobj*/ + if (!/*_._VALDATA___V192*/ meltfptr[191]) /*_._VALDATA___V192*/ meltfptr[191] = (melt_ptr_t )&meltcdat->dsym_131__INITIAL_SYSTEM_DATA; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_131__INITIAL_SYSTEM_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_131__INITIAL_SYSTEM_DATA", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6204,15 +6813,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_132__INITIAL_SYSTEM_DATA*/ - /*_._VALSTR___V193*/ meltfptr[192] = (melt_ptr_t) &meltcdat->dstr_132__INITIAL_SYSTEM_DATA; + /*_._VALSTR___V193*/ + meltfptr[192] = (melt_ptr_t) &meltcdat->dstr_132__INITIAL_SYSTEM_DATA; meltcdat->dstr_132__INITIAL_SYSTEM_DATA.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_132__INITIAL_SYSTEM_DATA.val, "INITIAL_SYSTEM_DATA", sizeof (meltcdat->dstr_132__INITIAL_SYSTEM_DATA.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_132__INITIAL_SYSTEM_DATA.val, "INITIAL_SYSTEM_DATA", sizeof (meltcdat->dstr_132__INITIAL_SYSTEM_DATA.val)-1); meltcdat->dstr_132__INITIAL_SYSTEM_DATA.val[19] = (char)0 ; meltcdat->dstr_132__INITIAL_SYSTEM_DATA.slen = 19 ; /*iniobj dsym_133__CLASS_SYSTEM_DATA*/ - /*uniqueobj*/ if (!/*_._VALDATA___V194*/ meltfptr[193]) + /*uniqueobj*/ + if (!/*_._VALDATA___V194*/ meltfptr[193]) /*_._VALDATA___V194*/ meltfptr[193] = (melt_ptr_t )&meltcdat->dsym_133__CLASS_SYSTEM_DATA; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_133__CLASS_SYSTEM_DATA", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_133__CLASS_SYSTEM_DATA", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6222,15 +6834,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_134__CLASS_SYSTEM_DATA*/ - /*_._VALSTR___V195*/ meltfptr[194] = (melt_ptr_t) &meltcdat->dstr_134__CLASS_SYSTEM_DATA; + /*_._VALSTR___V195*/ + meltfptr[194] = (melt_ptr_t) &meltcdat->dstr_134__CLASS_SYSTEM_DATA; meltcdat->dstr_134__CLASS_SYSTEM_DATA.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_134__CLASS_SYSTEM_DATA.val, "CLASS_SYSTEM_DATA", sizeof (meltcdat->dstr_134__CLASS_SYSTEM_DATA.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_134__CLASS_SYSTEM_DATA.val, "CLASS_SYSTEM_DATA", sizeof (meltcdat->dstr_134__CLASS_SYSTEM_DATA.val)-1); meltcdat->dstr_134__CLASS_SYSTEM_DATA.val[17] = (char)0 ; meltcdat->dstr_134__CLASS_SYSTEM_DATA.slen = 17 ; /*iniobj dsym_135__DISCR_MAP_OBJECTS*/ - /*uniqueobj*/ if (!/*_._VALDATA___V196*/ meltfptr[195]) + /*uniqueobj*/ + if (!/*_._VALDATA___V196*/ meltfptr[195]) /*_._VALDATA___V196*/ meltfptr[195] = (melt_ptr_t )&meltcdat->dsym_135__DISCR_MAP_OBJECTS; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_135__DISCR_MAP_OBJECTS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_135__DISCR_MAP_OBJECTS", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6240,15 +6855,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_136__DISCR_MAP_OBJECTS*/ - /*_._VALSTR___V197*/ meltfptr[196] = (melt_ptr_t) &meltcdat->dstr_136__DISCR_MAP_OBJECTS; + /*_._VALSTR___V197*/ + meltfptr[196] = (melt_ptr_t) &meltcdat->dstr_136__DISCR_MAP_OBJECTS; meltcdat->dstr_136__DISCR_MAP_OBJECTS.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_136__DISCR_MAP_OBJECTS.val, "DISCR_MAP_OBJECTS", sizeof (meltcdat->dstr_136__DISCR_MAP_OBJECTS.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_136__DISCR_MAP_OBJECTS.val, "DISCR_MAP_OBJECTS", sizeof (meltcdat->dstr_136__DISCR_MAP_OBJECTS.val)-1); meltcdat->dstr_136__DISCR_MAP_OBJECTS.val[17] = (char)0 ; meltcdat->dstr_136__DISCR_MAP_OBJECTS.slen = 17 ; /*iniobj dsym_137__DISCR_INTEGER*/ - /*uniqueobj*/ if (!/*_._VALDATA___V198*/ meltfptr[197]) + /*uniqueobj*/ + if (!/*_._VALDATA___V198*/ meltfptr[197]) /*_._VALDATA___V198*/ meltfptr[197] = (melt_ptr_t )&meltcdat->dsym_137__DISCR_INTEGER; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_137__DISCR_INTEGER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_137__DISCR_INTEGER", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6258,15 +6876,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_138__DISCR_INTEGER*/ - /*_._VALSTR___V199*/ meltfptr[198] = (melt_ptr_t) &meltcdat->dstr_138__DISCR_INTEGER; + /*_._VALSTR___V199*/ + meltfptr[198] = (melt_ptr_t) &meltcdat->dstr_138__DISCR_INTEGER; meltcdat->dstr_138__DISCR_INTEGER.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_138__DISCR_INTEGER.val, "DISCR_INTEGER", sizeof (meltcdat->dstr_138__DISCR_INTEGER.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_138__DISCR_INTEGER.val, "DISCR_INTEGER", sizeof (meltcdat->dstr_138__DISCR_INTEGER.val)-1); meltcdat->dstr_138__DISCR_INTEGER.val[13] = (char)0 ; meltcdat->dstr_138__DISCR_INTEGER.slen = 13 ; /*iniobj dsym_139__DISCR_STRBUF*/ - /*uniqueobj*/ if (!/*_._VALDATA___V200*/ meltfptr[199]) + /*uniqueobj*/ + if (!/*_._VALDATA___V200*/ meltfptr[199]) /*_._VALDATA___V200*/ meltfptr[199] = (melt_ptr_t )&meltcdat->dsym_139__DISCR_STRBUF; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_139__DISCR_STRBUF", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_139__DISCR_STRBUF", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6276,15 +6897,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_140__DISCR_STRBUF*/ - /*_._VALSTR___V201*/ meltfptr[200] = (melt_ptr_t) &meltcdat->dstr_140__DISCR_STRBUF; + /*_._VALSTR___V201*/ + meltfptr[200] = (melt_ptr_t) &meltcdat->dstr_140__DISCR_STRBUF; meltcdat->dstr_140__DISCR_STRBUF.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_140__DISCR_STRBUF.val, "DISCR_STRBUF", sizeof (meltcdat->dstr_140__DISCR_STRBUF.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_140__DISCR_STRBUF.val, "DISCR_STRBUF", sizeof (meltcdat->dstr_140__DISCR_STRBUF.val)-1); meltcdat->dstr_140__DISCR_STRBUF.val[12] = (char)0 ; meltcdat->dstr_140__DISCR_STRBUF.slen = 12 ; /*iniobj dsym_141__MELT_ASSERT_FAILURE_FUN*/ - /*uniqueobj*/ if (!/*_._VALDATA___V202*/ meltfptr[201]) + /*uniqueobj*/ + if (!/*_._VALDATA___V202*/ meltfptr[201]) /*_._VALDATA___V202*/ meltfptr[201] = (melt_ptr_t )&meltcdat->dsym_141__MELT_ASSERT_FAILURE_FUN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_141__MELT_ASSERT_FAILURE_FUN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_141__MELT_ASSERT_FAILURE_FUN", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6294,15 +6918,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_142__MELT_ASSERT_FAILURE_FUN*/ - /*_._VALSTR___V203*/ meltfptr[202] = (melt_ptr_t) &meltcdat->dstr_142__MELT_ASSERT_FAILURE_FUN; + /*_._VALSTR___V203*/ + meltfptr[202] = (melt_ptr_t) &meltcdat->dstr_142__MELT_ASSERT_FAILURE_FUN; meltcdat->dstr_142__MELT_ASSERT_FAILURE_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_142__MELT_ASSERT_FAILURE_FUN.val, "MELT_ASSERT_FAILURE_FUN", sizeof (meltcdat->dstr_142__MELT_ASSERT_FAILURE_FUN.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_142__MELT_ASSERT_FAILURE_FUN.val, "MELT_ASSERT_FAILURE_FUN", sizeof (meltcdat->dstr_142__MELT_ASSERT_FAILURE_FUN.val)-1); meltcdat->dstr_142__MELT_ASSERT_FAILURE_FUN.val[23] = (char)0 ; meltcdat->dstr_142__MELT_ASSERT_FAILURE_FUN.slen = 23 ; /*iniobj dsym_143__ADD2OUT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V204*/ meltfptr[203]) + /*uniqueobj*/ + if (!/*_._VALDATA___V204*/ meltfptr[203]) /*_._VALDATA___V204*/ meltfptr[203] = (melt_ptr_t )&meltcdat->dsym_143__ADD2OUT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_143__ADD2OUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_143__ADD2OUT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6312,15 +6939,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_144__ADD2OUT*/ - /*_._VALSTR___V205*/ meltfptr[204] = (melt_ptr_t) &meltcdat->dstr_144__ADD2OUT; + /*_._VALSTR___V205*/ + meltfptr[204] = (melt_ptr_t) &meltcdat->dstr_144__ADD2OUT; meltcdat->dstr_144__ADD2OUT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_144__ADD2OUT.val, "ADD2OUT", sizeof (meltcdat->dstr_144__ADD2OUT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_144__ADD2OUT.val, "ADD2OUT", sizeof (meltcdat->dstr_144__ADD2OUT.val)-1); meltcdat->dstr_144__ADD2OUT.val[7] = (char)0 ; meltcdat->dstr_144__ADD2OUT.slen = 7 ; /*iniobj dsym_145__CSTRING_PREFIXED*/ - /*uniqueobj*/ if (!/*_._VALDATA___V206*/ meltfptr[205]) + /*uniqueobj*/ + if (!/*_._VALDATA___V206*/ meltfptr[205]) /*_._VALDATA___V206*/ meltfptr[205] = (melt_ptr_t )&meltcdat->dsym_145__CSTRING_PREFIXED; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_145__CSTRING_PREFIXED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_145__CSTRING_PREFIXED", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6330,15 +6960,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_146__CSTRING_PREFIXED*/ - /*_._VALSTR___V207*/ meltfptr[206] = (melt_ptr_t) &meltcdat->dstr_146__CSTRING_PREFIXED; + /*_._VALSTR___V207*/ + meltfptr[206] = (melt_ptr_t) &meltcdat->dstr_146__CSTRING_PREFIXED; meltcdat->dstr_146__CSTRING_PREFIXED.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_146__CSTRING_PREFIXED.val, "CSTRING_PREFIXED", sizeof (meltcdat->dstr_146__CSTRING_PREFIXED.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_146__CSTRING_PREFIXED.val, "CSTRING_PREFIXED", sizeof (meltcdat->dstr_146__CSTRING_PREFIXED.val)-1); meltcdat->dstr_146__CSTRING_PREFIXED.val[16] = (char)0 ; meltcdat->dstr_146__CSTRING_PREFIXED.slen = 16 ; /*iniobj dsym_147__CLASS_NAMED*/ - /*uniqueobj*/ if (!/*_._VALDATA___V208*/ meltfptr[207]) + /*uniqueobj*/ + if (!/*_._VALDATA___V208*/ meltfptr[207]) /*_._VALDATA___V208*/ meltfptr[207] = (melt_ptr_t )&meltcdat->dsym_147__CLASS_NAMED; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_147__CLASS_NAMED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_147__CLASS_NAMED", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6348,15 +6981,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_148__CLASS_NAMED*/ - /*_._VALSTR___V209*/ meltfptr[208] = (melt_ptr_t) &meltcdat->dstr_148__CLASS_NAMED; + /*_._VALSTR___V209*/ + meltfptr[208] = (melt_ptr_t) &meltcdat->dstr_148__CLASS_NAMED; meltcdat->dstr_148__CLASS_NAMED.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_148__CLASS_NAMED.val, "CLASS_NAMED", sizeof (meltcdat->dstr_148__CLASS_NAMED.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_148__CLASS_NAMED.val, "CLASS_NAMED", sizeof (meltcdat->dstr_148__CLASS_NAMED.val)-1); meltcdat->dstr_148__CLASS_NAMED.val[11] = (char)0 ; meltcdat->dstr_148__CLASS_NAMED.slen = 11 ; /*iniobj dsym_149__CLASS_QUASI_CTYPE*/ - /*uniqueobj*/ if (!/*_._VALDATA___V210*/ meltfptr[209]) + /*uniqueobj*/ + if (!/*_._VALDATA___V210*/ meltfptr[209]) /*_._VALDATA___V210*/ meltfptr[209] = (melt_ptr_t )&meltcdat->dsym_149__CLASS_QUASI_CTYPE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_149__CLASS_QUASI_CTYPE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_149__CLASS_QUASI_CTYPE", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6366,75 +7002,88 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_150__CLASS_QUASI_CTYPE*/ - /*_._VALSTR___V211*/ meltfptr[210] = (melt_ptr_t) &meltcdat->dstr_150__CLASS_QUASI_CTYPE; + /*_._VALSTR___V211*/ + meltfptr[210] = (melt_ptr_t) &meltcdat->dstr_150__CLASS_QUASI_CTYPE; meltcdat->dstr_150__CLASS_QUASI_CTYPE.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_150__CLASS_QUASI_CTYPE.val, "CLASS_QUASI_CTYPE", sizeof (meltcdat->dstr_150__CLASS_QUASI_CTYPE.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_150__CLASS_QUASI_CTYPE.val, "CLASS_QUASI_CTYPE", sizeof (meltcdat->dstr_150__CLASS_QUASI_CTYPE.val)-1); meltcdat->dstr_150__CLASS_QUASI_CTYPE.val[17] = (char)0 ; meltcdat->dstr_150__CLASS_QUASI_CTYPE.slen = 17 ; /*inirout drout_151__DBG_OUTOBJECT*/ - /*iniroutlocvar*/ /*_._VALROUT___V190*/ meltfptr[189] = (melt_ptr_t) &meltcdat->drout_151__DBG_OUTOBJECT; + /*iniroutlocvar*/ /*_._VALROUT___V190*/ + meltfptr[189] = (melt_ptr_t) &meltcdat->drout_151__DBG_OUTOBJECT; meltcdat->drout_151__DBG_OUTOBJECT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_151__DBG_OUTOBJECT.routdescr, "DBG_OUTOBJECT @warmelt-debug.melt:409", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_151__DBG_OUTOBJECT.nbval = 5; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_151__DBG_OUTOBJECT, meltrout_8_WARMELTmiDEBUG_DBG_OUTOBJECT); /*iniclos dclo_152__DBG_OUTOBJECT*/ - /*_._VALCLO___V189*/ meltfptr[188] = (melt_ptr_t) &meltcdat->dclo_152__DBG_OUTOBJECT; + /*_._VALCLO___V189*/ + meltfptr[188] = (melt_ptr_t) &meltcdat->dclo_152__DBG_OUTOBJECT; meltcdat->dclo_152__DBG_OUTOBJECT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_152__DBG_OUTOBJECT.nbval = 0; /*inirout drout_153__DBG_OUT*/ - /*iniroutlocvar*/ /*_._VALROUT___V188*/ meltfptr[187] = (melt_ptr_t) &meltcdat->drout_153__DBG_OUT; + /*iniroutlocvar*/ /*_._VALROUT___V188*/ + meltfptr[187] = (melt_ptr_t) &meltcdat->drout_153__DBG_OUT; meltcdat->drout_153__DBG_OUT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_153__DBG_OUT.routdescr, "DBG_OUT @warmelt-debug.melt:429", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_153__DBG_OUT.nbval = 4; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_153__DBG_OUT, meltrout_9_WARMELTmiDEBUG_DBG_OUT); /*iniclos dclo_154__DBG_OUT*/ - /*_._VALCLO___V187*/ meltfptr[186] = (melt_ptr_t) &meltcdat->dclo_154__DBG_OUT; + /*_._VALCLO___V187*/ + meltfptr[186] = (melt_ptr_t) &meltcdat->dclo_154__DBG_OUT; meltcdat->dclo_154__DBG_OUT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_154__DBG_OUT.nbval = 0; /*inirout drout_155__DBGOUT_FIELDS*/ - /*iniroutlocvar*/ /*_._VALROUT___V212*/ meltfptr[211] = (melt_ptr_t) &meltcdat->drout_155__DBGOUT_FIELDS; + /*iniroutlocvar*/ /*_._VALROUT___V212*/ + meltfptr[211] = (melt_ptr_t) &meltcdat->drout_155__DBGOUT_FIELDS; meltcdat->drout_155__DBGOUT_FIELDS.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_155__DBGOUT_FIELDS.routdescr, "DBGOUT_FIELDS @warmelt-debug.melt:457", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_155__DBGOUT_FIELDS.nbval = 3; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_155__DBGOUT_FIELDS, meltrout_10_WARMELTmiDEBUG_DBGOUT_FIELDS); /*iniclos dclo_156__DBGOUT_FIELDS*/ - /*_._VALCLO___V213*/ meltfptr[212] = (melt_ptr_t) &meltcdat->dclo_156__DBGOUT_FIELDS; + /*_._VALCLO___V213*/ + meltfptr[212] = (melt_ptr_t) &meltcdat->dclo_156__DBGOUT_FIELDS; meltcdat->dclo_156__DBGOUT_FIELDS.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_156__DBGOUT_FIELDS.nbval = 0; /*inirout drout_157__DBGOUTAGAIN_FIELDS*/ - /*iniroutlocvar*/ /*_._VALROUT___V214*/ meltfptr[213] = (melt_ptr_t) &meltcdat->drout_157__DBGOUTAGAIN_FIELDS; + /*iniroutlocvar*/ /*_._VALROUT___V214*/ + meltfptr[213] = (melt_ptr_t) &meltcdat->drout_157__DBGOUTAGAIN_FIELDS; meltcdat->drout_157__DBGOUTAGAIN_FIELDS.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_157__DBGOUTAGAIN_FIELDS.routdescr, "DBGOUTAGAIN_FIELDS @warmelt-debug.melt:510", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_157__DBGOUTAGAIN_FIELDS.nbval = 4; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_157__DBGOUTAGAIN_FIELDS, meltrout_11_WARMELTmiDEBUG_DBGOUTAGAIN_FIELDS); /*iniclos dclo_158__DBGOUTAGAIN_FIELDS*/ - /*_._VALCLO___V215*/ meltfptr[214] = (melt_ptr_t) &meltcdat->dclo_158__DBGOUTAGAIN_FIELDS; + /*_._VALCLO___V215*/ + meltfptr[214] = (melt_ptr_t) &meltcdat->dclo_158__DBGOUTAGAIN_FIELDS; meltcdat->dclo_158__DBGOUTAGAIN_FIELDS.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_158__DBGOUTAGAIN_FIELDS.nbval = 0; /*inirout drout_159__DBGOUT_NULL_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V216*/ meltfptr[215] = (melt_ptr_t) &meltcdat->drout_159__DBGOUT_NULL_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V216*/ + meltfptr[215] = (melt_ptr_t) &meltcdat->drout_159__DBGOUT_NULL_METHOD; meltcdat->drout_159__DBGOUT_NULL_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_159__DBGOUT_NULL_METHOD.routdescr, "DBGOUT_NULL_METHOD @warmelt-debug.melt:553", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_159__DBGOUT_NULL_METHOD.nbval = 2; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_159__DBGOUT_NULL_METHOD, meltrout_12_WARMELTmiDEBUG_DBGOUT_NULL_METHOD); /*iniclos dclo_160__DBGOUT_NULL_METHOD*/ - /*_._VALCLO___V217*/ meltfptr[216] = (melt_ptr_t) &meltcdat->dclo_160__DBGOUT_NULL_METHOD; + /*_._VALCLO___V217*/ + meltfptr[216] = (melt_ptr_t) &meltcdat->dclo_160__DBGOUT_NULL_METHOD; meltcdat->dclo_160__DBGOUT_NULL_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_160__DBGOUT_NULL_METHOD.nbval = 0; /*iniobj dsym_161__INSTALL_METHOD*/ - /*uniqueobj*/ if (!/*_._VALDATA___V218*/ meltfptr[217]) + /*uniqueobj*/ + if (!/*_._VALDATA___V218*/ meltfptr[217]) /*_._VALDATA___V218*/ meltfptr[217] = (melt_ptr_t )&meltcdat->dsym_161__INSTALL_METHOD; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_161__INSTALL_METHOD", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_161__INSTALL_METHOD", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6444,15 +7093,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_162__INSTALL_METHOD*/ - /*_._VALSTR___V219*/ meltfptr[218] = (melt_ptr_t) &meltcdat->dstr_162__INSTALL_METHOD; + /*_._VALSTR___V219*/ + meltfptr[218] = (melt_ptr_t) &meltcdat->dstr_162__INSTALL_METHOD; meltcdat->dstr_162__INSTALL_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_162__INSTALL_METHOD.val, "INSTALL_METHOD", sizeof (meltcdat->dstr_162__INSTALL_METHOD.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_162__INSTALL_METHOD.val, "INSTALL_METHOD", sizeof (meltcdat->dstr_162__INSTALL_METHOD.val)-1); meltcdat->dstr_162__INSTALL_METHOD.val[14] = (char)0 ; meltcdat->dstr_162__INSTALL_METHOD.slen = 14 ; /*iniobj dsym_163__DISCR_NULL_RECEIVER*/ - /*uniqueobj*/ if (!/*_._VALDATA___V220*/ meltfptr[219]) + /*uniqueobj*/ + if (!/*_._VALDATA___V220*/ meltfptr[219]) /*_._VALDATA___V220*/ meltfptr[219] = (melt_ptr_t )&meltcdat->dsym_163__DISCR_NULL_RECEIVER; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_163__DISCR_NULL_RECEIVER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_163__DISCR_NULL_RECEIVER", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6462,27 +7114,32 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_164__DISCR_NULL_RECEIVER*/ - /*_._VALSTR___V221*/ meltfptr[220] = (melt_ptr_t) &meltcdat->dstr_164__DISCR_NULL_RECEIVER; + /*_._VALSTR___V221*/ + meltfptr[220] = (melt_ptr_t) &meltcdat->dstr_164__DISCR_NULL_RECEIVER; meltcdat->dstr_164__DISCR_NULL_RECEIVER.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_164__DISCR_NULL_RECEIVER.val, "DISCR_NULL_RECEIVER", sizeof (meltcdat->dstr_164__DISCR_NULL_RECEIVER.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_164__DISCR_NULL_RECEIVER.val, "DISCR_NULL_RECEIVER", sizeof (meltcdat->dstr_164__DISCR_NULL_RECEIVER.val)-1); meltcdat->dstr_164__DISCR_NULL_RECEIVER.val[19] = (char)0 ; meltcdat->dstr_164__DISCR_NULL_RECEIVER.slen = 19 ; /*inirout drout_165__DBGOUT_STRING_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V222*/ meltfptr[221] = (melt_ptr_t) &meltcdat->drout_165__DBGOUT_STRING_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V222*/ + meltfptr[221] = (melt_ptr_t) &meltcdat->drout_165__DBGOUT_STRING_METHOD; meltcdat->drout_165__DBGOUT_STRING_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_165__DBGOUT_STRING_METHOD.routdescr, "DBGOUT_STRING_METHOD @warmelt-debug.melt:562", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_165__DBGOUT_STRING_METHOD.nbval = 4; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_165__DBGOUT_STRING_METHOD, meltrout_13_WARMELTmiDEBUG_DBGOUT_STRING_METHOD); /*iniclos dclo_166__DBGOUT_STRING_METHOD*/ - /*_._VALCLO___V223*/ meltfptr[222] = (melt_ptr_t) &meltcdat->dclo_166__DBGOUT_STRING_METHOD; + /*_._VALCLO___V223*/ + meltfptr[222] = (melt_ptr_t) &meltcdat->dclo_166__DBGOUT_STRING_METHOD; meltcdat->dclo_166__DBGOUT_STRING_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_166__DBGOUT_STRING_METHOD.nbval = 0; /*iniobj dsym_167__DISCR_STRING*/ - /*uniqueobj*/ if (!/*_._VALDATA___V224*/ meltfptr[223]) + /*uniqueobj*/ + if (!/*_._VALDATA___V224*/ meltfptr[223]) /*_._VALDATA___V224*/ meltfptr[223] = (melt_ptr_t )&meltcdat->dsym_167__DISCR_STRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_167__DISCR_STRING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_167__DISCR_STRING", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6492,15 +7149,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_168__DISCR_STRING*/ - /*_._VALSTR___V225*/ meltfptr[224] = (melt_ptr_t) &meltcdat->dstr_168__DISCR_STRING; + /*_._VALSTR___V225*/ + meltfptr[224] = (melt_ptr_t) &meltcdat->dstr_168__DISCR_STRING; meltcdat->dstr_168__DISCR_STRING.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_168__DISCR_STRING.val, "DISCR_STRING", sizeof (meltcdat->dstr_168__DISCR_STRING.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_168__DISCR_STRING.val, "DISCR_STRING", sizeof (meltcdat->dstr_168__DISCR_STRING.val)-1); meltcdat->dstr_168__DISCR_STRING.val[12] = (char)0 ; meltcdat->dstr_168__DISCR_STRING.slen = 12 ; /*iniobj dsym_169__DISCR_VERBATIM_STRING*/ - /*uniqueobj*/ if (!/*_._VALDATA___V226*/ meltfptr[225]) + /*uniqueobj*/ + if (!/*_._VALDATA___V226*/ meltfptr[225]) /*_._VALDATA___V226*/ meltfptr[225] = (melt_ptr_t )&meltcdat->dsym_169__DISCR_VERBATIM_STRING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_169__DISCR_VERBATIM_STRING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_169__DISCR_VERBATIM_STRING", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6510,39 +7170,46 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_170__DISCR_VERBATIM_STRING*/ - /*_._VALSTR___V227*/ meltfptr[226] = (melt_ptr_t) &meltcdat->dstr_170__DISCR_VERBATIM_STRING; + /*_._VALSTR___V227*/ + meltfptr[226] = (melt_ptr_t) &meltcdat->dstr_170__DISCR_VERBATIM_STRING; meltcdat->dstr_170__DISCR_VERBATIM_STRING.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_170__DISCR_VERBATIM_STRING.val, "DISCR_VERBATIM_STRING", sizeof (meltcdat->dstr_170__DISCR_VERBATIM_STRING.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_170__DISCR_VERBATIM_STRING.val, "DISCR_VERBATIM_STRING", sizeof (meltcdat->dstr_170__DISCR_VERBATIM_STRING.val)-1); meltcdat->dstr_170__DISCR_VERBATIM_STRING.val[21] = (char)0 ; meltcdat->dstr_170__DISCR_VERBATIM_STRING.slen = 21 ; /*inirout drout_171__DBGOUT_STRBUF_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V228*/ meltfptr[227] = (melt_ptr_t) &meltcdat->drout_171__DBGOUT_STRBUF_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V228*/ + meltfptr[227] = (melt_ptr_t) &meltcdat->drout_171__DBGOUT_STRBUF_METHOD; meltcdat->drout_171__DBGOUT_STRBUF_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_171__DBGOUT_STRBUF_METHOD.routdescr, "DBGOUT_STRBUF_METHOD @warmelt-debug.melt:591", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_171__DBGOUT_STRBUF_METHOD.nbval = 4; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_171__DBGOUT_STRBUF_METHOD, meltrout_14_WARMELTmiDEBUG_DBGOUT_STRBUF_METHOD); /*iniclos dclo_172__DBGOUT_STRBUF_METHOD*/ - /*_._VALCLO___V229*/ meltfptr[228] = (melt_ptr_t) &meltcdat->dclo_172__DBGOUT_STRBUF_METHOD; + /*_._VALCLO___V229*/ + meltfptr[228] = (melt_ptr_t) &meltcdat->dclo_172__DBGOUT_STRBUF_METHOD; meltcdat->dclo_172__DBGOUT_STRBUF_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_172__DBGOUT_STRBUF_METHOD.nbval = 0; /*inirout drout_173__DBGOUT_INTEGER_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V230*/ meltfptr[229] = (melt_ptr_t) &meltcdat->drout_173__DBGOUT_INTEGER_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V230*/ + meltfptr[229] = (melt_ptr_t) &meltcdat->drout_173__DBGOUT_INTEGER_METHOD; meltcdat->drout_173__DBGOUT_INTEGER_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_173__DBGOUT_INTEGER_METHOD.routdescr, "DBGOUT_INTEGER_METHOD @warmelt-debug.melt:677", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_173__DBGOUT_INTEGER_METHOD.nbval = 5; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_173__DBGOUT_INTEGER_METHOD, meltrout_15_WARMELTmiDEBUG_DBGOUT_INTEGER_METHOD); /*iniclos dclo_174__DBGOUT_INTEGER_METHOD*/ - /*_._VALCLO___V231*/ meltfptr[230] = (melt_ptr_t) &meltcdat->dclo_174__DBGOUT_INTEGER_METHOD; + /*_._VALCLO___V231*/ + meltfptr[230] = (melt_ptr_t) &meltcdat->dclo_174__DBGOUT_INTEGER_METHOD; meltcdat->dclo_174__DBGOUT_INTEGER_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_174__DBGOUT_INTEGER_METHOD.nbval = 0; /*iniobj dsym_175__DISCR_CONSTANT_INTEGER*/ - /*uniqueobj*/ if (!/*_._VALDATA___V232*/ meltfptr[231]) + /*uniqueobj*/ + if (!/*_._VALDATA___V232*/ meltfptr[231]) /*_._VALDATA___V232*/ meltfptr[231] = (melt_ptr_t )&meltcdat->dsym_175__DISCR_CONSTANT_INTEGER; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_175__DISCR_CONSTANT_INTEGER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_175__DISCR_CONSTANT_INTEGER", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6552,27 +7219,32 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_176__DISCR_CONSTANT_INTEGER*/ - /*_._VALSTR___V233*/ meltfptr[232] = (melt_ptr_t) &meltcdat->dstr_176__DISCR_CONSTANT_INTEGER; + /*_._VALSTR___V233*/ + meltfptr[232] = (melt_ptr_t) &meltcdat->dstr_176__DISCR_CONSTANT_INTEGER; meltcdat->dstr_176__DISCR_CONSTANT_INTEGER.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_176__DISCR_CONSTANT_INTEGER.val, "DISCR_CONSTANT_INTEGER", sizeof (meltcdat->dstr_176__DISCR_CONSTANT_INTEGER.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_176__DISCR_CONSTANT_INTEGER.val, "DISCR_CONSTANT_INTEGER", sizeof (meltcdat->dstr_176__DISCR_CONSTANT_INTEGER.val)-1); meltcdat->dstr_176__DISCR_CONSTANT_INTEGER.val[22] = (char)0 ; meltcdat->dstr_176__DISCR_CONSTANT_INTEGER.slen = 22 ; /*inirout drout_177__DBGOUT_DOUBLE_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V234*/ meltfptr[233] = (melt_ptr_t) &meltcdat->drout_177__DBGOUT_DOUBLE_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V234*/ + meltfptr[233] = (melt_ptr_t) &meltcdat->drout_177__DBGOUT_DOUBLE_METHOD; meltcdat->drout_177__DBGOUT_DOUBLE_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_177__DBGOUT_DOUBLE_METHOD.routdescr, "DBGOUT_DOUBLE_METHOD @warmelt-debug.melt:698", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_177__DBGOUT_DOUBLE_METHOD.nbval = 5; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_177__DBGOUT_DOUBLE_METHOD, meltrout_16_WARMELTmiDEBUG_DBGOUT_DOUBLE_METHOD); /*iniclos dclo_178__DBGOUT_DOUBLE_METHOD*/ - /*_._VALCLO___V235*/ meltfptr[234] = (melt_ptr_t) &meltcdat->dclo_178__DBGOUT_DOUBLE_METHOD; + /*_._VALCLO___V235*/ + meltfptr[234] = (melt_ptr_t) &meltcdat->dclo_178__DBGOUT_DOUBLE_METHOD; meltcdat->dclo_178__DBGOUT_DOUBLE_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_178__DBGOUT_DOUBLE_METHOD.nbval = 0; /*iniobj dsym_179__DISCR_DOUBLE*/ - /*uniqueobj*/ if (!/*_._VALDATA___V236*/ meltfptr[235]) + /*uniqueobj*/ + if (!/*_._VALDATA___V236*/ meltfptr[235]) /*_._VALDATA___V236*/ meltfptr[235] = (melt_ptr_t )&meltcdat->dsym_179__DISCR_DOUBLE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_179__DISCR_DOUBLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_179__DISCR_DOUBLE", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6582,15 +7254,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_180__DISCR_DOUBLE*/ - /*_._VALSTR___V237*/ meltfptr[236] = (melt_ptr_t) &meltcdat->dstr_180__DISCR_DOUBLE; + /*_._VALSTR___V237*/ + meltfptr[236] = (melt_ptr_t) &meltcdat->dstr_180__DISCR_DOUBLE; meltcdat->dstr_180__DISCR_DOUBLE.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_180__DISCR_DOUBLE.val, "DISCR_DOUBLE", sizeof (meltcdat->dstr_180__DISCR_DOUBLE.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_180__DISCR_DOUBLE.val, "DISCR_DOUBLE", sizeof (meltcdat->dstr_180__DISCR_DOUBLE.val)-1); meltcdat->dstr_180__DISCR_DOUBLE.val[12] = (char)0 ; meltcdat->dstr_180__DISCR_DOUBLE.slen = 12 ; /*iniobj dsym_181__DISCR_CONSTANT_DOUBLE*/ - /*uniqueobj*/ if (!/*_._VALDATA___V238*/ meltfptr[237]) + /*uniqueobj*/ + if (!/*_._VALDATA___V238*/ meltfptr[237]) /*_._VALDATA___V238*/ meltfptr[237] = (melt_ptr_t )&meltcdat->dsym_181__DISCR_CONSTANT_DOUBLE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_181__DISCR_CONSTANT_DOUBLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_181__DISCR_CONSTANT_DOUBLE", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6600,27 +7275,32 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_182__DISCR_CONSTANT_DOUBLE*/ - /*_._VALSTR___V239*/ meltfptr[238] = (melt_ptr_t) &meltcdat->dstr_182__DISCR_CONSTANT_DOUBLE; + /*_._VALSTR___V239*/ + meltfptr[238] = (melt_ptr_t) &meltcdat->dstr_182__DISCR_CONSTANT_DOUBLE; meltcdat->dstr_182__DISCR_CONSTANT_DOUBLE.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_182__DISCR_CONSTANT_DOUBLE.val, "DISCR_CONSTANT_DOUBLE", sizeof (meltcdat->dstr_182__DISCR_CONSTANT_DOUBLE.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_182__DISCR_CONSTANT_DOUBLE.val, "DISCR_CONSTANT_DOUBLE", sizeof (meltcdat->dstr_182__DISCR_CONSTANT_DOUBLE.val)-1); meltcdat->dstr_182__DISCR_CONSTANT_DOUBLE.val[21] = (char)0 ; meltcdat->dstr_182__DISCR_CONSTANT_DOUBLE.slen = 21 ; /*inirout drout_183__DBGOUT_MIXINT_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V240*/ meltfptr[239] = (melt_ptr_t) &meltcdat->drout_183__DBGOUT_MIXINT_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V240*/ + meltfptr[239] = (melt_ptr_t) &meltcdat->drout_183__DBGOUT_MIXINT_METHOD; meltcdat->drout_183__DBGOUT_MIXINT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_183__DBGOUT_MIXINT_METHOD.routdescr, "DBGOUT_MIXINT_METHOD @warmelt-debug.melt:717", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_183__DBGOUT_MIXINT_METHOD.nbval = 5; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_183__DBGOUT_MIXINT_METHOD, meltrout_17_WARMELTmiDEBUG_DBGOUT_MIXINT_METHOD); /*iniclos dclo_184__DBGOUT_MIXINT_METHOD*/ - /*_._VALCLO___V241*/ meltfptr[240] = (melt_ptr_t) &meltcdat->dclo_184__DBGOUT_MIXINT_METHOD; + /*_._VALCLO___V241*/ + meltfptr[240] = (melt_ptr_t) &meltcdat->dclo_184__DBGOUT_MIXINT_METHOD; meltcdat->dclo_184__DBGOUT_MIXINT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_184__DBGOUT_MIXINT_METHOD.nbval = 0; /*iniobj dsym_185__DISCR_MIXED_INTEGER*/ - /*uniqueobj*/ if (!/*_._VALDATA___V242*/ meltfptr[241]) + /*uniqueobj*/ + if (!/*_._VALDATA___V242*/ meltfptr[241]) /*_._VALDATA___V242*/ meltfptr[241] = (melt_ptr_t )&meltcdat->dsym_185__DISCR_MIXED_INTEGER; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_185__DISCR_MIXED_INTEGER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_185__DISCR_MIXED_INTEGER", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6630,27 +7310,32 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_186__DISCR_MIXED_INTEGER*/ - /*_._VALSTR___V243*/ meltfptr[242] = (melt_ptr_t) &meltcdat->dstr_186__DISCR_MIXED_INTEGER; + /*_._VALSTR___V243*/ + meltfptr[242] = (melt_ptr_t) &meltcdat->dstr_186__DISCR_MIXED_INTEGER; meltcdat->dstr_186__DISCR_MIXED_INTEGER.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_186__DISCR_MIXED_INTEGER.val, "DISCR_MIXED_INTEGER", sizeof (meltcdat->dstr_186__DISCR_MIXED_INTEGER.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_186__DISCR_MIXED_INTEGER.val, "DISCR_MIXED_INTEGER", sizeof (meltcdat->dstr_186__DISCR_MIXED_INTEGER.val)-1); meltcdat->dstr_186__DISCR_MIXED_INTEGER.val[19] = (char)0 ; meltcdat->dstr_186__DISCR_MIXED_INTEGER.slen = 19 ; /*inirout drout_187__DBGOUT_MIXLOC_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V244*/ meltfptr[243] = (melt_ptr_t) &meltcdat->drout_187__DBGOUT_MIXLOC_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V244*/ + meltfptr[243] = (melt_ptr_t) &meltcdat->drout_187__DBGOUT_MIXLOC_METHOD; meltcdat->drout_187__DBGOUT_MIXLOC_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_187__DBGOUT_MIXLOC_METHOD.routdescr, "DBGOUT_MIXLOC_METHOD @warmelt-debug.melt:746", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_187__DBGOUT_MIXLOC_METHOD.nbval = 3; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_187__DBGOUT_MIXLOC_METHOD, meltrout_18_WARMELTmiDEBUG_DBGOUT_MIXLOC_METHOD); /*iniclos dclo_188__DBGOUT_MIXLOC_METHOD*/ - /*_._VALCLO___V245*/ meltfptr[244] = (melt_ptr_t) &meltcdat->dclo_188__DBGOUT_MIXLOC_METHOD; + /*_._VALCLO___V245*/ + meltfptr[244] = (melt_ptr_t) &meltcdat->dclo_188__DBGOUT_MIXLOC_METHOD; meltcdat->dclo_188__DBGOUT_MIXLOC_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_188__DBGOUT_MIXLOC_METHOD.nbval = 0; /*iniobj dsym_189__DISCR_MIXED_LOCATION*/ - /*uniqueobj*/ if (!/*_._VALDATA___V246*/ meltfptr[245]) + /*uniqueobj*/ + if (!/*_._VALDATA___V246*/ meltfptr[245]) /*_._VALDATA___V246*/ meltfptr[245] = (melt_ptr_t )&meltcdat->dsym_189__DISCR_MIXED_LOCATION; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_189__DISCR_MIXED_LOCATION", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_189__DISCR_MIXED_LOCATION", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6660,27 +7345,32 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_190__DISCR_MIXED_LOCATION*/ - /*_._VALSTR___V247*/ meltfptr[246] = (melt_ptr_t) &meltcdat->dstr_190__DISCR_MIXED_LOCATION; + /*_._VALSTR___V247*/ + meltfptr[246] = (melt_ptr_t) &meltcdat->dstr_190__DISCR_MIXED_LOCATION; meltcdat->dstr_190__DISCR_MIXED_LOCATION.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_190__DISCR_MIXED_LOCATION.val, "DISCR_MIXED_LOCATION", sizeof (meltcdat->dstr_190__DISCR_MIXED_LOCATION.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_190__DISCR_MIXED_LOCATION.val, "DISCR_MIXED_LOCATION", sizeof (meltcdat->dstr_190__DISCR_MIXED_LOCATION.val)-1); meltcdat->dstr_190__DISCR_MIXED_LOCATION.val[20] = (char)0 ; meltcdat->dstr_190__DISCR_MIXED_LOCATION.slen = 20 ; /*inirout drout_191__DBGOUT_MIXBIGINT_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V248*/ meltfptr[247] = (melt_ptr_t) &meltcdat->drout_191__DBGOUT_MIXBIGINT_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V248*/ + meltfptr[247] = (melt_ptr_t) &meltcdat->drout_191__DBGOUT_MIXBIGINT_METHOD; meltcdat->drout_191__DBGOUT_MIXBIGINT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_191__DBGOUT_MIXBIGINT_METHOD.routdescr, "DBGOUT_MIXBIGINT_METHOD @warmelt-debug.melt:776", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_191__DBGOUT_MIXBIGINT_METHOD.nbval = 3; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_191__DBGOUT_MIXBIGINT_METHOD, meltrout_19_WARMELTmiDEBUG_DBGOUT_MIXBIGINT_METHOD); /*iniclos dclo_192__DBGOUT_MIXBIGINT_METHOD*/ - /*_._VALCLO___V249*/ meltfptr[248] = (melt_ptr_t) &meltcdat->dclo_192__DBGOUT_MIXBIGINT_METHOD; + /*_._VALCLO___V249*/ + meltfptr[248] = (melt_ptr_t) &meltcdat->dclo_192__DBGOUT_MIXBIGINT_METHOD; meltcdat->dclo_192__DBGOUT_MIXBIGINT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_192__DBGOUT_MIXBIGINT_METHOD.nbval = 0; /*iniobj dsym_193__DISCR_MIXED_BIGINT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V250*/ meltfptr[249]) + /*uniqueobj*/ + if (!/*_._VALDATA___V250*/ meltfptr[249]) /*_._VALDATA___V250*/ meltfptr[249] = (melt_ptr_t )&meltcdat->dsym_193__DISCR_MIXED_BIGINT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_193__DISCR_MIXED_BIGINT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_193__DISCR_MIXED_BIGINT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6690,27 +7380,32 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_194__DISCR_MIXED_BIGINT*/ - /*_._VALSTR___V251*/ meltfptr[250] = (melt_ptr_t) &meltcdat->dstr_194__DISCR_MIXED_BIGINT; + /*_._VALSTR___V251*/ + meltfptr[250] = (melt_ptr_t) &meltcdat->dstr_194__DISCR_MIXED_BIGINT; meltcdat->dstr_194__DISCR_MIXED_BIGINT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_194__DISCR_MIXED_BIGINT.val, "DISCR_MIXED_BIGINT", sizeof (meltcdat->dstr_194__DISCR_MIXED_BIGINT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_194__DISCR_MIXED_BIGINT.val, "DISCR_MIXED_BIGINT", sizeof (meltcdat->dstr_194__DISCR_MIXED_BIGINT.val)-1); meltcdat->dstr_194__DISCR_MIXED_BIGINT.val[18] = (char)0 ; meltcdat->dstr_194__DISCR_MIXED_BIGINT.slen = 18 ; /*inirout drout_195__DBGOUT_MULTIPLE_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V252*/ meltfptr[251] = (melt_ptr_t) &meltcdat->drout_195__DBGOUT_MULTIPLE_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V252*/ + meltfptr[251] = (melt_ptr_t) &meltcdat->drout_195__DBGOUT_MULTIPLE_METHOD; meltcdat->drout_195__DBGOUT_MULTIPLE_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_195__DBGOUT_MULTIPLE_METHOD.routdescr, "DBGOUT_MULTIPLE_METHOD @warmelt-debug.melt:799", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_195__DBGOUT_MULTIPLE_METHOD.nbval = 4; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_195__DBGOUT_MULTIPLE_METHOD, meltrout_20_WARMELTmiDEBUG_DBGOUT_MULTIPLE_METHOD); /*iniclos dclo_196__DBGOUT_MULTIPLE_METHOD*/ - /*_._VALCLO___V253*/ meltfptr[252] = (melt_ptr_t) &meltcdat->dclo_196__DBGOUT_MULTIPLE_METHOD; + /*_._VALCLO___V253*/ + meltfptr[252] = (melt_ptr_t) &meltcdat->dclo_196__DBGOUT_MULTIPLE_METHOD; meltcdat->dclo_196__DBGOUT_MULTIPLE_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_196__DBGOUT_MULTIPLE_METHOD.nbval = 0; /*iniobj dsym_197__DISCR_MULTIPLE*/ - /*uniqueobj*/ if (!/*_._VALDATA___V254*/ meltfptr[253]) + /*uniqueobj*/ + if (!/*_._VALDATA___V254*/ meltfptr[253]) /*_._VALDATA___V254*/ meltfptr[253] = (melt_ptr_t )&meltcdat->dsym_197__DISCR_MULTIPLE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_197__DISCR_MULTIPLE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_197__DISCR_MULTIPLE", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6720,27 +7415,32 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_198__DISCR_MULTIPLE*/ - /*_._VALSTR___V255*/ meltfptr[254] = (melt_ptr_t) &meltcdat->dstr_198__DISCR_MULTIPLE; + /*_._VALSTR___V255*/ + meltfptr[254] = (melt_ptr_t) &meltcdat->dstr_198__DISCR_MULTIPLE; meltcdat->dstr_198__DISCR_MULTIPLE.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_198__DISCR_MULTIPLE.val, "DISCR_MULTIPLE", sizeof (meltcdat->dstr_198__DISCR_MULTIPLE.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_198__DISCR_MULTIPLE.val, "DISCR_MULTIPLE", sizeof (meltcdat->dstr_198__DISCR_MULTIPLE.val)-1); meltcdat->dstr_198__DISCR_MULTIPLE.val[14] = (char)0 ; meltcdat->dstr_198__DISCR_MULTIPLE.slen = 14 ; /*inirout drout_199__DBGOUT_ROUTINE_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V256*/ meltfptr[255] = (melt_ptr_t) &meltcdat->drout_199__DBGOUT_ROUTINE_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V256*/ + meltfptr[255] = (melt_ptr_t) &meltcdat->drout_199__DBGOUT_ROUTINE_METHOD; meltcdat->drout_199__DBGOUT_ROUTINE_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_199__DBGOUT_ROUTINE_METHOD.routdescr, "DBGOUT_ROUTINE_METHOD @warmelt-debug.melt:834", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_199__DBGOUT_ROUTINE_METHOD.nbval = 7; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_199__DBGOUT_ROUTINE_METHOD, meltrout_21_WARMELTmiDEBUG_DBGOUT_ROUTINE_METHOD); /*iniclos dclo_200__DBGOUT_ROUTINE_METHOD*/ - /*_._VALCLO___V258*/ meltfptr[257] = (melt_ptr_t) &meltcdat->dclo_200__DBGOUT_ROUTINE_METHOD; + /*_._VALCLO___V258*/ + meltfptr[257] = (melt_ptr_t) &meltcdat->dclo_200__DBGOUT_ROUTINE_METHOD; meltcdat->dclo_200__DBGOUT_ROUTINE_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_200__DBGOUT_ROUTINE_METHOD.nbval = 0; /*iniobj dsym_201__DISCR_ROUTINE*/ - /*uniqueobj*/ if (!/*_._VALDATA___V259*/ meltfptr[258]) + /*uniqueobj*/ + if (!/*_._VALDATA___V259*/ meltfptr[258]) /*_._VALDATA___V259*/ meltfptr[258] = (melt_ptr_t )&meltcdat->dsym_201__DISCR_ROUTINE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_201__DISCR_ROUTINE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_201__DISCR_ROUTINE", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6750,15 +7450,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_202__DISCR_ROUTINE*/ - /*_._VALSTR___V260*/ meltfptr[259] = (melt_ptr_t) &meltcdat->dstr_202__DISCR_ROUTINE; + /*_._VALSTR___V260*/ + meltfptr[259] = (melt_ptr_t) &meltcdat->dstr_202__DISCR_ROUTINE; meltcdat->dstr_202__DISCR_ROUTINE.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_202__DISCR_ROUTINE.val, "DISCR_ROUTINE", sizeof (meltcdat->dstr_202__DISCR_ROUTINE.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_202__DISCR_ROUTINE.val, "DISCR_ROUTINE", sizeof (meltcdat->dstr_202__DISCR_ROUTINE.val)-1); meltcdat->dstr_202__DISCR_ROUTINE.val[13] = (char)0 ; meltcdat->dstr_202__DISCR_ROUTINE.slen = 13 ; /*iniobj dsym_203__ROUTINE_EVERY*/ - /*uniqueobj*/ if (!/*_._VALDATA___V261*/ meltfptr[260]) + /*uniqueobj*/ + if (!/*_._VALDATA___V261*/ meltfptr[260]) /*_._VALDATA___V261*/ meltfptr[260] = (melt_ptr_t )&meltcdat->dsym_203__ROUTINE_EVERY; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_203__ROUTINE_EVERY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_203__ROUTINE_EVERY", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6768,34 +7471,40 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_204__ROUTINE_EVERY*/ - /*_._VALSTR___V262*/ meltfptr[261] = (melt_ptr_t) &meltcdat->dstr_204__ROUTINE_EVERY; + /*_._VALSTR___V262*/ + meltfptr[261] = (melt_ptr_t) &meltcdat->dstr_204__ROUTINE_EVERY; meltcdat->dstr_204__ROUTINE_EVERY.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_204__ROUTINE_EVERY.val, "ROUTINE_EVERY", sizeof (meltcdat->dstr_204__ROUTINE_EVERY.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_204__ROUTINE_EVERY.val, "ROUTINE_EVERY", sizeof (meltcdat->dstr_204__ROUTINE_EVERY.val)-1); meltcdat->dstr_204__ROUTINE_EVERY.val[13] = (char)0 ; meltcdat->dstr_204__ROUTINE_EVERY.slen = 13 ; /*inirout drout_205__LAMBDA_*/ - /*iniroutlocvar*/ /*_._VALROUT___V257*/ meltfptr[256] = (melt_ptr_t) &meltcdat->drout_205__LAMBDA_; + /*iniroutlocvar*/ /*_._VALROUT___V257*/ + meltfptr[256] = (melt_ptr_t) &meltcdat->drout_205__LAMBDA_; meltcdat->drout_205__LAMBDA_.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_205__LAMBDA_.routdescr, "LAMBDA_ @warmelt-debug.melt:850", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_205__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_205__LAMBDA_, meltrout_22_WARMELTmiDEBUG_LAMBDA_cl1); /*inirout drout_206__DBGOUT_HOOK_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V263*/ meltfptr[262] = (melt_ptr_t) &meltcdat->drout_206__DBGOUT_HOOK_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V263*/ + meltfptr[262] = (melt_ptr_t) &meltcdat->drout_206__DBGOUT_HOOK_METHOD; meltcdat->drout_206__DBGOUT_HOOK_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_206__DBGOUT_HOOK_METHOD.routdescr, "DBGOUT_HOOK_METHOD @warmelt-debug.melt:862", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_206__DBGOUT_HOOK_METHOD.nbval = 9; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_206__DBGOUT_HOOK_METHOD, meltrout_23_WARMELTmiDEBUG_DBGOUT_HOOK_METHOD); /*iniclos dclo_207__DBGOUT_HOOK_METHOD*/ - /*_._VALCLO___V265*/ meltfptr[264] = (melt_ptr_t) &meltcdat->dclo_207__DBGOUT_HOOK_METHOD; + /*_._VALCLO___V265*/ + meltfptr[264] = (melt_ptr_t) &meltcdat->dclo_207__DBGOUT_HOOK_METHOD; meltcdat->dclo_207__DBGOUT_HOOK_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_207__DBGOUT_HOOK_METHOD.nbval = 0; /*iniobj dsym_208__HOOK_EVERY*/ - /*uniqueobj*/ if (!/*_._VALDATA___V266*/ meltfptr[265]) + /*uniqueobj*/ + if (!/*_._VALDATA___V266*/ meltfptr[265]) /*_._VALDATA___V266*/ meltfptr[265] = (melt_ptr_t )&meltcdat->dsym_208__HOOK_EVERY; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_208__HOOK_EVERY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_208__HOOK_EVERY", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6805,14 +7514,17 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_209__HOOK_EVERY*/ - /*_._VALSTR___V267*/ meltfptr[266] = (melt_ptr_t) &meltcdat->dstr_209__HOOK_EVERY; + /*_._VALSTR___V267*/ + meltfptr[266] = (melt_ptr_t) &meltcdat->dstr_209__HOOK_EVERY; meltcdat->dstr_209__HOOK_EVERY.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_209__HOOK_EVERY.val, "HOOK_EVERY", sizeof (meltcdat->dstr_209__HOOK_EVERY.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_209__HOOK_EVERY.val, "HOOK_EVERY", sizeof (meltcdat->dstr_209__HOOK_EVERY.val)-1); meltcdat->dstr_209__HOOK_EVERY.val[10] = (char)0 ; meltcdat->dstr_209__HOOK_EVERY.slen = 10 ; /*inirout drout_210__LAMBDA_*/ - /*iniroutlocvar*/ /*_._VALROUT___V264*/ meltfptr[263] = (melt_ptr_t) &meltcdat->drout_210__LAMBDA_; + /*iniroutlocvar*/ /*_._VALROUT___V264*/ + meltfptr[263] = (melt_ptr_t) &meltcdat->drout_210__LAMBDA_; meltcdat->drout_210__LAMBDA_.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_210__LAMBDA_.routdescr, "LAMBDA_ @warmelt-debug.melt:877", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_210__LAMBDA_.nbval = 2; @@ -6820,7 +7532,8 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*iniobj dsym_211__DISCR_HOOK*/ - /*uniqueobj*/ if (!/*_._VALDATA___V268*/ meltfptr[267]) + /*uniqueobj*/ + if (!/*_._VALDATA___V268*/ meltfptr[267]) /*_._VALDATA___V268*/ meltfptr[267] = (melt_ptr_t )&meltcdat->dsym_211__DISCR_HOOK; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_211__DISCR_HOOK", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_211__DISCR_HOOK", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6830,39 +7543,46 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_212__DISCR_HOOK*/ - /*_._VALSTR___V269*/ meltfptr[268] = (melt_ptr_t) &meltcdat->dstr_212__DISCR_HOOK; + /*_._VALSTR___V269*/ + meltfptr[268] = (melt_ptr_t) &meltcdat->dstr_212__DISCR_HOOK; meltcdat->dstr_212__DISCR_HOOK.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_212__DISCR_HOOK.val, "DISCR_HOOK", sizeof (meltcdat->dstr_212__DISCR_HOOK.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_212__DISCR_HOOK.val, "DISCR_HOOK", sizeof (meltcdat->dstr_212__DISCR_HOOK.val)-1); meltcdat->dstr_212__DISCR_HOOK.val[10] = (char)0 ; meltcdat->dstr_212__DISCR_HOOK.slen = 10 ; /*inirout drout_213__DBGOUT_CLOSURE_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V270*/ meltfptr[269] = (melt_ptr_t) &meltcdat->drout_213__DBGOUT_CLOSURE_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V270*/ + meltfptr[269] = (melt_ptr_t) &meltcdat->drout_213__DBGOUT_CLOSURE_METHOD; meltcdat->drout_213__DBGOUT_CLOSURE_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_213__DBGOUT_CLOSURE_METHOD.routdescr, "DBGOUT_CLOSURE_METHOD @warmelt-debug.melt:895", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_213__DBGOUT_CLOSURE_METHOD.nbval = 5; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_213__DBGOUT_CLOSURE_METHOD, meltrout_25_WARMELTmiDEBUG_DBGOUT_CLOSURE_METHOD); /*iniclos dclo_214__DBGOUT_CLOSURE_METHOD*/ - /*_._VALCLO___V271*/ meltfptr[270] = (melt_ptr_t) &meltcdat->dclo_214__DBGOUT_CLOSURE_METHOD; + /*_._VALCLO___V271*/ + meltfptr[270] = (melt_ptr_t) &meltcdat->dclo_214__DBGOUT_CLOSURE_METHOD; meltcdat->dclo_214__DBGOUT_CLOSURE_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_214__DBGOUT_CLOSURE_METHOD.nbval = 0; /*inirout drout_215__DBGOUT_LIST_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V272*/ meltfptr[271] = (melt_ptr_t) &meltcdat->drout_215__DBGOUT_LIST_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V272*/ + meltfptr[271] = (melt_ptr_t) &meltcdat->drout_215__DBGOUT_LIST_METHOD; meltcdat->drout_215__DBGOUT_LIST_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_215__DBGOUT_LIST_METHOD.routdescr, "DBGOUT_LIST_METHOD @warmelt-debug.melt:942", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_215__DBGOUT_LIST_METHOD.nbval = 5; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_215__DBGOUT_LIST_METHOD, meltrout_26_WARMELTmiDEBUG_DBGOUT_LIST_METHOD); /*iniclos dclo_216__DBGOUT_LIST_METHOD*/ - /*_._VALCLO___V273*/ meltfptr[272] = (melt_ptr_t) &meltcdat->dclo_216__DBGOUT_LIST_METHOD; + /*_._VALCLO___V273*/ + meltfptr[272] = (melt_ptr_t) &meltcdat->dclo_216__DBGOUT_LIST_METHOD; meltcdat->dclo_216__DBGOUT_LIST_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_216__DBGOUT_LIST_METHOD.nbval = 0; /*iniobj dsym_217__DISCR_LIST*/ - /*uniqueobj*/ if (!/*_._VALDATA___V274*/ meltfptr[273]) + /*uniqueobj*/ + if (!/*_._VALDATA___V274*/ meltfptr[273]) /*_._VALDATA___V274*/ meltfptr[273] = (melt_ptr_t )&meltcdat->dsym_217__DISCR_LIST; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_217__DISCR_LIST", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_217__DISCR_LIST", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6872,27 +7592,32 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_218__DISCR_LIST*/ - /*_._VALSTR___V275*/ meltfptr[274] = (melt_ptr_t) &meltcdat->dstr_218__DISCR_LIST; + /*_._VALSTR___V275*/ + meltfptr[274] = (melt_ptr_t) &meltcdat->dstr_218__DISCR_LIST; meltcdat->dstr_218__DISCR_LIST.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_218__DISCR_LIST.val, "DISCR_LIST", sizeof (meltcdat->dstr_218__DISCR_LIST.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_218__DISCR_LIST.val, "DISCR_LIST", sizeof (meltcdat->dstr_218__DISCR_LIST.val)-1); meltcdat->dstr_218__DISCR_LIST.val[10] = (char)0 ; meltcdat->dstr_218__DISCR_LIST.slen = 10 ; /*inirout drout_219__DBGOUT_PAIR_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V276*/ meltfptr[275] = (melt_ptr_t) &meltcdat->drout_219__DBGOUT_PAIR_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V276*/ + meltfptr[275] = (melt_ptr_t) &meltcdat->drout_219__DBGOUT_PAIR_METHOD; meltcdat->drout_219__DBGOUT_PAIR_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_219__DBGOUT_PAIR_METHOD.routdescr, "DBGOUT_PAIR_METHOD @warmelt-debug.melt:989", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_219__DBGOUT_PAIR_METHOD.nbval = 5; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_219__DBGOUT_PAIR_METHOD, meltrout_27_WARMELTmiDEBUG_DBGOUT_PAIR_METHOD); /*iniclos dclo_220__DBGOUT_PAIR_METHOD*/ - /*_._VALCLO___V277*/ meltfptr[276] = (melt_ptr_t) &meltcdat->dclo_220__DBGOUT_PAIR_METHOD; + /*_._VALCLO___V277*/ + meltfptr[276] = (melt_ptr_t) &meltcdat->dclo_220__DBGOUT_PAIR_METHOD; meltcdat->dclo_220__DBGOUT_PAIR_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_220__DBGOUT_PAIR_METHOD.nbval = 0; /*iniobj dsym_221__DISCR_PAIR*/ - /*uniqueobj*/ if (!/*_._VALDATA___V278*/ meltfptr[277]) + /*uniqueobj*/ + if (!/*_._VALDATA___V278*/ meltfptr[277]) /*_._VALDATA___V278*/ meltfptr[277] = (melt_ptr_t )&meltcdat->dsym_221__DISCR_PAIR; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_221__DISCR_PAIR", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_221__DISCR_PAIR", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6902,27 +7627,32 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_222__DISCR_PAIR*/ - /*_._VALSTR___V279*/ meltfptr[278] = (melt_ptr_t) &meltcdat->dstr_222__DISCR_PAIR; + /*_._VALSTR___V279*/ + meltfptr[278] = (melt_ptr_t) &meltcdat->dstr_222__DISCR_PAIR; meltcdat->dstr_222__DISCR_PAIR.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_222__DISCR_PAIR.val, "DISCR_PAIR", sizeof (meltcdat->dstr_222__DISCR_PAIR.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_222__DISCR_PAIR.val, "DISCR_PAIR", sizeof (meltcdat->dstr_222__DISCR_PAIR.val)-1); meltcdat->dstr_222__DISCR_PAIR.val[10] = (char)0 ; meltcdat->dstr_222__DISCR_PAIR.slen = 10 ; /*inirout drout_223__DBGOUT_MAPOBJECT_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V280*/ meltfptr[279] = (melt_ptr_t) &meltcdat->drout_223__DBGOUT_MAPOBJECT_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V280*/ + meltfptr[279] = (melt_ptr_t) &meltcdat->drout_223__DBGOUT_MAPOBJECT_METHOD; meltcdat->drout_223__DBGOUT_MAPOBJECT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_223__DBGOUT_MAPOBJECT_METHOD.routdescr, "DBGOUT_MAPOBJECT_METHOD @warmelt-debug.melt:1014", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_223__DBGOUT_MAPOBJECT_METHOD.nbval = 18; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_223__DBGOUT_MAPOBJECT_METHOD, meltrout_28_WARMELTmiDEBUG_DBGOUT_MAPOBJECT_METHOD); /*iniclos dclo_224__DBGOUT_MAPOBJECT_METHOD*/ - /*_._VALCLO___V287*/ meltfptr[286] = (melt_ptr_t) &meltcdat->dclo_224__DBGOUT_MAPOBJECT_METHOD; + /*_._VALCLO___V287*/ + meltfptr[286] = (melt_ptr_t) &meltcdat->dclo_224__DBGOUT_MAPOBJECT_METHOD; meltcdat->dclo_224__DBGOUT_MAPOBJECT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_224__DBGOUT_MAPOBJECT_METHOD.nbval = 0; /*iniobj dsym_225__MAPOBJECT_EVERY*/ - /*uniqueobj*/ if (!/*_._VALDATA___V288*/ meltfptr[287]) + /*uniqueobj*/ + if (!/*_._VALDATA___V288*/ meltfptr[287]) /*_._VALDATA___V288*/ meltfptr[287] = (melt_ptr_t )&meltcdat->dsym_225__MAPOBJECT_EVERY; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_225__MAPOBJECT_EVERY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_225__MAPOBJECT_EVERY", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6932,14 +7662,17 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_226__MAPOBJECT_EVERY*/ - /*_._VALSTR___V289*/ meltfptr[288] = (melt_ptr_t) &meltcdat->dstr_226__MAPOBJECT_EVERY; + /*_._VALSTR___V289*/ + meltfptr[288] = (melt_ptr_t) &meltcdat->dstr_226__MAPOBJECT_EVERY; meltcdat->dstr_226__MAPOBJECT_EVERY.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_226__MAPOBJECT_EVERY.val, "MAPOBJECT_EVERY", sizeof (meltcdat->dstr_226__MAPOBJECT_EVERY.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_226__MAPOBJECT_EVERY.val, "MAPOBJECT_EVERY", sizeof (meltcdat->dstr_226__MAPOBJECT_EVERY.val)-1); meltcdat->dstr_226__MAPOBJECT_EVERY.val[15] = (char)0 ; meltcdat->dstr_226__MAPOBJECT_EVERY.slen = 15 ; /*inirout drout_227__LAMBDA_*/ - /*iniroutlocvar*/ /*_._VALROUT___V281*/ meltfptr[280] = (melt_ptr_t) &meltcdat->drout_227__LAMBDA_; + /*iniroutlocvar*/ /*_._VALROUT___V281*/ + meltfptr[280] = (melt_ptr_t) &meltcdat->drout_227__LAMBDA_; meltcdat->drout_227__LAMBDA_.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_227__LAMBDA_.routdescr, "LAMBDA_ @warmelt-debug.melt:1054", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_227__LAMBDA_.nbval = 1; @@ -6947,7 +7680,8 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*iniobj dsym_228__MULTIPLE_SORT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V290*/ meltfptr[289]) + /*uniqueobj*/ + if (!/*_._VALDATA___V290*/ meltfptr[289]) /*_._VALDATA___V290*/ meltfptr[289] = (melt_ptr_t )&meltcdat->dsym_228__MULTIPLE_SORT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_228__MULTIPLE_SORT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_228__MULTIPLE_SORT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6957,14 +7691,17 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_229__MULTIPLE_SORT*/ - /*_._VALSTR___V291*/ meltfptr[290] = (melt_ptr_t) &meltcdat->dstr_229__MULTIPLE_SORT; + /*_._VALSTR___V291*/ + meltfptr[290] = (melt_ptr_t) &meltcdat->dstr_229__MULTIPLE_SORT; meltcdat->dstr_229__MULTIPLE_SORT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_229__MULTIPLE_SORT.val, "MULTIPLE_SORT", sizeof (meltcdat->dstr_229__MULTIPLE_SORT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_229__MULTIPLE_SORT.val, "MULTIPLE_SORT", sizeof (meltcdat->dstr_229__MULTIPLE_SORT.val)-1); meltcdat->dstr_229__MULTIPLE_SORT.val[13] = (char)0 ; meltcdat->dstr_229__MULTIPLE_SORT.slen = 13 ; /*inirout drout_230__LAMBDA_*/ - /*iniroutlocvar*/ /*_._VALROUT___V282*/ meltfptr[281] = (melt_ptr_t) &meltcdat->drout_230__LAMBDA_; + /*iniroutlocvar*/ /*_._VALROUT___V282*/ + meltfptr[281] = (melt_ptr_t) &meltcdat->drout_230__LAMBDA_; meltcdat->drout_230__LAMBDA_.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_230__LAMBDA_.routdescr, "LAMBDA_ @warmelt-debug.melt:1067", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_230__LAMBDA_.nbval = 4; @@ -6972,7 +7709,8 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*iniobj dsym_231__COMPARE_OBJ_RANKED*/ - /*uniqueobj*/ if (!/*_._VALDATA___V292*/ meltfptr[291]) + /*uniqueobj*/ + if (!/*_._VALDATA___V292*/ meltfptr[291]) /*_._VALDATA___V292*/ meltfptr[291] = (melt_ptr_t )&meltcdat->dsym_231__COMPARE_OBJ_RANKED; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_231__COMPARE_OBJ_RANKED", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_231__COMPARE_OBJ_RANKED", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -6982,30 +7720,36 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_232__COMPARE_OBJ_RANKED*/ - /*_._VALSTR___V293*/ meltfptr[292] = (melt_ptr_t) &meltcdat->dstr_232__COMPARE_OBJ_RANKED; + /*_._VALSTR___V293*/ + meltfptr[292] = (melt_ptr_t) &meltcdat->dstr_232__COMPARE_OBJ_RANKED; meltcdat->dstr_232__COMPARE_OBJ_RANKED.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_232__COMPARE_OBJ_RANKED.val, "COMPARE_OBJ_RANKED", sizeof (meltcdat->dstr_232__COMPARE_OBJ_RANKED.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_232__COMPARE_OBJ_RANKED.val, "COMPARE_OBJ_RANKED", sizeof (meltcdat->dstr_232__COMPARE_OBJ_RANKED.val)-1); meltcdat->dstr_232__COMPARE_OBJ_RANKED.val[18] = (char)0 ; meltcdat->dstr_232__COMPARE_OBJ_RANKED.slen = 18 ; /*iniboxint dint_233__*/ - /*_._VALBXINT___V283*/ meltfptr[282] = (melt_ptr_t) &meltcdat->dint_233__; + /*_._VALBXINT___V283*/ + meltfptr[282] = (melt_ptr_t) &meltcdat->dint_233__; meltcdat->dint_233__.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CONSTANT_INTEGER)))); meltcdat->dint_233__.val = -1; /*iniboxint dint_234__*/ - /*_._VALBXINT___V284*/ meltfptr[283] = (melt_ptr_t) &meltcdat->dint_234__; + /*_._VALBXINT___V284*/ + meltfptr[283] = (melt_ptr_t) &meltcdat->dint_234__; meltcdat->dint_234__.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CONSTANT_INTEGER)))); meltcdat->dint_234__.val = 0; /*iniboxint dint_235__*/ - /*_._VALBXINT___V285*/ meltfptr[284] = (melt_ptr_t) &meltcdat->dint_235__; + /*_._VALBXINT___V285*/ + meltfptr[284] = (melt_ptr_t) &meltcdat->dint_235__; meltcdat->dint_235__.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CONSTANT_INTEGER)))); meltcdat->dint_235__.val = 1; /*iniobj dsym_236__MULTIPLE_EVERY*/ - /*uniqueobj*/ if (!/*_._VALDATA___V294*/ meltfptr[293]) + /*uniqueobj*/ + if (!/*_._VALDATA___V294*/ meltfptr[293]) /*_._VALDATA___V294*/ meltfptr[293] = (melt_ptr_t )&meltcdat->dsym_236__MULTIPLE_EVERY; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_236__MULTIPLE_EVERY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_236__MULTIPLE_EVERY", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7015,34 +7759,40 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_237__MULTIPLE_EVERY*/ - /*_._VALSTR___V295*/ meltfptr[294] = (melt_ptr_t) &meltcdat->dstr_237__MULTIPLE_EVERY; + /*_._VALSTR___V295*/ + meltfptr[294] = (melt_ptr_t) &meltcdat->dstr_237__MULTIPLE_EVERY; meltcdat->dstr_237__MULTIPLE_EVERY.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_237__MULTIPLE_EVERY.val, "MULTIPLE_EVERY", sizeof (meltcdat->dstr_237__MULTIPLE_EVERY.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_237__MULTIPLE_EVERY.val, "MULTIPLE_EVERY", sizeof (meltcdat->dstr_237__MULTIPLE_EVERY.val)-1); meltcdat->dstr_237__MULTIPLE_EVERY.val[14] = (char)0 ; meltcdat->dstr_237__MULTIPLE_EVERY.slen = 14 ; /*inirout drout_238__LAMBDA_*/ - /*iniroutlocvar*/ /*_._VALROUT___V286*/ meltfptr[285] = (melt_ptr_t) &meltcdat->drout_238__LAMBDA_; + /*iniroutlocvar*/ /*_._VALROUT___V286*/ + meltfptr[285] = (melt_ptr_t) &meltcdat->drout_238__LAMBDA_; meltcdat->drout_238__LAMBDA_.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_238__LAMBDA_.routdescr, "LAMBDA_ @warmelt-debug.melt:1083", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_238__LAMBDA_.nbval = 3; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_238__LAMBDA_, meltrout_31_WARMELTmiDEBUG_LAMBDA_cl5); /*inirout drout_239__DBGOUT_MAPSTRING_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V296*/ meltfptr[295] = (melt_ptr_t) &meltcdat->drout_239__DBGOUT_MAPSTRING_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V296*/ + meltfptr[295] = (melt_ptr_t) &meltcdat->drout_239__DBGOUT_MAPSTRING_METHOD; meltcdat->drout_239__DBGOUT_MAPSTRING_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_239__DBGOUT_MAPSTRING_METHOD.routdescr, "DBGOUT_MAPSTRING_METHOD @warmelt-debug.melt:1108", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_239__DBGOUT_MAPSTRING_METHOD.nbval = 14; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_239__DBGOUT_MAPSTRING_METHOD, meltrout_32_WARMELTmiDEBUG_DBGOUT_MAPSTRING_METHOD); /*iniclos dclo_240__DBGOUT_MAPSTRING_METHOD*/ - /*_._VALCLO___V302*/ meltfptr[301] = (melt_ptr_t) &meltcdat->dclo_240__DBGOUT_MAPSTRING_METHOD; + /*_._VALCLO___V302*/ + meltfptr[301] = (melt_ptr_t) &meltcdat->dclo_240__DBGOUT_MAPSTRING_METHOD; meltcdat->dclo_240__DBGOUT_MAPSTRING_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_240__DBGOUT_MAPSTRING_METHOD.nbval = 0; /*iniobj dsym_241__MAPSTRING_EVERY*/ - /*uniqueobj*/ if (!/*_._VALDATA___V303*/ meltfptr[302]) + /*uniqueobj*/ + if (!/*_._VALDATA___V303*/ meltfptr[302]) /*_._VALDATA___V303*/ meltfptr[302] = (melt_ptr_t )&meltcdat->dsym_241__MAPSTRING_EVERY; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_241__MAPSTRING_EVERY", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_241__MAPSTRING_EVERY", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7052,44 +7802,52 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_242__MAPSTRING_EVERY*/ - /*_._VALSTR___V304*/ meltfptr[303] = (melt_ptr_t) &meltcdat->dstr_242__MAPSTRING_EVERY; + /*_._VALSTR___V304*/ + meltfptr[303] = (melt_ptr_t) &meltcdat->dstr_242__MAPSTRING_EVERY; meltcdat->dstr_242__MAPSTRING_EVERY.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_242__MAPSTRING_EVERY.val, "MAPSTRING_EVERY", sizeof (meltcdat->dstr_242__MAPSTRING_EVERY.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_242__MAPSTRING_EVERY.val, "MAPSTRING_EVERY", sizeof (meltcdat->dstr_242__MAPSTRING_EVERY.val)-1); meltcdat->dstr_242__MAPSTRING_EVERY.val[15] = (char)0 ; meltcdat->dstr_242__MAPSTRING_EVERY.slen = 15 ; /*inirout drout_243__LAMBDA_*/ - /*iniroutlocvar*/ /*_._VALROUT___V297*/ meltfptr[296] = (melt_ptr_t) &meltcdat->drout_243__LAMBDA_; + /*iniroutlocvar*/ /*_._VALROUT___V297*/ + meltfptr[296] = (melt_ptr_t) &meltcdat->drout_243__LAMBDA_; meltcdat->drout_243__LAMBDA_.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_243__LAMBDA_.routdescr, "LAMBDA_ @warmelt-debug.melt:1143", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_243__LAMBDA_.nbval = 1; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_243__LAMBDA_, meltrout_33_WARMELTmiDEBUG_LAMBDA_cl6); /*inirout drout_244__LAMBDA_*/ - /*iniroutlocvar*/ /*_._VALROUT___V298*/ meltfptr[297] = (melt_ptr_t) &meltcdat->drout_244__LAMBDA_; + /*iniroutlocvar*/ /*_._VALROUT___V298*/ + meltfptr[297] = (melt_ptr_t) &meltcdat->drout_244__LAMBDA_; meltcdat->drout_244__LAMBDA_.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_244__LAMBDA_.routdescr, "LAMBDA_ @warmelt-debug.melt:1155", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_244__LAMBDA_.nbval = 4; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_244__LAMBDA_, meltrout_34_WARMELTmiDEBUG_LAMBDA_cl7); /*iniboxint dint_245__*/ - /*_._VALBXINT___V299*/ meltfptr[298] = (melt_ptr_t) &meltcdat->dint_245__; + /*_._VALBXINT___V299*/ + meltfptr[298] = (melt_ptr_t) &meltcdat->dint_245__; meltcdat->dint_245__.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CONSTANT_INTEGER)))); meltcdat->dint_245__.val = -1; /*iniboxint dint_246__*/ - /*_._VALBXINT___V300*/ meltfptr[299] = (melt_ptr_t) &meltcdat->dint_246__; + /*_._VALBXINT___V300*/ + meltfptr[299] = (melt_ptr_t) &meltcdat->dint_246__; meltcdat->dint_246__.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CONSTANT_INTEGER)))); meltcdat->dint_246__.val = 0; /*iniboxint dint_247__*/ - /*_._VALBXINT___V301*/ meltfptr[300] = (melt_ptr_t) &meltcdat->dint_247__; + /*_._VALBXINT___V301*/ + meltfptr[300] = (melt_ptr_t) &meltcdat->dint_247__; meltcdat->dint_247__.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CONSTANT_INTEGER)))); meltcdat->dint_247__.val = 1; /*iniobj dsym_248__DISCR_MAP_STRINGS*/ - /*uniqueobj*/ if (!/*_._VALDATA___V305*/ meltfptr[304]) + /*uniqueobj*/ + if (!/*_._VALDATA___V305*/ meltfptr[304]) /*_._VALDATA___V305*/ meltfptr[304] = (melt_ptr_t )&meltcdat->dsym_248__DISCR_MAP_STRINGS; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_248__DISCR_MAP_STRINGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_248__DISCR_MAP_STRINGS", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7099,27 +7857,32 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_249__DISCR_MAP_STRINGS*/ - /*_._VALSTR___V306*/ meltfptr[305] = (melt_ptr_t) &meltcdat->dstr_249__DISCR_MAP_STRINGS; + /*_._VALSTR___V306*/ + meltfptr[305] = (melt_ptr_t) &meltcdat->dstr_249__DISCR_MAP_STRINGS; meltcdat->dstr_249__DISCR_MAP_STRINGS.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_249__DISCR_MAP_STRINGS.val, "DISCR_MAP_STRINGS", sizeof (meltcdat->dstr_249__DISCR_MAP_STRINGS.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_249__DISCR_MAP_STRINGS.val, "DISCR_MAP_STRINGS", sizeof (meltcdat->dstr_249__DISCR_MAP_STRINGS.val)-1); meltcdat->dstr_249__DISCR_MAP_STRINGS.val[17] = (char)0 ; meltcdat->dstr_249__DISCR_MAP_STRINGS.slen = 17 ; /*inirout drout_250__DBGOUT_BUCKETLONG_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V307*/ meltfptr[306] = (melt_ptr_t) &meltcdat->drout_250__DBGOUT_BUCKETLONG_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V307*/ + meltfptr[306] = (melt_ptr_t) &meltcdat->drout_250__DBGOUT_BUCKETLONG_METHOD; meltcdat->drout_250__DBGOUT_BUCKETLONG_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_250__DBGOUT_BUCKETLONG_METHOD.routdescr, "DBGOUT_BUCKETLONG_METHOD @warmelt-debug.melt:1191", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_250__DBGOUT_BUCKETLONG_METHOD.nbval = 6; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_250__DBGOUT_BUCKETLONG_METHOD, meltrout_35_WARMELTmiDEBUG_DBGOUT_BUCKETLONG_METHOD); /*iniclos dclo_251__DBGOUT_BUCKETLONG_METHOD*/ - /*_._VALCLO___V308*/ meltfptr[307] = (melt_ptr_t) &meltcdat->dclo_251__DBGOUT_BUCKETLONG_METHOD; + /*_._VALCLO___V308*/ + meltfptr[307] = (melt_ptr_t) &meltcdat->dclo_251__DBGOUT_BUCKETLONG_METHOD; meltcdat->dclo_251__DBGOUT_BUCKETLONG_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_251__DBGOUT_BUCKETLONG_METHOD.nbval = 0; /*iniobj dsym_252__DISCR_BUCKET_LONGS*/ - /*uniqueobj*/ if (!/*_._VALDATA___V309*/ meltfptr[308]) + /*uniqueobj*/ + if (!/*_._VALDATA___V309*/ meltfptr[308]) /*_._VALDATA___V309*/ meltfptr[308] = (melt_ptr_t )&meltcdat->dsym_252__DISCR_BUCKET_LONGS; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_252__DISCR_BUCKET_LONGS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_252__DISCR_BUCKET_LONGS", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7129,27 +7892,32 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_253__DISCR_BUCKET_LONGS*/ - /*_._VALSTR___V310*/ meltfptr[309] = (melt_ptr_t) &meltcdat->dstr_253__DISCR_BUCKET_LONGS; + /*_._VALSTR___V310*/ + meltfptr[309] = (melt_ptr_t) &meltcdat->dstr_253__DISCR_BUCKET_LONGS; meltcdat->dstr_253__DISCR_BUCKET_LONGS.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_253__DISCR_BUCKET_LONGS.val, "DISCR_BUCKET_LONGS", sizeof (meltcdat->dstr_253__DISCR_BUCKET_LONGS.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_253__DISCR_BUCKET_LONGS.val, "DISCR_BUCKET_LONGS", sizeof (meltcdat->dstr_253__DISCR_BUCKET_LONGS.val)-1); meltcdat->dstr_253__DISCR_BUCKET_LONGS.val[18] = (char)0 ; meltcdat->dstr_253__DISCR_BUCKET_LONGS.slen = 18 ; /*inirout drout_254__DBGOUT_JSONOBJECT_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V311*/ meltfptr[310] = (melt_ptr_t) &meltcdat->drout_254__DBGOUT_JSONOBJECT_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V311*/ + meltfptr[310] = (melt_ptr_t) &meltcdat->drout_254__DBGOUT_JSONOBJECT_METHOD; meltcdat->drout_254__DBGOUT_JSONOBJECT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_254__DBGOUT_JSONOBJECT_METHOD.routdescr, "DBGOUT_JSONOBJECT_METHOD @warmelt-debug.melt:1228", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_254__DBGOUT_JSONOBJECT_METHOD.nbval = 5; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_254__DBGOUT_JSONOBJECT_METHOD, meltrout_36_WARMELTmiDEBUG_DBGOUT_JSONOBJECT_METHOD); /*iniclos dclo_255__DBGOUT_JSONOBJECT_METHOD*/ - /*_._VALCLO___V312*/ meltfptr[311] = (melt_ptr_t) &meltcdat->dclo_255__DBGOUT_JSONOBJECT_METHOD; + /*_._VALCLO___V312*/ + meltfptr[311] = (melt_ptr_t) &meltcdat->dclo_255__DBGOUT_JSONOBJECT_METHOD; meltcdat->dclo_255__DBGOUT_JSONOBJECT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_255__DBGOUT_JSONOBJECT_METHOD.nbval = 0; /*iniobj dsym_256__DISCR_JSONOBJECT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V313*/ meltfptr[312]) + /*uniqueobj*/ + if (!/*_._VALDATA___V313*/ meltfptr[312]) /*_._VALDATA___V313*/ meltfptr[312] = (melt_ptr_t )&meltcdat->dsym_256__DISCR_JSONOBJECT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_256__DISCR_JSONOBJECT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_256__DISCR_JSONOBJECT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7159,39 +7927,46 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_257__DISCR_JSONOBJECT*/ - /*_._VALSTR___V314*/ meltfptr[313] = (melt_ptr_t) &meltcdat->dstr_257__DISCR_JSONOBJECT; + /*_._VALSTR___V314*/ + meltfptr[313] = (melt_ptr_t) &meltcdat->dstr_257__DISCR_JSONOBJECT; meltcdat->dstr_257__DISCR_JSONOBJECT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_257__DISCR_JSONOBJECT.val, "DISCR_JSONOBJECT", sizeof (meltcdat->dstr_257__DISCR_JSONOBJECT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_257__DISCR_JSONOBJECT.val, "DISCR_JSONOBJECT", sizeof (meltcdat->dstr_257__DISCR_JSONOBJECT.val)-1); meltcdat->dstr_257__DISCR_JSONOBJECT.val[16] = (char)0 ; meltcdat->dstr_257__DISCR_JSONOBJECT.slen = 16 ; /*inirout drout_258__DBGOUT_ANYOBJECT_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V315*/ meltfptr[314] = (melt_ptr_t) &meltcdat->drout_258__DBGOUT_ANYOBJECT_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V315*/ + meltfptr[314] = (melt_ptr_t) &meltcdat->drout_258__DBGOUT_ANYOBJECT_METHOD; meltcdat->drout_258__DBGOUT_ANYOBJECT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_258__DBGOUT_ANYOBJECT_METHOD.routdescr, "DBGOUT_ANYOBJECT_METHOD @warmelt-debug.melt:1262", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_258__DBGOUT_ANYOBJECT_METHOD.nbval = 3; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_258__DBGOUT_ANYOBJECT_METHOD, meltrout_37_WARMELTmiDEBUG_DBGOUT_ANYOBJECT_METHOD); /*iniclos dclo_259__DBGOUT_ANYOBJECT_METHOD*/ - /*_._VALCLO___V316*/ meltfptr[315] = (melt_ptr_t) &meltcdat->dclo_259__DBGOUT_ANYOBJECT_METHOD; + /*_._VALCLO___V316*/ + meltfptr[315] = (melt_ptr_t) &meltcdat->dclo_259__DBGOUT_ANYOBJECT_METHOD; meltcdat->dclo_259__DBGOUT_ANYOBJECT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_259__DBGOUT_ANYOBJECT_METHOD.nbval = 0; /*inirout drout_260__DBGOUT_ANYRECV_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V317*/ meltfptr[316] = (melt_ptr_t) &meltcdat->drout_260__DBGOUT_ANYRECV_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V317*/ + meltfptr[316] = (melt_ptr_t) &meltcdat->drout_260__DBGOUT_ANYRECV_METHOD; meltcdat->drout_260__DBGOUT_ANYRECV_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_260__DBGOUT_ANYRECV_METHOD.routdescr, "DBGOUT_ANYRECV_METHOD @warmelt-debug.melt:1287", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_260__DBGOUT_ANYRECV_METHOD.nbval = 3; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_260__DBGOUT_ANYRECV_METHOD, meltrout_38_WARMELTmiDEBUG_DBGOUT_ANYRECV_METHOD); /*iniclos dclo_261__DBGOUT_ANYRECV_METHOD*/ - /*_._VALCLO___V318*/ meltfptr[317] = (melt_ptr_t) &meltcdat->dclo_261__DBGOUT_ANYRECV_METHOD; + /*_._VALCLO___V318*/ + meltfptr[317] = (melt_ptr_t) &meltcdat->dclo_261__DBGOUT_ANYRECV_METHOD; meltcdat->dclo_261__DBGOUT_ANYRECV_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_261__DBGOUT_ANYRECV_METHOD.nbval = 0; /*iniobj dsym_262__DISCR_ANY_RECEIVER*/ - /*uniqueobj*/ if (!/*_._VALDATA___V319*/ meltfptr[318]) + /*uniqueobj*/ + if (!/*_._VALDATA___V319*/ meltfptr[318]) /*_._VALDATA___V319*/ meltfptr[318] = (melt_ptr_t )&meltcdat->dsym_262__DISCR_ANY_RECEIVER; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_262__DISCR_ANY_RECEIVER", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_262__DISCR_ANY_RECEIVER", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7201,39 +7976,46 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_263__DISCR_ANY_RECEIVER*/ - /*_._VALSTR___V320*/ meltfptr[319] = (melt_ptr_t) &meltcdat->dstr_263__DISCR_ANY_RECEIVER; + /*_._VALSTR___V320*/ + meltfptr[319] = (melt_ptr_t) &meltcdat->dstr_263__DISCR_ANY_RECEIVER; meltcdat->dstr_263__DISCR_ANY_RECEIVER.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_263__DISCR_ANY_RECEIVER.val, "DISCR_ANY_RECEIVER", sizeof (meltcdat->dstr_263__DISCR_ANY_RECEIVER.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_263__DISCR_ANY_RECEIVER.val, "DISCR_ANY_RECEIVER", sizeof (meltcdat->dstr_263__DISCR_ANY_RECEIVER.val)-1); meltcdat->dstr_263__DISCR_ANY_RECEIVER.val[18] = (char)0 ; meltcdat->dstr_263__DISCR_ANY_RECEIVER.slen = 18 ; /*inirout drout_264__DBGOUTAGAIN_ANYOBJECT_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V321*/ meltfptr[320] = (melt_ptr_t) &meltcdat->drout_264__DBGOUTAGAIN_ANYOBJECT_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V321*/ + meltfptr[320] = (melt_ptr_t) &meltcdat->drout_264__DBGOUTAGAIN_ANYOBJECT_METHOD; meltcdat->drout_264__DBGOUTAGAIN_ANYOBJECT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_264__DBGOUTAGAIN_ANYOBJECT_METHOD.routdescr, "DBGOUTAGAIN_ANYOBJECT_METHOD @warmelt-debug.melt:1298", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_264__DBGOUTAGAIN_ANYOBJECT_METHOD.nbval = 2; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_264__DBGOUTAGAIN_ANYOBJECT_METHOD, meltrout_39_WARMELTmiDEBUG_DBGOUTAGAIN_ANYOBJECT_METHOD); /*iniclos dclo_265__DBGOUTAGAIN_ANYOBJECT_METHOD*/ - /*_._VALCLO___V322*/ meltfptr[321] = (melt_ptr_t) &meltcdat->dclo_265__DBGOUTAGAIN_ANYOBJECT_METHOD; + /*_._VALCLO___V322*/ + meltfptr[321] = (melt_ptr_t) &meltcdat->dclo_265__DBGOUTAGAIN_ANYOBJECT_METHOD; meltcdat->dclo_265__DBGOUTAGAIN_ANYOBJECT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_265__DBGOUTAGAIN_ANYOBJECT_METHOD.nbval = 0; /*inirout drout_266__DBGOUT_NAMEDOBJECT_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V323*/ meltfptr[322] = (melt_ptr_t) &meltcdat->drout_266__DBGOUT_NAMEDOBJECT_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V323*/ + meltfptr[322] = (melt_ptr_t) &meltcdat->drout_266__DBGOUT_NAMEDOBJECT_METHOD; meltcdat->drout_266__DBGOUT_NAMEDOBJECT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_266__DBGOUT_NAMEDOBJECT_METHOD.routdescr, "DBGOUT_NAMEDOBJECT_METHOD @warmelt-debug.melt:1316", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_266__DBGOUT_NAMEDOBJECT_METHOD.nbval = 5; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_266__DBGOUT_NAMEDOBJECT_METHOD, meltrout_40_WARMELTmiDEBUG_DBGOUT_NAMEDOBJECT_METHOD); /*iniclos dclo_267__DBGOUT_NAMEDOBJECT_METHOD*/ - /*_._VALCLO___V324*/ meltfptr[323] = (melt_ptr_t) &meltcdat->dclo_267__DBGOUT_NAMEDOBJECT_METHOD; + /*_._VALCLO___V324*/ + meltfptr[323] = (melt_ptr_t) &meltcdat->dclo_267__DBGOUT_NAMEDOBJECT_METHOD; meltcdat->dclo_267__DBGOUT_NAMEDOBJECT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_267__DBGOUT_NAMEDOBJECT_METHOD.nbval = 0; /*iniobj dsym_268__DBGOUT_NAMEDOBJECT_METHOD*/ - /*uniqueobj*/ if (!/*_._VALDATA___V325*/ meltfptr[324]) + /*uniqueobj*/ + if (!/*_._VALDATA___V325*/ meltfptr[324]) /*_._VALDATA___V325*/ meltfptr[324] = (melt_ptr_t )&meltcdat->dsym_268__DBGOUT_NAMEDOBJECT_METHOD; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_268__DBGOUT_NAMEDOBJECT_METHOD", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_268__DBGOUT_NAMEDOBJECT_METHOD", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7243,39 +8025,46 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_269__DBGOUT_NAMEDOBJECT_METHO*/ - /*_._VALSTR___V326*/ meltfptr[325] = (melt_ptr_t) &meltcdat->dstr_269__DBGOUT_NAMEDOBJECT_METHO; + /*_._VALSTR___V326*/ + meltfptr[325] = (melt_ptr_t) &meltcdat->dstr_269__DBGOUT_NAMEDOBJECT_METHO; meltcdat->dstr_269__DBGOUT_NAMEDOBJECT_METHO.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_269__DBGOUT_NAMEDOBJECT_METHO.val, "DBGOUT_NAMEDOBJECT_METHOD", sizeof (meltcdat->dstr_269__DBGOUT_NAMEDOBJECT_METHO.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_269__DBGOUT_NAMEDOBJECT_METHO.val, "DBGOUT_NAMEDOBJECT_METHOD", sizeof (meltcdat->dstr_269__DBGOUT_NAMEDOBJECT_METHO.val)-1); meltcdat->dstr_269__DBGOUT_NAMEDOBJECT_METHO.val[25] = (char)0 ; meltcdat->dstr_269__DBGOUT_NAMEDOBJECT_METHO.slen = 25 ; /*inirout drout_270__DBGOUTAGAIN_NAMEDOBJECT_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V327*/ meltfptr[326] = (melt_ptr_t) &meltcdat->drout_270__DBGOUTAGAIN_NAMEDOBJECT_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V327*/ + meltfptr[326] = (melt_ptr_t) &meltcdat->drout_270__DBGOUTAGAIN_NAMEDOBJECT_METHOD; meltcdat->drout_270__DBGOUTAGAIN_NAMEDOBJECT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_270__DBGOUTAGAIN_NAMEDOBJECT_METHOD.routdescr, "DBGOUTAGAIN_NAMEDOBJECT_METHOD @warmelt-debug.melt:1353", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_270__DBGOUTAGAIN_NAMEDOBJECT_METHOD.nbval = 3; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_270__DBGOUTAGAIN_NAMEDOBJECT_METHOD, meltrout_41_WARMELTmiDEBUG_DBGOUTAGAIN_NAMEDOBJECT_METHOD); /*iniclos dclo_271__DBGOUTAGAIN_NAMEDOBJECT_METHOD*/ - /*_._VALCLO___V328*/ meltfptr[327] = (melt_ptr_t) &meltcdat->dclo_271__DBGOUTAGAIN_NAMEDOBJECT_METHOD; + /*_._VALCLO___V328*/ + meltfptr[327] = (melt_ptr_t) &meltcdat->dclo_271__DBGOUTAGAIN_NAMEDOBJECT_METHOD; meltcdat->dclo_271__DBGOUTAGAIN_NAMEDOBJECT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_271__DBGOUTAGAIN_NAMEDOBJECT_METHOD.nbval = 0; /*inirout drout_272__DBGOUTAGAIN_SYMBOL_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V329*/ meltfptr[328] = (melt_ptr_t) &meltcdat->drout_272__DBGOUTAGAIN_SYMBOL_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V329*/ + meltfptr[328] = (melt_ptr_t) &meltcdat->drout_272__DBGOUTAGAIN_SYMBOL_METHOD; meltcdat->drout_272__DBGOUTAGAIN_SYMBOL_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_272__DBGOUTAGAIN_SYMBOL_METHOD.routdescr, "DBGOUTAGAIN_SYMBOL_METHOD @warmelt-debug.melt:1371", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_272__DBGOUTAGAIN_SYMBOL_METHOD.nbval = 3; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_272__DBGOUTAGAIN_SYMBOL_METHOD, meltrout_42_WARMELTmiDEBUG_DBGOUTAGAIN_SYMBOL_METHOD); /*iniclos dclo_273__DBGOUTAGAIN_SYMBOL_METHOD*/ - /*_._VALCLO___V330*/ meltfptr[329] = (melt_ptr_t) &meltcdat->dclo_273__DBGOUTAGAIN_SYMBOL_METHOD; + /*_._VALCLO___V330*/ + meltfptr[329] = (melt_ptr_t) &meltcdat->dclo_273__DBGOUTAGAIN_SYMBOL_METHOD; meltcdat->dclo_273__DBGOUTAGAIN_SYMBOL_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_273__DBGOUTAGAIN_SYMBOL_METHOD.nbval = 0; /*iniobj dsym_274__CLASS_SYMBOL*/ - /*uniqueobj*/ if (!/*_._VALDATA___V331*/ meltfptr[330]) + /*uniqueobj*/ + if (!/*_._VALDATA___V331*/ meltfptr[330]) /*_._VALDATA___V331*/ meltfptr[330] = (melt_ptr_t )&meltcdat->dsym_274__CLASS_SYMBOL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_274__CLASS_SYMBOL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_274__CLASS_SYMBOL", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7285,39 +8074,46 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_275__CLASS_SYMBOL*/ - /*_._VALSTR___V332*/ meltfptr[331] = (melt_ptr_t) &meltcdat->dstr_275__CLASS_SYMBOL; + /*_._VALSTR___V332*/ + meltfptr[331] = (melt_ptr_t) &meltcdat->dstr_275__CLASS_SYMBOL; meltcdat->dstr_275__CLASS_SYMBOL.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_275__CLASS_SYMBOL.val, "CLASS_SYMBOL", sizeof (meltcdat->dstr_275__CLASS_SYMBOL.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_275__CLASS_SYMBOL.val, "CLASS_SYMBOL", sizeof (meltcdat->dstr_275__CLASS_SYMBOL.val)-1); meltcdat->dstr_275__CLASS_SYMBOL.val[12] = (char)0 ; meltcdat->dstr_275__CLASS_SYMBOL.slen = 12 ; /*inirout drout_276__DBGOUT_SYMBOL_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V333*/ meltfptr[332] = (melt_ptr_t) &meltcdat->drout_276__DBGOUT_SYMBOL_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V333*/ + meltfptr[332] = (melt_ptr_t) &meltcdat->drout_276__DBGOUT_SYMBOL_METHOD; meltcdat->drout_276__DBGOUT_SYMBOL_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_276__DBGOUT_SYMBOL_METHOD.routdescr, "DBGOUT_SYMBOL_METHOD @warmelt-debug.melt:1389", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_276__DBGOUT_SYMBOL_METHOD.nbval = 5; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_276__DBGOUT_SYMBOL_METHOD, meltrout_43_WARMELTmiDEBUG_DBGOUT_SYMBOL_METHOD); /*iniclos dclo_277__DBGOUT_SYMBOL_METHOD*/ - /*_._VALCLO___V334*/ meltfptr[333] = (melt_ptr_t) &meltcdat->dclo_277__DBGOUT_SYMBOL_METHOD; + /*_._VALCLO___V334*/ + meltfptr[333] = (melt_ptr_t) &meltcdat->dclo_277__DBGOUT_SYMBOL_METHOD; meltcdat->dclo_277__DBGOUT_SYMBOL_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_277__DBGOUT_SYMBOL_METHOD.nbval = 0; /*inirout drout_278__DBGOUT_CLASS_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V335*/ meltfptr[334] = (melt_ptr_t) &meltcdat->drout_278__DBGOUT_CLASS_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V335*/ + meltfptr[334] = (melt_ptr_t) &meltcdat->drout_278__DBGOUT_CLASS_METHOD; meltcdat->drout_278__DBGOUT_CLASS_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_278__DBGOUT_CLASS_METHOD.routdescr, "DBGOUT_CLASS_METHOD @warmelt-debug.melt:1399", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_278__DBGOUT_CLASS_METHOD.nbval = 5; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_278__DBGOUT_CLASS_METHOD, meltrout_44_WARMELTmiDEBUG_DBGOUT_CLASS_METHOD); /*iniclos dclo_279__DBGOUT_CLASS_METHOD*/ - /*_._VALCLO___V336*/ meltfptr[335] = (melt_ptr_t) &meltcdat->dclo_279__DBGOUT_CLASS_METHOD; + /*_._VALCLO___V336*/ + meltfptr[335] = (melt_ptr_t) &meltcdat->dclo_279__DBGOUT_CLASS_METHOD; meltcdat->dclo_279__DBGOUT_CLASS_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_279__DBGOUT_CLASS_METHOD.nbval = 0; /*iniobj dsym_280__CLASS_CLASS*/ - /*uniqueobj*/ if (!/*_._VALDATA___V337*/ meltfptr[336]) + /*uniqueobj*/ + if (!/*_._VALDATA___V337*/ meltfptr[336]) /*_._VALDATA___V337*/ meltfptr[336] = (melt_ptr_t )&meltcdat->dsym_280__CLASS_CLASS; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_280__CLASS_CLASS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_280__CLASS_CLASS", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7327,27 +8123,32 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_281__CLASS_CLASS*/ - /*_._VALSTR___V338*/ meltfptr[337] = (melt_ptr_t) &meltcdat->dstr_281__CLASS_CLASS; + /*_._VALSTR___V338*/ + meltfptr[337] = (melt_ptr_t) &meltcdat->dstr_281__CLASS_CLASS; meltcdat->dstr_281__CLASS_CLASS.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_281__CLASS_CLASS.val, "CLASS_CLASS", sizeof (meltcdat->dstr_281__CLASS_CLASS.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_281__CLASS_CLASS.val, "CLASS_CLASS", sizeof (meltcdat->dstr_281__CLASS_CLASS.val)-1); meltcdat->dstr_281__CLASS_CLASS.val[11] = (char)0 ; meltcdat->dstr_281__CLASS_CLASS.slen = 11 ; /*inirout drout_282__DBGOUTAGAIN_KEYWORD_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V339*/ meltfptr[338] = (melt_ptr_t) &meltcdat->drout_282__DBGOUTAGAIN_KEYWORD_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V339*/ + meltfptr[338] = (melt_ptr_t) &meltcdat->drout_282__DBGOUTAGAIN_KEYWORD_METHOD; meltcdat->drout_282__DBGOUTAGAIN_KEYWORD_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_282__DBGOUTAGAIN_KEYWORD_METHOD.routdescr, "DBGOUTAGAIN_KEYWORD_METHOD @warmelt-debug.melt:1409", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_282__DBGOUTAGAIN_KEYWORD_METHOD.nbval = 3; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_282__DBGOUTAGAIN_KEYWORD_METHOD, meltrout_45_WARMELTmiDEBUG_DBGOUTAGAIN_KEYWORD_METHOD); /*iniclos dclo_283__DBGOUTAGAIN_KEYWORD_METHOD*/ - /*_._VALCLO___V340*/ meltfptr[339] = (melt_ptr_t) &meltcdat->dclo_283__DBGOUTAGAIN_KEYWORD_METHOD; + /*_._VALCLO___V340*/ + meltfptr[339] = (melt_ptr_t) &meltcdat->dclo_283__DBGOUTAGAIN_KEYWORD_METHOD; meltcdat->dclo_283__DBGOUTAGAIN_KEYWORD_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_283__DBGOUTAGAIN_KEYWORD_METHOD.nbval = 0; /*iniobj dsym_284__CLASS_KEYWORD*/ - /*uniqueobj*/ if (!/*_._VALDATA___V341*/ meltfptr[340]) + /*uniqueobj*/ + if (!/*_._VALDATA___V341*/ meltfptr[340]) /*_._VALDATA___V341*/ meltfptr[340] = (melt_ptr_t )&meltcdat->dsym_284__CLASS_KEYWORD; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_284__CLASS_KEYWORD", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_284__CLASS_KEYWORD", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7357,39 +8158,46 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_285__CLASS_KEYWORD*/ - /*_._VALSTR___V342*/ meltfptr[341] = (melt_ptr_t) &meltcdat->dstr_285__CLASS_KEYWORD; + /*_._VALSTR___V342*/ + meltfptr[341] = (melt_ptr_t) &meltcdat->dstr_285__CLASS_KEYWORD; meltcdat->dstr_285__CLASS_KEYWORD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_285__CLASS_KEYWORD.val, "CLASS_KEYWORD", sizeof (meltcdat->dstr_285__CLASS_KEYWORD.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_285__CLASS_KEYWORD.val, "CLASS_KEYWORD", sizeof (meltcdat->dstr_285__CLASS_KEYWORD.val)-1); meltcdat->dstr_285__CLASS_KEYWORD.val[13] = (char)0 ; meltcdat->dstr_285__CLASS_KEYWORD.slen = 13 ; /*inirout drout_286__DBGOUT_KEYWORD_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V343*/ meltfptr[342] = (melt_ptr_t) &meltcdat->drout_286__DBGOUT_KEYWORD_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V343*/ + meltfptr[342] = (melt_ptr_t) &meltcdat->drout_286__DBGOUT_KEYWORD_METHOD; meltcdat->drout_286__DBGOUT_KEYWORD_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_286__DBGOUT_KEYWORD_METHOD.routdescr, "DBGOUT_KEYWORD_METHOD @warmelt-debug.melt:1422", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_286__DBGOUT_KEYWORD_METHOD.nbval = 5; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_286__DBGOUT_KEYWORD_METHOD, meltrout_46_WARMELTmiDEBUG_DBGOUT_KEYWORD_METHOD); /*iniclos dclo_287__DBGOUT_KEYWORD_METHOD*/ - /*_._VALCLO___V344*/ meltfptr[343] = (melt_ptr_t) &meltcdat->dclo_287__DBGOUT_KEYWORD_METHOD; + /*_._VALCLO___V344*/ + meltfptr[343] = (melt_ptr_t) &meltcdat->dclo_287__DBGOUT_KEYWORD_METHOD; meltcdat->dclo_287__DBGOUT_KEYWORD_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_287__DBGOUT_KEYWORD_METHOD.nbval = 0; /*inirout drout_288__DBGOUTAGAIN_CLONED_SYMBOL_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V345*/ meltfptr[344] = (melt_ptr_t) &meltcdat->drout_288__DBGOUTAGAIN_CLONED_SYMBOL_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V345*/ + meltfptr[344] = (melt_ptr_t) &meltcdat->drout_288__DBGOUTAGAIN_CLONED_SYMBOL_METHOD; meltcdat->drout_288__DBGOUTAGAIN_CLONED_SYMBOL_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_288__DBGOUTAGAIN_CLONED_SYMBOL_METHOD.routdescr, "DBGOUTAGAIN_CLONED_SYMBOL_METHOD @warmelt-debug.melt:1432", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_288__DBGOUTAGAIN_CLONED_SYMBOL_METHOD.nbval = 0; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_288__DBGOUTAGAIN_CLONED_SYMBOL_METHOD, meltrout_47_WARMELTmiDEBUG_DBGOUTAGAIN_CLONED_SYMBOL_METHOD); /*iniclos dclo_289__DBGOUTAGAIN_CLONED_SYMBOL_METHOD*/ - /*_._VALCLO___V346*/ meltfptr[345] = (melt_ptr_t) &meltcdat->dclo_289__DBGOUTAGAIN_CLONED_SYMBOL_METHOD; + /*_._VALCLO___V346*/ + meltfptr[345] = (melt_ptr_t) &meltcdat->dclo_289__DBGOUTAGAIN_CLONED_SYMBOL_METHOD; meltcdat->dclo_289__DBGOUTAGAIN_CLONED_SYMBOL_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_289__DBGOUTAGAIN_CLONED_SYMBOL_METHOD.nbval = 0; /*iniobj dsym_290__CLASS_CLONED_SYMBOL*/ - /*uniqueobj*/ if (!/*_._VALDATA___V347*/ meltfptr[346]) + /*uniqueobj*/ + if (!/*_._VALDATA___V347*/ meltfptr[346]) /*_._VALDATA___V347*/ meltfptr[346] = (melt_ptr_t )&meltcdat->dsym_290__CLASS_CLONED_SYMBOL; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_290__CLASS_CLONED_SYMBOL", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_290__CLASS_CLONED_SYMBOL", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7399,39 +8207,46 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_291__CLASS_CLONED_SYMBOL*/ - /*_._VALSTR___V348*/ meltfptr[347] = (melt_ptr_t) &meltcdat->dstr_291__CLASS_CLONED_SYMBOL; + /*_._VALSTR___V348*/ + meltfptr[347] = (melt_ptr_t) &meltcdat->dstr_291__CLASS_CLONED_SYMBOL; meltcdat->dstr_291__CLASS_CLONED_SYMBOL.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_291__CLASS_CLONED_SYMBOL.val, "CLASS_CLONED_SYMBOL", sizeof (meltcdat->dstr_291__CLASS_CLONED_SYMBOL.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_291__CLASS_CLONED_SYMBOL.val, "CLASS_CLONED_SYMBOL", sizeof (meltcdat->dstr_291__CLASS_CLONED_SYMBOL.val)-1); meltcdat->dstr_291__CLASS_CLONED_SYMBOL.val[19] = (char)0 ; meltcdat->dstr_291__CLASS_CLONED_SYMBOL.slen = 19 ; /*inirout drout_292__DBGOUT_CLONED_SYMBOL_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V349*/ meltfptr[348] = (melt_ptr_t) &meltcdat->drout_292__DBGOUT_CLONED_SYMBOL_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V349*/ + meltfptr[348] = (melt_ptr_t) &meltcdat->drout_292__DBGOUT_CLONED_SYMBOL_METHOD; meltcdat->drout_292__DBGOUT_CLONED_SYMBOL_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_292__DBGOUT_CLONED_SYMBOL_METHOD.routdescr, "DBGOUT_CLONED_SYMBOL_METHOD @warmelt-debug.melt:1447", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_292__DBGOUT_CLONED_SYMBOL_METHOD.nbval = 5; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_292__DBGOUT_CLONED_SYMBOL_METHOD, meltrout_48_WARMELTmiDEBUG_DBGOUT_CLONED_SYMBOL_METHOD); /*iniclos dclo_293__DBGOUT_CLONED_SYMBOL_METHOD*/ - /*_._VALCLO___V350*/ meltfptr[349] = (melt_ptr_t) &meltcdat->dclo_293__DBGOUT_CLONED_SYMBOL_METHOD; + /*_._VALCLO___V350*/ + meltfptr[349] = (melt_ptr_t) &meltcdat->dclo_293__DBGOUT_CLONED_SYMBOL_METHOD; meltcdat->dclo_293__DBGOUT_CLONED_SYMBOL_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_293__DBGOUT_CLONED_SYMBOL_METHOD.nbval = 0; /*inirout drout_294__DBGOUT_ENVIRONMENT_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V351*/ meltfptr[350] = (melt_ptr_t) &meltcdat->drout_294__DBGOUT_ENVIRONMENT_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V351*/ + meltfptr[350] = (melt_ptr_t) &meltcdat->drout_294__DBGOUT_ENVIRONMENT_METHOD; meltcdat->drout_294__DBGOUT_ENVIRONMENT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_294__DBGOUT_ENVIRONMENT_METHOD.routdescr, "DBGOUT_ENVIRONMENT_METHOD @warmelt-debug.melt:1458", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_294__DBGOUT_ENVIRONMENT_METHOD.nbval = 10; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_294__DBGOUT_ENVIRONMENT_METHOD, meltrout_49_WARMELTmiDEBUG_DBGOUT_ENVIRONMENT_METHOD); /*iniclos dclo_295__DBGOUT_ENVIRONMENT_METHOD*/ - /*_._VALCLO___V352*/ meltfptr[351] = (melt_ptr_t) &meltcdat->dclo_295__DBGOUT_ENVIRONMENT_METHOD; + /*_._VALCLO___V352*/ + meltfptr[351] = (melt_ptr_t) &meltcdat->dclo_295__DBGOUT_ENVIRONMENT_METHOD; meltcdat->dclo_295__DBGOUT_ENVIRONMENT_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_295__DBGOUT_ENVIRONMENT_METHOD.nbval = 0; /*iniobj dsym_296__CLASS_ENVIRONMENT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V353*/ meltfptr[352]) + /*uniqueobj*/ + if (!/*_._VALDATA___V353*/ meltfptr[352]) /*_._VALDATA___V353*/ meltfptr[352] = (melt_ptr_t )&meltcdat->dsym_296__CLASS_ENVIRONMENT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_296__CLASS_ENVIRONMENT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_296__CLASS_ENVIRONMENT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7441,15 +8256,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_297__CLASS_ENVIRONMENT*/ - /*_._VALSTR___V354*/ meltfptr[353] = (melt_ptr_t) &meltcdat->dstr_297__CLASS_ENVIRONMENT; + /*_._VALSTR___V354*/ + meltfptr[353] = (melt_ptr_t) &meltcdat->dstr_297__CLASS_ENVIRONMENT; meltcdat->dstr_297__CLASS_ENVIRONMENT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_297__CLASS_ENVIRONMENT.val, "CLASS_ENVIRONMENT", sizeof (meltcdat->dstr_297__CLASS_ENVIRONMENT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_297__CLASS_ENVIRONMENT.val, "CLASS_ENVIRONMENT", sizeof (meltcdat->dstr_297__CLASS_ENVIRONMENT.val)-1); meltcdat->dstr_297__CLASS_ENVIRONMENT.val[17] = (char)0 ; meltcdat->dstr_297__CLASS_ENVIRONMENT.slen = 17 ; /*iniobj dsym_298__ENV_PREV*/ - /*uniqueobj*/ if (!/*_._VALDATA___V355*/ meltfptr[354]) + /*uniqueobj*/ + if (!/*_._VALDATA___V355*/ meltfptr[354]) /*_._VALDATA___V355*/ meltfptr[354] = (melt_ptr_t )&meltcdat->dsym_298__ENV_PREV; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_298__ENV_PREV", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_298__ENV_PREV", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7459,15 +8277,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_299__ENV_PREV*/ - /*_._VALSTR___V356*/ meltfptr[355] = (melt_ptr_t) &meltcdat->dstr_299__ENV_PREV; + /*_._VALSTR___V356*/ + meltfptr[355] = (melt_ptr_t) &meltcdat->dstr_299__ENV_PREV; meltcdat->dstr_299__ENV_PREV.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_299__ENV_PREV.val, "ENV_PREV", sizeof (meltcdat->dstr_299__ENV_PREV.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_299__ENV_PREV.val, "ENV_PREV", sizeof (meltcdat->dstr_299__ENV_PREV.val)-1); meltcdat->dstr_299__ENV_PREV.val[8] = (char)0 ; meltcdat->dstr_299__ENV_PREV.slen = 8 ; /*iniobj dsym_300__CLASS_DESCRIBED_ENVIRONMENT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V357*/ meltfptr[356]) + /*uniqueobj*/ + if (!/*_._VALDATA___V357*/ meltfptr[356]) /*_._VALDATA___V357*/ meltfptr[356] = (melt_ptr_t )&meltcdat->dsym_300__CLASS_DESCRIBED_ENVIRONMENT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_300__CLASS_DESCRIBED_ENVIRONMENT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_300__CLASS_DESCRIBED_ENVIRONMENT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7477,27 +8298,32 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_301__CLASS_DESCRIBED_ENVIRONM*/ - /*_._VALSTR___V358*/ meltfptr[357] = (melt_ptr_t) &meltcdat->dstr_301__CLASS_DESCRIBED_ENVIRONM; + /*_._VALSTR___V358*/ + meltfptr[357] = (melt_ptr_t) &meltcdat->dstr_301__CLASS_DESCRIBED_ENVIRONM; meltcdat->dstr_301__CLASS_DESCRIBED_ENVIRONM.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_301__CLASS_DESCRIBED_ENVIRONM.val, "CLASS_DESCRIBED_ENVIRONMENT", sizeof (meltcdat->dstr_301__CLASS_DESCRIBED_ENVIRONM.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_301__CLASS_DESCRIBED_ENVIRONM.val, "CLASS_DESCRIBED_ENVIRONMENT", sizeof (meltcdat->dstr_301__CLASS_DESCRIBED_ENVIRONM.val)-1); meltcdat->dstr_301__CLASS_DESCRIBED_ENVIRONM.val[27] = (char)0 ; meltcdat->dstr_301__CLASS_DESCRIBED_ENVIRONM.slen = 27 ; /*inirout drout_302__DBGOUTAGAIN_CTYPE_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V359*/ meltfptr[358] = (melt_ptr_t) &meltcdat->drout_302__DBGOUTAGAIN_CTYPE_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V359*/ + meltfptr[358] = (melt_ptr_t) &meltcdat->drout_302__DBGOUTAGAIN_CTYPE_METHOD; meltcdat->drout_302__DBGOUTAGAIN_CTYPE_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_302__DBGOUTAGAIN_CTYPE_METHOD.routdescr, "DBGOUTAGAIN_CTYPE_METHOD @warmelt-debug.melt:1530", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_302__DBGOUTAGAIN_CTYPE_METHOD.nbval = 0; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_302__DBGOUTAGAIN_CTYPE_METHOD, meltrout_50_WARMELTmiDEBUG_DBGOUTAGAIN_CTYPE_METHOD); /*iniclos dclo_303__DBGOUTAGAIN_CTYPE_METHOD*/ - /*_._VALCLO___V360*/ meltfptr[359] = (melt_ptr_t) &meltcdat->dclo_303__DBGOUTAGAIN_CTYPE_METHOD; + /*_._VALCLO___V360*/ + meltfptr[359] = (melt_ptr_t) &meltcdat->dclo_303__DBGOUTAGAIN_CTYPE_METHOD; meltcdat->dclo_303__DBGOUTAGAIN_CTYPE_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_303__DBGOUTAGAIN_CTYPE_METHOD.nbval = 0; /*iniobj dsym_304__CLASS_CTYPE*/ - /*uniqueobj*/ if (!/*_._VALDATA___V361*/ meltfptr[360]) + /*uniqueobj*/ + if (!/*_._VALDATA___V361*/ meltfptr[360]) /*_._VALDATA___V361*/ meltfptr[360] = (melt_ptr_t )&meltcdat->dsym_304__CLASS_CTYPE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_304__CLASS_CTYPE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_304__CLASS_CTYPE", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7507,39 +8333,46 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_305__CLASS_CTYPE*/ - /*_._VALSTR___V362*/ meltfptr[361] = (melt_ptr_t) &meltcdat->dstr_305__CLASS_CTYPE; + /*_._VALSTR___V362*/ + meltfptr[361] = (melt_ptr_t) &meltcdat->dstr_305__CLASS_CTYPE; meltcdat->dstr_305__CLASS_CTYPE.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_305__CLASS_CTYPE.val, "CLASS_CTYPE", sizeof (meltcdat->dstr_305__CLASS_CTYPE.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_305__CLASS_CTYPE.val, "CLASS_CTYPE", sizeof (meltcdat->dstr_305__CLASS_CTYPE.val)-1); meltcdat->dstr_305__CLASS_CTYPE.val[11] = (char)0 ; meltcdat->dstr_305__CLASS_CTYPE.slen = 11 ; /*inirout drout_306__DBGOUT_CTYPE_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V363*/ meltfptr[362] = (melt_ptr_t) &meltcdat->drout_306__DBGOUT_CTYPE_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V363*/ + meltfptr[362] = (melt_ptr_t) &meltcdat->drout_306__DBGOUT_CTYPE_METHOD; meltcdat->drout_306__DBGOUT_CTYPE_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_306__DBGOUT_CTYPE_METHOD.routdescr, "DBGOUT_CTYPE_METHOD @warmelt-debug.melt:1542", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_306__DBGOUT_CTYPE_METHOD.nbval = 5; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_306__DBGOUT_CTYPE_METHOD, meltrout_51_WARMELTmiDEBUG_DBGOUT_CTYPE_METHOD); /*iniclos dclo_307__DBGOUT_CTYPE_METHOD*/ - /*_._VALCLO___V364*/ meltfptr[363] = (melt_ptr_t) &meltcdat->dclo_307__DBGOUT_CTYPE_METHOD; + /*_._VALCLO___V364*/ + meltfptr[363] = (melt_ptr_t) &meltcdat->dclo_307__DBGOUT_CTYPE_METHOD; meltcdat->dclo_307__DBGOUT_CTYPE_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_307__DBGOUT_CTYPE_METHOD.nbval = 0; /*inirout drout_308__DBGOUT_ANYBINDING_METHOD*/ - /*iniroutlocvar*/ /*_._VALROUT___V365*/ meltfptr[364] = (melt_ptr_t) &meltcdat->drout_308__DBGOUT_ANYBINDING_METHOD; + /*iniroutlocvar*/ /*_._VALROUT___V365*/ + meltfptr[364] = (melt_ptr_t) &meltcdat->drout_308__DBGOUT_ANYBINDING_METHOD; meltcdat->drout_308__DBGOUT_ANYBINDING_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_308__DBGOUT_ANYBINDING_METHOD.routdescr, "DBGOUT_ANYBINDING_METHOD @warmelt-debug.melt:1552", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_308__DBGOUT_ANYBINDING_METHOD.nbval = 5; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_308__DBGOUT_ANYBINDING_METHOD, meltrout_52_WARMELTmiDEBUG_DBGOUT_ANYBINDING_METHOD); /*iniclos dclo_309__DBGOUT_ANYBINDING_METHOD*/ - /*_._VALCLO___V366*/ meltfptr[365] = (melt_ptr_t) &meltcdat->dclo_309__DBGOUT_ANYBINDING_METHOD; + /*_._VALCLO___V366*/ + meltfptr[365] = (melt_ptr_t) &meltcdat->dclo_309__DBGOUT_ANYBINDING_METHOD; meltcdat->dclo_309__DBGOUT_ANYBINDING_METHOD.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_309__DBGOUT_ANYBINDING_METHOD.nbval = 0; /*iniobj dsym_310__CLASS_ANY_BINDING*/ - /*uniqueobj*/ if (!/*_._VALDATA___V367*/ meltfptr[366]) + /*uniqueobj*/ + if (!/*_._VALDATA___V367*/ meltfptr[366]) /*_._VALDATA___V367*/ meltfptr[366] = (melt_ptr_t )&meltcdat->dsym_310__CLASS_ANY_BINDING; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_310__CLASS_ANY_BINDING", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_310__CLASS_ANY_BINDING", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7549,27 +8382,32 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_311__CLASS_ANY_BINDING*/ - /*_._VALSTR___V368*/ meltfptr[367] = (melt_ptr_t) &meltcdat->dstr_311__CLASS_ANY_BINDING; + /*_._VALSTR___V368*/ + meltfptr[367] = (melt_ptr_t) &meltcdat->dstr_311__CLASS_ANY_BINDING; meltcdat->dstr_311__CLASS_ANY_BINDING.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_311__CLASS_ANY_BINDING.val, "CLASS_ANY_BINDING", sizeof (meltcdat->dstr_311__CLASS_ANY_BINDING.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_311__CLASS_ANY_BINDING.val, "CLASS_ANY_BINDING", sizeof (meltcdat->dstr_311__CLASS_ANY_BINDING.val)-1); meltcdat->dstr_311__CLASS_ANY_BINDING.val[17] = (char)0 ; meltcdat->dstr_311__CLASS_ANY_BINDING.slen = 17 ; /*inirout drout_312__DEBUG_LESS_FUN*/ - /*iniroutlocvar*/ /*_._VALROUT___V369*/ meltfptr[368] = (melt_ptr_t) &meltcdat->drout_312__DEBUG_LESS_FUN; + /*iniroutlocvar*/ /*_._VALROUT___V369*/ + meltfptr[368] = (melt_ptr_t) &meltcdat->drout_312__DEBUG_LESS_FUN; meltcdat->drout_312__DEBUG_LESS_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_312__DEBUG_LESS_FUN.routdescr, "DEBUG_LESS_FUN @warmelt-debug.melt:1581", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_312__DEBUG_LESS_FUN.nbval = 3; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_312__DEBUG_LESS_FUN, meltrout_53_WARMELTmiDEBUG_DEBUG_LESS_FUN); /*iniclos dclo_313__DEBUG_LESS_FUN*/ - /*_._VALCLO___V370*/ meltfptr[369] = (melt_ptr_t) &meltcdat->dclo_313__DEBUG_LESS_FUN; + /*_._VALCLO___V370*/ + meltfptr[369] = (melt_ptr_t) &meltcdat->dclo_313__DEBUG_LESS_FUN; meltcdat->dclo_313__DEBUG_LESS_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_313__DEBUG_LESS_FUN.nbval = 0; /*iniobj dsym_314__DEBUG_LESS*/ - /*uniqueobj*/ if (!/*_._VALDATA___V371*/ meltfptr[370]) + /*uniqueobj*/ + if (!/*_._VALDATA___V371*/ meltfptr[370]) /*_._VALDATA___V371*/ meltfptr[370] = (melt_ptr_t )&meltcdat->dsym_314__DEBUG_LESS; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_314__DEBUG_LESS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_314__DEBUG_LESS", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7579,27 +8417,32 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_315__DEBUG_LESS*/ - /*_._VALSTR___V372*/ meltfptr[371] = (melt_ptr_t) &meltcdat->dstr_315__DEBUG_LESS; + /*_._VALSTR___V372*/ + meltfptr[371] = (melt_ptr_t) &meltcdat->dstr_315__DEBUG_LESS; meltcdat->dstr_315__DEBUG_LESS.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_315__DEBUG_LESS.val, "DEBUG_LESS", sizeof (meltcdat->dstr_315__DEBUG_LESS.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_315__DEBUG_LESS.val, "DEBUG_LESS", sizeof (meltcdat->dstr_315__DEBUG_LESS.val)-1); meltcdat->dstr_315__DEBUG_LESS.val[10] = (char)0 ; meltcdat->dstr_315__DEBUG_LESS.slen = 10 ; /*inirout drout_316__DEBUG_MORE_FUN*/ - /*iniroutlocvar*/ /*_._VALROUT___V373*/ meltfptr[372] = (melt_ptr_t) &meltcdat->drout_316__DEBUG_MORE_FUN; + /*iniroutlocvar*/ /*_._VALROUT___V373*/ + meltfptr[372] = (melt_ptr_t) &meltcdat->drout_316__DEBUG_MORE_FUN; meltcdat->drout_316__DEBUG_MORE_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_316__DEBUG_MORE_FUN.routdescr, "DEBUG_MORE_FUN @warmelt-debug.melt:1595", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_316__DEBUG_MORE_FUN.nbval = 6; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_316__DEBUG_MORE_FUN, meltrout_54_WARMELTmiDEBUG_DEBUG_MORE_FUN); /*iniclos dclo_317__DEBUG_MORE_FUN*/ - /*_._VALCLO___V374*/ meltfptr[373] = (melt_ptr_t) &meltcdat->dclo_317__DEBUG_MORE_FUN; + /*_._VALCLO___V374*/ + meltfptr[373] = (melt_ptr_t) &meltcdat->dclo_317__DEBUG_MORE_FUN; meltcdat->dclo_317__DEBUG_MORE_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_317__DEBUG_MORE_FUN.nbval = 0; /*iniobj dsym_318__DEBUG_MORE*/ - /*uniqueobj*/ if (!/*_._VALDATA___V375*/ meltfptr[374]) + /*uniqueobj*/ + if (!/*_._VALDATA___V375*/ meltfptr[374]) /*_._VALDATA___V375*/ meltfptr[374] = (melt_ptr_t )&meltcdat->dsym_318__DEBUG_MORE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_318__DEBUG_MORE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_318__DEBUG_MORE", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7609,27 +8452,32 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_319__DEBUG_MORE*/ - /*_._VALSTR___V376*/ meltfptr[375] = (melt_ptr_t) &meltcdat->dstr_319__DEBUG_MORE; + /*_._VALSTR___V376*/ + meltfptr[375] = (melt_ptr_t) &meltcdat->dstr_319__DEBUG_MORE; meltcdat->dstr_319__DEBUG_MORE.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_319__DEBUG_MORE.val, "DEBUG_MORE", sizeof (meltcdat->dstr_319__DEBUG_MORE.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_319__DEBUG_MORE.val, "DEBUG_MORE", sizeof (meltcdat->dstr_319__DEBUG_MORE.val)-1); meltcdat->dstr_319__DEBUG_MORE.val[10] = (char)0 ; meltcdat->dstr_319__DEBUG_MORE.slen = 10 ; /*inirout drout_320__DISPLAY_DEBUG_MESSAGE*/ - /*iniroutlocvar*/ /*_._VALROUT___V377*/ meltfptr[376] = (melt_ptr_t) &meltcdat->drout_320__DISPLAY_DEBUG_MESSAGE; + /*iniroutlocvar*/ /*_._VALROUT___V377*/ + meltfptr[376] = (melt_ptr_t) &meltcdat->drout_320__DISPLAY_DEBUG_MESSAGE; meltcdat->drout_320__DISPLAY_DEBUG_MESSAGE.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_ROUTINE)))); strncpy (meltcdat->drout_320__DISPLAY_DEBUG_MESSAGE.routdescr, "DISPLAY_DEBUG_MESSAGE @warmelt-debug.melt:1627", MELT_ROUTDESCR_LEN - 1); meltcdat->drout_320__DISPLAY_DEBUG_MESSAGE.nbval = 5; MELT_ROUTINE_SET_ROUTCODE(&meltcdat->drout_320__DISPLAY_DEBUG_MESSAGE, meltrout_55_WARMELTmiDEBUG_DISPLAY_DEBUG_MESSAGE); /*iniclos dclo_321__DISPLAY_DEBUG_MESSAGE*/ - /*_._VALCLO___V378*/ meltfptr[377] = (melt_ptr_t) &meltcdat->dclo_321__DISPLAY_DEBUG_MESSAGE; + /*_._VALCLO___V378*/ + meltfptr[377] = (melt_ptr_t) &meltcdat->dclo_321__DISPLAY_DEBUG_MESSAGE; meltcdat->dclo_321__DISPLAY_DEBUG_MESSAGE.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_CLOSURE)))); meltcdat->dclo_321__DISPLAY_DEBUG_MESSAGE.nbval = 0; /*iniobj dsym_322__DBG_OUT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V379*/ meltfptr[378]) + /*uniqueobj*/ + if (!/*_._VALDATA___V379*/ meltfptr[378]) /*_._VALDATA___V379*/ meltfptr[378] = (melt_ptr_t )&meltcdat->dsym_322__DBG_OUT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_322__DBG_OUT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_322__DBG_OUT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7639,15 +8487,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_323__DBG_OUT*/ - /*_._VALSTR___V380*/ meltfptr[379] = (melt_ptr_t) &meltcdat->dstr_323__DBG_OUT; + /*_._VALSTR___V380*/ + meltfptr[379] = (melt_ptr_t) &meltcdat->dstr_323__DBG_OUT; meltcdat->dstr_323__DBG_OUT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_323__DBG_OUT.val, "DBG_OUT", sizeof (meltcdat->dstr_323__DBG_OUT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_323__DBG_OUT.val, "DBG_OUT", sizeof (meltcdat->dstr_323__DBG_OUT.val)-1); meltcdat->dstr_323__DBG_OUT.val[7] = (char)0 ; meltcdat->dstr_323__DBG_OUT.slen = 7 ; /*iniobj dsym_324__DBG_OUTOBJECT*/ - /*uniqueobj*/ if (!/*_._VALDATA___V381*/ meltfptr[380]) + /*uniqueobj*/ + if (!/*_._VALDATA___V381*/ meltfptr[380]) /*_._VALDATA___V381*/ meltfptr[380] = (melt_ptr_t )&meltcdat->dsym_324__DBG_OUTOBJECT; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_324__DBG_OUTOBJECT", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_324__DBG_OUTOBJECT", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7657,15 +8508,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_325__DBG_OUTOBJECT*/ - /*_._VALSTR___V382*/ meltfptr[381] = (melt_ptr_t) &meltcdat->dstr_325__DBG_OUTOBJECT; + /*_._VALSTR___V382*/ + meltfptr[381] = (melt_ptr_t) &meltcdat->dstr_325__DBG_OUTOBJECT; meltcdat->dstr_325__DBG_OUTOBJECT.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_325__DBG_OUTOBJECT.val, "DBG_OUTOBJECT", sizeof (meltcdat->dstr_325__DBG_OUTOBJECT.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_325__DBG_OUTOBJECT.val, "DBG_OUTOBJECT", sizeof (meltcdat->dstr_325__DBG_OUTOBJECT.val)-1); meltcdat->dstr_325__DBG_OUTOBJECT.val[13] = (char)0 ; meltcdat->dstr_325__DBG_OUTOBJECT.slen = 13 ; /*iniobj dsym_326__DBGOUT_FIELDS*/ - /*uniqueobj*/ if (!/*_._VALDATA___V383*/ meltfptr[382]) + /*uniqueobj*/ + if (!/*_._VALDATA___V383*/ meltfptr[382]) /*_._VALDATA___V383*/ meltfptr[382] = (melt_ptr_t )&meltcdat->dsym_326__DBGOUT_FIELDS; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_326__DBGOUT_FIELDS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_326__DBGOUT_FIELDS", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7675,15 +8529,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_327__DBGOUT_FIELDS*/ - /*_._VALSTR___V384*/ meltfptr[383] = (melt_ptr_t) &meltcdat->dstr_327__DBGOUT_FIELDS; + /*_._VALSTR___V384*/ + meltfptr[383] = (melt_ptr_t) &meltcdat->dstr_327__DBGOUT_FIELDS; meltcdat->dstr_327__DBGOUT_FIELDS.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_327__DBGOUT_FIELDS.val, "DBGOUT_FIELDS", sizeof (meltcdat->dstr_327__DBGOUT_FIELDS.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_327__DBGOUT_FIELDS.val, "DBGOUT_FIELDS", sizeof (meltcdat->dstr_327__DBGOUT_FIELDS.val)-1); meltcdat->dstr_327__DBGOUT_FIELDS.val[13] = (char)0 ; meltcdat->dstr_327__DBGOUT_FIELDS.slen = 13 ; /*iniobj dsym_328__DBGOUTAGAIN_FIELDS*/ - /*uniqueobj*/ if (!/*_._VALDATA___V385*/ meltfptr[384]) + /*uniqueobj*/ + if (!/*_._VALDATA___V385*/ meltfptr[384]) /*_._VALDATA___V385*/ meltfptr[384] = (melt_ptr_t )&meltcdat->dsym_328__DBGOUTAGAIN_FIELDS; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_328__DBGOUTAGAIN_FIELDS", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_328__DBGOUTAGAIN_FIELDS", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7693,15 +8550,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_329__DBGOUTAGAIN_FIELDS*/ - /*_._VALSTR___V386*/ meltfptr[385] = (melt_ptr_t) &meltcdat->dstr_329__DBGOUTAGAIN_FIELDS; + /*_._VALSTR___V386*/ + meltfptr[385] = (melt_ptr_t) &meltcdat->dstr_329__DBGOUTAGAIN_FIELDS; meltcdat->dstr_329__DBGOUTAGAIN_FIELDS.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_329__DBGOUTAGAIN_FIELDS.val, "DBGOUTAGAIN_FIELDS", sizeof (meltcdat->dstr_329__DBGOUTAGAIN_FIELDS.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_329__DBGOUTAGAIN_FIELDS.val, "DBGOUTAGAIN_FIELDS", sizeof (meltcdat->dstr_329__DBGOUTAGAIN_FIELDS.val)-1); meltcdat->dstr_329__DBGOUTAGAIN_FIELDS.val[18] = (char)0 ; meltcdat->dstr_329__DBGOUTAGAIN_FIELDS.slen = 18 ; /*iniobj dsym_330__DISPLAY_DEBUG_MESSAGE*/ - /*uniqueobj*/ if (!/*_._VALDATA___V387*/ meltfptr[386]) + /*uniqueobj*/ + if (!/*_._VALDATA___V387*/ meltfptr[386]) /*_._VALDATA___V387*/ meltfptr[386] = (melt_ptr_t )&meltcdat->dsym_330__DISPLAY_DEBUG_MESSAGE; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_330__DISPLAY_DEBUG_MESSAGE", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_330__DISPLAY_DEBUG_MESSAGE", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7711,15 +8571,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_331__DISPLAY_DEBUG_MESSAGE*/ - /*_._VALSTR___V388*/ meltfptr[387] = (melt_ptr_t) &meltcdat->dstr_331__DISPLAY_DEBUG_MESSAGE; + /*_._VALSTR___V388*/ + meltfptr[387] = (melt_ptr_t) &meltcdat->dstr_331__DISPLAY_DEBUG_MESSAGE; meltcdat->dstr_331__DISPLAY_DEBUG_MESSAGE.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_331__DISPLAY_DEBUG_MESSAGE.val, "DISPLAY_DEBUG_MESSAGE", sizeof (meltcdat->dstr_331__DISPLAY_DEBUG_MESSAGE.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_331__DISPLAY_DEBUG_MESSAGE.val, "DISPLAY_DEBUG_MESSAGE", sizeof (meltcdat->dstr_331__DISPLAY_DEBUG_MESSAGE.val)-1); meltcdat->dstr_331__DISPLAY_DEBUG_MESSAGE.val[21] = (char)0 ; meltcdat->dstr_331__DISPLAY_DEBUG_MESSAGE.slen = 21 ; /*iniobj dsym_332__MELT_DEBUG_FUN*/ - /*uniqueobj*/ if (!/*_._VALDATA___V389*/ meltfptr[388]) + /*uniqueobj*/ + if (!/*_._VALDATA___V389*/ meltfptr[388]) /*_._VALDATA___V389*/ meltfptr[388] = (melt_ptr_t )&meltcdat->dsym_332__MELT_DEBUG_FUN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_332__MELT_DEBUG_FUN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_332__MELT_DEBUG_FUN", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7729,15 +8592,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_333__MELT_DEBUG_FUN*/ - /*_._VALSTR___V390*/ meltfptr[389] = (melt_ptr_t) &meltcdat->dstr_333__MELT_DEBUG_FUN; + /*_._VALSTR___V390*/ + meltfptr[389] = (melt_ptr_t) &meltcdat->dstr_333__MELT_DEBUG_FUN; meltcdat->dstr_333__MELT_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_333__MELT_DEBUG_FUN.val, "MELT_DEBUG_FUN", sizeof (meltcdat->dstr_333__MELT_DEBUG_FUN.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_333__MELT_DEBUG_FUN.val, "MELT_DEBUG_FUN", sizeof (meltcdat->dstr_333__MELT_DEBUG_FUN.val)-1); meltcdat->dstr_333__MELT_DEBUG_FUN.val[14] = (char)0 ; meltcdat->dstr_333__MELT_DEBUG_FUN.slen = 14 ; /*iniobj dsym_334__REGISTER_BASICBLOCK_DEBUG_FUN*/ - /*uniqueobj*/ if (!/*_._VALDATA___V391*/ meltfptr[390]) + /*uniqueobj*/ + if (!/*_._VALDATA___V391*/ meltfptr[390]) /*_._VALDATA___V391*/ meltfptr[390] = (melt_ptr_t )&meltcdat->dsym_334__REGISTER_BASICBLOCK_DEBUG_FUN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_334__REGISTER_BASICBLOCK_DEBUG_FUN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_334__REGISTER_BASICBLOCK_DEBUG_FUN", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7747,15 +8613,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_335__REGISTER_BASICBLOCK_DEBU*/ - /*_._VALSTR___V392*/ meltfptr[391] = (melt_ptr_t) &meltcdat->dstr_335__REGISTER_BASICBLOCK_DEBU; + /*_._VALSTR___V392*/ + meltfptr[391] = (melt_ptr_t) &meltcdat->dstr_335__REGISTER_BASICBLOCK_DEBU; meltcdat->dstr_335__REGISTER_BASICBLOCK_DEBU.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_335__REGISTER_BASICBLOCK_DEBU.val, "REGISTER_BASICBLOCK_DEBUG_FUN", sizeof (meltcdat->dstr_335__REGISTER_BASICBLOCK_DEBU.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_335__REGISTER_BASICBLOCK_DEBU.val, "REGISTER_BASICBLOCK_DEBUG_FUN", sizeof (meltcdat->dstr_335__REGISTER_BASICBLOCK_DEBU.val)-1); meltcdat->dstr_335__REGISTER_BASICBLOCK_DEBU.val[29] = (char)0 ; meltcdat->dstr_335__REGISTER_BASICBLOCK_DEBU.slen = 29 ; /*iniobj dsym_336__REGISTER_EDGE_DEBUG_FUN*/ - /*uniqueobj*/ if (!/*_._VALDATA___V393*/ meltfptr[392]) + /*uniqueobj*/ + if (!/*_._VALDATA___V393*/ meltfptr[392]) /*_._VALDATA___V393*/ meltfptr[392] = (melt_ptr_t )&meltcdat->dsym_336__REGISTER_EDGE_DEBUG_FUN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_336__REGISTER_EDGE_DEBUG_FUN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_336__REGISTER_EDGE_DEBUG_FUN", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7765,15 +8634,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_337__REGISTER_EDGE_DEBUG_FUN*/ - /*_._VALSTR___V394*/ meltfptr[393] = (melt_ptr_t) &meltcdat->dstr_337__REGISTER_EDGE_DEBUG_FUN; + /*_._VALSTR___V394*/ + meltfptr[393] = (melt_ptr_t) &meltcdat->dstr_337__REGISTER_EDGE_DEBUG_FUN; meltcdat->dstr_337__REGISTER_EDGE_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_337__REGISTER_EDGE_DEBUG_FUN.val, "REGISTER_EDGE_DEBUG_FUN", sizeof (meltcdat->dstr_337__REGISTER_EDGE_DEBUG_FUN.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_337__REGISTER_EDGE_DEBUG_FUN.val, "REGISTER_EDGE_DEBUG_FUN", sizeof (meltcdat->dstr_337__REGISTER_EDGE_DEBUG_FUN.val)-1); meltcdat->dstr_337__REGISTER_EDGE_DEBUG_FUN.val[23] = (char)0 ; meltcdat->dstr_337__REGISTER_EDGE_DEBUG_FUN.slen = 23 ; /*iniobj dsym_338__REGISTER_GIMPLE_DEBUG_FUN*/ - /*uniqueobj*/ if (!/*_._VALDATA___V395*/ meltfptr[394]) + /*uniqueobj*/ + if (!/*_._VALDATA___V395*/ meltfptr[394]) /*_._VALDATA___V395*/ meltfptr[394] = (melt_ptr_t )&meltcdat->dsym_338__REGISTER_GIMPLE_DEBUG_FUN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_338__REGISTER_GIMPLE_DEBUG_FUN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_338__REGISTER_GIMPLE_DEBUG_FUN", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7783,15 +8655,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_339__REGISTER_GIMPLE_DEBUG_FU*/ - /*_._VALSTR___V396*/ meltfptr[395] = (melt_ptr_t) &meltcdat->dstr_339__REGISTER_GIMPLE_DEBUG_FU; + /*_._VALSTR___V396*/ + meltfptr[395] = (melt_ptr_t) &meltcdat->dstr_339__REGISTER_GIMPLE_DEBUG_FU; meltcdat->dstr_339__REGISTER_GIMPLE_DEBUG_FU.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_339__REGISTER_GIMPLE_DEBUG_FU.val, "REGISTER_GIMPLE_DEBUG_FUN", sizeof (meltcdat->dstr_339__REGISTER_GIMPLE_DEBUG_FU.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_339__REGISTER_GIMPLE_DEBUG_FU.val, "REGISTER_GIMPLE_DEBUG_FUN", sizeof (meltcdat->dstr_339__REGISTER_GIMPLE_DEBUG_FU.val)-1); meltcdat->dstr_339__REGISTER_GIMPLE_DEBUG_FU.val[25] = (char)0 ; meltcdat->dstr_339__REGISTER_GIMPLE_DEBUG_FU.slen = 25 ; /*iniobj dsym_340__REGISTER_GIMPLESEQ_DEBUG_FUN*/ - /*uniqueobj*/ if (!/*_._VALDATA___V397*/ meltfptr[396]) + /*uniqueobj*/ + if (!/*_._VALDATA___V397*/ meltfptr[396]) /*_._VALDATA___V397*/ meltfptr[396] = (melt_ptr_t )&meltcdat->dsym_340__REGISTER_GIMPLESEQ_DEBUG_FUN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_340__REGISTER_GIMPLESEQ_DEBUG_FUN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_340__REGISTER_GIMPLESEQ_DEBUG_FUN", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7801,15 +8676,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_341__REGISTER_GIMPLESEQ_DEBUG*/ - /*_._VALSTR___V398*/ meltfptr[397] = (melt_ptr_t) &meltcdat->dstr_341__REGISTER_GIMPLESEQ_DEBUG; + /*_._VALSTR___V398*/ + meltfptr[397] = (melt_ptr_t) &meltcdat->dstr_341__REGISTER_GIMPLESEQ_DEBUG; meltcdat->dstr_341__REGISTER_GIMPLESEQ_DEBUG.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_341__REGISTER_GIMPLESEQ_DEBUG.val, "REGISTER_GIMPLESEQ_DEBUG_FUN", sizeof (meltcdat->dstr_341__REGISTER_GIMPLESEQ_DEBUG.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_341__REGISTER_GIMPLESEQ_DEBUG.val, "REGISTER_GIMPLESEQ_DEBUG_FUN", sizeof (meltcdat->dstr_341__REGISTER_GIMPLESEQ_DEBUG.val)-1); meltcdat->dstr_341__REGISTER_GIMPLESEQ_DEBUG.val[28] = (char)0 ; meltcdat->dstr_341__REGISTER_GIMPLESEQ_DEBUG.slen = 28 ; /*iniobj dsym_342__REGISTER_LOOP_DEBUG_FUN*/ - /*uniqueobj*/ if (!/*_._VALDATA___V399*/ meltfptr[398]) + /*uniqueobj*/ + if (!/*_._VALDATA___V399*/ meltfptr[398]) /*_._VALDATA___V399*/ meltfptr[398] = (melt_ptr_t )&meltcdat->dsym_342__REGISTER_LOOP_DEBUG_FUN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_342__REGISTER_LOOP_DEBUG_FUN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_342__REGISTER_LOOP_DEBUG_FUN", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7819,15 +8697,18 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_343__REGISTER_LOOP_DEBUG_FUN*/ - /*_._VALSTR___V400*/ meltfptr[399] = (melt_ptr_t) &meltcdat->dstr_343__REGISTER_LOOP_DEBUG_FUN; + /*_._VALSTR___V400*/ + meltfptr[399] = (melt_ptr_t) &meltcdat->dstr_343__REGISTER_LOOP_DEBUG_FUN; meltcdat->dstr_343__REGISTER_LOOP_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_343__REGISTER_LOOP_DEBUG_FUN.val, "REGISTER_LOOP_DEBUG_FUN", sizeof (meltcdat->dstr_343__REGISTER_LOOP_DEBUG_FUN.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_343__REGISTER_LOOP_DEBUG_FUN.val, "REGISTER_LOOP_DEBUG_FUN", sizeof (meltcdat->dstr_343__REGISTER_LOOP_DEBUG_FUN.val)-1); meltcdat->dstr_343__REGISTER_LOOP_DEBUG_FUN.val[23] = (char)0 ; meltcdat->dstr_343__REGISTER_LOOP_DEBUG_FUN.slen = 23 ; /*iniobj dsym_344__REGISTER_TREE_DEBUG_FUN*/ - /*uniqueobj*/ if (!/*_._VALDATA___V401*/ meltfptr[400]) + /*uniqueobj*/ + if (!/*_._VALDATA___V401*/ meltfptr[400]) /*_._VALDATA___V401*/ meltfptr[400] = (melt_ptr_t )&meltcdat->dsym_344__REGISTER_TREE_DEBUG_FUN; if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr isobj dsym_344__REGISTER_TREE_DEBUG_FUN", melt_magic_discr ((melt_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL))))) == MELTOBMAG_OBJECT); if (MELT_LIKELY(!melt_prohibit_garbcoll)) melt_assertmsg("iniobj check.discr objmagic dsym_344__REGISTER_TREE_DEBUG_FUN", ((meltobject_ptr_t) (((melt_ptr_t)(MELT_PREDEF(CLASS_SYMBOL)))))->meltobj_magic == MELTOBMAG_OBJECT); @@ -7837,9 +8718,11 @@ static void melt_initialize_module_meltdata_WARMELTmiDEBUG (meltinitial_frame_t /*inistring dstr_345__REGISTER_TREE_DEBUG_FUN*/ - /*_._VALSTR___V402*/ meltfptr[401] = (melt_ptr_t) &meltcdat->dstr_345__REGISTER_TREE_DEBUG_FUN; + /*_._VALSTR___V402*/ + meltfptr[401] = (melt_ptr_t) &meltcdat->dstr_345__REGISTER_TREE_DEBUG_FUN; meltcdat->dstr_345__REGISTER_TREE_DEBUG_FUN.discr = (meltobject_ptr_t)(((melt_ptr_t)(MELT_PREDEF(DISCR_STRING)))); - /*small inistring*/ strncpy(meltcdat->dstr_345__REGISTER_TREE_DEBUG_FUN.val, "REGISTER_TREE_DEBUG_FUN", sizeof (meltcdat->dstr_345__REGISTER_TREE_DEBUG_FUN.val)-1); + /*small inistring*/ + strncpy(meltcdat->dstr_345__REGISTER_TREE_DEBUG_FUN.val, "REGISTER_TREE_DEBUG_FUN", sizeof (meltcdat->dstr_345__REGISTER_TREE_DEBUG_FUN.val)-1); meltcdat->dstr_345__REGISTER_TREE_DEBUG_FUN.val[23] = (char)0 ; meltcdat->dstr_345__REGISTER_TREE_DEBUG_FUN.slen = 23 ; meltcdat = NULL; @@ -7881,7 +8764,8 @@ void* melt_start_this_module (void* modargp_) debugeprintf("sizeof Melt_InitialFrame in melt_start_this_module=%d", (int) sizeof(Melt_InitialFrame)); - /* classy initial frame melt_start_this_module fromline 1773*/ Melt_InitialFrame + /* classy initial frame melt_start_this_module fromline 1773*/ + Melt_InitialFrame meltfram__ /*declfrastruct fromline 1780*/ /*classyinitroutinearg melt_start_this_module fromline 1819*/ #if ENABLE_CHECKING @@ -7895,12 +8779,14 @@ void* melt_start_this_module (void* modargp_) /**COMMENT: get previous environment **/; /*^compute*/ - /*_._PREVENV___V4*/ meltfptr[3] = /*getprevenv*/ (melt_ptr_t) modargp_; + /*_._PREVENV___V4*/ + meltfptr[3] = /*getprevenv*/ (melt_ptr_t) modargp_; /*^comment*/ /**COMMENT: compute boxloc **/; /*^cond*/ - /*cond*/ if (/*_._CONTENV___V2*/ meltfptr[1]) /*then*/ + /*cond*/ + if (/*_._CONTENV___V2*/ meltfptr[1]) /*then*/ { } else /*^cond.else*/ @@ -7936,7 +8822,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER = melthookproc_HOOK_NAMED_SYMBOL ("HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER", (long) MELT_GET); - /*_._VALDATA___V58*/ meltfptr[57] = (melt_ptr_t) meltsy_HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER; + /*_._VALDATA___V58*/ + meltfptr[57] = (melt_ptr_t) meltsy_HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER; } /*endgetnamedsym HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER*/ @@ -7949,7 +8836,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CLASS_DEBUG_INFORMATION without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CLASS_DEBUG_INFORMATION = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_DEBUG_INFORMATION", (long) MELT_GET); - /*_._VALDATA___V60*/ meltfptr[59] = (melt_ptr_t) meltsy_CLASS_DEBUG_INFORMATION; + /*_._VALDATA___V60*/ + meltfptr[59] = (melt_ptr_t) meltsy_CLASS_DEBUG_INFORMATION; } /*endgetnamedsym CLASS_DEBUG_INFORMATION*/ @@ -7962,7 +8850,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CLASS_ROOT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CLASS_ROOT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_ROOT", (long) MELT_GET); - /*_._VALDATA___V62*/ meltfptr[61] = (melt_ptr_t) meltsy_CLASS_ROOT; + /*_._VALDATA___V62*/ + meltfptr[61] = (melt_ptr_t) meltsy_CLASS_ROOT; } /*endgetnamedsym CLASS_ROOT*/ @@ -7975,7 +8864,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DBGI_OUT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DBGI_OUT = melthookproc_HOOK_NAMED_SYMBOL ("DBGI_OUT", (long) MELT_GET); - /*_._VALDATA___V74*/ meltfptr[73] = (melt_ptr_t) meltsy_DBGI_OUT; + /*_._VALDATA___V74*/ + meltfptr[73] = (melt_ptr_t) meltsy_DBGI_OUT; } /*endgetnamedsym DBGI_OUT*/ @@ -7988,7 +8878,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DBGI_OCCMAP without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DBGI_OCCMAP = melthookproc_HOOK_NAMED_SYMBOL ("DBGI_OCCMAP", (long) MELT_GET); - /*_._VALDATA___V76*/ meltfptr[75] = (melt_ptr_t) meltsy_DBGI_OCCMAP; + /*_._VALDATA___V76*/ + meltfptr[75] = (melt_ptr_t) meltsy_DBGI_OCCMAP; } /*endgetnamedsym DBGI_OCCMAP*/ @@ -8001,7 +8892,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DBGI_MAXDEPTH without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DBGI_MAXDEPTH = melthookproc_HOOK_NAMED_SYMBOL ("DBGI_MAXDEPTH", (long) MELT_GET); - /*_._VALDATA___V78*/ meltfptr[77] = (melt_ptr_t) meltsy_DBGI_MAXDEPTH; + /*_._VALDATA___V78*/ + meltfptr[77] = (melt_ptr_t) meltsy_DBGI_MAXDEPTH; } /*endgetnamedsym DBGI_MAXDEPTH*/ @@ -8014,7 +8906,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CLASS_DEBUG_OUTPUT_INFORMATION without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CLASS_DEBUG_OUTPUT_INFORMATION = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_DEBUG_OUTPUT_INFORMATION", (long) MELT_GET); - /*_._VALDATA___V80*/ meltfptr[79] = (melt_ptr_t) meltsy_CLASS_DEBUG_OUTPUT_INFORMATION; + /*_._VALDATA___V80*/ + meltfptr[79] = (melt_ptr_t) meltsy_CLASS_DEBUG_OUTPUT_INFORMATION; } /*endgetnamedsym CLASS_DEBUG_OUTPUT_INFORMATION*/ @@ -8027,7 +8920,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DEBUG_DEPTH without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DEBUG_DEPTH = melthookproc_HOOK_NAMED_SYMBOL ("DEBUG_DEPTH", (long) MELT_GET); - /*_._VALDATA___V86*/ meltfptr[85] = (melt_ptr_t) meltsy_DEBUG_DEPTH; + /*_._VALDATA___V86*/ + meltfptr[85] = (melt_ptr_t) meltsy_DEBUG_DEPTH; } /*endgetnamedsym DEBUG_DEPTH*/ @@ -8040,7 +8934,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol MELT_REALLY_NEED_DEBUG without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_MELT_REALLY_NEED_DEBUG = melthookproc_HOOK_NAMED_SYMBOL ("MELT_REALLY_NEED_DEBUG", (long) MELT_GET); - /*_._VALDATA___V93*/ meltfptr[92] = (melt_ptr_t) meltsy_MELT_REALLY_NEED_DEBUG; + /*_._VALDATA___V93*/ + meltfptr[92] = (melt_ptr_t) meltsy_MELT_REALLY_NEED_DEBUG; } /*endgetnamedsym MELT_REALLY_NEED_DEBUG*/ @@ -8053,7 +8948,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DEPTH without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DEPTH = melthookproc_HOOK_NAMED_SYMBOL ("DEPTH", (long) MELT_GET); - /*_._VALDATA___V98*/ meltfptr[97] = (melt_ptr_t) meltsy_DEPTH; + /*_._VALDATA___V98*/ + meltfptr[97] = (melt_ptr_t) meltsy_DEPTH; } /*endgetnamedsym DEPTH*/ @@ -8066,7 +8962,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol MELT_HAS_FLAG_DEBUG_SET without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_MELT_HAS_FLAG_DEBUG_SET = melthookproc_HOOK_NAMED_SYMBOL ("MELT_HAS_FLAG_DEBUG_SET", (long) MELT_GET); - /*_._VALDATA___V104*/ meltfptr[103] = (melt_ptr_t) meltsy_MELT_HAS_FLAG_DEBUG_SET; + /*_._VALDATA___V104*/ + meltfptr[103] = (melt_ptr_t) meltsy_MELT_HAS_FLAG_DEBUG_SET; } /*endgetnamedsym MELT_HAS_FLAG_DEBUG_SET*/ @@ -8079,7 +8976,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol MELT_REALLY_NEED_DBGLIM without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_MELT_REALLY_NEED_DBGLIM = melthookproc_HOOK_NAMED_SYMBOL ("MELT_REALLY_NEED_DBGLIM", (long) MELT_GET); - /*_._VALDATA___V111*/ meltfptr[110] = (melt_ptr_t) meltsy_MELT_REALLY_NEED_DBGLIM; + /*_._VALDATA___V111*/ + meltfptr[110] = (melt_ptr_t) meltsy_MELT_REALLY_NEED_DBGLIM; } /*endgetnamedsym MELT_REALLY_NEED_DBGLIM*/ @@ -8092,7 +8990,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol LIMIT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_LIMIT = melthookproc_HOOK_NAMED_SYMBOL ("LIMIT", (long) MELT_GET); - /*_._VALDATA___V117*/ meltfptr[116] = (melt_ptr_t) meltsy_LIMIT; + /*_._VALDATA___V117*/ + meltfptr[116] = (melt_ptr_t) meltsy_LIMIT; } /*endgetnamedsym LIMIT*/ @@ -8105,7 +9004,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DBG_OUTPUT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DBG_OUTPUT = melthookproc_HOOK_NAMED_SYMBOL ("DBG_OUTPUT", (long) MELT_GET); - /*_._VALDATA___V124*/ meltfptr[123] = (melt_ptr_t) meltsy_DBG_OUTPUT; + /*_._VALDATA___V124*/ + meltfptr[123] = (melt_ptr_t) meltsy_DBG_OUTPUT; } /*endgetnamedsym DBG_OUTPUT*/ @@ -8118,7 +9018,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CLASS_SELECTOR without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CLASS_SELECTOR = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SELECTOR", (long) MELT_GET); - /*_._VALDATA___V126*/ meltfptr[125] = (melt_ptr_t) meltsy_CLASS_SELECTOR; + /*_._VALDATA___V126*/ + meltfptr[125] = (melt_ptr_t) meltsy_CLASS_SELECTOR; } /*endgetnamedsym CLASS_SELECTOR*/ @@ -8131,7 +9032,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol RECV without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_RECV = melthookproc_HOOK_NAMED_SYMBOL ("RECV", (long) MELT_GET); - /*_._VALDATA___V128*/ meltfptr[127] = (melt_ptr_t) meltsy_RECV; + /*_._VALDATA___V128*/ + meltfptr[127] = (melt_ptr_t) meltsy_RECV; } /*endgetnamedsym RECV*/ @@ -8144,7 +9046,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DBGINFO without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DBGINFO = melthookproc_HOOK_NAMED_SYMBOL ("DBGINFO", (long) MELT_GET); - /*_._VALDATA___V131*/ meltfptr[130] = (melt_ptr_t) meltsy_DBGINFO; + /*_._VALDATA___V131*/ + meltfptr[130] = (melt_ptr_t) meltsy_DBGINFO; } /*endgetnamedsym DBGINFO*/ @@ -8157,7 +9060,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DBG_OUTPUTAGAIN without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DBG_OUTPUTAGAIN = melthookproc_HOOK_NAMED_SYMBOL ("DBG_OUTPUTAGAIN", (long) MELT_GET); - /*_._VALDATA___V138*/ meltfptr[137] = (melt_ptr_t) meltsy_DBG_OUTPUTAGAIN; + /*_._VALDATA___V138*/ + meltfptr[137] = (melt_ptr_t) meltsy_DBG_OUTPUTAGAIN; } /*endgetnamedsym DBG_OUTPUTAGAIN*/ @@ -8170,7 +9074,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol TREE_DEBUG_FUNCONT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_TREE_DEBUG_FUNCONT = melthookproc_HOOK_NAMED_SYMBOL ("TREE_DEBUG_FUNCONT", (long) MELT_GET); - /*_._VALDATA___V146*/ meltfptr[145] = (melt_ptr_t) meltsy_TREE_DEBUG_FUNCONT; + /*_._VALDATA___V146*/ + meltfptr[145] = (melt_ptr_t) meltsy_TREE_DEBUG_FUNCONT; } /*endgetnamedsym TREE_DEBUG_FUNCONT*/ @@ -8183,7 +9088,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CLASS_REFERENCE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CLASS_REFERENCE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_REFERENCE", (long) MELT_GET); - /*_._VALDATA___V148*/ meltfptr[147] = (melt_ptr_t) meltsy_CLASS_REFERENCE; + /*_._VALDATA___V148*/ + meltfptr[147] = (melt_ptr_t) meltsy_CLASS_REFERENCE; } /*endgetnamedsym CLASS_REFERENCE*/ @@ -8196,7 +9102,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol GIMPLE_DEBUG_FUNCONT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_GIMPLE_DEBUG_FUNCONT = melthookproc_HOOK_NAMED_SYMBOL ("GIMPLE_DEBUG_FUNCONT", (long) MELT_GET); - /*_._VALDATA___V153*/ meltfptr[152] = (melt_ptr_t) meltsy_GIMPLE_DEBUG_FUNCONT; + /*_._VALDATA___V153*/ + meltfptr[152] = (melt_ptr_t) meltsy_GIMPLE_DEBUG_FUNCONT; } /*endgetnamedsym GIMPLE_DEBUG_FUNCONT*/ @@ -8209,7 +9116,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol GIMPLESEQ_DEBUG_FUNCONT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_GIMPLESEQ_DEBUG_FUNCONT = melthookproc_HOOK_NAMED_SYMBOL ("GIMPLESEQ_DEBUG_FUNCONT", (long) MELT_GET); - /*_._VALDATA___V158*/ meltfptr[157] = (melt_ptr_t) meltsy_GIMPLESEQ_DEBUG_FUNCONT; + /*_._VALDATA___V158*/ + meltfptr[157] = (melt_ptr_t) meltsy_GIMPLESEQ_DEBUG_FUNCONT; } /*endgetnamedsym GIMPLESEQ_DEBUG_FUNCONT*/ @@ -8222,7 +9130,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol EDGE_DEBUG_FUNCONT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_EDGE_DEBUG_FUNCONT = melthookproc_HOOK_NAMED_SYMBOL ("EDGE_DEBUG_FUNCONT", (long) MELT_GET); - /*_._VALDATA___V163*/ meltfptr[162] = (melt_ptr_t) meltsy_EDGE_DEBUG_FUNCONT; + /*_._VALDATA___V163*/ + meltfptr[162] = (melt_ptr_t) meltsy_EDGE_DEBUG_FUNCONT; } /*endgetnamedsym EDGE_DEBUG_FUNCONT*/ @@ -8235,7 +9144,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol BASICBLOCK_DEBUG_FUNCONT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_BASICBLOCK_DEBUG_FUNCONT = melthookproc_HOOK_NAMED_SYMBOL ("BASICBLOCK_DEBUG_FUNCONT", (long) MELT_GET); - /*_._VALDATA___V168*/ meltfptr[167] = (melt_ptr_t) meltsy_BASICBLOCK_DEBUG_FUNCONT; + /*_._VALDATA___V168*/ + meltfptr[167] = (melt_ptr_t) meltsy_BASICBLOCK_DEBUG_FUNCONT; } /*endgetnamedsym BASICBLOCK_DEBUG_FUNCONT*/ @@ -8248,7 +9158,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol LOOP_DEBUG_FUNCONT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_LOOP_DEBUG_FUNCONT = melthookproc_HOOK_NAMED_SYMBOL ("LOOP_DEBUG_FUNCONT", (long) MELT_GET); - /*_._VALDATA___V173*/ meltfptr[172] = (melt_ptr_t) meltsy_LOOP_DEBUG_FUNCONT; + /*_._VALDATA___V173*/ + meltfptr[172] = (melt_ptr_t) meltsy_LOOP_DEBUG_FUNCONT; } /*endgetnamedsym LOOP_DEBUG_FUNCONT*/ @@ -8261,7 +9172,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_DEBUG_CLOSURE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_DEBUG_CLOSURE = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_DEBUG_CLOSURE", (long) MELT_GET); - /*_._VALDATA___V178*/ meltfptr[177] = (melt_ptr_t) meltsy_DISCR_DEBUG_CLOSURE; + /*_._VALDATA___V178*/ + meltfptr[177] = (melt_ptr_t) meltsy_DISCR_DEBUG_CLOSURE; } /*endgetnamedsym DISCR_DEBUG_CLOSURE*/ @@ -8274,7 +9186,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CLASS_DISCRIMINANT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CLASS_DISCRIMINANT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_DISCRIMINANT", (long) MELT_GET); - /*_._VALDATA___V180*/ meltfptr[179] = (melt_ptr_t) meltsy_CLASS_DISCRIMINANT; + /*_._VALDATA___V180*/ + meltfptr[179] = (melt_ptr_t) meltsy_CLASS_DISCRIMINANT; } /*endgetnamedsym CLASS_DISCRIMINANT*/ @@ -8287,7 +9200,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_CLOSURE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_CLOSURE = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_CLOSURE", (long) MELT_GET); - /*_._VALDATA___V184*/ meltfptr[183] = (melt_ptr_t) meltsy_DISCR_CLOSURE; + /*_._VALDATA___V184*/ + meltfptr[183] = (melt_ptr_t) meltsy_DISCR_CLOSURE; } /*endgetnamedsym DISCR_CLOSURE*/ @@ -8300,7 +9214,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol INITIAL_SYSTEM_DATA without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_INITIAL_SYSTEM_DATA = melthookproc_HOOK_NAMED_SYMBOL ("INITIAL_SYSTEM_DATA", (long) MELT_GET); - /*_._VALDATA___V192*/ meltfptr[191] = (melt_ptr_t) meltsy_INITIAL_SYSTEM_DATA; + /*_._VALDATA___V192*/ + meltfptr[191] = (melt_ptr_t) meltsy_INITIAL_SYSTEM_DATA; } /*endgetnamedsym INITIAL_SYSTEM_DATA*/ @@ -8313,7 +9228,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CLASS_SYSTEM_DATA without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CLASS_SYSTEM_DATA = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SYSTEM_DATA", (long) MELT_GET); - /*_._VALDATA___V194*/ meltfptr[193] = (melt_ptr_t) meltsy_CLASS_SYSTEM_DATA; + /*_._VALDATA___V194*/ + meltfptr[193] = (melt_ptr_t) meltsy_CLASS_SYSTEM_DATA; } /*endgetnamedsym CLASS_SYSTEM_DATA*/ @@ -8326,7 +9242,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_MAP_OBJECTS without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_MAP_OBJECTS = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_MAP_OBJECTS", (long) MELT_GET); - /*_._VALDATA___V196*/ meltfptr[195] = (melt_ptr_t) meltsy_DISCR_MAP_OBJECTS; + /*_._VALDATA___V196*/ + meltfptr[195] = (melt_ptr_t) meltsy_DISCR_MAP_OBJECTS; } /*endgetnamedsym DISCR_MAP_OBJECTS*/ @@ -8339,7 +9256,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_INTEGER without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_INTEGER = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_INTEGER", (long) MELT_GET); - /*_._VALDATA___V198*/ meltfptr[197] = (melt_ptr_t) meltsy_DISCR_INTEGER; + /*_._VALDATA___V198*/ + meltfptr[197] = (melt_ptr_t) meltsy_DISCR_INTEGER; } /*endgetnamedsym DISCR_INTEGER*/ @@ -8352,7 +9270,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_STRBUF without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_STRBUF = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_STRBUF", (long) MELT_GET); - /*_._VALDATA___V200*/ meltfptr[199] = (melt_ptr_t) meltsy_DISCR_STRBUF; + /*_._VALDATA___V200*/ + meltfptr[199] = (melt_ptr_t) meltsy_DISCR_STRBUF; } /*endgetnamedsym DISCR_STRBUF*/ @@ -8365,7 +9284,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol MELT_ASSERT_FAILURE_FUN without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_MELT_ASSERT_FAILURE_FUN = melthookproc_HOOK_NAMED_SYMBOL ("MELT_ASSERT_FAILURE_FUN", (long) MELT_GET); - /*_._VALDATA___V202*/ meltfptr[201] = (melt_ptr_t) meltsy_MELT_ASSERT_FAILURE_FUN; + /*_._VALDATA___V202*/ + meltfptr[201] = (melt_ptr_t) meltsy_MELT_ASSERT_FAILURE_FUN; } /*endgetnamedsym MELT_ASSERT_FAILURE_FUN*/ @@ -8378,7 +9298,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol ADD2OUT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_ADD2OUT = melthookproc_HOOK_NAMED_SYMBOL ("ADD2OUT", (long) MELT_GET); - /*_._VALDATA___V204*/ meltfptr[203] = (melt_ptr_t) meltsy_ADD2OUT; + /*_._VALDATA___V204*/ + meltfptr[203] = (melt_ptr_t) meltsy_ADD2OUT; } /*endgetnamedsym ADD2OUT*/ @@ -8391,7 +9312,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CSTRING_PREFIXED without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CSTRING_PREFIXED = melthookproc_HOOK_NAMED_SYMBOL ("CSTRING_PREFIXED", (long) MELT_GET); - /*_._VALDATA___V206*/ meltfptr[205] = (melt_ptr_t) meltsy_CSTRING_PREFIXED; + /*_._VALDATA___V206*/ + meltfptr[205] = (melt_ptr_t) meltsy_CSTRING_PREFIXED; } /*endgetnamedsym CSTRING_PREFIXED*/ @@ -8404,7 +9326,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CLASS_NAMED without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CLASS_NAMED = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_NAMED", (long) MELT_GET); - /*_._VALDATA___V208*/ meltfptr[207] = (melt_ptr_t) meltsy_CLASS_NAMED; + /*_._VALDATA___V208*/ + meltfptr[207] = (melt_ptr_t) meltsy_CLASS_NAMED; } /*endgetnamedsym CLASS_NAMED*/ @@ -8417,7 +9340,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CLASS_QUASI_CTYPE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CLASS_QUASI_CTYPE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_QUASI_CTYPE", (long) MELT_GET); - /*_._VALDATA___V210*/ meltfptr[209] = (melt_ptr_t) meltsy_CLASS_QUASI_CTYPE; + /*_._VALDATA___V210*/ + meltfptr[209] = (melt_ptr_t) meltsy_CLASS_QUASI_CTYPE; } /*endgetnamedsym CLASS_QUASI_CTYPE*/ @@ -8430,7 +9354,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol INSTALL_METHOD without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_INSTALL_METHOD = melthookproc_HOOK_NAMED_SYMBOL ("INSTALL_METHOD", (long) MELT_GET); - /*_._VALDATA___V218*/ meltfptr[217] = (melt_ptr_t) meltsy_INSTALL_METHOD; + /*_._VALDATA___V218*/ + meltfptr[217] = (melt_ptr_t) meltsy_INSTALL_METHOD; } /*endgetnamedsym INSTALL_METHOD*/ @@ -8443,7 +9368,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_NULL_RECEIVER without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_NULL_RECEIVER = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_NULL_RECEIVER", (long) MELT_GET); - /*_._VALDATA___V220*/ meltfptr[219] = (melt_ptr_t) meltsy_DISCR_NULL_RECEIVER; + /*_._VALDATA___V220*/ + meltfptr[219] = (melt_ptr_t) meltsy_DISCR_NULL_RECEIVER; } /*endgetnamedsym DISCR_NULL_RECEIVER*/ @@ -8456,7 +9382,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_STRING without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_STRING = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_STRING", (long) MELT_GET); - /*_._VALDATA___V224*/ meltfptr[223] = (melt_ptr_t) meltsy_DISCR_STRING; + /*_._VALDATA___V224*/ + meltfptr[223] = (melt_ptr_t) meltsy_DISCR_STRING; } /*endgetnamedsym DISCR_STRING*/ @@ -8469,7 +9396,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_VERBATIM_STRING without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_VERBATIM_STRING = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_VERBATIM_STRING", (long) MELT_GET); - /*_._VALDATA___V226*/ meltfptr[225] = (melt_ptr_t) meltsy_DISCR_VERBATIM_STRING; + /*_._VALDATA___V226*/ + meltfptr[225] = (melt_ptr_t) meltsy_DISCR_VERBATIM_STRING; } /*endgetnamedsym DISCR_VERBATIM_STRING*/ @@ -8482,7 +9410,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_CONSTANT_INTEGER without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_CONSTANT_INTEGER = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_CONSTANT_INTEGER", (long) MELT_GET); - /*_._VALDATA___V232*/ meltfptr[231] = (melt_ptr_t) meltsy_DISCR_CONSTANT_INTEGER; + /*_._VALDATA___V232*/ + meltfptr[231] = (melt_ptr_t) meltsy_DISCR_CONSTANT_INTEGER; } /*endgetnamedsym DISCR_CONSTANT_INTEGER*/ @@ -8495,7 +9424,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_DOUBLE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_DOUBLE = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_DOUBLE", (long) MELT_GET); - /*_._VALDATA___V236*/ meltfptr[235] = (melt_ptr_t) meltsy_DISCR_DOUBLE; + /*_._VALDATA___V236*/ + meltfptr[235] = (melt_ptr_t) meltsy_DISCR_DOUBLE; } /*endgetnamedsym DISCR_DOUBLE*/ @@ -8508,7 +9438,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_CONSTANT_DOUBLE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_CONSTANT_DOUBLE = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_CONSTANT_DOUBLE", (long) MELT_GET); - /*_._VALDATA___V238*/ meltfptr[237] = (melt_ptr_t) meltsy_DISCR_CONSTANT_DOUBLE; + /*_._VALDATA___V238*/ + meltfptr[237] = (melt_ptr_t) meltsy_DISCR_CONSTANT_DOUBLE; } /*endgetnamedsym DISCR_CONSTANT_DOUBLE*/ @@ -8521,7 +9452,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_MIXED_INTEGER without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_MIXED_INTEGER = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_MIXED_INTEGER", (long) MELT_GET); - /*_._VALDATA___V242*/ meltfptr[241] = (melt_ptr_t) meltsy_DISCR_MIXED_INTEGER; + /*_._VALDATA___V242*/ + meltfptr[241] = (melt_ptr_t) meltsy_DISCR_MIXED_INTEGER; } /*endgetnamedsym DISCR_MIXED_INTEGER*/ @@ -8534,7 +9466,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_MIXED_LOCATION without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_MIXED_LOCATION = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_MIXED_LOCATION", (long) MELT_GET); - /*_._VALDATA___V246*/ meltfptr[245] = (melt_ptr_t) meltsy_DISCR_MIXED_LOCATION; + /*_._VALDATA___V246*/ + meltfptr[245] = (melt_ptr_t) meltsy_DISCR_MIXED_LOCATION; } /*endgetnamedsym DISCR_MIXED_LOCATION*/ @@ -8547,7 +9480,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_MIXED_BIGINT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_MIXED_BIGINT = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_MIXED_BIGINT", (long) MELT_GET); - /*_._VALDATA___V250*/ meltfptr[249] = (melt_ptr_t) meltsy_DISCR_MIXED_BIGINT; + /*_._VALDATA___V250*/ + meltfptr[249] = (melt_ptr_t) meltsy_DISCR_MIXED_BIGINT; } /*endgetnamedsym DISCR_MIXED_BIGINT*/ @@ -8560,7 +9494,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_MULTIPLE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_MULTIPLE = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_MULTIPLE", (long) MELT_GET); - /*_._VALDATA___V254*/ meltfptr[253] = (melt_ptr_t) meltsy_DISCR_MULTIPLE; + /*_._VALDATA___V254*/ + meltfptr[253] = (melt_ptr_t) meltsy_DISCR_MULTIPLE; } /*endgetnamedsym DISCR_MULTIPLE*/ @@ -8573,7 +9508,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_ROUTINE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_ROUTINE = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_ROUTINE", (long) MELT_GET); - /*_._VALDATA___V259*/ meltfptr[258] = (melt_ptr_t) meltsy_DISCR_ROUTINE; + /*_._VALDATA___V259*/ + meltfptr[258] = (melt_ptr_t) meltsy_DISCR_ROUTINE; } /*endgetnamedsym DISCR_ROUTINE*/ @@ -8586,7 +9522,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol ROUTINE_EVERY without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_ROUTINE_EVERY = melthookproc_HOOK_NAMED_SYMBOL ("ROUTINE_EVERY", (long) MELT_GET); - /*_._VALDATA___V261*/ meltfptr[260] = (melt_ptr_t) meltsy_ROUTINE_EVERY; + /*_._VALDATA___V261*/ + meltfptr[260] = (melt_ptr_t) meltsy_ROUTINE_EVERY; } /*endgetnamedsym ROUTINE_EVERY*/ @@ -8599,7 +9536,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol HOOK_EVERY without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_HOOK_EVERY = melthookproc_HOOK_NAMED_SYMBOL ("HOOK_EVERY", (long) MELT_GET); - /*_._VALDATA___V266*/ meltfptr[265] = (melt_ptr_t) meltsy_HOOK_EVERY; + /*_._VALDATA___V266*/ + meltfptr[265] = (melt_ptr_t) meltsy_HOOK_EVERY; } /*endgetnamedsym HOOK_EVERY*/ @@ -8612,7 +9550,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_HOOK without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_HOOK = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_HOOK", (long) MELT_GET); - /*_._VALDATA___V268*/ meltfptr[267] = (melt_ptr_t) meltsy_DISCR_HOOK; + /*_._VALDATA___V268*/ + meltfptr[267] = (melt_ptr_t) meltsy_DISCR_HOOK; } /*endgetnamedsym DISCR_HOOK*/ @@ -8625,7 +9564,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_LIST without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_LIST = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_LIST", (long) MELT_GET); - /*_._VALDATA___V274*/ meltfptr[273] = (melt_ptr_t) meltsy_DISCR_LIST; + /*_._VALDATA___V274*/ + meltfptr[273] = (melt_ptr_t) meltsy_DISCR_LIST; } /*endgetnamedsym DISCR_LIST*/ @@ -8638,7 +9578,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_PAIR without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_PAIR = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_PAIR", (long) MELT_GET); - /*_._VALDATA___V278*/ meltfptr[277] = (melt_ptr_t) meltsy_DISCR_PAIR; + /*_._VALDATA___V278*/ + meltfptr[277] = (melt_ptr_t) meltsy_DISCR_PAIR; } /*endgetnamedsym DISCR_PAIR*/ @@ -8651,7 +9592,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol MAPOBJECT_EVERY without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_MAPOBJECT_EVERY = melthookproc_HOOK_NAMED_SYMBOL ("MAPOBJECT_EVERY", (long) MELT_GET); - /*_._VALDATA___V288*/ meltfptr[287] = (melt_ptr_t) meltsy_MAPOBJECT_EVERY; + /*_._VALDATA___V288*/ + meltfptr[287] = (melt_ptr_t) meltsy_MAPOBJECT_EVERY; } /*endgetnamedsym MAPOBJECT_EVERY*/ @@ -8664,7 +9606,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol MULTIPLE_SORT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_MULTIPLE_SORT = melthookproc_HOOK_NAMED_SYMBOL ("MULTIPLE_SORT", (long) MELT_GET); - /*_._VALDATA___V290*/ meltfptr[289] = (melt_ptr_t) meltsy_MULTIPLE_SORT; + /*_._VALDATA___V290*/ + meltfptr[289] = (melt_ptr_t) meltsy_MULTIPLE_SORT; } /*endgetnamedsym MULTIPLE_SORT*/ @@ -8677,7 +9620,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol COMPARE_OBJ_RANKED without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_COMPARE_OBJ_RANKED = melthookproc_HOOK_NAMED_SYMBOL ("COMPARE_OBJ_RANKED", (long) MELT_GET); - /*_._VALDATA___V292*/ meltfptr[291] = (melt_ptr_t) meltsy_COMPARE_OBJ_RANKED; + /*_._VALDATA___V292*/ + meltfptr[291] = (melt_ptr_t) meltsy_COMPARE_OBJ_RANKED; } /*endgetnamedsym COMPARE_OBJ_RANKED*/ @@ -8690,7 +9634,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol MULTIPLE_EVERY without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_MULTIPLE_EVERY = melthookproc_HOOK_NAMED_SYMBOL ("MULTIPLE_EVERY", (long) MELT_GET); - /*_._VALDATA___V294*/ meltfptr[293] = (melt_ptr_t) meltsy_MULTIPLE_EVERY; + /*_._VALDATA___V294*/ + meltfptr[293] = (melt_ptr_t) meltsy_MULTIPLE_EVERY; } /*endgetnamedsym MULTIPLE_EVERY*/ @@ -8703,7 +9648,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol MAPSTRING_EVERY without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_MAPSTRING_EVERY = melthookproc_HOOK_NAMED_SYMBOL ("MAPSTRING_EVERY", (long) MELT_GET); - /*_._VALDATA___V303*/ meltfptr[302] = (melt_ptr_t) meltsy_MAPSTRING_EVERY; + /*_._VALDATA___V303*/ + meltfptr[302] = (melt_ptr_t) meltsy_MAPSTRING_EVERY; } /*endgetnamedsym MAPSTRING_EVERY*/ @@ -8716,7 +9662,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_MAP_STRINGS without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_MAP_STRINGS = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_MAP_STRINGS", (long) MELT_GET); - /*_._VALDATA___V305*/ meltfptr[304] = (melt_ptr_t) meltsy_DISCR_MAP_STRINGS; + /*_._VALDATA___V305*/ + meltfptr[304] = (melt_ptr_t) meltsy_DISCR_MAP_STRINGS; } /*endgetnamedsym DISCR_MAP_STRINGS*/ @@ -8729,7 +9676,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_BUCKET_LONGS without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_BUCKET_LONGS = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_BUCKET_LONGS", (long) MELT_GET); - /*_._VALDATA___V309*/ meltfptr[308] = (melt_ptr_t) meltsy_DISCR_BUCKET_LONGS; + /*_._VALDATA___V309*/ + meltfptr[308] = (melt_ptr_t) meltsy_DISCR_BUCKET_LONGS; } /*endgetnamedsym DISCR_BUCKET_LONGS*/ @@ -8742,7 +9690,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_JSONOBJECT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_JSONOBJECT = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_JSONOBJECT", (long) MELT_GET); - /*_._VALDATA___V313*/ meltfptr[312] = (melt_ptr_t) meltsy_DISCR_JSONOBJECT; + /*_._VALDATA___V313*/ + meltfptr[312] = (melt_ptr_t) meltsy_DISCR_JSONOBJECT; } /*endgetnamedsym DISCR_JSONOBJECT*/ @@ -8755,7 +9704,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISCR_ANY_RECEIVER without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISCR_ANY_RECEIVER = melthookproc_HOOK_NAMED_SYMBOL ("DISCR_ANY_RECEIVER", (long) MELT_GET); - /*_._VALDATA___V319*/ meltfptr[318] = (melt_ptr_t) meltsy_DISCR_ANY_RECEIVER; + /*_._VALDATA___V319*/ + meltfptr[318] = (melt_ptr_t) meltsy_DISCR_ANY_RECEIVER; } /*endgetnamedsym DISCR_ANY_RECEIVER*/ @@ -8768,7 +9718,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DBGOUT_NAMEDOBJECT_METHOD without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DBGOUT_NAMEDOBJECT_METHOD = melthookproc_HOOK_NAMED_SYMBOL ("DBGOUT_NAMEDOBJECT_METHOD", (long) MELT_GET); - /*_._VALDATA___V325*/ meltfptr[324] = (melt_ptr_t) meltsy_DBGOUT_NAMEDOBJECT_METHOD; + /*_._VALDATA___V325*/ + meltfptr[324] = (melt_ptr_t) meltsy_DBGOUT_NAMEDOBJECT_METHOD; } /*endgetnamedsym DBGOUT_NAMEDOBJECT_METHOD*/ @@ -8781,7 +9732,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CLASS_SYMBOL without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CLASS_SYMBOL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_SYMBOL", (long) MELT_GET); - /*_._VALDATA___V331*/ meltfptr[330] = (melt_ptr_t) meltsy_CLASS_SYMBOL; + /*_._VALDATA___V331*/ + meltfptr[330] = (melt_ptr_t) meltsy_CLASS_SYMBOL; } /*endgetnamedsym CLASS_SYMBOL*/ @@ -8794,7 +9746,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CLASS_CLASS without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CLASS_CLASS = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_CLASS", (long) MELT_GET); - /*_._VALDATA___V337*/ meltfptr[336] = (melt_ptr_t) meltsy_CLASS_CLASS; + /*_._VALDATA___V337*/ + meltfptr[336] = (melt_ptr_t) meltsy_CLASS_CLASS; } /*endgetnamedsym CLASS_CLASS*/ @@ -8807,7 +9760,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CLASS_KEYWORD without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CLASS_KEYWORD = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_KEYWORD", (long) MELT_GET); - /*_._VALDATA___V341*/ meltfptr[340] = (melt_ptr_t) meltsy_CLASS_KEYWORD; + /*_._VALDATA___V341*/ + meltfptr[340] = (melt_ptr_t) meltsy_CLASS_KEYWORD; } /*endgetnamedsym CLASS_KEYWORD*/ @@ -8820,7 +9774,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CLASS_CLONED_SYMBOL without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CLASS_CLONED_SYMBOL = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_CLONED_SYMBOL", (long) MELT_GET); - /*_._VALDATA___V347*/ meltfptr[346] = (melt_ptr_t) meltsy_CLASS_CLONED_SYMBOL; + /*_._VALDATA___V347*/ + meltfptr[346] = (melt_ptr_t) meltsy_CLASS_CLONED_SYMBOL; } /*endgetnamedsym CLASS_CLONED_SYMBOL*/ @@ -8833,7 +9788,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CLASS_ENVIRONMENT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CLASS_ENVIRONMENT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_ENVIRONMENT", (long) MELT_GET); - /*_._VALDATA___V353*/ meltfptr[352] = (melt_ptr_t) meltsy_CLASS_ENVIRONMENT; + /*_._VALDATA___V353*/ + meltfptr[352] = (melt_ptr_t) meltsy_CLASS_ENVIRONMENT; } /*endgetnamedsym CLASS_ENVIRONMENT*/ @@ -8846,7 +9802,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol ENV_PREV without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_ENV_PREV = melthookproc_HOOK_NAMED_SYMBOL ("ENV_PREV", (long) MELT_GET); - /*_._VALDATA___V355*/ meltfptr[354] = (melt_ptr_t) meltsy_ENV_PREV; + /*_._VALDATA___V355*/ + meltfptr[354] = (melt_ptr_t) meltsy_ENV_PREV; } /*endgetnamedsym ENV_PREV*/ @@ -8859,7 +9816,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CLASS_DESCRIBED_ENVIRONMENT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CLASS_DESCRIBED_ENVIRONMENT = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_DESCRIBED_ENVIRONMENT", (long) MELT_GET); - /*_._VALDATA___V357*/ meltfptr[356] = (melt_ptr_t) meltsy_CLASS_DESCRIBED_ENVIRONMENT; + /*_._VALDATA___V357*/ + meltfptr[356] = (melt_ptr_t) meltsy_CLASS_DESCRIBED_ENVIRONMENT; } /*endgetnamedsym CLASS_DESCRIBED_ENVIRONMENT*/ @@ -8872,7 +9830,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CLASS_CTYPE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CLASS_CTYPE = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_CTYPE", (long) MELT_GET); - /*_._VALDATA___V361*/ meltfptr[360] = (melt_ptr_t) meltsy_CLASS_CTYPE; + /*_._VALDATA___V361*/ + meltfptr[360] = (melt_ptr_t) meltsy_CLASS_CTYPE; } /*endgetnamedsym CLASS_CTYPE*/ @@ -8885,7 +9844,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol CLASS_ANY_BINDING without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_CLASS_ANY_BINDING = melthookproc_HOOK_NAMED_SYMBOL ("CLASS_ANY_BINDING", (long) MELT_GET); - /*_._VALDATA___V367*/ meltfptr[366] = (melt_ptr_t) meltsy_CLASS_ANY_BINDING; + /*_._VALDATA___V367*/ + meltfptr[366] = (melt_ptr_t) meltsy_CLASS_ANY_BINDING; } /*endgetnamedsym CLASS_ANY_BINDING*/ @@ -8898,7 +9858,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DEBUG_LESS without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DEBUG_LESS = melthookproc_HOOK_NAMED_SYMBOL ("DEBUG_LESS", (long) MELT_GET); - /*_._VALDATA___V371*/ meltfptr[370] = (melt_ptr_t) meltsy_DEBUG_LESS; + /*_._VALDATA___V371*/ + meltfptr[370] = (melt_ptr_t) meltsy_DEBUG_LESS; } /*endgetnamedsym DEBUG_LESS*/ @@ -8911,7 +9872,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DEBUG_MORE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DEBUG_MORE = melthookproc_HOOK_NAMED_SYMBOL ("DEBUG_MORE", (long) MELT_GET); - /*_._VALDATA___V375*/ meltfptr[374] = (melt_ptr_t) meltsy_DEBUG_MORE; + /*_._VALDATA___V375*/ + meltfptr[374] = (melt_ptr_t) meltsy_DEBUG_MORE; } /*endgetnamedsym DEBUG_MORE*/ @@ -8924,7 +9886,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DBG_OUT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DBG_OUT = melthookproc_HOOK_NAMED_SYMBOL ("DBG_OUT", (long) MELT_GET); - /*_._VALDATA___V379*/ meltfptr[378] = (melt_ptr_t) meltsy_DBG_OUT; + /*_._VALDATA___V379*/ + meltfptr[378] = (melt_ptr_t) meltsy_DBG_OUT; } /*endgetnamedsym DBG_OUT*/ @@ -8937,7 +9900,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DBG_OUTOBJECT without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DBG_OUTOBJECT = melthookproc_HOOK_NAMED_SYMBOL ("DBG_OUTOBJECT", (long) MELT_GET); - /*_._VALDATA___V381*/ meltfptr[380] = (melt_ptr_t) meltsy_DBG_OUTOBJECT; + /*_._VALDATA___V381*/ + meltfptr[380] = (melt_ptr_t) meltsy_DBG_OUTOBJECT; } /*endgetnamedsym DBG_OUTOBJECT*/ @@ -8950,7 +9914,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DBGOUT_FIELDS without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DBGOUT_FIELDS = melthookproc_HOOK_NAMED_SYMBOL ("DBGOUT_FIELDS", (long) MELT_GET); - /*_._VALDATA___V383*/ meltfptr[382] = (melt_ptr_t) meltsy_DBGOUT_FIELDS; + /*_._VALDATA___V383*/ + meltfptr[382] = (melt_ptr_t) meltsy_DBGOUT_FIELDS; } /*endgetnamedsym DBGOUT_FIELDS*/ @@ -8963,7 +9928,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DBGOUTAGAIN_FIELDS without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DBGOUTAGAIN_FIELDS = melthookproc_HOOK_NAMED_SYMBOL ("DBGOUTAGAIN_FIELDS", (long) MELT_GET); - /*_._VALDATA___V385*/ meltfptr[384] = (melt_ptr_t) meltsy_DBGOUTAGAIN_FIELDS; + /*_._VALDATA___V385*/ + meltfptr[384] = (melt_ptr_t) meltsy_DBGOUTAGAIN_FIELDS; } /*endgetnamedsym DBGOUTAGAIN_FIELDS*/ @@ -8976,7 +9942,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol DISPLAY_DEBUG_MESSAGE without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_DISPLAY_DEBUG_MESSAGE = melthookproc_HOOK_NAMED_SYMBOL ("DISPLAY_DEBUG_MESSAGE", (long) MELT_GET); - /*_._VALDATA___V387*/ meltfptr[386] = (melt_ptr_t) meltsy_DISPLAY_DEBUG_MESSAGE; + /*_._VALDATA___V387*/ + meltfptr[386] = (melt_ptr_t) meltsy_DISPLAY_DEBUG_MESSAGE; } /*endgetnamedsym DISPLAY_DEBUG_MESSAGE*/ @@ -8989,7 +9956,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol MELT_DEBUG_FUN without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_MELT_DEBUG_FUN = melthookproc_HOOK_NAMED_SYMBOL ("MELT_DEBUG_FUN", (long) MELT_GET); - /*_._VALDATA___V389*/ meltfptr[388] = (melt_ptr_t) meltsy_MELT_DEBUG_FUN; + /*_._VALDATA___V389*/ + meltfptr[388] = (melt_ptr_t) meltsy_MELT_DEBUG_FUN; } /*endgetnamedsym MELT_DEBUG_FUN*/ @@ -9002,7 +9970,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol REGISTER_BASICBLOCK_DEBUG_FUN without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_REGISTER_BASICBLOCK_DEBUG_FUN = melthookproc_HOOK_NAMED_SYMBOL ("REGISTER_BASICBLOCK_DEBUG_FUN", (long) MELT_GET); - /*_._VALDATA___V391*/ meltfptr[390] = (melt_ptr_t) meltsy_REGISTER_BASICBLOCK_DEBUG_FUN; + /*_._VALDATA___V391*/ + meltfptr[390] = (melt_ptr_t) meltsy_REGISTER_BASICBLOCK_DEBUG_FUN; } /*endgetnamedsym REGISTER_BASICBLOCK_DEBUG_FUN*/ @@ -9015,7 +9984,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol REGISTER_EDGE_DEBUG_FUN without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_REGISTER_EDGE_DEBUG_FUN = melthookproc_HOOK_NAMED_SYMBOL ("REGISTER_EDGE_DEBUG_FUN", (long) MELT_GET); - /*_._VALDATA___V393*/ meltfptr[392] = (melt_ptr_t) meltsy_REGISTER_EDGE_DEBUG_FUN; + /*_._VALDATA___V393*/ + meltfptr[392] = (melt_ptr_t) meltsy_REGISTER_EDGE_DEBUG_FUN; } /*endgetnamedsym REGISTER_EDGE_DEBUG_FUN*/ @@ -9028,7 +9998,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol REGISTER_GIMPLE_DEBUG_FUN without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_REGISTER_GIMPLE_DEBUG_FUN = melthookproc_HOOK_NAMED_SYMBOL ("REGISTER_GIMPLE_DEBUG_FUN", (long) MELT_GET); - /*_._VALDATA___V395*/ meltfptr[394] = (melt_ptr_t) meltsy_REGISTER_GIMPLE_DEBUG_FUN; + /*_._VALDATA___V395*/ + meltfptr[394] = (melt_ptr_t) meltsy_REGISTER_GIMPLE_DEBUG_FUN; } /*endgetnamedsym REGISTER_GIMPLE_DEBUG_FUN*/ @@ -9041,7 +10012,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol REGISTER_GIMPLESEQ_DEBUG_FUN without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_REGISTER_GIMPLESEQ_DEBUG_FUN = melthookproc_HOOK_NAMED_SYMBOL ("REGISTER_GIMPLESEQ_DEBUG_FUN", (long) MELT_GET); - /*_._VALDATA___V397*/ meltfptr[396] = (melt_ptr_t) meltsy_REGISTER_GIMPLESEQ_DEBUG_FUN; + /*_._VALDATA___V397*/ + meltfptr[396] = (melt_ptr_t) meltsy_REGISTER_GIMPLESEQ_DEBUG_FUN; } /*endgetnamedsym REGISTER_GIMPLESEQ_DEBUG_FUN*/ @@ -9054,7 +10026,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol REGISTER_LOOP_DEBUG_FUN without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_REGISTER_LOOP_DEBUG_FUN = melthookproc_HOOK_NAMED_SYMBOL ("REGISTER_LOOP_DEBUG_FUN", (long) MELT_GET); - /*_._VALDATA___V399*/ meltfptr[398] = (melt_ptr_t) meltsy_REGISTER_LOOP_DEBUG_FUN; + /*_._VALDATA___V399*/ + meltfptr[398] = (melt_ptr_t) meltsy_REGISTER_LOOP_DEBUG_FUN; } /*endgetnamedsym REGISTER_LOOP_DEBUG_FUN*/ @@ -9067,7 +10040,8 @@ void* melt_start_this_module (void* modargp_) #error MELT getting named symbol REGISTER_TREE_DEBUG_FUN without initial environment #endif /*!MELT_HAS_INITIAL_ENVIRONMENT*/ melt_ptr_t meltsy_REGISTER_TREE_DEBUG_FUN = melthookproc_HOOK_NAMED_SYMBOL ("REGISTER_TREE_DEBUG_FUN", (long) MELT_GET); - /*_._VALDATA___V401*/ meltfptr[400] = (melt_ptr_t) meltsy_REGISTER_TREE_DEBUG_FUN; + /*_._VALDATA___V401*/ + meltfptr[400] = (melt_ptr_t) meltsy_REGISTER_TREE_DEBUG_FUN; } /*endgetnamedsym REGISTER_TREE_DEBUG_FUN*/ @@ -9075,157 +10049,208 @@ void* melt_start_this_module (void* modargp_) /**COMMENT: before getting imported values thru hook **/; MELT_LOCATION("warmelt-debug.melt:4:/ compute"); - /*_.HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER__V7*/ meltfptr[6] = + /*_.HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER__V7*/ + meltfptr[6] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:42:/ compute"); - /*_.CLASS_ROOT__V8*/ meltfptr[7] = + /*_.CLASS_ROOT__V8*/ + meltfptr[7] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "CLASS_ROOT", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:90:/ compute"); - /*_.CLASS_SELECTOR__V9*/ meltfptr[8] = + /*_.CLASS_SELECTOR__V9*/ + meltfptr[8] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "CLASS_SELECTOR", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:110:/ compute"); - /*_.CLASS_REFERENCE__V10*/ meltfptr[9] = + /*_.CLASS_REFERENCE__V10*/ + meltfptr[9] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "CLASS_REFERENCE", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:188:/ compute"); - /*_.CLASS_DISCRIMINANT__V11*/ meltfptr[10] = + /*_.CLASS_DISCRIMINANT__V11*/ + meltfptr[10] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "CLASS_DISCRIMINANT", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; /*^compute*/ - /*_.DISCR_CLOSURE__V12*/ meltfptr[11] = + /*_.DISCR_CLOSURE__V12*/ + meltfptr[11] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_CLOSURE", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:202:/ compute"); - /*_.INITIAL_SYSTEM_DATA__V13*/ meltfptr[12] = + /*_.INITIAL_SYSTEM_DATA__V13*/ + meltfptr[12] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "INITIAL_SYSTEM_DATA", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; /*^compute*/ - /*_.CLASS_SYSTEM_DATA__V14*/ meltfptr[13] = + /*_.CLASS_SYSTEM_DATA__V14*/ + meltfptr[13] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "CLASS_SYSTEM_DATA", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:205:/ compute"); - /*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14] = + /*_.DISCR_MAP_OBJECTS__V15*/ + meltfptr[14] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_MAP_OBJECTS", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:206:/ compute"); - /*_.DISCR_INTEGER__V16*/ meltfptr[15] = + /*_.DISCR_INTEGER__V16*/ + meltfptr[15] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_INTEGER", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:232:/ compute"); - /*_.DISCR_STRBUF__V17*/ meltfptr[16] = + /*_.DISCR_STRBUF__V17*/ + meltfptr[16] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_STRBUF", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:233:/ compute"); - /*_.MELT_ASSERT_FAILURE_FUN__V18*/ meltfptr[17] = + /*_.MELT_ASSERT_FAILURE_FUN__V18*/ + meltfptr[17] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "MELT_ASSERT_FAILURE_FUN", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:264:/ compute"); - /*_.ADD2OUT__V19*/ meltfptr[18] = + /*_.ADD2OUT__V19*/ + meltfptr[18] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "ADD2OUT", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:289:/ compute"); - /*_.CSTRING_PREFIXED__V20*/ meltfptr[19] = + /*_.CSTRING_PREFIXED__V20*/ + meltfptr[19] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "CSTRING_PREFIXED", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:380:/ compute"); - /*_.CLASS_NAMED__V21*/ meltfptr[20] = + /*_.CLASS_NAMED__V21*/ + meltfptr[20] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "CLASS_NAMED", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:388:/ compute"); - /*_.CLASS_QUASI_CTYPE__V22*/ meltfptr[21] = + /*_.CLASS_QUASI_CTYPE__V22*/ + meltfptr[21] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "CLASS_QUASI_CTYPE", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:558:/ compute"); - /*_.INSTALL_METHOD__V23*/ meltfptr[22] = + /*_.INSTALL_METHOD__V23*/ + meltfptr[22] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "INSTALL_METHOD", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; /*^compute*/ - /*_.DISCR_NULL_RECEIVER__V24*/ meltfptr[23] = + /*_.DISCR_NULL_RECEIVER__V24*/ + meltfptr[23] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_NULL_RECEIVER", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:567:/ compute"); - /*_.DISCR_STRING__V25*/ meltfptr[24] = + /*_.DISCR_STRING__V25*/ + meltfptr[24] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_STRING", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:572:/ compute"); - /*_.DISCR_VERBATIM_STRING__V26*/ meltfptr[25] = + /*_.DISCR_VERBATIM_STRING__V26*/ + meltfptr[25] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_VERBATIM_STRING", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:686:/ compute"); - /*_.DISCR_CONSTANT_INTEGER__V27*/ meltfptr[26] = + /*_.DISCR_CONSTANT_INTEGER__V27*/ + meltfptr[26] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_CONSTANT_INTEGER", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:704:/ compute"); - /*_.DISCR_DOUBLE__V28*/ meltfptr[27] = + /*_.DISCR_DOUBLE__V28*/ + meltfptr[27] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_DOUBLE", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:706:/ compute"); - /*_.DISCR_CONSTANT_DOUBLE__V29*/ meltfptr[28] = + /*_.DISCR_CONSTANT_DOUBLE__V29*/ + meltfptr[28] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_CONSTANT_DOUBLE", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:723:/ compute"); - /*_.DISCR_MIXED_INTEGER__V30*/ meltfptr[29] = + /*_.DISCR_MIXED_INTEGER__V30*/ + meltfptr[29] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_MIXED_INTEGER", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:753:/ compute"); - /*_.DISCR_MIXED_LOCATION__V31*/ meltfptr[30] = + /*_.DISCR_MIXED_LOCATION__V31*/ + meltfptr[30] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_MIXED_LOCATION", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:796:/ compute"); - /*_.DISCR_MIXED_BIGINT__V32*/ meltfptr[31] = + /*_.DISCR_MIXED_BIGINT__V32*/ + meltfptr[31] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_MIXED_BIGINT", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:804:/ compute"); - /*_.DISCR_MULTIPLE__V33*/ meltfptr[32] = + /*_.DISCR_MULTIPLE__V33*/ + meltfptr[32] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_MULTIPLE", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:841:/ compute"); - /*_.DISCR_ROUTINE__V34*/ meltfptr[33] = + /*_.DISCR_ROUTINE__V34*/ + meltfptr[33] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_ROUTINE", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:849:/ compute"); - /*_.ROUTINE_EVERY__V35*/ meltfptr[34] = + /*_.ROUTINE_EVERY__V35*/ + meltfptr[34] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "ROUTINE_EVERY", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:876:/ compute"); - /*_.HOOK_EVERY__V36*/ meltfptr[35] = + /*_.HOOK_EVERY__V36*/ + meltfptr[35] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "HOOK_EVERY", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:890:/ compute"); - /*_.DISCR_HOOK__V37*/ meltfptr[36] = + /*_.DISCR_HOOK__V37*/ + meltfptr[36] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_HOOK", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:948:/ compute"); - /*_.DISCR_LIST__V38*/ meltfptr[37] = + /*_.DISCR_LIST__V38*/ + meltfptr[37] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_LIST", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:995:/ compute"); - /*_.DISCR_PAIR__V39*/ meltfptr[38] = + /*_.DISCR_PAIR__V39*/ + meltfptr[38] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_PAIR", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1052:/ compute"); - /*_.MAPOBJECT_EVERY__V40*/ meltfptr[39] = + /*_.MAPOBJECT_EVERY__V40*/ + meltfptr[39] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "MAPOBJECT_EVERY", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1065:/ compute"); - /*_.MULTIPLE_SORT__V41*/ meltfptr[40] = + /*_.MULTIPLE_SORT__V41*/ + meltfptr[40] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "MULTIPLE_SORT", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1075:/ compute"); - /*_.COMPARE_OBJ_RANKED__V42*/ meltfptr[41] = + /*_.COMPARE_OBJ_RANKED__V42*/ + meltfptr[41] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "COMPARE_OBJ_RANKED", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1081:/ compute"); - /*_.MULTIPLE_EVERY__V43*/ meltfptr[42] = + /*_.MULTIPLE_EVERY__V43*/ + meltfptr[42] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "MULTIPLE_EVERY", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1141:/ compute"); - /*_.MAPSTRING_EVERY__V44*/ meltfptr[43] = + /*_.MAPSTRING_EVERY__V44*/ + meltfptr[43] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "MAPSTRING_EVERY", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1186:/ compute"); - /*_.DISCR_MAP_STRINGS__V45*/ meltfptr[44] = + /*_.DISCR_MAP_STRINGS__V45*/ + meltfptr[44] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_MAP_STRINGS", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1224:/ compute"); - /*_.DISCR_BUCKET_LONGS__V46*/ meltfptr[45] = + /*_.DISCR_BUCKET_LONGS__V46*/ + meltfptr[45] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_BUCKET_LONGS", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1259:/ compute"); - /*_.DISCR_JSONOBJECT__V47*/ meltfptr[46] = + /*_.DISCR_JSONOBJECT__V47*/ + meltfptr[46] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_JSONOBJECT", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1295:/ compute"); - /*_.DISCR_ANY_RECEIVER__V48*/ meltfptr[47] = + /*_.DISCR_ANY_RECEIVER__V48*/ + meltfptr[47] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "DISCR_ANY_RECEIVER", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1373:/ compute"); - /*_.CLASS_SYMBOL__V49*/ meltfptr[48] = + /*_.CLASS_SYMBOL__V49*/ + meltfptr[48] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "CLASS_SYMBOL", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1401:/ compute"); - /*_.CLASS_CLASS__V50*/ meltfptr[49] = + /*_.CLASS_CLASS__V50*/ + meltfptr[49] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "CLASS_CLASS", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1411:/ compute"); - /*_.CLASS_KEYWORD__V51*/ meltfptr[50] = + /*_.CLASS_KEYWORD__V51*/ + meltfptr[50] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "CLASS_KEYWORD", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1445:/ compute"); - /*_.CLASS_CLONED_SYMBOL__V52*/ meltfptr[51] = + /*_.CLASS_CLONED_SYMBOL__V52*/ + meltfptr[51] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "CLASS_CLONED_SYMBOL", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1460:/ compute"); - /*_.CLASS_ENVIRONMENT__V53*/ meltfptr[52] = + /*_.CLASS_ENVIRONMENT__V53*/ + meltfptr[52] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "CLASS_ENVIRONMENT", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1498:/ compute"); - /*_.ENV_PREV__V54*/ meltfptr[53] = + /*_.ENV_PREV__V54*/ + meltfptr[53] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "ENV_PREV", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1519:/ compute"); - /*_.CLASS_DESCRIBED_ENVIRONMENT__V55*/ meltfptr[54] = + /*_.CLASS_DESCRIBED_ENVIRONMENT__V55*/ + meltfptr[54] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "CLASS_DESCRIBED_ENVIRONMENT", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1539:/ compute"); - /*_.CLASS_CTYPE__V56*/ meltfptr[55] = + /*_.CLASS_CTYPE__V56*/ + meltfptr[55] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "CLASS_CTYPE", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; MELT_LOCATION("warmelt-debug.melt:1554:/ compute"); - /*_.CLASS_ANY_BINDING__V57*/ meltfptr[56] = + /*_.CLASS_ANY_BINDING__V57*/ + meltfptr[56] = /*hookcall*/ melthook_HOOK_SYMBOL_IMPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_SYMBOL_IMPORTER))), "CLASS_ANY_BINDING", "warmelt-debug", /*_._PREVENV___V4*/ meltfptr[3]) ; /**COMMENT: after getting imported values **/; @@ -13831,11 +14856,13 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp /*_.HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER__V404*/ meltfptr[403] = /*hookcall*/ melthook_HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER ((melt_ptr_t) /*_.HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER__V7*/ meltfptr[6], /*_._PREVENV___V4*/ meltfptr[3], "warmelt-debug") ;; /*^compute*/ - /*_.OR___V403*/ meltfptr[402] = /*_.HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER__V404*/ meltfptr[403];; + /*_.OR___V403*/ + meltfptr[402] = /*_.HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER__V404*/ meltfptr[403];; /*epilog*/ MELT_LOCATION("warmelt-debug.melt:4:/ clear"); - /*clear*/ /*_.HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER__V404*/ meltfptr[403] = 0 ; + /*clear*/ /*_.HOOK_FRESH_ENVIRONMENT_REFERENCE_MAKER__V404*/ + meltfptr[403] = 0 ; } ; } @@ -13848,7 +14875,8 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp /*epilog*/ /*^clear*/ - /*clear*/ /*_.OR___V403*/ meltfptr[402] = 0 ; + /*clear*/ /*_.OR___V403*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:61:/ initchunk"); @@ -13863,29 +14891,33 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp (/*_._CONTENV___V2*/ meltfptr[1]) ) ; - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V74*/ meltfptr[73], /*_._VALDATA___V67*/ meltfptr[66], - /*quasi.cur.mod.env.ref norm.exp.val : DBGI_OUT*/ - /* check quasi.cur.mod.env.ref 482468513 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V76*/ meltfptr[75], /*_._VALDATA___V69*/ meltfptr[68], - /*quasi.cur.mod.env.ref norm.exp.val : DBGI_OCCMAP*/ - /* check quasi.cur.mod.env.ref 36282128 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V78*/ meltfptr[77], /*_._VALDATA___V71*/ meltfptr[70], - /*quasi.cur.mod.env.ref norm.exp.val : DBGI_MAXDEPTH*/ - /* check quasi.cur.mod.env.ref 119881303 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V80*/ meltfptr[79], /*_._VALDATA___V82*/ meltfptr[81], - /*quasi.cur.mod.env.ref norm.exp.val : CLASS_DEBUG_OUTPUT_INFORMATION*/ - /* check quasi.cur.mod.env.ref 251575825 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V74*/ meltfptr[73], /*_._VALDATA___V67*/ meltfptr[66], + /*quasi.cur.mod.env.ref norm.exp.val : DBGI_OUT*/ + /* check quasi.cur.mod.env.ref 482468513 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V76*/ meltfptr[75], /*_._VALDATA___V69*/ meltfptr[68], + /*quasi.cur.mod.env.ref norm.exp.val : DBGI_OCCMAP*/ + /* check quasi.cur.mod.env.ref 36282128 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V78*/ meltfptr[77], /*_._VALDATA___V71*/ meltfptr[70], + /*quasi.cur.mod.env.ref norm.exp.val : DBGI_MAXDEPTH*/ + /* check quasi.cur.mod.env.ref 119881303 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V80*/ meltfptr[79], /*_._VALDATA___V82*/ meltfptr[81], + /*quasi.cur.mod.env.ref norm.exp.val : CLASS_DEBUG_OUTPUT_INFORMATION*/ + /* check quasi.cur.mod.env.ref 251575825 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; /*epilog*/ } @@ -13906,13 +14938,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V217*/ meltfptr[216]; - /*_.INSTALL_METHOD__V405*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_NULL_RECEIVER__V24*/ meltfptr[23]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V405*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_NULL_RECEIVER__V24*/ meltfptr[23]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V405*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V405*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:559:/ initchunk"); @@ -13932,13 +14966,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V144*/ meltfptr[143]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V217*/ meltfptr[216]; - /*_.INSTALL_METHOD__V406*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_NULL_RECEIVER__V24*/ meltfptr[23]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V406*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_NULL_RECEIVER__V24*/ meltfptr[23]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V406*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V406*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:588:/ initchunk"); @@ -13958,13 +14994,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V223*/ meltfptr[222]; - /*_.INSTALL_METHOD__V407*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_STRING__V25*/ meltfptr[24]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V407*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_STRING__V25*/ meltfptr[24]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V407*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V407*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:671:/ initchunk"); @@ -13984,13 +15022,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V229*/ meltfptr[228]; - /*_.INSTALL_METHOD__V408*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_STRBUF__V17*/ meltfptr[16]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V408*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_STRBUF__V17*/ meltfptr[16]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V408*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V408*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:695:/ initchunk"); @@ -14010,13 +15050,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V231*/ meltfptr[230]; - /*_.INSTALL_METHOD__V409*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_INTEGER__V16*/ meltfptr[15]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V409*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_INTEGER__V16*/ meltfptr[15]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V409*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V409*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:714:/ initchunk"); @@ -14036,13 +15078,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V235*/ meltfptr[234]; - /*_.INSTALL_METHOD__V410*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_DOUBLE__V28*/ meltfptr[27]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V410*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_DOUBLE__V28*/ meltfptr[27]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V410*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V410*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:743:/ initchunk"); @@ -14062,13 +15106,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V241*/ meltfptr[240]; - /*_.INSTALL_METHOD__V411*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_MIXED_INTEGER__V30*/ meltfptr[29]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V411*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_MIXED_INTEGER__V30*/ meltfptr[29]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V411*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V411*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:772:/ initchunk"); @@ -14088,13 +15134,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V245*/ meltfptr[244]; - /*_.INSTALL_METHOD__V412*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_MIXED_LOCATION__V31*/ meltfptr[30]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V412*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_MIXED_LOCATION__V31*/ meltfptr[30]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V412*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V412*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:796:/ initchunk"); @@ -14114,13 +15162,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V249*/ meltfptr[248]; - /*_.INSTALL_METHOD__V413*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_MIXED_BIGINT__V32*/ meltfptr[31]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V413*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_MIXED_BIGINT__V32*/ meltfptr[31]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V413*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V413*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:831:/ initchunk"); @@ -14140,13 +15190,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V253*/ meltfptr[252]; - /*_.INSTALL_METHOD__V414*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_MULTIPLE__V33*/ meltfptr[32]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V414*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_MULTIPLE__V33*/ meltfptr[32]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V414*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V414*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:859:/ initchunk"); @@ -14166,13 +15218,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V258*/ meltfptr[257]; - /*_.INSTALL_METHOD__V415*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_ROUTINE__V34*/ meltfptr[33]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V415*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_ROUTINE__V34*/ meltfptr[33]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V415*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V415*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:890:/ initchunk"); @@ -14192,13 +15246,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V265*/ meltfptr[264]; - /*_.INSTALL_METHOD__V416*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_HOOK__V37*/ meltfptr[36]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V416*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_HOOK__V37*/ meltfptr[36]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V416*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V416*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:937:/ initchunk"); @@ -14218,13 +15274,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V271*/ meltfptr[270]; - /*_.INSTALL_METHOD__V417*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_CLOSURE__V12*/ meltfptr[11]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V417*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_CLOSURE__V12*/ meltfptr[11]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V417*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V417*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:985:/ initchunk"); @@ -14244,13 +15302,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V273*/ meltfptr[272]; - /*_.INSTALL_METHOD__V418*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_LIST__V38*/ meltfptr[37]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V418*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_LIST__V38*/ meltfptr[37]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V418*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V418*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1009:/ initchunk"); @@ -14270,13 +15330,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V277*/ meltfptr[276]; - /*_.INSTALL_METHOD__V419*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_PAIR__V39*/ meltfptr[38]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V419*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_PAIR__V39*/ meltfptr[38]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V419*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V419*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1104:/ initchunk"); @@ -14296,13 +15358,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V287*/ meltfptr[286]; - /*_.INSTALL_METHOD__V420*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V420*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_MAP_OBJECTS__V15*/ meltfptr[14]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V420*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V420*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1186:/ initchunk"); @@ -14322,13 +15386,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V302*/ meltfptr[301]; - /*_.INSTALL_METHOD__V421*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_MAP_STRINGS__V45*/ meltfptr[44]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V421*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_MAP_STRINGS__V45*/ meltfptr[44]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V421*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V421*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1224:/ initchunk"); @@ -14348,13 +15414,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V308*/ meltfptr[307]; - /*_.INSTALL_METHOD__V422*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_BUCKET_LONGS__V46*/ meltfptr[45]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V422*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_BUCKET_LONGS__V46*/ meltfptr[45]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V422*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V422*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1259:/ initchunk"); @@ -14374,13 +15442,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V312*/ meltfptr[311]; - /*_.INSTALL_METHOD__V423*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_JSONOBJECT__V47*/ meltfptr[46]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V423*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_JSONOBJECT__V47*/ meltfptr[46]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V423*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V423*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1284:/ initchunk"); @@ -14400,13 +15470,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V316*/ meltfptr[315]; - /*_.INSTALL_METHOD__V424*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_ROOT__V8*/ meltfptr[7]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V424*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_ROOT__V8*/ meltfptr[7]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V424*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V424*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1295:/ initchunk"); @@ -14426,13 +15498,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V318*/ meltfptr[317]; - /*_.INSTALL_METHOD__V425*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_ANY_RECEIVER__V48*/ meltfptr[47]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V425*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.DISCR_ANY_RECEIVER__V48*/ meltfptr[47]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V425*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V425*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1313:/ initchunk"); @@ -14452,13 +15526,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V144*/ meltfptr[143]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V322*/ meltfptr[321]; - /*_.INSTALL_METHOD__V426*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_ROOT__V8*/ meltfptr[7]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V426*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_ROOT__V8*/ meltfptr[7]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V426*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V426*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1348:/ initchunk"); @@ -14478,13 +15554,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V324*/ meltfptr[323]; - /*_.INSTALL_METHOD__V427*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_NAMED__V21*/ meltfptr[20]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V427*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_NAMED__V21*/ meltfptr[20]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V427*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V427*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1350:/ initchunk"); @@ -14518,13 +15596,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V144*/ meltfptr[143]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V328*/ meltfptr[327]; - /*_.INSTALL_METHOD__V428*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_NAMED__V21*/ meltfptr[20]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V428*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_NAMED__V21*/ meltfptr[20]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V428*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V428*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1387:/ initchunk"); @@ -14544,13 +15624,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V144*/ meltfptr[143]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V330*/ meltfptr[329]; - /*_.INSTALL_METHOD__V429*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_SYMBOL__V49*/ meltfptr[48]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V429*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_SYMBOL__V49*/ meltfptr[48]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V429*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V429*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1395:/ initchunk"); @@ -14570,13 +15652,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V334*/ meltfptr[333]; - /*_.INSTALL_METHOD__V430*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_SYMBOL__V49*/ meltfptr[48]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V430*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_SYMBOL__V49*/ meltfptr[48]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V430*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V430*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1405:/ initchunk"); @@ -14596,13 +15680,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V336*/ meltfptr[335]; - /*_.INSTALL_METHOD__V431*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_CLASS__V50*/ meltfptr[49]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V431*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_CLASS__V50*/ meltfptr[49]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V431*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V431*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1420:/ initchunk"); @@ -14622,13 +15708,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V144*/ meltfptr[143]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V340*/ meltfptr[339]; - /*_.INSTALL_METHOD__V432*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_KEYWORD__V51*/ meltfptr[50]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V432*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_KEYWORD__V51*/ meltfptr[50]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V432*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V432*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1428:/ initchunk"); @@ -14648,13 +15736,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V344*/ meltfptr[343]; - /*_.INSTALL_METHOD__V433*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_KEYWORD__V51*/ meltfptr[50]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V433*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_KEYWORD__V51*/ meltfptr[50]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V433*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V433*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1445:/ initchunk"); @@ -14674,13 +15764,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V144*/ meltfptr[143]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V346*/ meltfptr[345]; - /*_.INSTALL_METHOD__V434*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_CLONED_SYMBOL__V52*/ meltfptr[51]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V434*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_CLONED_SYMBOL__V52*/ meltfptr[51]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V434*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V434*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1454:/ initchunk"); @@ -14700,13 +15792,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V350*/ meltfptr[349]; - /*_.INSTALL_METHOD__V435*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_CLONED_SYMBOL__V52*/ meltfptr[51]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V435*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_CLONED_SYMBOL__V52*/ meltfptr[51]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V435*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V435*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1526:/ initchunk"); @@ -14726,13 +15820,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V352*/ meltfptr[351]; - /*_.INSTALL_METHOD__V436*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_ENVIRONMENT__V53*/ meltfptr[52]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V436*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_ENVIRONMENT__V53*/ meltfptr[52]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V436*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V436*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1539:/ initchunk"); @@ -14752,13 +15848,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V144*/ meltfptr[143]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V360*/ meltfptr[359]; - /*_.INSTALL_METHOD__V437*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_CTYPE__V56*/ meltfptr[55]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V437*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_CTYPE__V56*/ meltfptr[55]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V437*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V437*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1549:/ initchunk"); @@ -14778,13 +15876,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V364*/ meltfptr[363]; - /*_.INSTALL_METHOD__V438*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_CTYPE__V56*/ meltfptr[55]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V438*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_CTYPE__V56*/ meltfptr[55]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V438*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V438*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1577:/ initchunk"); @@ -14804,13 +15904,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V136*/ meltfptr[135]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V366*/ meltfptr[365]; - /*_.INSTALL_METHOD__V439*/ meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_ANY_BINDING__V57*/ meltfptr[56]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V439*/ + meltfptr[403] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_ANY_BINDING__V57*/ meltfptr[56]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V439*/ meltfptr[403] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V439*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1578:/ initchunk"); @@ -14830,13 +15932,15 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp argtab[0].meltbp_aptr = (melt_ptr_t*) &/*_._VALDATA___V144*/ meltfptr[143]; /*^apply.arg*/ argtab[1].meltbp_aptr = (melt_ptr_t*) &/*_._VALCLO___V366*/ meltfptr[365]; - /*_.INSTALL_METHOD__V440*/ meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_ANY_BINDING__V57*/ meltfptr[56]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); + /*_.INSTALL_METHOD__V440*/ + meltfptr[402] = melt_apply ((meltclosure_ptr_t)(/*_.INSTALL_METHOD__V23*/ meltfptr[22]), (melt_ptr_t)(/*_.CLASS_ANY_BINDING__V57*/ meltfptr[56]), (MELTBPARSTR_PTR MELTBPARSTR_PTR ""), argtab, "", (union meltparam_un*)0); } ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.INSTALL_METHOD__V440*/ meltfptr[402] = 0 ; + /*clear*/ /*_.INSTALL_METHOD__V440*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1591:/ initchunk"); @@ -14848,20 +15952,24 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp MELT_LOCATION("warmelt-debug.melt:1591:/ quasiblock"); - /*_.CLONE_WITH_DISCRIMINANT__V442*/ meltfptr[402] = + /*_.CLONE_WITH_DISCRIMINANT__V442*/ + meltfptr[402] = meltgc_clone_with_discriminant((melt_ptr_t)(/*_._VALCLO___V370*/ meltfptr[369]), (melt_ptr_t)(/*_._VALDATA___V182*/ meltfptr[181])) ;; MELT_CHECK_SIGNAL(); ; MELT_LOCATION("warmelt-debug.melt:1591:/ compute"); - /*_.DEBUG_LESS__V5*/ meltfptr[4] = /*_.CLONE_WITH_DISCRIMINANT__V442*/ meltfptr[402];; + /*_.DEBUG_LESS__V5*/ + meltfptr[4] = /*_.CLONE_WITH_DISCRIMINANT__V442*/ meltfptr[402];; /*^clear*/ - /*clear*/ /*_.CLONE_WITH_DISCRIMINANT__V442*/ meltfptr[402] = 0 ; + /*clear*/ /*_.CLONE_WITH_DISCRIMINANT__V442*/ + meltfptr[402] = 0 ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.DEBUG_LESS__V441*/ meltfptr[403] = 0 ; + /*clear*/ /*_.DEBUG_LESS__V441*/ + meltfptr[403] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1621:/ initchunk"); @@ -14873,20 +15981,24 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp MELT_LOCATION("warmelt-debug.melt:1621:/ quasiblock"); - /*_.CLONE_WITH_DISCRIMINANT__V444*/ meltfptr[403] = + /*_.CLONE_WITH_DISCRIMINANT__V444*/ + meltfptr[403] = meltgc_clone_with_discriminant((melt_ptr_t)(/*_._VALCLO___V374*/ meltfptr[373]), (melt_ptr_t)(/*_._VALDATA___V182*/ meltfptr[181])) ;; MELT_CHECK_SIGNAL(); ; MELT_LOCATION("warmelt-debug.melt:1621:/ compute"); - /*_.DEBUG_MORE__V6*/ meltfptr[5] = /*_.CLONE_WITH_DISCRIMINANT__V444*/ meltfptr[403];; + /*_.DEBUG_MORE__V6*/ + meltfptr[5] = /*_.CLONE_WITH_DISCRIMINANT__V444*/ meltfptr[403];; /*^clear*/ - /*clear*/ /*_.CLONE_WITH_DISCRIMINANT__V444*/ meltfptr[403] = 0 ; + /*clear*/ /*_.CLONE_WITH_DISCRIMINANT__V444*/ + meltfptr[403] = 0 ; /*epilog*/ /*^clear*/ - /*clear*/ /*_.DEBUG_MORE__V443*/ meltfptr[402] = 0 ; + /*clear*/ /*_.DEBUG_MORE__V443*/ + meltfptr[402] = 0 ; } MELT_LOCATION("warmelt-debug.melt:1650:/ initchunk"); @@ -14901,125 +16013,145 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp (/*_._CONTENV___V2*/ meltfptr[1]) ) ; - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V381*/ meltfptr[380], /*_._VALCLO___V189*/ meltfptr[188], - /*quasi.cur.mod.env.ref norm.exp.val : DBG_OUTOBJECT*/ - /* check quasi.cur.mod.env.ref 854962660 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V124*/ meltfptr[123], /*_._VALDATA___V136*/ meltfptr[135], - /*quasi.cur.mod.env.ref norm.exp.val : DBG_OUTPUT*/ - /* check quasi.cur.mod.env.ref 305848916 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V138*/ meltfptr[137], /*_._VALDATA___V144*/ meltfptr[143], - /*quasi.cur.mod.env.ref norm.exp.val : DBG_OUTPUTAGAIN*/ - /* check quasi.cur.mod.env.ref 712859352 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V383*/ meltfptr[382], /*_._VALCLO___V213*/ meltfptr[212], - /*quasi.cur.mod.env.ref norm.exp.val : DBGOUT_FIELDS*/ - /* check quasi.cur.mod.env.ref 561997673 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V385*/ meltfptr[384], /*_._VALCLO___V215*/ meltfptr[214], - /*quasi.cur.mod.env.ref norm.exp.val : DBGOUTAGAIN_FIELDS*/ - /* check quasi.cur.mod.env.ref 423176833 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V86*/ meltfptr[85], /*_._VALDATA___V88*/ meltfptr[87], - /*quasi.cur.mod.env.ref norm.exp.val : DEBUG_DEPTH*/ - /* check quasi.cur.mod.env.ref 925480523 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V371*/ meltfptr[370], /*_.DEBUG_LESS__V5*/ meltfptr[4], - /*quasi.cur.mod.env.ref norm.exp.val : DEBUG_LESS*/ - /* check quasi.cur.mod.env.ref 387816185 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V375*/ meltfptr[374], /*_.DEBUG_MORE__V6*/ meltfptr[5], - /*quasi.cur.mod.env.ref norm.exp.val : DEBUG_MORE*/ - /* check quasi.cur.mod.env.ref 352648161 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V178*/ meltfptr[177], /*_._VALDATA___V182*/ meltfptr[181], - /*quasi.cur.mod.env.ref norm.exp.val : DISCR_DEBUG_CLOSURE*/ - /* check quasi.cur.mod.env.ref 84173788 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V387*/ meltfptr[386], /*_._VALCLO___V378*/ meltfptr[377], - /*quasi.cur.mod.env.ref norm.exp.val : DISPLAY_DEBUG_MESSAGE*/ - /* check quasi.cur.mod.env.ref 891271269 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V389*/ meltfptr[388], /*_._VALCLO___V191*/ meltfptr[190], - /*quasi.cur.mod.env.ref norm.exp.val : MELT_DEBUG_FUN*/ - /* check quasi.cur.mod.env.ref 460881859 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V104*/ meltfptr[103], /*_._VALDATA___V106*/ meltfptr[105], - /*quasi.cur.mod.env.ref norm.exp.val : MELT_HAS_FLAG_DEBUG_SET*/ - /* check quasi.cur.mod.env.ref 46455435 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V111*/ meltfptr[110], /*_._VALDATA___V113*/ meltfptr[112], - /*quasi.cur.mod.env.ref norm.exp.val : MELT_REALLY_NEED_DBGLIM*/ - /* check quasi.cur.mod.env.ref 152769033 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V93*/ meltfptr[92], /*_._VALDATA___V95*/ meltfptr[94], - /*quasi.cur.mod.env.ref norm.exp.val : MELT_REALLY_NEED_DEBUG*/ - /* check quasi.cur.mod.env.ref 881989000 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V391*/ meltfptr[390], /*_._VALCLO___V172*/ meltfptr[171], - /*quasi.cur.mod.env.ref norm.exp.val : REGISTER_BASICBLOCK_DEBUG_FUN*/ - /* check quasi.cur.mod.env.ref 881047915 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V393*/ meltfptr[392], /*_._VALCLO___V167*/ meltfptr[166], - /*quasi.cur.mod.env.ref norm.exp.val : REGISTER_EDGE_DEBUG_FUN*/ - /* check quasi.cur.mod.env.ref 915313316 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V395*/ meltfptr[394], /*_._VALCLO___V157*/ meltfptr[156], - /*quasi.cur.mod.env.ref norm.exp.val : REGISTER_GIMPLE_DEBUG_FUN*/ - /* check quasi.cur.mod.env.ref 1052092684 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V397*/ meltfptr[396], /*_._VALCLO___V162*/ meltfptr[161], - /*quasi.cur.mod.env.ref norm.exp.val : REGISTER_GIMPLESEQ_DEBUG_FUN*/ - /* check quasi.cur.mod.env.ref 6085934 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V399*/ meltfptr[398], /*_._VALCLO___V177*/ meltfptr[176], - /*quasi.cur.mod.env.ref norm.exp.val : REGISTER_LOOP_DEBUG_FUN*/ - /* check quasi.cur.mod.env.ref 624621140 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; - - /*hookcall*/ melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V401*/ meltfptr[400], /*_._VALCLO___V152*/ meltfptr[151], - /*quasi.cur.mod.env.ref norm.exp.val : REGISTER_TREE_DEBUG_FUN*/ - /* check quasi.cur.mod.env.ref 174015827 */ - (/*_._CONTENV___V2*/ meltfptr[1]) - ) ; + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V381*/ meltfptr[380], /*_._VALCLO___V189*/ meltfptr[188], + /*quasi.cur.mod.env.ref norm.exp.val : DBG_OUTOBJECT*/ + /* check quasi.cur.mod.env.ref 854962660 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V124*/ meltfptr[123], /*_._VALDATA___V136*/ meltfptr[135], + /*quasi.cur.mod.env.ref norm.exp.val : DBG_OUTPUT*/ + /* check quasi.cur.mod.env.ref 305848916 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V138*/ meltfptr[137], /*_._VALDATA___V144*/ meltfptr[143], + /*quasi.cur.mod.env.ref norm.exp.val : DBG_OUTPUTAGAIN*/ + /* check quasi.cur.mod.env.ref 712859352 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V383*/ meltfptr[382], /*_._VALCLO___V213*/ meltfptr[212], + /*quasi.cur.mod.env.ref norm.exp.val : DBGOUT_FIELDS*/ + /* check quasi.cur.mod.env.ref 561997673 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V385*/ meltfptr[384], /*_._VALCLO___V215*/ meltfptr[214], + /*quasi.cur.mod.env.ref norm.exp.val : DBGOUTAGAIN_FIELDS*/ + /* check quasi.cur.mod.env.ref 423176833 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V86*/ meltfptr[85], /*_._VALDATA___V88*/ meltfptr[87], + /*quasi.cur.mod.env.ref norm.exp.val : DEBUG_DEPTH*/ + /* check quasi.cur.mod.env.ref 925480523 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V371*/ meltfptr[370], /*_.DEBUG_LESS__V5*/ meltfptr[4], + /*quasi.cur.mod.env.ref norm.exp.val : DEBUG_LESS*/ + /* check quasi.cur.mod.env.ref 387816185 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V375*/ meltfptr[374], /*_.DEBUG_MORE__V6*/ meltfptr[5], + /*quasi.cur.mod.env.ref norm.exp.val : DEBUG_MORE*/ + /* check quasi.cur.mod.env.ref 352648161 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V178*/ meltfptr[177], /*_._VALDATA___V182*/ meltfptr[181], + /*quasi.cur.mod.env.ref norm.exp.val : DISCR_DEBUG_CLOSURE*/ + /* check quasi.cur.mod.env.ref 84173788 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V387*/ meltfptr[386], /*_._VALCLO___V378*/ meltfptr[377], + /*quasi.cur.mod.env.ref norm.exp.val : DISPLAY_DEBUG_MESSAGE*/ + /* check quasi.cur.mod.env.ref 891271269 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V389*/ meltfptr[388], /*_._VALCLO___V191*/ meltfptr[190], + /*quasi.cur.mod.env.ref norm.exp.val : MELT_DEBUG_FUN*/ + /* check quasi.cur.mod.env.ref 460881859 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V104*/ meltfptr[103], /*_._VALDATA___V106*/ meltfptr[105], + /*quasi.cur.mod.env.ref norm.exp.val : MELT_HAS_FLAG_DEBUG_SET*/ + /* check quasi.cur.mod.env.ref 46455435 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V111*/ meltfptr[110], /*_._VALDATA___V113*/ meltfptr[112], + /*quasi.cur.mod.env.ref norm.exp.val : MELT_REALLY_NEED_DBGLIM*/ + /* check quasi.cur.mod.env.ref 152769033 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V93*/ meltfptr[92], /*_._VALDATA___V95*/ meltfptr[94], + /*quasi.cur.mod.env.ref norm.exp.val : MELT_REALLY_NEED_DEBUG*/ + /* check quasi.cur.mod.env.ref 881989000 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V391*/ meltfptr[390], /*_._VALCLO___V172*/ meltfptr[171], + /*quasi.cur.mod.env.ref norm.exp.val : REGISTER_BASICBLOCK_DEBUG_FUN*/ + /* check quasi.cur.mod.env.ref 881047915 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V393*/ meltfptr[392], /*_._VALCLO___V167*/ meltfptr[166], + /*quasi.cur.mod.env.ref norm.exp.val : REGISTER_EDGE_DEBUG_FUN*/ + /* check quasi.cur.mod.env.ref 915313316 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V395*/ meltfptr[394], /*_._VALCLO___V157*/ meltfptr[156], + /*quasi.cur.mod.env.ref norm.exp.val : REGISTER_GIMPLE_DEBUG_FUN*/ + /* check quasi.cur.mod.env.ref 1052092684 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V397*/ meltfptr[396], /*_._VALCLO___V162*/ meltfptr[161], + /*quasi.cur.mod.env.ref norm.exp.val : REGISTER_GIMPLESEQ_DEBUG_FUN*/ + /* check quasi.cur.mod.env.ref 6085934 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V399*/ meltfptr[398], /*_._VALCLO___V177*/ meltfptr[176], + /*quasi.cur.mod.env.ref norm.exp.val : REGISTER_LOOP_DEBUG_FUN*/ + /* check quasi.cur.mod.env.ref 624621140 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; + + /*hookcall*/ + melthook_HOOK_VALUE_EXPORTER ((melt_ptr_t) ((melt_ptr_t)(MELT_PREDEF(HOOK_VALUE_EXPORTER))), /*_._VALDATA___V401*/ meltfptr[400], /*_._VALCLO___V152*/ meltfptr[151], + /*quasi.cur.mod.env.ref norm.exp.val : REGISTER_TREE_DEBUG_FUN*/ + /* check quasi.cur.mod.env.ref 174015827 */ + (/*_._CONTENV___V2*/ meltfptr[1]) + ) ; /*epilog*/ } @@ -15027,7 +16159,8 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_6 (meltinitial_frame_t* meltframp /**COMMENT: compute boxloc again **/; - /*cond*/ if (/*_._CONTENV___V2*/ meltfptr[1]) /*then*/ + /*cond*/ + if (/*_._CONTENV___V2*/ meltfptr[1]) /*then*/ { } else /*^cond.else*/ @@ -15331,7 +16464,8 @@ void meltmod__WARMELTmiDEBUG__initialmeltchunk_7 (meltinitial_frame_t* meltframp /**COMMENT: set retinit from boxloc **/; - /*_._RETINIT___V1*/ meltfptr[0] = + /*_._RETINIT___V1*/ + meltfptr[0] = /* finalsetretinit */ melt_reference_value((melt_ptr_t)(/*_._CONTENV___V2*/ meltfptr[1])); /**COMMENT: end the initproc **/; |