summaryrefslogtreecommitdiff
path: root/gcc/melt/generated/warmelt-macro+01.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/melt/generated/warmelt-macro+01.c')
-rw-r--r--gcc/melt/generated/warmelt-macro+01.c360
1 files changed, 180 insertions, 180 deletions
diff --git a/gcc/melt/generated/warmelt-macro+01.c b/gcc/melt/generated/warmelt-macro+01.c
index 460c5c1f9de..9fd21b082b1 100644
--- a/gcc/melt/generated/warmelt-macro+01.c
+++ b/gcc/melt/generated/warmelt-macro+01.c
@@ -27371,51 +27371,98 @@ lab_endgetargs:;
/*anyblock */
{
- /*_#IS_A__L3*/ meltfnum[1] =
- melt_is_instance_of ((melt_ptr_t) ( /*_.ENV__V3*/ meltfptr[2]),
- (melt_ptr_t) (( /*!CLASS_ENVIRONMENT */
- meltfrout->tabval[1])));;
+
+ {
+ /*^locexp */
+ /*melt_increment_dbgcounter */
+#if MELT_HAVE_DEBUG
+ melt_dbgcounter++;
+#endif
+ ;
+ }
+ ;
+ /*_#MELT_NEED_DBG__L3*/ meltfnum[1] =
+ /*MELT_NEED_DBG */
+#if MELT_HAVE_DEBUG
+ ( /*melt_need_dbg */ melt_need_debug ((int) 0))
+#else
+ 0 /* no melt_need_dbg */
+#endif /*MELT_HAVE_DEBUG */
+ ;;
MELT_LOCATION ("warmelt-macro.melt:1763:/ cond");
- /*cond */ if ( /*_#IS_A__L3*/ meltfnum[1]) /*then */
+ /*cond */ if ( /*_#MELT_NEED_DBG__L3*/ meltfnum[1]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V11*/ meltfptr[7] = ( /*nil */ NULL);;
- }
- else
- {
- MELT_LOCATION ("warmelt-macro.melt:1763:/ cond.else");
-
/*^block */
/*anyblock */
{
-
-
-
+ /*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] =
+#ifdef meltcallcount
+ meltcallcount /* the_meltcallcount */
+#else
+ 0L
+#endif /* meltcallcount the_meltcallcount */
+ ;;
+ MELT_LOCATION ("warmelt-macro.melt:1763:/ apply");
+ /*apply */
{
- /*^locexp */
- melt_assert_failed (("check env"),
- ("warmelt-macro.melt")
- ? ("warmelt-macro.melt") : __FILE__,
- (1763) ? (1763) : __LINE__, __FUNCTION__);
- ;
+ union meltparam_un argtab[5];
+ memset (&argtab, 0, sizeof (argtab));
+ /*^apply.arg */
+ argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0];
+ /*^apply.arg */
+ argtab[1].meltbp_cstring = "warmelt-macro.melt";
+ /*^apply.arg */
+ argtab[2].meltbp_long = 1763;
+ /*^apply.arg */
+ argtab[3].meltbp_cstring =
+ "macroexpand_toplevel_list mexpander=";
+ /*^apply.arg */
+ argtab[4].meltbp_aptr =
+ (melt_ptr_t *) & /*_.MEXPANDER__V4*/ meltfptr[3];
+ /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11] =
+ melt_apply ((meltclosure_ptr_t)
+ (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])),
+ (melt_ptr_t) (( /*nil */ NULL)),
+ (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_LONG MELTBPARSTR_CSTRING
+ MELTBPARSTR_PTR ""), argtab, "",
+ (union meltparam_un *) 0);
}
;
- /*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0;
+ /*_.IF___V11*/ meltfptr[7] =
+ /*_.MELT_DEBUG_FUN__V12*/ meltfptr[11];;
/*epilog */
+
+ MELT_LOCATION ("warmelt-macro.melt:1763:/ clear");
+ /*clear *//*_#THE_MELTCALLCOUNT__L4*/ meltfnum[0] = 0;
+ /*^clear */
+ /*clear *//*_.MELT_DEBUG_FUN__V12*/ meltfptr[11] = 0;
}
;
}
+ else
+ { /*^cond.else */
+
+ /*_.IF___V11*/ meltfptr[7] = NULL;;
+ }
;
+ MELT_LOCATION ("warmelt-macro.melt:1763:/ quasiblock");
+
+
+ /*_.PROGN___V13*/ meltfptr[11] = /*_.IF___V11*/ meltfptr[7];;
/*^compute */
- /*_.IFCPP___V10*/ meltfptr[6] = /*_.IFELSE___V11*/ meltfptr[7];;
+ /*_.IFCPP___V10*/ meltfptr[6] = /*_.PROGN___V13*/ meltfptr[11];;
/*epilog */
MELT_LOCATION ("warmelt-macro.melt:1763:/ clear");
- /*clear *//*_#IS_A__L3*/ meltfnum[1] = 0;
+ /*clear *//*_#MELT_NEED_DBG__L3*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V11*/ meltfptr[7] = 0;
+ /*clear *//*_.IF___V11*/ meltfptr[7] = 0;
+ /*^clear */
+ /*clear *//*_.PROGN___V13*/ meltfptr[11] = 0;
}
#else /*MELT_HAVE_DEBUG */
@@ -27423,25 +27470,55 @@ lab_endgetargs:;
/*_.IFCPP___V10*/ meltfptr[6] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
+ /*^compute */
+
+ /*_#NULL__L5*/ meltfnum[0] =
+ (( /*_.MEXPANDER__V4*/ meltfptr[3]) == NULL);;
+ MELT_LOCATION ("warmelt-macro.melt:1764:/ cond");
+ /*cond */ if ( /*_#NULL__L5*/ meltfnum[0]) /*then */
+ {
+ /*^cond.then */
+ /*^block */
+ /*anyblock */
+ {
+
+ /*^compute */
+ /*_.MEXPANDER__V4*/ meltfptr[3] = /*_.SETQ___V15*/ meltfptr[11] =
+ ( /*!MACROEXPAND_1 */ meltfrout->tabval[1]);;
+ /*_.IF___V14*/ meltfptr[7] = /*_.SETQ___V15*/ meltfptr[11];;
+ /*epilog */
+
+ MELT_LOCATION ("warmelt-macro.melt:1764:/ clear");
+ /*clear *//*_.SETQ___V15*/ meltfptr[11] = 0;
+ }
+ ;
+ }
+ else
+ { /*^cond.else */
+
+ /*_.IF___V14*/ meltfptr[7] = NULL;;
+ }
+ ;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-macro.melt:1764:/ cppif.then");
+ MELT_LOCATION ("warmelt-macro.melt:1765:/ cppif.then");
/*^block */
/*anyblock */
{
- /*_#IS_LIST__L4*/ meltfnum[0] =
- (melt_magic_discr ((melt_ptr_t) ( /*_.SLIST__V2*/ meltfptr[1])) ==
- MELTOBMAG_LIST);;
- MELT_LOCATION ("warmelt-macro.melt:1764:/ cond");
- /*cond */ if ( /*_#IS_LIST__L4*/ meltfnum[0]) /*then */
+ /*_#IS_A__L6*/ meltfnum[1] =
+ melt_is_instance_of ((melt_ptr_t) ( /*_.ENV__V3*/ meltfptr[2]),
+ (melt_ptr_t) (( /*!CLASS_ENVIRONMENT */
+ meltfrout->tabval[2])));;
+ MELT_LOCATION ("warmelt-macro.melt:1765:/ cond");
+ /*cond */ if ( /*_#IS_A__L6*/ meltfnum[1]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V13*/ meltfptr[12] = ( /*nil */ NULL);;
+ /*_.IFELSE___V17*/ meltfptr[16] = ( /*nil */ NULL);;
}
else
{
- MELT_LOCATION ("warmelt-macro.melt:1764:/ cond.else");
+ MELT_LOCATION ("warmelt-macro.melt:1765:/ cond.else");
/*^block */
/*anyblock */
@@ -27452,14 +27529,14 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("check slist"),
+ melt_assert_failed (("check env"),
("warmelt-macro.melt")
? ("warmelt-macro.melt") : __FILE__,
- (1764) ? (1764) : __LINE__, __FUNCTION__);
+ (1765) ? (1765) : __LINE__, __FUNCTION__);
;
}
;
- /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
+ /*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0;
/*epilog */
}
;
@@ -27467,39 +27544,39 @@ lab_endgetargs:;
;
/*^compute */
- /*_.IFCPP___V12*/ meltfptr[7] = /*_.IFELSE___V13*/ meltfptr[12];;
+ /*_.IFCPP___V16*/ meltfptr[11] = /*_.IFELSE___V17*/ meltfptr[16];;
/*epilog */
- MELT_LOCATION ("warmelt-macro.melt:1764:/ clear");
- /*clear *//*_#IS_LIST__L4*/ meltfnum[0] = 0;
+ MELT_LOCATION ("warmelt-macro.melt:1765:/ clear");
+ /*clear *//*_#IS_A__L6*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V13*/ meltfptr[12] = 0;
+ /*clear *//*_.IFELSE___V17*/ meltfptr[16] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V12*/ meltfptr[7] = ( /*nil */ NULL);
+ /*_.IFCPP___V16*/ meltfptr[11] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
#if MELT_HAVE_DEBUG
- MELT_LOCATION ("warmelt-macro.melt:1765:/ cppif.then");
+ MELT_LOCATION ("warmelt-macro.melt:1766:/ cppif.then");
/*^block */
/*anyblock */
{
- /*_#IS_OBJECT__L5*/ meltfnum[1] =
- (melt_magic_discr ((melt_ptr_t) ( /*_.MODCTX__V5*/ meltfptr[4])) ==
- MELTOBMAG_OBJECT);;
- MELT_LOCATION ("warmelt-macro.melt:1765:/ cond");
- /*cond */ if ( /*_#IS_OBJECT__L5*/ meltfnum[1]) /*then */
+ /*_#IS_LIST__L7*/ meltfnum[1] =
+ (melt_magic_discr ((melt_ptr_t) ( /*_.SLIST__V2*/ meltfptr[1])) ==
+ MELTOBMAG_LIST);;
+ MELT_LOCATION ("warmelt-macro.melt:1766:/ cond");
+ /*cond */ if ( /*_#IS_LIST__L7*/ meltfnum[1]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V15*/ meltfptr[14] = ( /*nil */ NULL);;
+ /*_.IFELSE___V19*/ meltfptr[18] = ( /*nil */ NULL);;
}
else
{
- MELT_LOCATION ("warmelt-macro.melt:1765:/ cond.else");
+ MELT_LOCATION ("warmelt-macro.melt:1766:/ cond.else");
/*^block */
/*anyblock */
@@ -27510,14 +27587,14 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("check modctx"),
+ melt_assert_failed (("check slist"),
("warmelt-macro.melt")
? ("warmelt-macro.melt") : __FILE__,
- (1765) ? (1765) : __LINE__, __FUNCTION__);
+ (1766) ? (1766) : __LINE__, __FUNCTION__);
;
}
;
- /*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0;
+ /*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0;
/*epilog */
}
;
@@ -27525,49 +27602,20 @@ lab_endgetargs:;
;
/*^compute */
- /*_.IFCPP___V14*/ meltfptr[12] = /*_.IFELSE___V15*/ meltfptr[14];;
+ /*_.IFCPP___V18*/ meltfptr[16] = /*_.IFELSE___V19*/ meltfptr[18];;
/*epilog */
- MELT_LOCATION ("warmelt-macro.melt:1765:/ clear");
- /*clear *//*_#IS_OBJECT__L5*/ meltfnum[1] = 0;
+ MELT_LOCATION ("warmelt-macro.melt:1766:/ clear");
+ /*clear *//*_#IS_LIST__L7*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V15*/ meltfptr[14] = 0;
+ /*clear *//*_.IFELSE___V19*/ meltfptr[18] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V14*/ meltfptr[12] = ( /*nil */ NULL);
+ /*_.IFCPP___V18*/ meltfptr[16] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
- /*^compute */
-
- /*_#NULL__L6*/ meltfnum[0] =
- (( /*_.MEXPANDER__V4*/ meltfptr[3]) == NULL);;
- MELT_LOCATION ("warmelt-macro.melt:1766:/ cond");
- /*cond */ if ( /*_#NULL__L6*/ meltfnum[0]) /*then */
- {
- /*^cond.then */
- /*^block */
- /*anyblock */
- {
-
- /*^compute */
- /*_.MEXPANDER__V4*/ meltfptr[3] = /*_.SETQ___V17*/ meltfptr[16] =
- ( /*!MACROEXPAND_1 */ meltfrout->tabval[2]);;
- /*_.IF___V16*/ meltfptr[14] = /*_.SETQ___V17*/ meltfptr[16];;
- /*epilog */
-
- MELT_LOCATION ("warmelt-macro.melt:1766:/ clear");
- /*clear *//*_.SETQ___V17*/ meltfptr[16] = 0;
- }
- ;
- }
- else
- { /*^cond.else */
-
- /*_.IF___V16*/ meltfptr[14] = NULL;;
- }
- ;
#if MELT_HAVE_DEBUG
MELT_LOCATION ("warmelt-macro.melt:1767:/ cppif.then");
@@ -27575,103 +27623,55 @@ lab_endgetargs:;
/*anyblock */
{
-
- {
- /*^locexp */
- /*melt_increment_dbgcounter */
-#if MELT_HAVE_DEBUG
- melt_dbgcounter++;
-#endif
- ;
- }
- ;
- /*_#MELT_NEED_DBG__L7*/ meltfnum[1] =
- /*MELT_NEED_DBG */
-#if MELT_HAVE_DEBUG
- ( /*melt_need_dbg */ melt_need_debug ((int) 0))
-#else
- 0 /* no melt_need_dbg */
-#endif /*MELT_HAVE_DEBUG */
- ;;
+ /*_#IS_CLOSURE__L8*/ meltfnum[1] =
+ (melt_magic_discr ((melt_ptr_t) ( /*_.MEXPANDER__V4*/ meltfptr[3])) ==
+ MELTOBMAG_CLOSURE);;
MELT_LOCATION ("warmelt-macro.melt:1767:/ cond");
- /*cond */ if ( /*_#MELT_NEED_DBG__L7*/ meltfnum[1]) /*then */
+ /*cond */ if ( /*_#IS_CLOSURE__L8*/ meltfnum[1]) /*then */
{
/*^cond.then */
+ /*_.IFELSE___V21*/ meltfptr[20] = ( /*nil */ NULL);;
+ }
+ else
+ {
+ MELT_LOCATION ("warmelt-macro.melt:1767:/ cond.else");
+
/*^block */
/*anyblock */
{
- /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] =
-#ifdef meltcallcount
- meltcallcount /* the_meltcallcount */
-#else
- 0L
-#endif /* meltcallcount the_meltcallcount */
- ;;
- MELT_LOCATION ("warmelt-macro.melt:1767:/ apply");
- /*apply */
+
+
+
{
- union meltparam_un argtab[5];
- memset (&argtab, 0, sizeof (argtab));
- /*^apply.arg */
- argtab[0].meltbp_long = /*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7];
- /*^apply.arg */
- argtab[1].meltbp_cstring = "warmelt-macro.melt";
- /*^apply.arg */
- argtab[2].meltbp_long = 1767;
- /*^apply.arg */
- argtab[3].meltbp_cstring =
- "macroexpand_toplevel_list mexpander=";
- /*^apply.arg */
- argtab[4].meltbp_aptr =
- (melt_ptr_t *) & /*_.MEXPANDER__V4*/ meltfptr[3];
- /*_.MELT_DEBUG_FUN__V20*/ meltfptr[19] =
- melt_apply ((meltclosure_ptr_t)
- (( /*!MELT_DEBUG_FUN */ meltfrout->tabval[0])),
- (melt_ptr_t) (( /*nil */ NULL)),
- (MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_LONG MELTBPARSTR_CSTRING
- MELTBPARSTR_PTR ""), argtab, "",
- (union meltparam_un *) 0);
+ /*^locexp */
+ melt_assert_failed (("check mexpander"),
+ ("warmelt-macro.melt")
+ ? ("warmelt-macro.melt") : __FILE__,
+ (1767) ? (1767) : __LINE__, __FUNCTION__);
+ ;
}
;
- /*_.IF___V19*/ meltfptr[18] =
- /*_.MELT_DEBUG_FUN__V20*/ meltfptr[19];;
+ /*clear *//*_.IFELSE___V21*/ meltfptr[20] = 0;
/*epilog */
-
- MELT_LOCATION ("warmelt-macro.melt:1767:/ clear");
- /*clear *//*_#THE_MELTCALLCOUNT__L8*/ meltfnum[7] = 0;
- /*^clear */
- /*clear *//*_.MELT_DEBUG_FUN__V20*/ meltfptr[19] = 0;
}
;
}
- else
- { /*^cond.else */
-
- /*_.IF___V19*/ meltfptr[18] = NULL;;
- }
;
- MELT_LOCATION ("warmelt-macro.melt:1767:/ quasiblock");
-
-
- /*_.PROGN___V21*/ meltfptr[19] = /*_.IF___V19*/ meltfptr[18];;
/*^compute */
- /*_.IFCPP___V18*/ meltfptr[16] = /*_.PROGN___V21*/ meltfptr[19];;
+ /*_.IFCPP___V20*/ meltfptr[18] = /*_.IFELSE___V21*/ meltfptr[20];;
/*epilog */
MELT_LOCATION ("warmelt-macro.melt:1767:/ clear");
- /*clear *//*_#MELT_NEED_DBG__L7*/ meltfnum[1] = 0;
+ /*clear *//*_#IS_CLOSURE__L8*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_.IF___V19*/ meltfptr[18] = 0;
- /*^clear */
- /*clear *//*_.PROGN___V21*/ meltfptr[19] = 0;
+ /*clear *//*_.IFELSE___V21*/ meltfptr[20] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V18*/ meltfptr[16] = ( /*nil */ NULL);
+ /*_.IFCPP___V20*/ meltfptr[18] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
@@ -27681,14 +27681,14 @@ lab_endgetargs:;
/*anyblock */
{
- /*_#IS_CLOSURE__L9*/ meltfnum[7] =
- (melt_magic_discr ((melt_ptr_t) ( /*_.MEXPANDER__V4*/ meltfptr[3])) ==
- MELTOBMAG_CLOSURE);;
+ /*_#IS_OBJECT__L9*/ meltfnum[1] =
+ (melt_magic_discr ((melt_ptr_t) ( /*_.MODCTX__V5*/ meltfptr[4])) ==
+ MELTOBMAG_OBJECT);;
MELT_LOCATION ("warmelt-macro.melt:1768:/ cond");
- /*cond */ if ( /*_#IS_CLOSURE__L9*/ meltfnum[7]) /*then */
+ /*cond */ if ( /*_#IS_OBJECT__L9*/ meltfnum[1]) /*then */
{
/*^cond.then */
- /*_.IFELSE___V23*/ meltfptr[19] = ( /*nil */ NULL);;
+ /*_.IFELSE___V23*/ meltfptr[22] = ( /*nil */ NULL);;
}
else
{
@@ -27703,14 +27703,14 @@ lab_endgetargs:;
{
/*^locexp */
- melt_assert_failed (("check mexpander"),
+ melt_assert_failed (("check modctx"),
("warmelt-macro.melt")
? ("warmelt-macro.melt") : __FILE__,
(1768) ? (1768) : __LINE__, __FUNCTION__);
;
}
;
- /*clear *//*_.IFELSE___V23*/ meltfptr[19] = 0;
+ /*clear *//*_.IFELSE___V23*/ meltfptr[22] = 0;
/*epilog */
}
;
@@ -27718,18 +27718,18 @@ lab_endgetargs:;
;
/*^compute */
- /*_.IFCPP___V22*/ meltfptr[18] = /*_.IFELSE___V23*/ meltfptr[19];;
+ /*_.IFCPP___V22*/ meltfptr[20] = /*_.IFELSE___V23*/ meltfptr[22];;
/*epilog */
MELT_LOCATION ("warmelt-macro.melt:1768:/ clear");
- /*clear *//*_#IS_CLOSURE__L9*/ meltfnum[7] = 0;
+ /*clear *//*_#IS_OBJECT__L9*/ meltfnum[1] = 0;
/*^clear */
- /*clear *//*_.IFELSE___V23*/ meltfptr[19] = 0;
+ /*clear *//*_.IFELSE___V23*/ meltfptr[22] = 0;
}
#else /*MELT_HAVE_DEBUG */
/*^cppif.else */
- /*_.IFCPP___V22*/ meltfptr[18] = ( /*nil */ NULL);
+ /*_.IFCPP___V22*/ meltfptr[20] = ( /*nil */ NULL);
#endif /*MELT_HAVE_DEBUG */
;
MELT_LOCATION ("warmelt-macro.melt:1769:/ quasiblock");
@@ -27747,10 +27747,10 @@ lab_endgetargs:;
/*_.PREVLOC__V26*/ meltfptr[25] = ( /*nil */ NULL);;
/*^compute */
- /*_#I__L11*/ meltfnum[7] =
+ /*_#I__L11*/ meltfnum[10] =
(( /*_#SLISTLEN__L10*/ meltfnum[1]) < (2));;
MELT_LOCATION ("warmelt-macro.melt:1774:/ cond");
- /*cond */ if ( /*_#I__L11*/ meltfnum[7]) /*then */
+ /*cond */ if ( /*_#I__L11*/ meltfnum[10]) /*then */
{
/*^cond.then */
/*^block */
@@ -28494,7 +28494,7 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-macro.melt:1822:/ finalreturn");
;
/*finalret */ goto labend_rout;
- /*_.LET___V24*/ meltfptr[19] = /*_.RETURN___V49*/ meltfptr[36];;
+ /*_.LET___V24*/ meltfptr[22] = /*_.RETURN___V49*/ meltfptr[36];;
MELT_LOCATION ("warmelt-macro.melt:1769:/ clear");
/*clear *//*_#SLISTLEN__L10*/ meltfnum[1] = 0;
@@ -28503,7 +28503,7 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.PREVLOC__V26*/ meltfptr[25] = 0;
/*^clear */
- /*clear *//*_#I__L11*/ meltfnum[7] = 0;
+ /*clear *//*_#I__L11*/ meltfnum[10] = 0;
/*^clear */
/*clear *//*_.IFCPP___V45*/ meltfptr[35] = 0;
/*^clear */
@@ -28511,7 +28511,7 @@ lab_endgetargs:;
MELT_LOCATION ("warmelt-macro.melt:1758:/ quasiblock");
- /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V24*/ meltfptr[19];;
+ /*_.RETVAL___V1*/ meltfptr[0] = /*_.LET___V24*/ meltfptr[22];;
MELT_LOCATION ("warmelt-macro.melt:1758:/ finalreturn");
;
/*finalret */ goto labend_rout;
@@ -28522,19 +28522,19 @@ lab_endgetargs:;
/*^clear */
/*clear *//*_.IFCPP___V10*/ meltfptr[6] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V12*/ meltfptr[7] = 0;
+ /*clear *//*_#NULL__L5*/ meltfnum[0] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V14*/ meltfptr[12] = 0;
+ /*clear *//*_.IF___V14*/ meltfptr[7] = 0;
/*^clear */
- /*clear *//*_#NULL__L6*/ meltfnum[0] = 0;
- /*^clear */
- /*clear *//*_.IF___V16*/ meltfptr[14] = 0;
+ /*clear *//*_.IFCPP___V16*/ meltfptr[11] = 0;
/*^clear */
/*clear *//*_.IFCPP___V18*/ meltfptr[16] = 0;
/*^clear */
- /*clear *//*_.IFCPP___V22*/ meltfptr[18] = 0;
+ /*clear *//*_.IFCPP___V20*/ meltfptr[18] = 0;
+ /*^clear */
+ /*clear *//*_.IFCPP___V22*/ meltfptr[20] = 0;
/*^clear */
- /*clear *//*_.LET___V24*/ meltfptr[19] = 0;
+ /*clear *//*_.LET___V24*/ meltfptr[22] = 0;
}
;