diff options
author | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-06-13 08:52:52 +0000 |
---|---|---|
committer | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-06-13 08:52:52 +0000 |
commit | c971e9531f2012e169a025bb6ce49a564051a593 (patch) | |
tree | d5ec2a72f711e84237e544f7085438b7f5c04348 /gcc/melt/generated/warmelt-outobj+05.c | |
parent | c34d08be7e0b31d2d1d2b5c8685115922b2bb649 (diff) | |
download | gcc-c971e9531f2012e169a025bb6ce49a564051a593.tar.gz |
2012-06-13 Basile Starynkevitch <basile@starynkevitch.net>
{{Regenerate}}
* melt/generated/meltrunsup-inc.c: Regenerate.
* melt/generated/meltrunsup.h: Regenerate.
* melt/generated/warmelt-base+meltdesc.c: Regenerate.
* melt/generated/warmelt-base+melttime.h: Regenerate.
* melt/generated/warmelt-debug+01.c: Regenerate.
* melt/generated/warmelt-debug+02.c: Regenerate.
* melt/generated/warmelt-debug+meltdesc.c: Regenerate.
* melt/generated/warmelt-debug+melttime.h: Regenerate.
* melt/generated/warmelt-debug.c: Regenerate.
* melt/generated/warmelt-first+meltdesc.c: Regenerate.
* melt/generated/warmelt-first+melttime.h: Regenerate.
* melt/generated/warmelt-genobj+01.c: Regenerate.
* melt/generated/warmelt-genobj+02.c: Regenerate.
* melt/generated/warmelt-genobj+03.c: Regenerate.
* melt/generated/warmelt-genobj+04.c: Regenerate.
* melt/generated/warmelt-genobj+05.c: Regenerate.
* melt/generated/warmelt-genobj+meltdesc.c: Regenerate.
* melt/generated/warmelt-genobj+melttime.h: Regenerate.
* melt/generated/warmelt-genobj.c: Regenerate.
* melt/generated/warmelt-macro+meltdesc.c: Regenerate.
* melt/generated/warmelt-macro+melttime.h: Regenerate.
* melt/generated/warmelt-modes+meltdesc.c: Regenerate.
* melt/generated/warmelt-modes+melttime.h: Regenerate.
* melt/generated/warmelt-normal+02.c: Regenerate.
* melt/generated/warmelt-normal+03.c: Regenerate.
* melt/generated/warmelt-normal+04.c: Regenerate.
* melt/generated/warmelt-normal+05.c: Regenerate.
* melt/generated/warmelt-normal+meltdesc.c: Regenerate.
* melt/generated/warmelt-normal+melttime.h: Regenerate.
* melt/generated/warmelt-normal.c: Regenerate.
* melt/generated/warmelt-normatch+meltdesc.c: Regenerate.
* melt/generated/warmelt-normatch+melttime.h: Regenerate.
* melt/generated/warmelt-outobj+04.c: Regenerate.
* melt/generated/warmelt-outobj+05.c: Regenerate.
* melt/generated/warmelt-outobj+meltdesc.c: Regenerate.
* melt/generated/warmelt-outobj+melttime.h: Regenerate.
* melt/generated/warmelt-outobj.c: Regenerate.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/melt-branch@188501 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/melt/generated/warmelt-outobj+05.c')
-rw-r--r-- | gcc/melt/generated/warmelt-outobj+05.c | 326 |
1 files changed, 163 insertions, 163 deletions
diff --git a/gcc/melt/generated/warmelt-outobj+05.c b/gcc/melt/generated/warmelt-outobj+05.c index c5b22040428..ca9a4183349 100644 --- a/gcc/melt/generated/warmelt-outobj+05.c +++ b/gcc/melt/generated/warmelt-outobj+05.c @@ -2283,7 +2283,7 @@ meltrout_132_warmelt_outobj_TRANSLATE_TO_C_ONE_OR_MORE_MELT_FILES /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:5269:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:5273:/ getarg"); /*_.FILES__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -2315,7 +2315,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5270:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5274:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2341,7 +2341,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5270:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5274:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -2356,7 +2356,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5270:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5274:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -2369,7 +2369,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5270; + argtab[2].meltbp_long = 5274; /*^apply.arg */ argtab[3].meltbp_cstring = "translate_to_c_one_or_more_melt_files files="; @@ -2395,7 +2395,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = /*_.MELT_DEBUG_FUN__V7*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5270:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5274:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L2*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V7*/ meltfptr[6] = 0; @@ -2408,7 +2408,7 @@ lab_endgetargs:; /*_.IF___V6*/ meltfptr[5] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5270:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5274:/ quasiblock"); /*_.PROGN___V8*/ meltfptr[6] = /*_.IF___V6*/ meltfptr[5];; @@ -2417,7 +2417,7 @@ lab_endgetargs:; /*_.IFCPP___V5*/ meltfptr[4] = /*_.PROGN___V8*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5270:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5274:/ clear"); /*clear *//*_#MELT_NEED_DBG__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IF___V6*/ meltfptr[5] = 0; @@ -2432,7 +2432,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5271:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5275:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2444,7 +2444,7 @@ lab_endgetargs:; melt_is_instance_of ((melt_ptr_t) ( /*_.CURENV__V4*/ meltfptr[3]), (melt_ptr_t) (( /*!CLASS_ENVIRONMENT */ meltfrout->tabval[1])));; - MELT_LOCATION ("warmelt-outobj.melt:5271:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5275:/ cond"); /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -2452,7 +2452,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5271:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5275:/ cond.else"); /*^block */ /*anyblock */ @@ -2466,7 +2466,7 @@ lab_endgetargs:; melt_assert_failed (("check curenv"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5271) ? (5271) : __LINE__, __FUNCTION__); + (5275) ? (5275) : __LINE__, __FUNCTION__); ; } ; @@ -2481,7 +2481,7 @@ lab_endgetargs:; /*_.IFCPP___V9*/ meltfptr[5] = /*_.IFELSE___V10*/ meltfptr[6];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5271:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5275:/ clear"); /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0; /*^clear */ /*clear *//*_.IFELSE___V10*/ meltfptr[6] = 0; @@ -2494,7 +2494,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5272:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5276:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2505,7 +2505,7 @@ lab_endgetargs:; /*_#IS_STRING__L4*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.MODSRCNAME__V3*/ meltfptr[2])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:5272:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5276:/ cond"); /*cond */ if ( /*_#IS_STRING__L4*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -2513,7 +2513,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5272:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5276:/ cond.else"); /*^block */ /*anyblock */ @@ -2527,7 +2527,7 @@ lab_endgetargs:; melt_assert_failed (("check modsrcname"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5272) ? (5272) : __LINE__, __FUNCTION__); + (5276) ? (5276) : __LINE__, __FUNCTION__); ; } ; @@ -2542,7 +2542,7 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = /*_.IFELSE___V12*/ meltfptr[11];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5272:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5276:/ clear"); /*clear *//*_#IS_STRING__L4*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V12*/ meltfptr[11] = 0; @@ -2553,14 +2553,14 @@ lab_endgetargs:; /*_.IFCPP___V11*/ meltfptr[6] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5273:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5277:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#STRING_DYNLOADED_SUFFIXED__L5*/ meltfnum[1] = /*string_dynloaded_suffixed: */ (melt_string_is_ending ((melt_ptr_t) /*_.MODSRCNAME__V3*/ meltfptr[2], MELT_DYNLOADED_SUFFIX));; - MELT_LOCATION ("warmelt-outobj.melt:5273:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5277:/ cond"); /*cond */ if ( /*_#STRING_DYNLOADED_SUFFIXED__L5*/ meltfnum[1]) /*then */ { /*^cond.then */ @@ -2569,7 +2569,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5273:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5277:/ cond.else"); /*^block */ /*anyblock */ @@ -2579,7 +2579,7 @@ lab_endgetargs:; /*string_suffixed: */ (melt_string_is_ending ((melt_ptr_t) /*_.MODSRCNAME__V3*/ meltfptr[2], ".melt"));; - MELT_LOCATION ("warmelt-outobj.melt:5273:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5277:/ cond"); /*cond */ if ( /*_#STRING_SUFFIXED__L7*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -2588,7 +2588,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5273:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5277:/ cond.else"); /*^block */ /*anyblock */ @@ -2604,7 +2604,7 @@ lab_endgetargs:; /*_#STRING_SUFFIXED__L9*/ meltfnum[8];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5273:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5277:/ clear"); /*clear *//*_#STRING_SUFFIXED__L9*/ meltfnum[8] = 0; } ; @@ -2613,7 +2613,7 @@ lab_endgetargs:; /*_#OR___L6*/ meltfnum[0] = /*_#OR___L8*/ meltfnum[7];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5273:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5277:/ clear"); /*clear *//*_#STRING_SUFFIXED__L7*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_#OR___L8*/ meltfnum[7] = 0; @@ -2631,7 +2631,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:5276:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5280:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s - %s", melt_dbgcounter, ("invalid MELT source name - should not be suffixed"), melt_string_str ((melt_ptr_t) @@ -2645,7 +2645,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5278:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5282:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2661,7 +2661,7 @@ lab_endgetargs:; /*_#NOT__L11*/ meltfnum[6] = (!( /*_#STRING_DYNLOADED_SUFFIXED__L10*/ meltfnum[8]));; - MELT_LOCATION ("warmelt-outobj.melt:5278:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5282:/ cond"); /*cond */ if ( /*_#NOT__L11*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -2669,7 +2669,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5278:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5282:/ cond.else"); /*^block */ /*anyblock */ @@ -2680,7 +2680,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("translate_to_c_one_or_more_melt_files modsrcname not ended with MELT_DYNLOADED_SUFFIX"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5278) ? (5278) : __LINE__, __FUNCTION__); + melt_assert_failed (("translate_to_c_one_or_more_melt_files modsrcname not ended with MELT_DYNLOADED_SUFFIX"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5282) ? (5282) : __LINE__, __FUNCTION__); ; } ; @@ -2695,7 +2695,7 @@ lab_endgetargs:; /*_.IFCPP___V13*/ meltfptr[11] = /*_.IFELSE___V14*/ meltfptr[13];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5278:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5282:/ clear"); /*clear *//*_#STRING_DYNLOADED_SUFFIXED__L10*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_#NOT__L11*/ meltfnum[6] = 0; @@ -2710,7 +2710,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5280:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5284:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2726,7 +2726,7 @@ lab_endgetargs:; /*_#NOT__L13*/ meltfnum[8] = (!( /*_#STRING_SUFFIXED__L12*/ meltfnum[7]));; - MELT_LOCATION ("warmelt-outobj.melt:5280:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5284:/ cond"); /*cond */ if ( /*_#NOT__L13*/ meltfnum[8]) /*then */ { /*^cond.then */ @@ -2734,7 +2734,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5280:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5284:/ cond.else"); /*^block */ /*anyblock */ @@ -2745,7 +2745,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("translate_to_c_one_or_more_melt_files modulename not ended with .melt"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5280) ? (5280) : __LINE__, __FUNCTION__); + melt_assert_failed (("translate_to_c_one_or_more_melt_files modulename not ended with .melt"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5284) ? (5284) : __LINE__, __FUNCTION__); ; } ; @@ -2760,7 +2760,7 @@ lab_endgetargs:; /*_.IFCPP___V15*/ meltfptr[13] = /*_.IFELSE___V16*/ meltfptr[15];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5280:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5284:/ clear"); /*clear *//*_#STRING_SUFFIXED__L12*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_#NOT__L13*/ meltfnum[8] = 0; @@ -2775,7 +2775,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5282:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5286:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2791,7 +2791,7 @@ lab_endgetargs:; /*_#NOT__L15*/ meltfnum[7] = (!( /*_#STRING_SUFFIXED__L14*/ meltfnum[6]));; - MELT_LOCATION ("warmelt-outobj.melt:5282:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5286:/ cond"); /*cond */ if ( /*_#NOT__L15*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -2799,7 +2799,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5282:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5286:/ cond.else"); /*^block */ /*anyblock */ @@ -2810,7 +2810,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("translate_to_c_one_or_more_melt_files modulename not ended with .c"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5282) ? (5282) : __LINE__, __FUNCTION__); + melt_assert_failed (("translate_to_c_one_or_more_melt_files modulename not ended with .c"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5286) ? (5286) : __LINE__, __FUNCTION__); ; } ; @@ -2825,7 +2825,7 @@ lab_endgetargs:; /*_.IFCPP___V17*/ meltfptr[15] = /*_.IFELSE___V18*/ meltfptr[17];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5282:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5286:/ clear"); /*clear *//*_#STRING_SUFFIXED__L14*/ meltfnum[6] = 0; /*^clear */ /*clear *//*_#NOT__L15*/ meltfnum[7] = 0; @@ -2838,7 +2838,7 @@ lab_endgetargs:; /*_.IFCPP___V17*/ meltfptr[15] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5284:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5288:/ quasiblock"); /*_#ISVALIDMODSRC__L16*/ meltfnum[8] = 0;; @@ -2849,7 +2849,7 @@ lab_endgetargs:; ((meltobject_ptr_t) (( /*!DISCR_LIST */ meltfrout->tabval[2]))));; { - MELT_LOCATION ("warmelt-outobj.melt:5289:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5293:/ locexp"); /* translate_to_c_one_or_more_melt_files SETISVALIDMODSRCCH__1 */ const char *modsrcstr = melt_string_str ((melt_ptr_t) /*_.MODSRCNAME__V3*/ meltfptr[2]); @@ -2861,12 +2861,12 @@ lab_endgetargs:; ; } ; - MELT_LOCATION ("warmelt-outobj.melt:5296:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5300:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#NOT__L17*/ meltfnum[6] = (!( /*_#ISVALIDMODSRC__L16*/ meltfnum[8]));; - MELT_LOCATION ("warmelt-outobj.melt:5296:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5300:/ cond"); /*cond */ if ( /*_#NOT__L17*/ meltfnum[6]) /*then */ { /*^cond.then */ @@ -2876,7 +2876,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5298:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5302:/ cppif.then"); /*^block */ /*anyblock */ { @@ -2902,7 +2902,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5298:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5302:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L18*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -2917,7 +2917,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5298:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5302:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -2931,7 +2931,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5298; + argtab[2].meltbp_long = 5302; /*^apply.arg */ argtab[3].meltbp_cstring = "translate_to_c_one_or_more_melt_files bad generated modsrcname="; @@ -2953,7 +2953,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V24*/ meltfptr[23];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5298:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5302:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L19*/ meltfnum[18] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V24*/ meltfptr[23] = 0; @@ -2966,7 +2966,7 @@ lab_endgetargs:; /*_.IF___V23*/ meltfptr[22] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5298:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5302:/ quasiblock"); /*_.PROGN___V25*/ meltfptr[23] = /*_.IF___V23*/ meltfptr[22];; @@ -2975,7 +2975,7 @@ lab_endgetargs:; /*_.IFCPP___V22*/ meltfptr[21] = /*_.PROGN___V25*/ meltfptr[23];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5298:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5302:/ clear"); /*clear *//*_#MELT_NEED_DBG__L18*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IF___V23*/ meltfptr[22] = 0; @@ -2990,21 +2990,21 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5299:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5303:/ locexp"); error ("MELT ERROR MSG [#%ld]::: %s - %s", melt_dbgcounter, ("invalid generated source name [basename should have no dot or plus]"), melt_string_str ((melt_ptr_t) ( /*_.MODSRCNAME__V3*/ meltfptr[2]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:5302:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5306:/ quasiblock"); /*_.RETVAL___V1*/ meltfptr[0] = NULL;; - MELT_LOCATION ("warmelt-outobj.melt:5302:/ finalreturn"); + MELT_LOCATION ("warmelt-outobj.melt:5306:/ finalreturn"); ; /*finalret */ goto labend_rout; - MELT_LOCATION ("warmelt-outobj.melt:5297:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5301:/ quasiblock"); /*_.PROGN___V27*/ meltfptr[23] = /*_.RETURN___V26*/ meltfptr[22];; @@ -3013,7 +3013,7 @@ lab_endgetargs:; /*_.IF___V21*/ meltfptr[20] = /*_.PROGN___V27*/ meltfptr[23];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5296:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5300:/ clear"); /*clear *//*_.IFCPP___V22*/ meltfptr[21] = 0; /*^clear */ /*clear *//*_.RETURN___V26*/ meltfptr[22] = 0; @@ -3028,13 +3028,13 @@ lab_endgetargs:; /*_.IF___V21*/ meltfptr[20] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5305:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5309:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_STRING__L20*/ meltfnum[18] = (melt_magic_discr ((melt_ptr_t) ( /*_.FILES__V2*/ meltfptr[1])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:5305:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5309:/ cond"); /*cond */ if ( /*_#IS_STRING__L20*/ meltfnum[18]) /*then */ { /*^cond.then */ @@ -3044,7 +3044,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5306:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5310:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3070,7 +3070,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5306:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5310:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L21*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -3085,7 +3085,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5306:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5310:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3099,7 +3099,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5306; + argtab[2].meltbp_long = 5310; /*^apply.arg */ argtab[3].meltbp_cstring = "translate_to_c_one_or_more_melt_files reading single file "; @@ -3121,7 +3121,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V31*/ meltfptr[30];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5306:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5310:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L22*/ meltfnum[21] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V31*/ meltfptr[30] = 0; @@ -3134,7 +3134,7 @@ lab_endgetargs:; /*_.IF___V30*/ meltfptr[23] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5306:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5310:/ quasiblock"); /*_.PROGN___V32*/ meltfptr[30] = /*_.IF___V30*/ meltfptr[23];; @@ -3143,7 +3143,7 @@ lab_endgetargs:; /*_.IFCPP___V29*/ meltfptr[22] = /*_.PROGN___V32*/ meltfptr[30];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5306:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5310:/ clear"); /*clear *//*_#MELT_NEED_DBG__L21*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IF___V30*/ meltfptr[23] = 0; @@ -3158,7 +3158,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5307:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5311:/ locexp"); inform (UNKNOWN_LOCATION, "MELT INFORM [#%ld]: %s - %s", melt_dbgcounter, ("reading from file"), melt_string_str ((melt_ptr_t) @@ -3169,7 +3169,7 @@ lab_endgetargs:; (meltgc_read_file (melt_string_str ((melt_ptr_t) ( /*_.FILES__V2*/ meltfptr[1])), (char *) 0));; - MELT_LOCATION ("warmelt-outobj.melt:5308:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5312:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3188,7 +3188,7 @@ lab_endgetargs:; (union meltparam_un *) 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5305:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5309:/ quasiblock"); /*_.PROGN___V35*/ meltfptr[34] = @@ -3198,7 +3198,7 @@ lab_endgetargs:; /*_.IFELSE___V28*/ meltfptr[21] = /*_.PROGN___V35*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5305:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5309:/ clear"); /*clear *//*_.IFCPP___V29*/ meltfptr[22] = 0; /*^clear */ /*clear *//*_.READ_FILE__V33*/ meltfptr[23] = 0; @@ -3216,13 +3216,13 @@ lab_endgetargs:; /*anyblock */ { - MELT_LOCATION ("warmelt-outobj.melt:5309:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5313:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_LIST__L23*/ meltfnum[21] = (melt_magic_discr ((melt_ptr_t) ( /*_.FILES__V2*/ meltfptr[1])) == MELTOBMAG_LIST);; - MELT_LOCATION ("warmelt-outobj.melt:5309:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5313:/ cond"); /*cond */ if ( /*_#IS_LIST__L23*/ meltfnum[21]) /*then */ { /*^cond.then */ @@ -3232,7 +3232,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5310:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5314:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3258,7 +3258,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5310:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5314:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L24*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -3274,7 +3274,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-outobj.melt:5310:/ checksignal"); + ("warmelt-outobj.melt:5314:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3288,7 +3288,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5310; + argtab[2].meltbp_long = 5314; /*^apply.arg */ argtab[3].meltbp_cstring = "translate_to_c_one_or_more_melt_files reading list of files "; @@ -3310,7 +3310,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V39*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5310:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5314:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L25*/ meltfnum[24] = 0; /*^clear */ @@ -3324,7 +3324,7 @@ lab_endgetargs:; /*_.IF___V38*/ meltfptr[30] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5310:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5314:/ quasiblock"); /*_.PROGN___V40*/ meltfptr[34] = @@ -3335,7 +3335,7 @@ lab_endgetargs:; /*_.PROGN___V40*/ meltfptr[34];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5310:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5314:/ clear"); /*clear *//*_#MELT_NEED_DBG__L24*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IF___V38*/ meltfptr[30] = 0; @@ -3367,7 +3367,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5314:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5318:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3393,7 +3393,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5314:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5318:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L26*/ meltfnum[24]) /*then */ { /*^cond.then */ @@ -3409,7 +3409,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-outobj.melt:5314:/ checksignal"); + ("warmelt-outobj.melt:5318:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3424,7 +3424,7 @@ lab_endgetargs:; argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5314; + argtab[2].meltbp_long = 5318; /*^apply.arg */ argtab[3].meltbp_cstring = "translate_to_c_one_or_more_melt_files curfile="; @@ -3450,7 +3450,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:5314:/ clear"); + ("warmelt-outobj.melt:5318:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L27*/ meltfnum[7] = 0; /*^clear */ @@ -3466,7 +3466,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:5314:/ quasiblock"); + ("warmelt-outobj.melt:5318:/ quasiblock"); /*_.PROGN___V46*/ meltfptr[44] = @@ -3477,7 +3477,7 @@ lab_endgetargs:; /*_.PROGN___V46*/ meltfptr[44];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5314:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5318:/ clear"); /*clear *//*_#MELT_NEED_DBG__L26*/ meltfnum[24] = 0; /*^clear */ /*clear *//*_.IF___V44*/ meltfptr[43] = 0; @@ -3492,7 +3492,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5315:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5319:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3504,7 +3504,7 @@ lab_endgetargs:; (melt_magic_discr ((melt_ptr_t) ( /*_.CURFILE__V42*/ meltfptr[34])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:5315:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5319:/ cond"); /*cond */ if ( /*_#IS_STRING__L28*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -3514,7 +3514,7 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-outobj.melt:5315:/ cond.else"); + ("warmelt-outobj.melt:5319:/ cond.else"); /*^block */ /*anyblock */ @@ -3529,7 +3529,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5315) ? (5315) : + (5319) ? (5319) : __LINE__, __FUNCTION__); ; } @@ -3546,7 +3546,7 @@ lab_endgetargs:; /*_.IFELSE___V48*/ meltfptr[44];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5315:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5319:/ clear"); /*clear *//*_#IS_STRING__L28*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IFELSE___V48*/ meltfptr[44] = 0; @@ -3559,7 +3559,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5316:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5320:/ locexp"); inform (UNKNOWN_LOCATION, "MELT INFORM [#%ld]: %s - %s", melt_dbgcounter, ("reading from file"), @@ -3568,7 +3568,7 @@ lab_endgetargs:; meltfptr[34]))); } ; - MELT_LOCATION ("warmelt-outobj.melt:5317:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5321:/ quasiblock"); /*_.CUREAD__V50*/ meltfptr[49] = @@ -3578,7 +3578,7 @@ lab_endgetargs:; (char *) 0));; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5319:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5323:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3604,7 +3604,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5319:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5323:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L29*/ meltfnum[24]) /*then */ { /*^cond.then */ @@ -3620,7 +3620,7 @@ lab_endgetargs:; #endif /* meltcallcount the_meltcallcount */ ;; MELT_LOCATION - ("warmelt-outobj.melt:5319:/ checksignal"); + ("warmelt-outobj.melt:5323:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3635,7 +3635,7 @@ lab_endgetargs:; argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5319; + argtab[2].meltbp_long = 5323; /*^apply.arg */ argtab[3].meltbp_cstring = "compilefile_mode curead="; @@ -3661,7 +3661,7 @@ lab_endgetargs:; /*epilog */ MELT_LOCATION - ("warmelt-outobj.melt:5319:/ clear"); + ("warmelt-outobj.melt:5323:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L30*/ meltfnum[7] = 0; /*^clear */ @@ -3677,7 +3677,7 @@ lab_endgetargs:; } ; MELT_LOCATION - ("warmelt-outobj.melt:5319:/ quasiblock"); + ("warmelt-outobj.melt:5323:/ quasiblock"); /*_.PROGN___V54*/ meltfptr[52] = @@ -3688,7 +3688,7 @@ lab_endgetargs:; /*_.PROGN___V54*/ meltfptr[52];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5319:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5323:/ clear"); /*clear *//*_#MELT_NEED_DBG__L29*/ meltfnum[24] = 0; /*^clear */ /*clear *//*_.IF___V52*/ meltfptr[51] = 0; @@ -3703,7 +3703,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5320:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5324:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3717,7 +3717,7 @@ lab_endgetargs:; (melt_unsafe_magic_discr ((melt_ptr_t) ( /*_.CUREAD__V50*/ meltfptr[49])) == MELTOBMAG_LIST));; - MELT_LOCATION ("warmelt-outobj.melt:5320:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5324:/ cond"); /*cond */ if ( /*_#IS_LIST_OR_NULL__L31*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -3727,7 +3727,7 @@ lab_endgetargs:; else { MELT_LOCATION - ("warmelt-outobj.melt:5320:/ cond.else"); + ("warmelt-outobj.melt:5324:/ cond.else"); /*^block */ /*anyblock */ @@ -3742,7 +3742,7 @@ lab_endgetargs:; ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5320) ? (5320) : + (5324) ? (5324) : __LINE__, __FUNCTION__); ; } @@ -3759,7 +3759,7 @@ lab_endgetargs:; /*_.IFELSE___V56*/ meltfptr[52];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5320:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5324:/ clear"); /*clear *//*_#IS_LIST_OR_NULL__L31*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.IFELSE___V56*/ meltfptr[52] = 0; @@ -3771,7 +3771,7 @@ lab_endgetargs:; #endif /*MELT_HAVE_DEBUG */ ; MELT_LOCATION - ("warmelt-outobj.melt:5321:/ checksignal"); + ("warmelt-outobj.melt:5325:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3795,7 +3795,7 @@ lab_endgetargs:; /*_.LET___V49*/ meltfptr[44] = /*_.LIST_APPEND2LIST__V57*/ meltfptr[52];; - MELT_LOCATION ("warmelt-outobj.melt:5317:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5321:/ clear"); /*clear *//*_.CUREAD__V50*/ meltfptr[49] = 0; /*^clear */ /*clear *//*_.IFCPP___V51*/ meltfptr[50] = 0; @@ -3810,7 +3810,7 @@ lab_endgetargs:; /*citerepilog */ - MELT_LOCATION ("warmelt-outobj.melt:5311:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5315:/ clear"); /*clear *//*_.CURPAIR__V41*/ meltfptr[30] = 0; /*^clear */ /*clear *//*_.CURFILE__V42*/ meltfptr[34] = 0; @@ -3822,7 +3822,7 @@ lab_endgetargs:; /*clear *//*_.LET___V49*/ meltfptr[44] = 0; } /*endciterblock FOREACH_IN_LIST */ ; - MELT_LOCATION ("warmelt-outobj.melt:5309:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5313:/ quasiblock"); /*epilog */ @@ -3841,7 +3841,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5323:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5327:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3857,7 +3857,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5323:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5327:/ cond.else"); /*^block */ /*anyblock */ @@ -3868,7 +3868,7 @@ lab_endgetargs:; { /*^locexp */ - melt_assert_failed (("bad files - should be a list of filenames or a filename"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5323) ? (5323) : __LINE__, __FUNCTION__); + melt_assert_failed (("bad files - should be a list of filenames or a filename"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, (5327) ? (5327) : __LINE__, __FUNCTION__); ; } ; @@ -3884,7 +3884,7 @@ lab_endgetargs:; /*_.IFELSE___V59*/ meltfptr[50];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5323:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5327:/ clear"); /*clear *//*_.IFELSE___V59*/ meltfptr[50] = 0; } @@ -3893,7 +3893,7 @@ lab_endgetargs:; /*_.IFCPP___V58*/ meltfptr[49] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5322:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5326:/ quasiblock"); /*_.PROGN___V60*/ meltfptr[51] = @@ -3904,7 +3904,7 @@ lab_endgetargs:; /*_.PROGN___V60*/ meltfptr[51];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5309:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5313:/ clear"); /*clear *//*_.IFCPP___V58*/ meltfptr[49] = 0; /*^clear */ /*clear *//*_.PROGN___V60*/ meltfptr[51] = 0; @@ -3915,7 +3915,7 @@ lab_endgetargs:; /*_.IFELSE___V28*/ meltfptr[21] = /*_.IFELSE___V36*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5305:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5309:/ clear"); /*clear *//*_#IS_LIST__L23*/ meltfnum[21] = 0; /*^clear */ /*clear *//*_.IFELSE___V36*/ meltfptr[22] = 0; @@ -3925,7 +3925,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5325:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5329:/ cppif.then"); /*^block */ /*anyblock */ { @@ -3951,7 +3951,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5325:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5329:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L32*/ meltfnum[24]) /*then */ { /*^cond.then */ @@ -3966,7 +3966,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5325:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5329:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -3980,7 +3980,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5325; + argtab[2].meltbp_long = 5329; /*^apply.arg */ argtab[3].meltbp_cstring = "after read translate_to_c_one_or_more_melt_files rlist="; @@ -4001,7 +4001,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V63*/ meltfptr[50];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5325:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5329:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L33*/ meltfnum[7] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V63*/ meltfptr[50] = 0; @@ -4014,7 +4014,7 @@ lab_endgetargs:; /*_.IF___V62*/ meltfptr[23] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5325:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5329:/ quasiblock"); /*_.PROGN___V64*/ meltfptr[49] = /*_.IF___V62*/ meltfptr[23];; @@ -4023,7 +4023,7 @@ lab_endgetargs:; /*_.IFCPP___V61*/ meltfptr[52] = /*_.PROGN___V64*/ meltfptr[49];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5325:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5329:/ clear"); /*clear *//*_#MELT_NEED_DBG__L32*/ meltfnum[24] = 0; /*^clear */ /*clear *//*_.IF___V62*/ meltfptr[23] = 0; @@ -4038,7 +4038,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5326:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5330:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4052,7 +4052,7 @@ lab_endgetargs:; /*_#I__L35*/ meltfnum[7] = (( /*_#LIST_LENGTH__L34*/ meltfnum[21]) > (0));; - MELT_LOCATION ("warmelt-outobj.melt:5326:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5330:/ cond"); /*cond */ if ( /*_#I__L35*/ meltfnum[7]) /*then */ { /*^cond.then */ @@ -4060,7 +4060,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5326:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5330:/ cond.else"); /*^block */ /*anyblock */ @@ -4074,7 +4074,7 @@ lab_endgetargs:; melt_assert_failed (("check non empty rlist"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5326) ? (5326) : __LINE__, __FUNCTION__); + (5330) ? (5330) : __LINE__, __FUNCTION__); ; } ; @@ -4089,7 +4089,7 @@ lab_endgetargs:; /*_.IFCPP___V65*/ meltfptr[51] = /*_.IFELSE___V66*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5326:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5330:/ clear"); /*clear *//*_#LIST_LENGTH__L34*/ meltfnum[21] = 0; /*^clear */ /*clear *//*_#I__L35*/ meltfnum[7] = 0; @@ -4102,7 +4102,7 @@ lab_endgetargs:; /*_.IFCPP___V65*/ meltfptr[51] = ( /*nil */ NULL); #endif /*MELT_HAVE_DEBUG */ ; - MELT_LOCATION ("warmelt-outobj.melt:5327:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5331:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -4125,7 +4125,7 @@ lab_endgetargs:; ; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5328:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5332:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4151,7 +4151,7 @@ lab_endgetargs:; 0 /* no melt_need_dbg */ #endif /*MELT_HAVE_DEBUG */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5328:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5332:/ cond"); /*cond */ if ( /*_#MELT_NEED_DBG__L36*/ meltfnum[24]) /*then */ { /*^cond.then */ @@ -4166,7 +4166,7 @@ lab_endgetargs:; 0L #endif /* meltcallcount the_meltcallcount */ ;; - MELT_LOCATION ("warmelt-outobj.melt:5328:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5332:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^apply */ @@ -4180,7 +4180,7 @@ lab_endgetargs:; /*^apply.arg */ argtab[1].meltbp_cstring = "warmelt-outobj.melt"; /*^apply.arg */ - argtab[2].meltbp_long = 5328; + argtab[2].meltbp_long = 5332; /*^apply.arg */ argtab[3].meltbp_cstring = "translate_to_c_one_or_more_melt_files done modsrcname="; @@ -4203,7 +4203,7 @@ lab_endgetargs:; /*_.MELT_DEBUG_FUN__V70*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5328:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5332:/ clear"); /*clear *//*_#THE_MELTCALLCOUNT__L37*/ meltfnum[21] = 0; /*^clear */ /*clear *//*_.MELT_DEBUG_FUN__V70*/ meltfptr[22] = 0; @@ -4216,7 +4216,7 @@ lab_endgetargs:; /*_.IF___V69*/ meltfptr[49] = NULL;; } ; - MELT_LOCATION ("warmelt-outobj.melt:5328:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5332:/ quasiblock"); /*_.PROGN___V71*/ meltfptr[22] = /*_.IF___V69*/ meltfptr[49];; @@ -4225,7 +4225,7 @@ lab_endgetargs:; /*_.IFCPP___V68*/ meltfptr[23] = /*_.PROGN___V71*/ meltfptr[22];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5328:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5332:/ clear"); /*clear *//*_#MELT_NEED_DBG__L36*/ meltfnum[24] = 0; /*^clear */ /*clear *//*_.IF___V69*/ meltfptr[49] = 0; @@ -4242,7 +4242,7 @@ lab_endgetargs:; /*_.LET___V19*/ meltfptr[17] = /*_.IFCPP___V68*/ meltfptr[23];; - MELT_LOCATION ("warmelt-outobj.melt:5284:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5288:/ clear"); /*clear *//*_#ISVALIDMODSRC__L16*/ meltfnum[8] = 0; /*^clear */ /*clear *//*_.RLIST__V20*/ meltfptr[19] = 0; @@ -4262,14 +4262,14 @@ lab_endgetargs:; /*clear *//*_.COMPILE_LIST_SEXPR__V67*/ meltfptr[50] = 0; /*^clear */ /*clear *//*_.IFCPP___V68*/ meltfptr[23] = 0; - MELT_LOCATION ("warmelt-outobj.melt:5269:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5273:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*^quasiblock */ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V19*/ meltfptr[17];; - MELT_LOCATION ("warmelt-outobj.melt:5269:/ finalreturn"); + MELT_LOCATION ("warmelt-outobj.melt:5273:/ finalreturn"); ; /*finalret */ goto labend_rout; /*epilog */ @@ -4377,7 +4377,7 @@ meltrout_133_warmelt_outobj_GENERATE_GPLV3PLUS_COPYRIGHT_NOTICE_C_COMMENT /*getargs*/ /*getarg#0 */ - MELT_LOCATION ("warmelt-outobj.melt:5335:/ getarg"); + MELT_LOCATION ("warmelt-outobj.melt:5339:/ getarg"); /*_.SBUF__V2*/ meltfptr[1] = (melt_ptr_t) meltfirstargp_; /*getarg#1 */ @@ -4399,7 +4399,7 @@ lab_endgetargs:; #if MELT_HAVE_DEBUG - MELT_LOCATION ("warmelt-outobj.melt:5338:/ cppif.then"); + MELT_LOCATION ("warmelt-outobj.melt:5342:/ cppif.then"); /*^block */ /*anyblock */ { @@ -4410,7 +4410,7 @@ lab_endgetargs:; /*_#IS_STRBUF__L1*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1])) == MELTOBMAG_STRBUF);; - MELT_LOCATION ("warmelt-outobj.melt:5338:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5342:/ cond"); /*cond */ if ( /*_#IS_STRBUF__L1*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -4418,7 +4418,7 @@ lab_endgetargs:; } else { - MELT_LOCATION ("warmelt-outobj.melt:5338:/ cond.else"); + MELT_LOCATION ("warmelt-outobj.melt:5342:/ cond.else"); /*^block */ /*anyblock */ @@ -4432,7 +4432,7 @@ lab_endgetargs:; melt_assert_failed (("check sbuf"), ("warmelt-outobj.melt") ? ("warmelt-outobj.melt") : __FILE__, - (5338) ? (5338) : __LINE__, __FUNCTION__); + (5342) ? (5342) : __LINE__, __FUNCTION__); ; } ; @@ -4447,7 +4447,7 @@ lab_endgetargs:; /*_.IFCPP___V4*/ meltfptr[3] = /*_.IFELSE___V5*/ meltfptr[4];; /*epilog */ - MELT_LOCATION ("warmelt-outobj.melt:5338:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5342:/ clear"); /*clear *//*_#IS_STRBUF__L1*/ meltfnum[0] = 0; /*^clear */ /*clear *//*_.IFELSE___V5*/ meltfptr[4] = 0; @@ -4460,19 +4460,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5339:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5343:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), ("/** Copyright (C) ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:5340:/ quasiblock"); + MELT_LOCATION ("warmelt-outobj.melt:5344:/ quasiblock"); /*_#YEAR__L2*/ meltfnum[0] = 0;; { - MELT_LOCATION ("warmelt-outobj.melt:5343:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5347:/ locexp"); /*+ GETYEAR__1 */ time_t GETYEAR__1_now = 0; struct tm *GETYEAR__1_tm = NULL; @@ -4487,17 +4487,17 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5353:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5357:/ locexp"); meltgc_add_strbuf_dec ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), ( /*_#YEAR__L2*/ meltfnum[0])); } ; - MELT_LOCATION ("warmelt-outobj.melt:5340:/ clear"); + MELT_LOCATION ("warmelt-outobj.melt:5344:/ clear"); /*clear *//*_#YEAR__L2*/ meltfnum[0] = 0; { - MELT_LOCATION ("warmelt-outobj.melt:5355:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5359:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (" Free Software Foundation, Inc.")); @@ -4505,26 +4505,26 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5356:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5360:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:5357:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5361:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (" This generated file ")); } ; - MELT_LOCATION ("warmelt-outobj.melt:5358:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5362:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*_#IS_STRING__L3*/ meltfnum[0] = (melt_magic_discr ((melt_ptr_t) ( /*_.NAME__V3*/ meltfptr[2])) == MELTOBMAG_STRING);; - MELT_LOCATION ("warmelt-outobj.melt:5358:/ cond"); + MELT_LOCATION ("warmelt-outobj.melt:5362:/ cond"); /*cond */ if ( /*_#IS_STRING__L3*/ meltfnum[0]) /*then */ { /*^cond.then */ @@ -4534,7 +4534,7 @@ lab_endgetargs:; { - MELT_LOCATION ("warmelt-outobj.melt:5361:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5365:/ locexp"); /*ADDBASENAME__1 + */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), lbasename (melt_string_str @@ -4550,7 +4550,7 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5366:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5370:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (" is part of GCC.")); @@ -4558,21 +4558,21 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5367:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5371:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:5368:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5372:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:5369:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5373:/ locexp"); /*add2sbuf_strconst */ meltgc_add_strbuf ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (" [DON\'T EDIT THIS GENERATED FILE]\n\n GCC is free software; you can redistribute it and/or modify\n it under the terms of the GNU General Public License as published by\n the Free Software Foundation; either version 3, or (at your option)\n any later version.\n\n GCC is distributed in the hope that it will be useful,\n but WITHOUT ANY WARRANTY; without even the implied warranty of\n MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\n GNU General Public License for more details.\n\n You should have received a copy of the GNU General Public License\n along with GCC; see the file COPYING3. If not see\n <http://www.gnu.org/licenses/>.\n**/")); @@ -4580,19 +4580,19 @@ lab_endgetargs:; ; { - MELT_LOCATION ("warmelt-outobj.melt:5385:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5389:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (0), 0); } ; { - MELT_LOCATION ("warmelt-outobj.melt:5386:/ locexp"); + MELT_LOCATION ("warmelt-outobj.melt:5390:/ locexp"); meltgc_strbuf_add_indent ((melt_ptr_t) ( /*_.SBUF__V2*/ meltfptr[1]), (0), 0); } ; - MELT_LOCATION ("warmelt-outobj.melt:5335:/ checksignal"); + MELT_LOCATION ("warmelt-outobj.melt:5339:/ checksignal"); MELT_CHECK_SIGNAL (); ; /*epilog */ |